mirror of
https://github.com/AppleCommander/bastools.git
synced 2024-06-09 19:29:32 +00:00
8 lines
106 B
QBasic
8 lines
106 B
QBasic
10 text:home
|
|
20 for a = 1 to 100
|
|
30 gosub 100
|
|
40 next a
|
|
50 end
|
|
100 rem a subroutine
|
|
110 print a
|
|
120 return |