0 CLS:PRINT@505,"HUNTER";:POKE30777,1:J=28672:P=28705:Z=32:IFI<H,H=I
1 COLOR3:FORA=66TO414STEP2:PRINT@A,"";:B=B+1:IFB>15+R+R,B=0:A=A+32
2 NEXT:X=-32:F=28945:S=0:COLOR2:FORA=31TO448STEP32:PRINT@A,"";:M=1
3 NEXT:FORA=0TO31:PRINT@A,"";:PRINT@A+448,"";:NEXT:PRINT@494,"BEST:";H;
4 IFA$="Q",M=XELSEIFA$="A",M=ZELSEIFA$="M",M=-1ELSEIFA$=",",M=1
5 T=PEEK(P+M):IFT=94ORT=96,P=P+M:POKEP,112:POKEQ,96ELSEP=Q
6 PRINT@481,"SCORE:";S;:A$=INKEY$:Q=P:G=F:I=S:R=RND(4)
7 IFR=1,E=XELSEIFR=2,E=ZELSEIFR=3,E=-1ELSEE=1
8 IFP=F,PRINT@237,"":SOUND27,2;25,4:IFH=0,H=S:GOTO0ELSE0
9 IFPEEK(F+E)=96,F=F+E:POKEF,94:POKEG,96:S=S+1:GOTO4ELSE4
