10 POKE56,60:POKE55,0:CLR:KM=15360:RO=1:PRINTCHR$(8):DIMZ$(23)
20 H=54272:FORI=HTOH+24:POKEI,0:NEXT:FORI=0TO15:POKEH+24,I:NEXT:POKEH+5,200
30 POKEH+6,200:POKEH+4,17
40 BC=53280:BK=53281:POKEBC,6:POKEBK,6:PRINT"[147][159]"SPC(6);
50 PRINT"[172][172][187][146][187]     [187][172][146]     [188][187][172][146][190]    [161][172][187][146][187]"SPC(12)"[188][188][146][162]      [161][146][161]";
60 PRINTSPC(6)"[161][146][161]     [161][188][190][146][190]"SPC(12)"[172][187][161][146][161]     [161][146][161]      [161][146][161]     [161][172][188][146]";
70 PRINTSPC(14)"[162][162][146]      [162][162][146]      [188][190]     [188][190][188][190][145][145][145]"SPC(16);
80 PRINT"[161][146][161][161][146][161]"SPC(4)"[161][172][162][146][190]"SPC(4)"[161][172][162][146][190]"SPC(20)"[161][188][190][146][161]"SPC(4)"[161][188][146][187]";
90 PRINTSPC(5)"[161][188][146][187]"SPC(21)"[161][146][161][161][146][161]"SPC(4)"[161][146][161]"SPC(6)"[161][146][161]"SPC(22)"[188][190][188][190]";
100 PRINTSPC(4)"[188][190]"SPC(6)"[188][162][162][146][190]":PRINTSPC(14)"ENTER LEVEL"
110 PRINTSPC(16)"1  2  3[157][157][157][157][157][157][157][157][157]FAST   SLOW"
120 KT$="":GETKT$:IFKT$<"1"ORKT$>"3"THEN120
130 KT=VAL(KT$)+2:POKE850,KT
140 PRINTSPC(12)"[145][145][145][145][145]DESIGNING BOARD":PRINT""SPC(14)"PLEASE WAIT"
150 PRINTSPC(14)"           ":A$(1)="[192]":A$(2)="[194]":A$(3)="[206]":A$(4)="[205]":A$(5)=" "
160 B$="                         ":C$=" [146]":E$="[159][160]      ":D$=E$+" ":GOSUB570
170 FORI=1TO23:MT$=MT$+"[157]"+C$:NEXT:MT$=MT$+""
180 GOSUB420:PRINT"[147]";:POKEBC,3:POKEBK,0
190 PRINTD$""B$"[159]      ":POKE1063,160:POKE55335,3
200 FORI=1TO23:PRINTD$""C$"[155]"Z$(I)""C$E$;:NEXT:PRINTD$""B$"[159]      "
210 POKE2023,160:POKE56295,3:POKEBK,0
220 PRINT"[159] [158]SCORE[157][157][157][157][159]"S1:PRINT" ROUND[157][157][157][157]"RO
230 PRINT"[159] [150]SCORE[157][157][157][157][159]"S2
240 PRINT""SPC(36)"SH[157][157]I[157][157]FTE[157][157]R"
250 IFCK=1THENCK=0:S1=0:S2=0:RO=1:KC=0:GOTO310
260 POKE831,RND(0)*4:IFKCTHEN280
270 GOSUB520
280 SYS15360:KC=1:SP=PEEK(195)+256*PEEK(196):GOSUB430:POKESP,160
290 RO=RO+1:IFS1=5ORS2=5THENCK=1:RO=RO-1
300 GOTO220
310 PRINT""SPC(16)"GAME OVER":PRINT""SPC(12)"PRESS FIREBUTTON"
320 IF(PEEK(56320)ANDPEEK(56321))AND16THEN320
330 PRINT"":FORI=1TO23:PRINTD$""C$"[155]"Z$(I)""C$E$;:NEXT
340 PRINTD$""B$"[159]      ":POKEBK,15
350 PRINTSPC(15)"[144]ENTER LEVEL":PRINTSPC(18)"(1-3)"
360 POKE198,0:WAIT198,1:GETKT$:IFKT$<"1"ORKT$>"3"THEN360
370 KT=VAL(KT$)+2:POKE850,KT
380 PRINT"[145][145][145][145]"SPC(13)"[144]DESIGNING BOARD":PRINTSPC(18)"     "
390 FORI=1TO23:Z$(I)="":NEXT:GOSUB420:PRINT"";:GOTO190
400 X=INT(28*RND(1))+1:IFX>4THENX=5
410 RETURN
420 FORZ=1TO23:FORI=1TO23:GOSUB400:Z$(Z)=Z$(Z)+A$(X):NEXTI,Z:RETURN
430 IFSP<1063ORSP>1984THEN470
440 S1=S1+1:TE=7:GOSUB540:FORQ=1TO8:POKE646,TE:PRINT""SPC(9)MT$""SPC(33)MT$
450 IFTE=7THENTE=6:FORE=1TO130:NEXTE,Q:RETURN
460 TE=7:NEXTQ:RETURN
470 S2=S2+1:TE=2:GOSUB540:FORQ=1TO8:POKE646,TEMP
480 PRINT""SPC(8)B$:PRINT""SPC(8)B$""
490 FORE=1TO75:NEXTE
500 IFTE=2THENTE=6:NEXTQ:RETURN
510 TE=2:NEXTQ:RETURN
520 FORI=10TO255STEP20:FORL=255TO10STEP-50:POKEH+1,I:POKEH,L:NEXT:NEXT
530 POKEH,0:POKEH+1,0:RETURN
540 FORI=255TO120STEP-30:FORL=10TO255STEP10:POKEH+1,L:POKEH,I:NEXT:NEXT
550 GOTO530
560 POKE646,6:RETURN
570 READA:IFA=256THENRETURN
580 POKEKM,A:KM=KM+1:GOTO570
590 DATA 32,42,60,32,123,60
600 DATA 32,175,60,32,54,61
610 DATA 165,108,32,23,62,165
620 DATA 109,32,75,62,206,65
630 DATA 3,208,9,173,66,3
640 DATA 141,65,3,32,155,62
650 DATA 32,12,62,76,6,60
660 DATA 173,27,3,201,243,240
670 DATA 23,169,49,133,100,169
680 DATA 12,133,101,169,0,133
690 DATA 98,169,252,133,99,169
700 DATA 1,141,69,3,208,21
710 DATA 169,49,133,100,169,4
720 DATA 133,101,169,0,133,98
730 DATA 169,212,133,99,169,0
740 DATA 141,69,3,173,69,3
750 DATA 10,10,24,105,3,170
760 DATA 160,3,189,115,60,153
770 DATA 106,0,202,136,16,246
780 DATA 96,15,5,7,2,81
790 DATA 101,103,66,165,100,133
800 DATA 3,133,5,24,105,195
810 DATA 133,195,165,101,133,4
820 DATA 133,6,105,1,133,196
830 DATA 169,0,141,60,3,141
840 DATA 61,3,169,32,141,64
850 DATA 3,173,82,3,141,65
860 DATA 3,141,66,3,169,11
870 DATA 141,67,3,141,68,3
880 DATA 96,162,0,32,244,61
890 DATA 74,176,29,173,60,3
900 DATA 240,121,206,60,3,165
910 DATA 106,32,23,62,165,3
920 DATA 56,233,40,133,3,165
930 DATA 4,233,0,133,4,76
940 DATA 53,61,74,176,31,173
950 DATA 60,3,201,22,240,87
960 DATA 165,106,32,23,62,238
970 DATA 60,3,165,3,24,105
980 DATA 40,133,3,165,4,105
990 DATA 0,133,4,76,53,61
1000 DATA 174,60,3,236,67,3
1010 DATA 240,55,74,176,27,160
1020 DATA 0,177,3,72,136,200
1030 DATA 200,192,23,240,8,177
1040 DATA 3,136,145,3,76,7
1050 DATA 61,104,136,145,3,76
1060 DATA 53,61,74,176,22,160
1070 DATA 22,177,3,72,200,136
1080 DATA 136,48,8,177,3,200
1090 DATA 145,3,76,37,61,104
1100 DATA 200,145,3,96,162,1
1110 DATA 32,244,61,74,176,55
1120 DATA 174,61,3,236,68,3
1130 DATA 240,44,160,0,177,5
1140 DATA 72,165,5,133,252,165
1150 DATA 6,133,253,162,21,160
1160 DATA 40,177,252,160,0,145
1170 DATA 252,165,252,24,105,40
1180 DATA 133,252,165,253,105,0
1190 DATA 133,253,202,16,232,104
1200 DATA 160,0,145,252,76,243
1210 DATA 61,74,176,60,174,61
1220 DATA 3,236,68,3,240,115
1230 DATA 165,5,24,105,72,133
1240 DATA 252,165,6,105,3,133
1250 DATA 253,160,40,177,252,72
1260 DATA 162,21,160,0,177,252
1270 DATA 160,40,145,252,165,252
1280 DATA 56,233,40,133,252,165
1290 DATA 253,233,0,133,253,202
1300 DATA 16,232,104,160,40,145
1310 DATA 252,76,243,61,74,176
1320 DATA 29,173,61,3,240,55
1330 DATA 206,61,3,165,106,32
1340 DATA 75,62,165,5,56,233
1350 DATA 1,133,5,165,6,233
1360 DATA 0,133,6,76,243,61
1370 DATA 74,176,28,173,61,3
1380 DATA 201,22,240,21,238,61
1390 DATA 3,165,106,32,75,62
1400 DATA 165,5,24,105,1,133
1410 DATA 5,165,6,105,0,133
1420 DATA 6,96,173,69,3,208
1430 DATA 4,189,0,220,96,189
1440 DATA 10,62,141,8,255,234
1450 DATA 234,234,173,8,255,96
1460 DATA 250,253,162,50,160,0
1470 DATA 136,208,253,202,208,250
1480 DATA 96,141,62,3,165,3
1490 DATA 133,247,24,101,98,133
1500 DATA 252,165,4,133,248,101
1510 DATA 99,133,253,160,22,173
1520 DATA 62,3,145,252,177,247
1530 DATA 201,81,240,13,174,62
1540 DATA 3,228,106,240,4,9
1550 DATA 128,208,2,41,127,145
1560 DATA 247,136,16,227,96,141
1570 DATA 62,3,165,5,24,101
1580 DATA 98,133,252,165,6,101
1590 DATA 99,133,253,162,22,173
1600 DATA 62,3,160,0,145,252
1610 DATA 165,252,56,229,98,133
1620 DATA 247,165,253,229,99,133
1630 DATA 248,160,0,177,247,201
1640 DATA 81,240,13,172,62,3
1650 DATA 196,106,240,4,9,128
1660 DATA 208,2,41,127,160,0
1670 DATA 145,247,165,252,24,105
1680 DATA 40,133,252,165,253,105
1690 DATA 0,133,253,202,16,195
1700 DATA 96,173,64,3,160,0
1710 DATA 145,195,165,195,24,101
1720 DATA 98,133,252,165,196,101
1730 DATA 99,133,253,165,106,145
1740 DATA 252,173,63,3,170,173
1750 DATA 68,3,24,125,78,63
1760 DATA 141,68,3,173,67,3
1770 DATA 24,125,82,63,141,67
1780 DATA 3,173,63,3,10,170
1790 DATA 165,195,24,125,62,63
1800 DATA 133,195,165,196,125,63
1810 DATA 63,133,196,177,195,41
1820 DATA 127,141,64,3,162,3
1830 DATA 221,70,63,240,5,202
1840 DATA 48,35,16,246,201,64
1850 DATA 208,9,173,63,3,41
1860 DATA 1,208,22,240,11,201
1870 DATA 66,208,7,173,63,3
1880 DATA 41,1,240,9,173,63
1890 DATA 3,93,74,63,141,63
1900 DATA 3,169,81,145,195,165
1910 DATA 195,24,101,98,133,252
1920 DATA 165,196,101,99,133,253
1930 DATA 177,252,41,15,201,6
1940 DATA 208,13,165,106,32,23
1950 DATA 62,165,106,32,75,62
1960 DATA 104,104,96,165,107,145
1970 DATA 252,96,216,255,1,0
1980 DATA 40,0,255,255,64,66
1990 DATA 77,78,2,2,3,1
2000 DATA 0,1,0,255,255,0
2010 DATA 1,0,256