DIM BX(10),BY(10),WUD(10) REAE: SPEED=0.8 PX=80 SCORE=0 XSPEED=0 FRIC=0.06 LIVES=10 GAMEPAD 1 RANDOMIZE TIMER FOR I=1 TO 10 BX(I)=40+RND(8)*8 BY(I)=-8 WUD(I)=RND(200)+100*I NEXT I DO CLS BG 0 BG COPY 0,0,32,32 TO 128,160 PRINT "SCORE" PRINT SCORE PRINT "LIVES" PRINT LIVES SPRITE 0,PX,112,2 PX=PX+XSPEED IF LEFT(0) THEN XSPEED=XSPEED-0.1 IF RIGHT(0) THEN XSPEED=XSPEED+0.1 IF PX<48 THEN XSPEED=XSPEED-XSPEED-XSPEED IF PX>104 THEN XSPEED=XSPEED-XSPEED-XSPEED IF XSPEED>0 THEN XSPEED=XSPEED-FRIC IF XSPEED<0 THEN XSPEED=XSPEED+FRIC FOR I=1 TO 10 SPRITE I,BX(I),BY(I),1 WUD(I)=WUD(I)-1 IF WUD(I)<0 THEN BY(I)=BY(I)+0.5 IF SPRITE HIT(0) AND SPRITE HIT(I) THEN BX(I)=40+RND(8)*8 BY(I)=-8 WUD(I)=RND(200)+100+I*8 SCORE=SCORE+1 END IF IF BY(I)>120 THEN LIVES=LIVES-1 IF BY(I)>120 THEN BX(I)=40+RND(8)*8 BY(I)=-8 WUD(I)=RND(200)+100+I*8 END IF IF LIVES=0 THEN GOTO GAME NEXT I WAIT VBL LOOP GAME: FOR I=1 TO 100 PRINT "GAME OVER GAME OVER" NEXT I WAIT 100 GOTO REAE #1:MAIN PALETTES 0B3F3F0000383400003C0C00003F3C00 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 00000000000000000000183C3C180000 0000000024000000000000C33C3C1866 0000000000000000FFFFFFFFFFFFFFFF #3:MAIN BG 00001410000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000000000000000000 00000000000000000300000000000000 00000000000000000000000000000300 00000000000000000000000000000000 03000000000000000000000000000000 00000000000003000300030003000300 03000300030003000300000000000000 00000000