DIM GLOBAL XDIR(7),YDIR(7) FOR I=0 TO 7 READ XDIR(I),YDIR(I) NEXT I DATA 0,-1,1,-1,1,0,1,1,0,1,-1,1,-1,0,-1,-1 REM WAS8BIT BG 1 BG COPY 0,0,32,32 TO 0,0 SPRITE 1,80,64,32 GLOBAL PDIR,PX,PY,DX,DY PX=8*6 PY=8*3 DX=10 DY=8 SCROLL 1,PX,PY SPRITE 1 PAL 2 PDIR=0 GAMEPAD 1 BG 0 DO U=UP(0) D=DOWN(0) R=RIGHT(0) L=LEFT(0) RL=R OR L UD=U OR D UU=U AND NOT RL DD=D AND NOT RL RR=R AND NOT UD LL=L AND NOT UD UR=U AND R UL=U AND L DR=D AND R DL=D AND L IF UU THEN PDIR=0 IF UR THEN PDIR=1 IF RR THEN PDIR=2 IF DR THEN PDIR=3 IF DD THEN PDIR=4 IF DL THEN PDIR=5 IF LL THEN PDIR=6 IF UL THEN PDIR=7 CALL MOVE WAIT VBL LOOP SUB MOVE MX=XDIR(PDIR) MY=YDIR(PDIR) PX=PX+MX PY=PY+MY SPRITE 1,,,32+PDIR SCROLL 1,PX,PY BG 1 C=CELL.C(PX\8+DX+MX,PY\8+DY+MY) BG 0 NUMBER 0,0,C,3 IF C<>0 THEN PLAY 0,30,1 SOUND 0 ELSE PLAY 0,20,1 SOUND 0 WAIT 2 END IF END SUB #1:MAIN PALETTES 193F2A15000C2A30000B2B00003F3C00 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 81808180818081807E7F7E7F7E7F7E7F 0181018101810181FE7EFE7EFE7EFE7E FF0000000000005500FFFFFFFFFFFFAA 0000000000000300FFFFFFFFFFFFFCFF 0000000000004040FFFFFFFFFFFFFFFF 0000000000000300FFFFFFFFFFFFFFFF 0000000000004040FFFFFFFFFFFFBFBF 0100010001000100FEFFFEFFFEFFFEFF 0383038303830383FC7CFC7CFC7CFC7C FFFF0000000000550000FFFFFFFFFFAA 0000000000000055FFFFFFFFFFFFFFAA 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF818199998181FF0000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 AA000000000000FF55FFFFFFFFFFFF00 0202000000000000FFFFFFFFFFFFFFFF 00C0000000000000FF3FFFFFFFFFFFFF 0202000000000000FDFDFFFFFFFFFFFF 00C0000000000000FFFFFFFFFFFFFFFF C1C0C1C0C1C0C1C03E3F3E3F3E3F3E3F 0080008000800080FF7FFF7FFF7FFF7F AA0000000000000055FFFFFFFFFFFFFF AA0000000000FFFF55FFFFFFFFFF0000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 3C7E421818667E3C00427E24245A4200 0C1E035BDAE0783008101C65A6180810 0066E3DBDBE3660000661C24241C6600 3078E0DA5B031E0C100818A6651C1008 3C7E661818427E3C00425A24247E4200 0C1E075BDAC0783008101865A6380810 0066C7DBDBC766000066382424386600 3078C0DA5B071E0C100838A665181008 #3:MAIN BG 00002020000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000030003000300030003000400 05000300030003000300030003000300 03000300030003000300030003000300 03000300030004000500030003000300 03000300130013001300130013001400 15001300130013001300130013001300 13001A001B0013001300130013001300 13001300130014001500130013001300 13001300000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000100020000000000000000000000 00000000000001000200000000000000 00000000030003000300030003000400 05000300030003000300030003000300 03000A000B0003000300030003000300 03000300030004000500030003000300 03000300130013001300130013001400 15001300130013001300130013001300 13001300130013001300130013001300 13001300130014001500130013001300 13001300000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000000000000000000000000100 02000000000000000000000000000000 00000000000000000000000000000000 00000000000001000200000000000000 00000000 #15:MAIN SOUND 1800000F04FF00001800846C003A0000 08006060000000002800303019FE0000 38002020000000003800505000000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000 0800000F000000000800000F00000000