collapseos/emul/cfsin/count.bas

6 lines
69 B
QBasic
Raw Normal View History

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