Posted Mon Apr 4, 2011 8:31 PM
Posted Mon Apr 4, 2011 9:47 PM
Posted Tue May 3, 2011 4:08 PM
Posted Tue May 3, 2011 6:24 PM
Posted Wed May 4, 2011 9:41 PM
Posted Mon May 23, 2011 2:49 PM
Posted Wed May 25, 2011 9:15 PM
rem * i like trains lives = 128 dim lives_centered = 1 dim lives_compact = 1 set romsize 4k titlescreen scorecolor = $CA playfield: <on> XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX X.....XXXXXXX..............XX..X X..X...XXXXXXXXXXX...XXXXXXXX..X X..XX...XXXXXXXXXX...XXXXXXXX..X X..XXX...XXXXXXXXX...XXXXXXXX..X X..XXXX...XXXXXXXX...XXXXXXXX..X X..XXX...XXXXXXXXX...XXXXXXXX..X X..XX...XXXXX..XX....XXXXXXXXXXX X..X...XXXXXX.......XXXXXXXXX..X X.....XXXXXXXX.....XXXXXXXXXX..X XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX end COLUPF = $2E COLUBK = $CA const pfres = 12 drawscreen if joy0fire then goto start goto titlescreen start playfield: ................................ ................................ ................................ ................................ ................................ ................................ ................................ ................................ ................................ ................................ ................................ end COLUBK = $C6 COLUPF = $1E player0x=99:player0y=90 player1x=20:player1y=20 missile0height=8:missile0y=255 NUSIZ0 = $82 scorecolor = $0 sprites player0: %00000000 %01000100 %01000100 %01000100 %01000100 %00111000 %00111000 %00111000 %00111000 %00111000 %00111000 %00111000 %00111000 %11111110 %10111010 %10111010 %10111010 %00111000 %00000000 %00000000 end player1: %00000000 %00100100 %00011000 %00111100 %00011000 %00011000 %00111100 %00000000 end COLUP0 = $84 COLUP1 = $42 if f=20 then f=0 if missile0y>240 then goto skip missile0y = missile0y-2:goto draw_loop skip if joy0fire then missile0y = player0y-12:missile0x =player0x+4 if switchreset then reboot draw_loop drawscreen AUDV0 = 6 AUDC0 = 3 AUDF0 = 13 if player1y < player0y then player1y = player1y+1 if player1y > player0y then player1y = player1y-1 if player1x < player0x then player1x = player1x+1 if player1x > player0x then player1x = player1x-1 player1x = player1x:player1y = player1y if joy0up && player0y > 19 then player0y = player0y-1: goto jump if joy0down && player0y < 89 then player0y = player0y+1: goto jump if joy0left && player0x > 1 then player0x = player0x-1: goto jump if joy0right && player0x < 154 then player0x = player0x+1: goto jump if collision(missile0,player1) then score=score+1:player1x=rand/2:player1y=0:missile0y=255 if collision(player0,player1) then lives=lives-32:player1x=rand/2:player1y=0:missile0y=255 if lives < 32 then reboot jump goto sprites
Posted Wed May 25, 2011 9:23 PM
Posted Thu May 26, 2011 4:51 AM
esplonky, on Wed May 25, 2011 9:15 PM, said:
esplonky_2011y_05m_26d_0501t.bin 4K
20 downloads
esplonky_2011y_05m_26d_0501t.bas 2.86K
14 downloads
Posted Thu May 26, 2011 8:12 AM
Posted Thu May 26, 2011 9:54 PM
ex_sound_using_data_2011y_05m_26d_2339t.bin 16K
17 downloads
ex_sound_using_data_2011y_05m_26d_2339t.bas 22.56K
22 downloads
Posted Fri May 27, 2011 11:02 AM
0 members, 0 guests, 0 anonymous users