10 A=RND(-TI):POKE0,99:POKE37154,127
20 POKE36879,8:POKE36878,15:DIMA%(9,9):Z=128
30 R=4:C=4:R1=4:C1=4:G=87:H=6:E=7725:F=38445
40 FORA=1TO5
50 B=INT(RND(1)*8)+1:O=INT(RND(1)*8)+1
60 IFA%(B,O)THEN50
70 A%(B,O)=1:NEXT:PRINT"[147]BEAMS:"V"     LOW:"PEEK(0)
80 PRINT"[213][192][178][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][178][192][201]
90 [153]"(null)(null)(null)"[163]18)"(null)(null)(null)
100 PRINT"[171][192][219][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][219][192][179]
110 [129]A[178]1[164]8:[153]"(null)(null)(null)CLOSE(null)CLOSE(null)CLOSE(null)CLOSE(null)CLOSE(null)CLOSE(null)CLOSE(null)(null)(null)
120 PRINT"[221] [221]"TAB(18)"[221][221]":NEXT
130 PRINT"[145][171][192][219][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][219][192][179]
140 [153]"(null)(null)(null)"[163]18)"(null)(null)(null)
150 PRINT"[202][192][177][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][203]
160 [139]L[167]660
170 [153]"CLR WAIT HIT   WAIT MISS  SYS WAIT REFL
180 P=PEEK(37152)AND128:IFP=0THENC=C+1
190 P=PEEK(37151)
200 IF(PAND8)=0THENR=R+1
210 IF(PAND16)=0THENC=C-1
220 IF(PAND4)=0THENR=R-1
230 IFR<0THENR=0
240 IFR>9THENR=9
250 IFC<0THENC=0
260 IFC>9THENC=9
270 D=E+44*R+C+C
280 POKEE+44*R1+C1+C1,G:POKEF+44*R1+C1+C1,H
290 R1=R:C1=C:G=PEEK(D):H=PEEK(F+44*R+C+C)
300 POKEE+44*R+C+C,43:POKEF+44*R+C+C,5
310 IF(PAND32)THEN180
320 IFG=32THEN470
330 IFG=81THEN780
340 IFG<>87THEN180
350 G=81:H=1:A=240:GOSUB810
360 I=I+1:IFA%(R,C)THENL=L+1
370 POKED,81:POKED+30720,1
380 IFI<5THEN180
390 IFL<5THEN660
400 PRINT"     YOU GOT IT!     [145]"
410 FORA=1TO10
420 FORB=250TO240STEP-1:POKE36876,B:NEXT
430 FORB=240TO250:POKE36876,B:NEXT
440 NEXT:POKE36876,0
450 IFPEEK(0)>VTHENPOKE0,V
460 GOTO750
470 A=225:GOSUB810
480 P=R:Q=C:DR=0:DC=0:T=0:TI$="000000":V=V+1:PRINT""V
490 IFR=0THENDR=1
500 IFR=9THENDR=-1
510 IFC=0THENDC=1
520 IFC=9THENDC=-1
530 GOTO560
540 IFP>0ANDP<9ANDQ>0ANDQ<9THEN560
550 Z=Z+1:G=Z:H=2:GOSUB640:U=44*P+Q+Q:POKEE+U,G:POKEF+U,H:GOTO280
560 RR=P+DR:CC=Q+DC
570 IFA%(RR,CC)=1THENG=160:H=4:GOSUB640:GOTO280
580 IFDRTHENN=1:M=0:GOTO600
590 M=1:N=0
600 S=0:IFA%(RR+M,CC+N)=1THENDR=-M:DC=-N:S=1
610 IFA%(RR-M,CC-N)=1THENDR=M:DC=N:S=S+1
620 IFS=2OR(SANDT=0)THENG=160:H=7:GOSUB640:GOTO280
630 P=P+DR:Q=Q+DC:T=1:GOTO540
640 IFTI<60THEN640
650 RETURN
660 PRINT"    YOU MISSED IT    [145]"
670 FORA=1TO20
680 FORB=220-ATO160-ASTEP-8:POKE36876,B:NEXT
690 FORB=160-ATO220-ASTEP8:POKE36876,B:NEXT
700 NEXT:POKE36876,0
710 FORR=1TO8:FORC=1TO8
720 G=87:H=6:IFA%(R,C)THENG=81:H=1
730 POKEE+44*R+C+C,G:POKEF+44*R+C+C,H
740 NEXT:NEXT
750 PRINT"   HIT FIRE BUTTON[145]"
760 IF(PEEK(37151)AND32)THEN760
770 RUN20
780 G=87:H=6:A=235:GOSUB810
790 I=I-1:IFA%(R,C)THENL=L-1
800 GOTO180
810 POKE36876,A:FORA=0TO99:NEXT:POKE36876,0:RETURN