18 lines
160 B
Text
18 lines
160 B
Text
program examples\incstr
|
|
|
|
data
|
|
|
|
int value[0]
|
|
str$ text['12345']
|
|
|
|
begin
|
|
|
|
strint [value],text$
|
|
+1 [value]
|
|
intstr text$,[value]
|
|
|
|
echo text$
|
|
pause
|
|
kill
|
|
|
|
end
|