8 lines
190 B
QBasic
8 lines
190 B
QBasic
|
100 rem compound goto
|
||
|
|
110 leti=1:print i
|
||
|
|
120 on i gosub 130, 140, 150
|
||
|
|
121 printi"end":stop
|
||
|
|
130 print "line130":i=i+1:return
|
||
|
|
140 print "line140":i=i+1:return
|
||
|
|
150 print "line150":i=i+1:return
|