10  POKE VAL "23611", CODE " TO " : RANDOMIZE USR VAL "7030"
20  BORDER NOT PI : PAPER NOT PI : INK  NOT PI : BRIGHT NOT PI : CLS : CLEAR VAL "25087"
30  OVER VAL "1" : PAPER VAL "8" : INK VAL "8" : BRIGHT VAL "8"
40  PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "16" : OUT VAL "32765", VAL "16" : LOAD "2" CODE
50  PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "23" : OUT VAL "32765", VAL "23" : LOAD "7" CODE
60  PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "17" : OUT VAL "32765", VAL "17" : LOAD "1" CODE
70  PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "19" : OUT VAL "32765", VAL "19" : LOAD "3" CODE
80  PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "20" : OUT VAL "32765", VAL "20" : LOAD "4" CODE
90  PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "22" : OUT VAL "32765", VAL "22" : LOAD "6" CODE
95  POKE VAL "23388", VAL "16" : OUT VAL "32765", VAL "16" : RANDOMIZE USR VAL "49152"
100 RANDOMIZE USR VAL "25088"
110 PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "19" : OUT VAL "32765", VAL "19" : LOAD "13" CODE
120 RANDOMIZE USR VAL "25103"
130 PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "17" : OUT VAL "32765", VAL "17" : LOAD "11" CODE
140 RANDOMIZE USR VAL "25103"
150 PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "22" : OUT VAL "32765", VAL "22" : LOAD "16" CODE
160 RANDOMIZE USR VAL "25103"
170 PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "23" : OUT VAL "32765", VAL "23" : LOAD "17" CODE
180 RANDOMIZE USR VAL "25103"
190 PRINT AT VAL "0", VAL "0";" " : POKE VAL "23388", VAL "16" : OUT VAL "32765", VAL "16" : LOAD "10" CODE
200 RANDOMIZE USR VAL "25103"