GAMEPAD 1 CELL SIZE 1,1 BG 1 BG COPY 0,0,10,8 TO 0,0 DIM PX(10),PY(10),PT(10) FOR I=1 TO 10 PX(I)=I-1 PY(I)=2 IF I\2=I/2 THEN PT(I)=2 ELSE PT(I)=1 SPRITE I SIZE 1 PAL PT(I) SPRITE I,PX(I)*16,PY(I)*16,32+PT(I)*2 NEXT I SPRITE 0,0,2*16,38 SPRITE 0 SIZE 1 IFLASH=0 CFLASH=40 CX=0 CY=2 PSCORE=0 CSCORE=0 IROUND=0 BG 0 PAL 3 NUMBER 3,0,PSCORE,2 NUMBER 17,0,CSCORE,2 TEXT 8,1,"GAME" NUMBER 9,0,IROUND,2 DO ADD IFLASH,1,0 TO 5 IF IFLASH=0 THEN IF RIGHT(0) THEN ADD CX,1,0 TO 9 IF LEFT(0) THEN ADD CX,-1,0 TO 9 IF DOWN(0) THEN ADD CY,2,2 TO 6 IF UP(0) THEN ADD CY,-2,2 TO 6 ADD CFLASH,2,38 TO 42 SPRITE 0,CX*16,CY*16,CFLASH END IF WAIT VBL LOOP #1:MAIN PALETTES 053F0800003F380000282400003F3F00 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 00000000000000000000000000000000 007F7F7F7F7F7F7F007F7F7F7F7F7F7F 00FEFEFEFEFEFEFE00FEFEFEFEFEFEFE 000000000000000FFFFFFFFFFFFFFFFF 0000000000C0E0F0FFFFFFFFFFFFFFFF 000000000003070FFFFFFFFFFFFFFFFF 00000000000000F0FFFFFFFFFFFFFFFF 0000000001010101FFFFFFFFFFFFFFFF 0000000080808080FFFFFFFFFFFFFFFF 00000F1020202020FFFFFFFFFFFFFFFF 0000F00804040404FFFFFFFFFFFFFFFF 0040201008040201FFFFFFFFFFFFFFFF 0002040810204080FFFFFFFFFFFFFFFF 00552A552A542850FFFFFFFFFFFFFFFF 0055AA552A150A05FFFFFFFFFFFFFFFF 00000000000000000000000000000000 00000000000000000000000000000000 7F7F7F7F7F7F7F007F7F7F7F7F7F7F00 FEFEFEFEFEFEFE00FEFEFEFEFEFEFE00 0F00000000000000FFFFFFFFFFFFFFFF F0E0C00000000000FFFFFFFFFFFFFFFF 0F07030000000000FFFFFFFFFFFFFFFF F000000000000000FFFFFFFFFFFFFFFF 0707030100000000FFFFFFFFFFFFFFFF E0E0C08000000000FFFFFFFFFFFFFFFF 20202020100F0000FFFFFFFFFFFFFFFF 0404040408F00000FFFFFFFFFFFFFFFF 0102040810204000FFFFFFFFFFFFFFFF 8040201008040200FFFFFFFFFFFFFFFF 205028542A552A55FFFFFFFFFFFFFFFF 02050A152A55AA55FFFFFFFFFFFFFFFF 004070787C7C7E7E7F7F7F7F7F7F7F7F 00020E1E3E3E7E7EFEFEFEFEFEFEFEFE 0F1F3C3D037E00010F19237F7FFFFFFF 006818666666009EE0F8FC98BA99FFED 070F0F1F1E101010001236646DEFEFEF 60F0F0E000EE660080684CDEFEFFFFFF 5B800080800080801280000080000080 6C010100010100014801000001000001 6D008080008080004900008000008000 B6000101000101002400010000010000 36808000808000802400800000800000 DA010001010001019200000100000100 0F1F3C3D037E0001FFF9E3FFFFFFFFFF 006818666666009EFFFFFF99BB99FFED 070F0F1F1E101010F8F2F6E4EDEFEFEF 60F0F0E000EE66009F6F4FDFFFFFFFFF 7E7E7C7C787040007F7F7F7F7F7F7F7F 7E7E3E3E1E0E0200FEFEFEFEFEFEFEFE 433E0000110E0000FFFFFF7F7F3F1F07 3F3F3FBE00306040EDFFFFECFEFCF8E0 383F3F7F7F3F1F07C7C0C00000000000 3CFEFC8080000000C31D037E7EFCF8E0 80008080008080368000008000008012 01010001010001DA0100000100000148 008080008080006D0000800000800024 00010100010100B60001000001000092 808000808000805B0080000080000049 010001010001016C0000010000010024 433E0000110E0000FFFFFFFFFFFFFFFF 3F3F3FBE00306040EDFFFFEDFFFFFFFF 383F3F7F7F3F1F07C7C0C08080C0E0F8 3CFEFC8080000000C31D037F7FFFFFFF #3:MAIN BG 00010A082C0100000000000000000002 00002E02000000000200020002000200 02000200020002000200020004000400 04000400040004000400040004000800 02000200020002000200020002000200 02002000080006000600060006000600 06000600060006002000020002000200 02000200020002000200020004000400 0400040004000A000C000A000A000E00 02000200020002000200020002000200 02000200