10 PRINT"POKE51,255:POKE52,63:POKE55,255:POKE56,63:NEW"
20 PRINT"LOAD"CHR$(34)"FILL 64"CHR$(34)",8,1:NEW
22 [153]"SYS 33846:PRINTCHR$(147)"
30 [129]I[178]1[164]3:[151]631[170]I,13:[130]
40 [151]631[170]I,13:[151]631[170]I[170]1,13:[151]631,13:[151]631[170]I[170]2,13:[151]198,I[170]1:[128]