'############################# '# GRAVITY BY G9 # '# * ONLY 2 VARIABLES ! # '# TEST--NOT A GAME # '# MORE INFO = NXC-4810-G9 # '############################# GAMEPAD 1 RANDOMIZE TIMER GLOBAL X,Y X=60 Y=2 BG COPY 0,0,20,16 TO 0,0 'SPRITE INIT FOR I=0 TO 9 SPRITE I,RND(48)+48,I*10,I+1 NEXT I SPRITE 10 SIZE 1 'MAIN PROGRAM :P DO SPRITE 10,X,Y,16 IF BUTTON (0) THEN CALL MOVESPRITE CALL FALL CALL MOVECURSOR WAIT VBL LOOP SUB MOVESPRITE SPRITE 10,,,18 IF NOT SPRITE HIT (10,0 TO 9) THEN WAIT 15 EXIT SUB END IF IF SPRITE HIT (10,0 TO 9) THEN SPRITE 10,,,18 REPEAT SPRITE HIT,X+4,Y+4, SPRITE HIT PAL 2 CALL MOVECURSOR WAIT VBL UNTIL NOT BUTTON (0) END SUB SUB MOVECURSOR IF UP (0) THEN IF Y>-4 THEN DEC Y IF LEFT (0) THEN IF X>44 THEN DEC X IF RIGHT (0) THEN IF X<100 THEN INC X IF DOWN (0) THEN IF Y<76 THEN INC Y SPRITE 10,X,Y, END SUB SUB FALL FOR I=0 TO 9 SPRITE I PAL 0 IF SPRITE.Y(I)>=80 THEN SPRITE I,SPRITE.X(I),80,SPRITE.C(I) ELSE IF SPRITE.Y(I)<80 AND NOT SPRITE HIT (1,0 TO 9) THEN SPRITE I,SPRITE.X(I),SPRITE.Y(I)+1,SPRITE.C(I) END IF IF SPRITE HIT (I,0 TO 9) THEN REPEAT SPRITE I,SPRITE.X(I),SPRITE.Y(I)-1,SPRITE.C(I) UNTIL NOT SPRITE HIT (I,0 TO 9) END IF NEXT I END SUB #1:MAIN PALETTES 0B3F2A150E0C0804002A1500003F3C00 003F2A15003F2A15003F2A15003F2A15 #2:MAIN CHARACTERS 00000000000000000000000000000000 FE8181818181817F017F7F7F7F7F7FFF 3C4081818181023C003E7F7F7F7F7E3C 181824244242817F08081C1C3E3E7FFF 1820408181020418001C3E7F7F7E3C18 000000FE8181817F000000017F7F7FFF FE8181818181817F017F7F7F7F7F7FFF 3C4081818181023C003E7F7F7F7F7E3C 181824244242817F08081C1C3E3E7FFF 1820408181020418001C3E7F7F7E3C18 000000FE8181817F000000017F7F7FFF C080C080C080C080FFFFFFFFFFFFFFFF FF5500000000000000AAFFFFFFFFFFFF 0103010301030103FEFCFEFCFEFCFEFC 0000000000000000FFFFFFFFFFFFFFFF 0000000000000000C3E77E3C3C7EE7C3 F08F809F5050505000707F7F30303030 0EF101F10A0A0A0A010FFFFF06060606 F08F80804F48484800707F7F3F383838 0EF10101E2121212010FFFFFFE0E0E0E 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 00000000000000000000000000000000 505050508F808F7030303030707F7FF0 0A0A0A0AF901F10F0606060607FFFF0F 4848484780808F70383838387F7F7FF0 121212F20101F10F0E0E0E0EFFFFFF0F 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 00080808080008000000000000000000 00242424480000000000000000000000 00247E6C48FC48000000000000000000 003C507C147C10000000000000000000 00646408102626000000000000000000 003048304C5834000000000000000000 00202020400000000000000000000000 00183020203018000000000000000000 00180C04040C18000000000000000000 0044287C284400000000000000000000 000010107C1010000000000000000000 00000000101020000000000000000000 000000003C0000000000000000000000 00000000000010000000000000000000 00040408102020000000000000000000 0018244A522418000000000000000000 0018280808083C000000000000000000 0038440418207C000000000000000000 00380404180438000000000000000000 000C1414243E04000000000000000000 003C2038040438000000000000000000 00182038242418000000000000000000 003E02041E0810000000000000000000 001C221C22221C000000000000000000 001824241C0418000000000000000000 00000010001000000000000000000000 00001000101020000000000000000000 00000408100804000000000000000000 0000003C003C00000000000000000000 00002010081020000000000000000000 00384408100010000000000000000000 003C425A5C403E000000000000000000 001824243C2424000000000000000000 00382438242438000000000000000000 001C202020201C000000000000000000 00382424242438000000000000000000 00382038202038000000000000000000 003C2038202020000000000000000000 001C20202E221C000000000000000000 0024243C242424000000000000000000 00381010101038000000000000000000 001C0808084830000000000000000000 00242830282424000000000000000000 00202020202038000000000000000000 00446C54444444000000000000000000 002434342C2C24000000000000000000 00182442422418000000000000000000 00382424382020000000000000000000 001C22222A1C04000000000000000000 00382424382824000000000000000000 001C201C02023C000000000000000000 007C1010101010000000000000000000 00242424242418000000000000000000 00242424241408000000000000000000 002222222A3622000000000000000000 00242418182424000000000000000000 00242428101010000000000000000000 003C040810203C000000000000000000 00181010101018000000000000000000 00202010080404000000000000000000 00180808080818000000000000000000 00102844000000000000000000000000 0000000000007E000000000000000000 #3:MAIN BG 000014100E010E010E010E010E010D01 0F010F010F010F010F010F010F010F01 0B010E010E010E010E010E010E010E01 0E010E010E010D010F010F010F010F01 0F010F010F010F010B010E010E010E01 0E010E010E010E010E010E010E010D01 0F010F010F010F010F010F010F010F01 0B010E010E010E010E010E010E010E01 0E010E010E010D010F010F010F010F01 0F010F010F010F010B010E010E010E01 0E010E010E010E010E010E010E010D01 0F010F010F010F010F010F010F010F01 0B010E010E010E010E010E010E010E01 0E010E010E010D010F010F010F010F01 0F010F010F010F010B010E010E010E01 0E010E010E010E010E010E010E010D01 0F010F010F010F010F010F010F010F01 0B010E010E010E010E010E010E010E01 0E010E010E010D010F010F010F010F01 0F010F010F010F010B010E010E010E01 0E010E010E010E010E010E010E010D01 0F010F010F010F010F010F010F010F01 0B010E010E010E010E010E010E010E01 0E010E010E010D010F010F010F010F01 0F010F010F010F010B010E010E010E01 0E010E010E010E010E010E010E010D01 0F010F010F010F010F010F010F010F01 0B010E010E010E010E010E010E010E01 0E010E010E010E010C010C010C010C01 0C010C010C010C010E010E010E010E01 0E010E010E010E010E010E010E010101 01010101010101010101010101010101 0E010E010E010E010E010E010E010E01 0E010E010E010101E700F200E100F600 E900F400F90001010E010E010E010E01 0E010E010E010E010E010E010E010101 01010101010101010101010101010101 0E010E010E010E010E010E010E010E01 0E010E010E010E010E010E010E010E01 0E010E010E010E010E010E010E010E01 0E010E01