RosettaCodeData/Task/Flow-control-structures/BBC-BASIC/flow-control-structures.bbc

12 lines
167 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
GOSUB subroutine
(loop)
PRINT "Infinite loop"
GOTO loop
END
(subroutine)
PRINT "In subroutine"
WAIT 100
RETURN