Posted Thu Jul 21, 2005 6:33 AM
Posted Mon Jul 25, 2005 2:10 AM
if switchreset && e = 10 then 20
if switchreset && e = 10 then goto 20
Posted Mon Jul 25, 2005 4:14 AM
Jess Ragan, on Mon Jul 25, 2005 3:10 AM, said:
if switchreset && e = 10 then 20
if switchreset && e = 10 then goto 20
Posted Tue Jul 26, 2005 3:58 PM
Posted Wed Jul 27, 2005 3:48 PM
Quote
rem smartbranching on rem CONSTANTS dim WHITE = $0E dim BLACK = $00 rem VARIABLES dim FrameCounter = x rem initial setup score = 0 scorecolor = #WHITE rem main game loop MainLoop rem first, setup display variables, update counters, and play music & sound fx gosub UpdateCountersSub rem next, drawscreen drawscreen rem last, game calculations: rem act on collisions rem get user input and take appropriate action rem cause non-player characters to take their appropriate actions rem check boundaries gosub CollisionsSub gosub UserInputSub gosub NPCsSub gosub CheckBoundariesSub goto MainLoop rem subroutines CollisionsSub return UserInputSub return NPCsSub return CheckBoundariesSub return UpdateCountersSub return rem data
Posted Wed Jul 27, 2005 7:44 PM
vdub_bobby, on Wed Jul 27, 2005 4:48 PM, said:
yes, I know about this bug. It's been fixed in the current build. But for now, a workaround is to change a gosub to inline asm, as:Posted Wed Jul 27, 2005 10:40 PM
batari, on Wed Jul 27, 2005 8:44 PM, said:
vdub_bobby, on Wed Jul 27, 2005 4:48 PM, said:
yes, I know about this bug. It's been fixed in the current build. But for now, a workaround is to change a gosub to inline asm, as:Posted Wed Jul 27, 2005 11:18 PM
potatohead, on Wed Jul 27, 2005 11:40 PM, said:
batari, on Wed Jul 27, 2005 8:44 PM, said:
vdub_bobby, on Wed Jul 27, 2005 4:48 PM, said:
yes, I know about this bug. It's been fixed in the current build. But for now, a workaround is to change a gosub to inline asm, as:Posted Wed Jul 27, 2005 11:28 PM
batari, on Thu Jul 28, 2005 12:18 AM, said:
asm jsr subroutine end
Posted Fri Jul 29, 2005 12:35 AM
Posted Fri Jul 29, 2005 1:13 AM
potatohead, on Fri Jul 29, 2005 1:35 AM, said:
Posted Fri Jul 29, 2005 1:44 AM
a = some number data scoretab $10,$20,$50,$48,$37 end score = score + scoretab[a]Thought I might get around the whole BCD thing with a lookup table.
data scoretab $10,$20,$50,$48,$37 end temp3 = scoretab[y] score = score + temp3Got this interesting error message:
Edited by potatohead, Fri Jul 29, 2005 1:45 AM.
Posted Fri Jul 29, 2005 1:51 AM
potatohead, on Fri Jul 29, 2005 2:44 AM, said:
a = some number data scoretab $10,$20,$50,$48,$37 end score = score + scoretab[a]
Quote
Quote
Looks like you found another bug - I think score addition only works with a-z. I should change this.Posted Fri Jul 29, 2005 1:52 AM
batari, on Fri Jul 29, 2005 2:51 AM, said:
potatohead, on Fri Jul 29, 2005 2:44 AM, said:
a = some number data scoretab $10,$20,$50,$48,$37 end score = score + scoretab[a]
Quote
Quote
Looks like you found another bug - I think score addition only works with a-z. I should change this.Posted Fri Jul 29, 2005 1:38 PM
Posted Sat Jul 30, 2005 7:14 PM
Posted Sun Jul 31, 2005 2:03 AM
Luigi301, on Sat Jul 30, 2005 8:14 PM, said:
Posted Sun Jul 31, 2005 9:47 AM
makemissile m = 1 missile0x = z missile0y = y missile0height = 8 if f = 1 && m = 1 then missile0y = y - 1 goto 70
51 if joy0fire && m = 0 then gosub makemissile 70 drawscreen 71 f = f + 1 72 if f = 2 then f = 0 73 if joy0fire && m = 1 then gosub makemissile 75 goto 5
Posted Sun Jul 31, 2005 1:23 PM
Luigi301, on Sun Jul 31, 2005 10:47 AM, said:
makemissile m = 1 missile0x = z missile0y = y missile0height = 8 if f = 1 && m = 1 then missile0y = y - 1 goto 70
51 if joy0fire && m = 0 then gosub makemissile 70 drawscreen 71 f = f + 1 72 if f = 2 then f = 0 73 if joy0fire && m = 1 then gosub makemissile 75 goto 5
Posted Sun Jul 31, 2005 2:59 PM
10 COLUP0 = $18 : COLUP1 = $18 20 player0: %11111111 %10010001 %10010001 %11111111 end 30 player0x = 30 : player0y = 40 40 player1: %11111111 %10010001 %10010001 %11111111 end 50 player1x = 38 : player1y = 40 60 drawscreen 70 goto 20
Posted Sun Jul 31, 2005 4:34 PM
attendo, on Sun Jul 31, 2005 3:59 PM, said:
Posted Sun Jul 31, 2005 6:04 PM
Posted Sun Jul 31, 2005 8:44 PM
attendo, on Sun Jul 31, 2005 3:59 PM, said:
0 members, 0 guests, 0 anonymous users