Bazooka by Jim Gerrie

0 CLS:A=1:G=0:M=16384:C=0:D=0:F=0:B=RND(14):Y=32:X=0:K=0:S=0:LV=50:PRINT@269,"bazooka":FORF=1TO2500:NEXT 1 CLS:LV=LV+5:FORF=1TOLV:PRINT@INT(RND(.)*16)*Y+RND(30),"‰":NEXT:F=RND(13):G=30:X=4:POKE16925,0:POKE16926,1 2 IFPEEK(M+Y*F+G)<>96THENPRINT@Y*F+G+A," ":K=2-RND(3):F=F+K:IFF 15THENF=F-K 3 POKEM+Y*F+G,45:PRINT@Y*F+G+1,"o ":SOUND1,1:G=G-A:SOUND90,1:IFG .)-(K=90ANDB Y)GOTO2:PRINT@Y*B+C,":":D=D+A:X=X-A:ON-(X=.)GOTO9:K=M+Y*B+D:IFPEEK(K)=137ORPEEK(K+A)=137THEN7 6 PRINT@Y*B+D," >":D=D+A:ON-(PEEK(M+Y*B+D+A)=137)GOTO7:ON-(D HS)*S:GOTO1 9 ?@Y*B+C,"boom":?S"TANKS HIT. HIGH"HS:?MID$("OUT OF ROCKETS. ",(X...