18 lines
243 B
Text
18 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
|