RANDOMIZE TIMER GAMEPAD 1 BX=-10 BY=0 SPR=1 MOVER=0 MOVEL=0 TIM=0 ENEMY=0 EX=64 EY=70 ES=7 SPD=0.3 SCR=0 XC=-20 YC=60 X=69 Y=110 PX=10 PY=5 DIM HX(20) DIM HY(20) DIM HS(20) DIM HASP(20) FOR I=0 TO 20 HX(I)=INT(RND*153) HY(I)=80+INT(RND*70) HS(I)=48 HASP(I)=0.5 NEXT I SPRITE.A 5,(0,0,0,0,1) SPRITE.A 6,(4,0,0,0,1) TITLE: DO CLS PRINT" ---------" PRINT" *STAR WARP*" PRINT" ---------" PRINT"" PRINT"" PRINT"" PRINT"" PRINT"" PRINT"" PRINT"" PRINT"" PRINT"" PRINT"" PRINT" PRESS 'Z' TO BEGIN" IF BUTTON(0,0) THEN GOTO GAME CLS END IF WAIT VBL LOOP GAME: CLS PRINT" READY..." WAIT 2*60 PRINT" GO" WAIT 1*60 DO REM ---SPRITES--- SPRITE 1,X,Y,SPR IF SPRITE HIT(1,7) THEN GOTO GAMEOVER BG COPY 0,0,20,16 TO 0,0 TEXT 70,0,"SCORE:"+STR$(SCR)+"" TIM=TIM+1 IF TIM>=40 THEN SPRITE 7,EX,EY,ES EY=EY+SPD END IF IF EY>=80 THEN ES=6 SPD=0.3 END IF IF EY>=150 THEN GOSUB AGAIN IF BY<85 THEN BSPR=21 IF BY<70 THEN BX=-20 SPRITE 5,PX,PY,10 IF SPRITE HIT(9,7) THEN SCR=SCR+3 BX=-10 BY=0 ES=23 EX=-30 END IF PX=PX+0.01 IF PX>160 THEN PX=-20 SPRITE 6,XC,YC,17 XC=XC+0.1 IF XC>160 THEN XC=-20 FOR I=0 TO 3 IF HY(I)>85 THEN HS(I)=49 END IF IF HY(I)>105 THEN HS(I)=50 END IF IF HY(I)>115 THEN HS(I)=51 END IF IF HY(I)>125 THEN HS(I)=52 END IF IF HY(I)>130 THEN HX(I)=INT(RND*153) HY(I)=80 HS(I)=48 END IF HY(I)=HY(I)+HASP(I) SPRITE I+10,HX(I),HY(I),HS(I) NEXT I REM MOVEMENT IF LEFT(0) AND X>0 THEN MOVEL=1 ELSE MOVEL=0 IF RIGHT(0) AND X<150 THEN MOVER=1 ELSE MOVER=0 IF DOWN(0) AND Y<120 THEN Y=Y+0.3 IF UP(0) AND Y>70 THEN Y=Y-0.6 IF MOVEL=0 AND MOVER=0 THEN SPR=1 IF MOVEL=1 AND MOVER=0 THEN SPR=3 X=X-0.8 END IF IF MOVER=1 AND MOVEL=0 THEN SPR=2 X=X+0.8 END IF IF BUTTON TAP(0,0) THEN GOSUB RAND SPRITE 9,BX,BY,BSPR BY=BY-3 WAIT VBL LOOP RAND: BSPR=5 BX=X BY=Y RETURN AGAIN: EY=70 EX=INT(RND*110) ES=7 SPD=0.2 RETURN GAMEOVER: CLS SPRITE OFF PRINT" GAME OVER" WAIT 2*60 GOTO TITLE #1:MAIN PALETTES 060B343800383400003C0C00003F3C00 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 00000000187EE7240000000000001818 0000C0F078181C0C0000000000606000 0000030F1E1838300000000000060600 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 00000000000000000000001818180000 00000000001818000000000099A5E718 0000000000180000000000005A661800 00000000000000000000000000000000 00000000000000000000000000000000 000000000007FFFE001F3F3F7F7F7F7F 000000003CFEE20C00E0F0F8F8FCFCF0 00004100000000800000000000000000 00002000000000020000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000071F7EE1000000000000011E 00000000C0FCBE82000000000000407C 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000180000 00000000000000000000000000000000 00343C3A3E782800347EFE7F7FFE7C2A 00000000000000000000000000000000 00000000000000000000000000000000 C07F0000000000003F007F1F0F000000 F0800000000000000878F0E080000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 84721E07000000007B1F070000000000 5C10E0C000000000A0E0C00000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000038000000 00000000000000000000003C663C0000 00000000000000000000003C427E3C00 00000000000000000000007EC3FF7E00 000000000000000000007EC3C3FF7E00 #3:MAIN BG 00001410000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400040004000400040004000400 04000400