10 '*** OISAC 2 *** GOTO ***
15 GOTO 30
20 PRINT "2"
25 PRINT "3":GOTO 35
30 PRINT "1":GOTO 20
35 PRINT "4"
40 END