X=64 Y=63 S=1 GAMEPAD 1 SPD=0.7 PX=-10 PY=-20 DIM PS(100) I=10 DO CLS BG COPY 0,0,20,16 TO 0,0 C=CELL.C((X+4)/8,(Y+8)/8) SPRITE 1,X,Y,S SPRITE PS(I),PX,PY,9 'MOVE CHARACTER IF UP(0) AND Y>5 THEN Y=Y-SPD S=4 END IF IF DOWN(0) AND Y<113 THEN Y=Y+SPD S=3 END IF IF LEFT(0) AND X>4.5 THEN X=X-SPD S=2 END IF IF RIGHT(0) AND X<145 THEN X=X+SPD S=1 END IF IF C=8 AND BUTTON TAP(0,0) THEN PY=Y PX=X PS(I)=PS(I)+1 END IF WAIT VBL LOOP #1:MAIN PALETTES 2D39003400080404003F2A2400303E24 00391024003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 3C3E383C3C3C3C3C3C3E04003C2C3C3C 3C7C1C3C3C3C3C3C3C7C20003C343C3C 3C3C183C3C7E3C3C3C3C24003C3C3C3C 3C3C3C3C3C7E3C3C3C3C00003C3C3C3C 0004060A10204080040A090D13204080 00201808142642800000000412204080 0000427E183C7E7E00007E7E183C7E7E 003C7E7E7E7E3C00003C7E7E7E7E3C00 0000000811826C0C0000000100480010 000000000008523C0000000000000000 00000000000000180000000000000000 00001A25498102000000000000000000 F0F0FFFFFFF0F0F00000FFFFFFF0F0F0 F0F0F0F0F0F0F0F000F0F0F0F0F0F0F0 F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 03070F1F3F7FFFFF00000000000000FF C0E0F0F8FCFEFFFF00000000000000FF 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000FFFFFF0000000000FFFFFF00 F0F0F0F0F0F0F0F0000000F0F0F0F0F0 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 FF8C8C8CFCFC0000FFFFFFFFFFFF0000 FF3131313F3F0000FFFFFFFFFFFF0000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 0000FFFFFF0000000000FFFFFF000000 #3:MAIN BG 000014100D042D042D042D042D042D04 2D042D042D042D042D042D042D042D04 2D042D042D042D042D041E040F040000 00000C01000000000000000000000004 00040004000400040004000000000000 00000F040F040C010000000000000000 000000000000000000000C0100001303 1403000000000C0100000F040F040000 00000000000000000003000000000002 00020002000023032403000000000000 00000F040F0400000803000008030000 08030000000000000002000200020000 000000000000000000000F040F040000 00000000000000000000000000000002 00020002000200000000000000000000 00000F040F0400000803000008030003 080300020000000000020C0100000000 000000000000000000000F040F040000 00000000000000000000000000000000 00020002000200020000000000000C01 00000F040F0400000000000000000C01 00000000000000000000000000000000 000000000000000000000F040F040C01 00000000000000000000000000000000 00000000000000000000000000000000 00000F040F0400000000000000000000 00000000000000000000000000000000 000000000000000000000F040F040000 0C010000000000000000000000000000 0C010000000000000000000000000C01 00000F040F0400000000000000000C01 00000000000000000000000000000000 000000000000000000000F040F040000 00000000000000000000000000000000 000000000C0100000000000000000000 00000F040F0400000000000000000000 00000C01000000000000000000000000 000000000000000000000F040D042D04 2D042D042D042D042D042D042D042D04 2D042D042D042D042D042D042D042D04 2D041E04