19 lines
243 B
Text
19 lines
243 B
Text
|
include "ConsoleWindow"
|
||
|
|
|
||
|
|
dim as Str255 numStr
|
||
|
|
dim as long numeric, i
|
||
|
|
|
||
|
|
numStr = "12345"
|
||
|
|
numeric = val(numStr)
|
||
|
|
numeric++
|
||
|
|
numStr = str$(numeric)
|
||
|
|
print numStr
|
||
|
|
|
||
|
|
print
|
||
|
|
|
||
|
|
for i = 0 to 10
|
||
|
|
numeric++
|
||
|
|
numStr = str$( numeric )
|
||
|
|
print numStr
|
||
|
|
next
|