0 CLS:PRINT@333,"BOMBDROP":SOUND31,3;27,2;23,4:FORI=1TO15:PRINT:NEXT:U=86
1 MODE(1):FORI=2TO30STEP2:FORJ=RND(15)+13TO62STEP2:S=U
2 POKE28672+I+(J*32),85:POKE28672+I+1+(J*32),85:NEXTJ,I:COLOR3
3 FORI=0TOSSTEP2:RESET(I,0):NEXT:FORI=30658TO30687:POKEI,255:NEXT
4 IFINKEY$<>" ",GOTO8ELSES=S-2:IFPEEK(30656+B)=255,T=T+1
5 COLOR4:FORI=1TOT*2STEP2:RESET(I-1,2):NEXT:FORI=UTOSSTEP-2
6 SET(I,0):NEXT:FORK=28896TO30656STEP32:POKEK+B,0:POKEK+B+1,0
7 NEXT:FORI=UTOSSTEP-2:SET(I,0):NEXT:IFT=15,U=U-10:T=0:GOTO1
8 A$=INKEY$:B=B+2:C=28768:POKEC+B,253:POKEC+B-2,0
9 IFB>30,B=2:POKEC+32,0:POKEC+B,253:GOTO4ELSEGOTO4
