1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-24 04:28:06 +11:00
collapseos/tools/emul/cfsin/count.bas

6 lines
69 B
QBasic
Raw Normal View History

2019-11-25 06:26:32 +11:00
10 print "Count to 10"
20 a=0
30 a=a+1
40 print a
50 if a<10 goto 30