ack/lang/basic/test/test12.bas

7 lines
80 B
QBasic
Raw Permalink Normal View History

1985-01-24 11:27:36 +00:00
100 gosub 200
110 print "succeeded"
120 stop
200 print "subroutine"
210 return