5 CLS:PRINT@43,"":SOUND31,2;29,2;27,4:FORA=49TO497STEP32
9 PRINT@A,"";:PRINT@A-32,"    ";:NEXT
10 COLOR2:X=63:Y=34:MODE(1):FORA=0TO127:RESET(A,5):RESET(A,63):NEXT
20 FORA=5TO63:RESET(0,A):RESET(127,A):NEXT
30 COLOR3:A$=INKEY$:IFA$="",40ELSEL=0:U=0
40 IFA$="Q",U=-1ELSEIFA$="A",U=1ELSEIFA$="M",L=-1ELSEIFA$=",",L=1
50 S=S+1:X=X+L:Y=Y+U:COLOR3:IFPOINT(X,Y)=2,PRINT"SCORE"S:SOUND9,1:END
60 B=POINT(X,Y):IFB=2ORB=4,PRINT"SCORE IS"S:SOUND 27,2;24,3:END
70 RESET(X,Y):I=RND(126):J=RND(57)+5:COLOR4:IFY<5,P=P+10:GOTO10
80 RESET(I,J):IFRND(999)>990,SET(62,5):SET(63,5):GOTO30ELSE30
