10 CLS:WIDTH20,8:PRINTCHR$(23) 20 PRINTTAB(3)+"Attack of the":PRINTTAB(3)+"Sine Wave from":PRINTTAB(3)+"Outer Space!"; 30 FORI=1TO3:FORJ=1TO55STEP3:SOUNDJ,1:NEXTJ,I 40 CLS:LOCATE0,2,0:PRINT"";:LOCATE19,1,0:PRINT""; 50 LOCATE9,0,0:PRINT"";:LOCATE10,3,0:PRINT""; 60 Z=RND*16+.0625:PSET(0,16) 70 FORX=0TO119 80 Y=16-16*(SIN(X/Z)):LINE-(X,Y),PSET 90 A$=INKEY$:IFA$<>""THEN160 100 W%=(W%+X+1)MOD56+1:SOUNDW%,1 110 NEXTX 120 FORI=1TO2:FORJ=56TO1STEP-4:SOUNDJ,1:SOUNDJ+1,1:NEXTJ,I 130 V%=V%-50 140 LOCATE0,3,0:PRINTV%;:IFV%>500ORV%<-500THEN230 150 GCLS:LOCATES0,0,0:GOTO60 160 LINE(2,19)-(X,Y),PSET:LINE(116,11)-(X,Y),PSET 170 IFPOINT(56,3)ORPOINT(62,27)THEN200 180 V%=V%-ABS(Y-16)-16 190 GOTO100 200 FORI=1TO3:FORJ=56TO51STEP-1:SOUNDJ,1:SOUND51,1:SOUND56,1:NEXTJ,I 210 V%=V%+ABS(X-60)+60 220 GOTO140 230 GCLS:LOCATES0,0,0 240 FORK=1TO2:FORL=1TO4:FORI=1TO112STEP4:J=ABS(I-56):SOUNDJ+31,1:SOUNDJ,1:NEXTI,L 250 FORI=1TO112:J=I^2-56*(I^2\56):SOUNDJ,1:NEXTI,K:CLS:END