​
0RESTORE:DEFINTb-z:KEYOFF:SCREEN1,2,0:y=128:m=-1:s=0:ONSPRITEGOSUB7:SPRITEON
1FORi=0TO68:VPOKE6688+(iAND31),0:READa$:VPOKE14343+i,VAL("&H"+a$):NEXT:b=1:f=15
2f(0)=1:f(1)=4:f(2)=16:f(3)=64:DATA4,6,7,23,73,FF,7,3,1,0,0,0,0,0,0,0,0,0,0,80
3VPOKE6,f(sAND3):IFy<81THENj=3ELSEIFy=128THENj=STRIG(0)*3
4IFm<0THENn=96+INT(RND(1)*3)*16:i=b:b=f:f=i:v=s/100+2:IFv>6THENv=7
5IFm<0THENBEEP:m=255:LOCATE22,1:?s:COLORf,b,4:p=0:IFn=128THENp=sAND2
6PUTSPRITE0,(32,y),f,1:y=y+j:PUTSPRITE1,(m,n),f,p:s=s+1:m=m-v:GOTO3
7LOCATE22,1:?s:LOCATE11,11:?"GaMeOvEr":PLAY"DFDA":FORi=0TO3000:NEXT:SPRITEOFF
8RETURN0:DATAC0,E0,FF,F8,FE,0,0,0,0,0,20,20,31,3F,1F,F,7,7,6,4,6,1E,2F,3F,38
9DATA3F,78,F8,FE,F8,F0,F0,E0,C0,80,80,C0,18,1B,DB,DB,DB,DE,7C,38,18,18,18,18