GAMEPAD 1 REM WAS8BIT BG VIEW OFF 0 ILEVEL=0 STAR=8 GO=15 SPRITE 1 PAL 3 IZAP=0 NEXTLEVEL: INC ILEVEL REPLAY: ROMNUM=ILEVEL+2 BG SOURCE ROM(ROMNUM) BG 1 BG COPY 0,0,20,16 TO 0,0 CELL 2,0,12 CELL 3,0,13 STARMAX=0 ISTARS=0 PX=-1 FOR Y=0 TO 15 FOR X=0 TO 19 C=CELL.C(X,Y) IF C=STAR THEN INC STARMAX IF C=GO THEN PX=X*8 PY=Y*8 CELL X,Y,0 END IF NEXT X NEXT Y IF PX=-1 THEN CLS PRINT "END GAME" END END IF SPRITE 0,9*8,13*8,3 YJUMP=0 IJUMP=0 ISTICK=0 SQUISH=0 ITWINKLE=0 XDIR=0 TRACK 0,3 DO IF IZAP>0 THEN IF XDIR<0 THEN XX=1 ELSE XX=7 CZ=CELL.C((SPRITE.X(1)+XX)\8,SPRITE.Y(1)\8) IF CZ>0 THEN IF CZ>15 THEN CELL (SPRITE.X(1)+XX)\8,SPRITE.Y(1)\8,0 IZAP=0 SPRITE 1,,,0 END IF IF IZAP>12 THEN PX=PX+XDIR SPRITE 0,PX,, SPRITE 1,SPRITE.X(1)+XDIR,, END IF IF IZAP>0 THEN DEC IZAP IF IZAP>12 AND IZAP<=18 THEN IZAP=0 IF IZAP=0 THEN SPRITE 1,,,0 END IF PAL 0 NUMBER 0,0,STARMAX,2 NUMBER 4,0,ISTARS,2 IF ISTARS=STARMAX THEN TRACK 1,3 WAIT 60*6 GOTO NEXTLEVEL END IF IF SQUISH=0 THEN ISTICK=0 IF RIGHT(0) THEN XDIR=1 CR=CELL.C((PX+8)\8,(PY+7)\8) IF CR=0 OR CR=STAR OR CR>15 THEN IF CR=STAR THEN INC ISTARS CELL (PX+8)\8,(PY+7)\8,0 PLAY 0,80,1 SOUND 0 ELSE IF CR>15 AND CR<64 THEN GOTO OOPS END IF INC PX SPRITE 0,PX,,4 SQUISH=0 ELSE INC SQUISH IF SQUISH>15 THEN ISTICK=1 IJUMP=1 SPRITE 0,,,5 END IF END IF ELSE IF LEFT(0) THEN XDIR=-1 CL=CELL.C((PX-1)\8,(PY+7)\8) IF CL=0 OR CL=STAR OR CL>15 THEN IF CL=STAR THEN INC ISTARS CELL (PX-1)\8,(PY+7)\8,0 PLAY 0,80,1 SOUND 0 ELSE IF CL>15 AND CL<64 THEN GOTO OOPS END IF DEC PX SPRITE 0,PX,,2 SQUISH=0 ELSE INC SQUISH IF SQUISH>15 THEN ISTICK=1 IJUMP=1 SPRITE 0,,,1 END IF END IF ELSE SQUISH=0 END IF IF BUTTON TAP(0,1) THEN IF IZAP=0 THEN SPRITE 1,PX+8*XDIR,PY,31 IZAP=12 PLAY 1,50,1 SOUND 3 ELSE IF IZAP<12 THEN SPRITE 1,PX+8*XDIR,PY,30 IZAP=100 PLAY 1,60,1 SOUND 4 END IF END IF IF BUTTON TAP (0,0) THEN IF YJUMP=0 AND IJUMP=0 THEN PLAY 1,50,1 SOUND 1 YJUMP=12 IJUMP=1 SPRITE 0,,,6 ELSE IF IJUMP=1 THEN PLAY 1,50,1 SOUND 1 IJUMP=2 YJUMP=YJUMP+12 SPRITE 0,,,7 END IF END IF END IF IF YJUMP>0 THEN CU=CELL.C((PX+4)\8,(PY-1)\8) IF CU<>0 OR CU=STAR OR CU>15 THEN IF CU=STAR THEN INC ISTARS CELL (PX+4)\8,(PY-1)\8,0 PLAY 0,80,1 SOUND 0 ELSE IF CU>15 AND CU<64 THEN GOTO OOPS END IF YJUMP=0 SPRITE 0,,,3 ELSE DEC PY DEC YJUMP IF YJUMP=0 THEN SPRITE 0,,,3 SPRITE 0,,PY, END IF END IF BG 1 CD=CELL.C((PX+4)\8,(PY+8)\8) IF YJUMP=0 AND (CD=0 OR CD=STAR OR CD>15) THEN IF CD=STAR THEN INC ISTARS CELL (PX+4)\8,(PY+8)\8,0 PLAY 0,80,1 SOUND 0 ELSE IF CD>15 AND CD<64 THEN GOTO OOPS END IF INC PY PY=PY-ISTICK*0.5 SPRITE 0,,PY, END IF IF CD>0 AND IJUMP>0 THEN IJUMP=0 SPRITE 0,,,3 END IF WTWINKLE=(WTWINKLE+1) MOD 12 IF WTWINKLE=0 THEN ADD ITWINKLE,1,10 TO 11 COPY $8000+ITWINKLE*16,16 TO $8000+STAR*16 END IF WAIT VBL LOOP OOPS: PLAY 0,20,90 SOUND 0 WAIT 240 GOTO REPLAY #1:MAIN PALETTES 0B3C2814003F2915002B0C0000353C00 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 E0F0F8F8F8F8F0E0180C464606068C18 387CFEFEFEFE7C380402919101916204 3C7EFFFFFFFF7E3C0000242400241800 1C3E7F7F7F7F3E1C2040898980894620 070F1F1F1F1F0F071830626260603118 3C7EFFFFFF7E3C00002424002499423C 3C7EFFFF7E3C00002424002499C37E3C 0000083E1C1C36000000001400000000 00247E3C3C7E24007EDB81C3C381DB7E 00083E1C1C3600000100148000000000 0000083E1C1C36000440001400000000 0000083E1C1C3600FFFFF7D5E3E3C9FF 0000003C003C0000FFFFFFC3FFC3FFFF 00000000000000000000000000000000 FFFFFFFFFFFFFFFFFFE7DFEFF7CFFFFF FFA5240018000000007E7E7E3C3C4281 FFA5240018000000007E7E7E3C3CE781 FFA5241818000000007E7E7E3C3C2424 00007E0024000000A500007E7E7E6666 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00815AA55A8100008142A55AA5428100 0000AA55AA000000000055AA55000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0000000000000000FFFFFFFFFFFFFFFF 0018181818001800FFE7E7E7E7FFE7FF 006C6C2400000000FF9393DBFFFFFFFF 00247E24247E2400FFDB81DBDB81DBFF 00083E380E3E0800FFF7C1C7F1C1F7FF 0062640810264600FF9D9BF7EFD9B9FF 001C34386E643A00FFE3CBC7919BC5FF 0018183000000000FFE7E7CFFFFFFFFF 000C183030180C00FFF3E7CFCFE7F3FF 0030180C0C183000FFCFE7F3F3E7CFFF 000024187E182400FFFFDBE781E7DBFF 000018187E181800FFFFE7E781E7E7FF 0000000018183000FFFFFFFFE7E7CFFF 000000007E000000FFFFFFFF81FFFFFF 0000000000181800FFFFFFFFFFE7E7FF 00060C1830604000FFF9F3E7CF9FBFFF 003C666E76663C00FFC399918999C3FF 0018381818187E00FFE7C7E7E7E781FF 003C660C18307E00FFC399F3E7CF81FF 003C660C06663C00FFC399F3F999C3FF 0066667E06060600FF999981F9F9F9FF 007E607C06067C00FF819F83F9F983FF 001C307C66663C00FFE3CF839999C3FF 007E060C18303000FF81F9F3E7CFCFFF 003C663C66663C00FFC399C39999C3FF 003C663E06663C00FFC399C1F999C3FF 0000001800180000FFFFFFE7FFE7FFFF 0000001800183000FFFFFFE7FFE7CFFF 00000C1830180C00FFFFF3E7CFE7F3FF 0000007E007E0000FFFFFF81FF81FFFF 000030180C183000FFFFCFE7F3E7CFFF 003C660C18001800FFC399F3E7FFE7FF 003C666E6E603C00FFC39991919FC3FF 00183C667E666600FFE7C399819999FF 007C667C66667C00FF839983999983FF 003C666060663C00FFC3999F9F99C3FF 00786C66666C7800FF879399999387FF 007E607860607E00FF819F879F9F81FF 007E607860606000FF819F879F9F9FFF 003C606E66663C00FFC39F919999C3FF 0066667E66666600FF999981999999FF 003C181818183C00FFC3E7E7E7E7C3FF 001E060606663C00FFE1F9F9F999C3FF 00666C78786C6600FF999387879399FF 0060606060607E00FF9F9F9F9F9F81FF 0042667E7E666600FFBD9981819999FF 0066767E6E666600FF998981919999FF 003C666666663C00FFC399999999C3FF 007C667C60606000FF8399839F9F9FFF 003C66666A6C3E00FFC399999593C1FF 007C667C786C6600FF839983879399FF 003E603C06067C00FFC19FC3F9F983FF 007E181818181800FF81E7E7E7E7E7FF 0066666666663C00FF9999999999C3FF 00666666663C1800FF99999999C3E7FF 0066667E7E664200FF9999818199BDFF 00663C183C666600FF99C3E7C39999FF 0066663C18181800FF9999C3E7E7E7FF 007E0C1830607E00FF81F3E7CF9F81FF 003C303030303C00FFC3CFCFCFCFC3FF 006030180C060200FF9FCFE7F3F9FDFF 003C0C0C0C0C3C00FFC3F3F3F3F3C3FF 00183C6600000000FFE7C399FFFFFFFF 0000000000007E00FFFFFFFFFFFF81FF #3:LEVEL 1 00001410090109010901090109010901 09010901090109010901090109010901 09010901090109010901090109010000 00000000000000000000000000000000 00000000000000000000000000000000 00000901090108000000000000000000 00000000000008000000000000000000 00000000000000000000090109010901 09010901090100010000000000000901 00000000000000000000000000000000 00000901090100010001000109010901 00010000090109010901000009010901 00000901000000000000090109010000 00000000000000000000000000000000 00000000090108000000090109010901 00000901090100000901090109010901 09010901090109010901090109010901 09010901000000000000090109010000 00000000000000000000000000000000 00000000090100010000000000000000 00000901090100000000000000000000 00000001000108000901000009010800 00000001000109010901090109010000 00000000000009010901090109010901 09010000090109010001090100000000 00000901090100010001000000000000 00000000000000000901000009010901 09010901080000000000090109010901 09010000000000000000000000000800 09010000000000000000090109010000 00000901090109010901000000000000 00000000090109010901000000000001 00010000000000000000090109010901 09010901090109010000000000000F00 00000000000009010001000000000001 09010901090109010901090109010901 00010000000009010000000000000901 00010000000009010901090109010901 09010901090109010901090109010901 09010901090109010901090109010901 09010901 #4:LEVEL 2 00001410090109010901090109010901 09010901090109010901090109010901 09010901090109010901090109010000 00000000000000000000000000000000 00000000000000000000000000000000 00000901090108000800000000000000 00000000000008000000000000000000 00000000000000000000090109010901 09010901090100010000000000000901 00000000000000000000000000000000 00000901090100010001000109010901 00010000090109010901000009010901 00000901080000000000090109010000 00000000000000000000000000000002 00000000090108000000090109010901 00000901090100000901090109010901 09010901090109010901090109010901 09010901000000000000090109010000 00000000000000000000000000000000 00000000090100010000000000000000 08000901090100000000000000000000 00000001080008000901000009010800 00000001000109010901090109010000 00000000000009010901090109010901 09010000090109010001090100000000 00000901090100010001000000000000 00000000000000000901000009010901 09010901080000000000090109010901 09010000000000000000000000000800 09010000000000000000090109010000 00000901090109010901130200000000 00000000090109010901000000000001 00010000000000000000090109010901 09010901090109010000000000000F00 00000000000009010001000000000001 08000901090109010901090109010901 13020000000009010000000013020901 13020000000009010901090109010901 09010901090109010901090109010901 09010901090109010901090109010901 09010901 #15:MAIN SOUND 2400303A10D9E0000800804410C30000 08006060000000002800303019FE0000 3800219901FF00003800505000000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 00404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 40404040404040404040404040404040 462F0000000000000000000000000000 00003D2F000000000000000000003F2F 00000000000000000000412F00000000 422F00000000442F00000000462F0000 00000000000000000000000000003D2F 000000000000000000003F2F00000000 3D2F0000000000000000000000000000 00003D2F000000000000000000003F2F 00000000000000000000412F00000000 422F00000000442F00000000462F0000 0000000000000000000000000000462F 00000000000000000000422F00000000