Posted Tue Oct 21, 2008 7:20 PM
Posted Tue Oct 21, 2008 7:27 PM
Random Terrain, on Tue Oct 21, 2008 9:20 PM, said:
Posted Tue Oct 21, 2008 8:13 PM
Edited by Random Terrain, Tue Oct 21, 2008 8:24 PM.
Posted Tue Oct 21, 2008 8:23 PM
Posted Tue Oct 21, 2008 8:35 PM
Robert M, on Tue Oct 21, 2008 9:23 PM, said:
Posted Tue Oct 21, 2008 10:12 PM
Random Terrain, on Tue Oct 21, 2008 10:35 PM, said:
Robert M, on Tue Oct 21, 2008 9:23 PM, said:
Posted Tue Oct 21, 2008 10:23 PM
Posted Wed Oct 22, 2008 6:59 AM
Random Terrain, on Wed Oct 22, 2008 12:23 AM, said:
Posted Wed Oct 22, 2008 7:49 AM
yuppicide, on Wed Oct 22, 2008 7:59 AM, said:
roland p, on Wed Oct 22, 2008 8:13 AM, said:
Posted Wed Oct 22, 2008 4:01 PM
yuppicide, on Wed Oct 22, 2008 2:19 PM, said:
Posted Sat Oct 25, 2008 2:07 AM
Random Terrain, on Tue Oct 21, 2008 11:23 PM, said:
rem * Multicolored Playfield in batari Basic set romsize 8kSC set kernel_options no_blank_lines pfcolors player1colors const pfres = 31 player1x = 0 player1y = 49 loop playfield: .XXXXXXXXXXXXX....XXXXXXXXXXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .XXXXXXXXXXXXX....XXXXXXXXXXXXX. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. .XXXXXXXXXXXXX....XXXXXXXXXXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .XXXXXXXXXXXXX....XXXXXXXXXXXXX. ................................ ................................ ................................ ................................ .XXXXXXXXXXXXX...,XXXXXXXXXXXXX. .XXXXXXXXXXXXX...,XXXXXXXXXXXXX. .XXXXXXXXXXXXX...,XXXXXXXXXXXXX. .XXXXXXXXXXXXX....XXXXXXXXXXXXX. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. .XXXXXXXXXXXXX....XXXXXXXXXXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .X,XXXXXXX,XXX...,XXXXXXX.XXXXX. .XXXXXXXXXXXXX....XXXXXXXXXXXXX. .XXXXX,XXXXXXX,...XXX,XXXXXXX.X. end COLUBK = $44 pfcolors: $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 $A6 end player1: %01100110 %00100100 %00100100 %00111100 %10111101 %10111101 %11111111 %00011000 %00111100 %00111100 %00111100 end player1color: $20 $84 $84 $84 $9A $9A $9A $3E $3E $3E $44 end player1x = player1x + 1 if player1x = 161 then player1x = 1 drawscreen playfield: .....XXX.....XXXXXXXXXX.....XXX. ....XXXXX...XXXXXXXXXXXX...XXXX. .X.XX...XX.XXXXXXXXX...XX.XX.... .X.X.....X.XXXXXXXX.....X.X..... .XXX.....XXXXXXXXXX.....XXX..... .XXXX...XXXXXXXXXXXX...XXXXX.... ....XX.XX...XXXXXXXXX.XX...XX.X. .....X.X.....XXXXXXXX.X.....X.X. .....XXX.....XXXXXXXXXX.....XXX. ....XXXXX...XXXXXXXXXXXX...XXXX. .X.XXXXXXX.XXXXXXXXXXXXXX.XXXXX. .X.XXXXXXX.XXXXXXXXXXXXXX.XXXXX. .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. .XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX. .XXXX...XXXXXXXXXXXX...XXXXX.... .XXX.....XXXXXXXXXX.....XXX..... .XXX.....XXXXXXXXXX.....XXX..... .XXXX...XXXXXXXXXXXX...XXXXX.... ....XX.XX...XXXXXXXXX.XX...XX.X. .....X.X.....XXXXXXXX.X.....X.X. .....XXX.....XXXXXXXXXX.....XXX. ....XXXXX...XXXXXXXXXXXX...XXXX. .X.XX...XX.XXXXXXXXX...XX.XX.... .X.X.....X.XXXXXXXX.....X.X..... .XXX.....XXXXXXXXXX.....XXX..... .XXXX...XXXXXXXXXXXX...XXXXX.... end COLUBK = $C4 pfcolors: $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A $1A end player1: %01100110 %00100100 %00100100 %00111100 %10111101 %10111101 %11111111 %00011000 %00111100 %00111100 %00111100 end player1color: $20 $84 $84 $84 $9A $9A $9A $3E $3E $3E $44 end drawscreen goto loopMichael
Multicolored_Playfield_in_batari_Basic_3.bas 3.61K
44 downloads
Multicolored_Playfield_in_batari_Basic_3.bas.bin 8K
60 downloadsPosted Sat Oct 25, 2008 2:14 AM
0 members, 0 guests, 0 anonymous users