Problematic Goto <label> and If Else loop

[emuvvx]

Hi.
I did this code with help from some people, 
but I'm having two problems too hard to me alone. 
The first is the execution falls inside a label with goto
and doesnt go out never or hangs if I comment a counter. 


KOF_L1: datafile KOF_L1.bin,bin

KOF_L2: datafile KOF_L2.bin,bin

KOF_L3: datafile KOF_L3.bin,bin

KOF_L4: datafile KOF_L4.bin,bin

KOF_L5: datafile KOF_L5.bin,bin

KOF_L6: datafile KOF_L6.bin,bin

KOF_L7: datafile KOF_L7.bin,bin

KOF_L8: datafile KOF_L8.bin,bin

KOF_Letter_pal: datafile KOF_Letter_pal.bin,bin



letter:

palettes KOF_Letter_pal,0,0,16

waitraster 1

time++

spin=6 '4   'regulador de velocidade/speed regulator

if time=spin*1 then

loadtiles KOF_L1,168,1

drawtilesinc2 1+palette(0),14,8,12,14

elseif time=spin*2 then

loadtiles KOF_L2,168,1

elseif time=spin*3 then

loadtiles KOF_L3,168,1

elseif time=spin*4 then

loadtiles KOF_L4,168,1

elseif time=spin*5 then

loadtiles KOF_L5,168,1

elseif time=spin*6 then

loadtiles KOF_L6,168,1

elseif time=spin*7 then

loadtiles KOF_L7,168,1

elseif time=spin*8 then

loadtiles KOF_L8,168,1

'time=0  '1

end if

goto letter


In this code, "time" is commented when it receives zero, and so the game hangs on the opening. 
If I uncomment, this part of the opening go deadlock. 

My 2nd question is; as I'm using KOF'94 opening, I need to put the animation of the letter burning over the letter not burning, 
but I don't know how to do it. According to the manual, SetGfxPlane just works with Drawtile(s), and I'm using Drawtilesinc2.
I'm setting these graphics as sprites on ImaGenesis (draw in Y first). 
This part of the code is a kinda amateur, but works better than the one above. 

KOF_hand_1: datafile KOF_hand_1.bin,bin

KOF_hand_2: datafile KOF_hand_2.bin,bin

KOF_hand_3: datafile KOF_hand_3.bin,bin

KOF_hand_4: datafile KOF_hand_4.bin,bin

KOF_hand_5: datafile KOF_hand_5.bin,bin

KOF_hand_6: datafile KOF_hand_6.bin,bin

KOF_hand_7: datafile KOF_hand_7.bin,bin

KOF_hand_8: datafile KOF_hand_8.bin,bin

KOF_hand_pal: datafile KOF_hand_pal.bin,bin



pallettes KOF_Letter_pal,0,0,16

loadtiles KOF_L1,168,1

drawtilesinc2 1+pallette(0),14,8,12,14

bgcolor 0,16

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_1,484,1

drawtilesinc2 1+pallette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_Letter_pal,0,0,16

loadtiles KOF_L2,168,1

drawtilesinc2 1+palette(0),14,8,12,14

bgcolor 0,16

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_2,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_3,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_4,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_5,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_6,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_7,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



pallettes KOF_hand_pal,1,0,16

loadtiles KOF_hand_8,484,1

drawtilesinc2 1+palette(1),9,3,22,22

bgcolor 0,0

sleep 20



Here's the ROM after I commented the label and Goto, making them not execute. 
MugenR_Master_1115.bin (847.18 KB)
Here's the whole code too, if someone feel interested by, with .bex and .bins. 
Mugen_Master_131118.zip (973.89 KB)

[Deleted]

Does it work in SecondBASIC? If not, what error does SecondBASIC give during compilation?

[emuvvx]

No, I don't use SecondBASIC, just BasiegaXorz. And this is a logic error, not syntax error.
Should work in BasiegaXorz with no problem, with no need to migrate to SecondBASIC.

[emuvvx]

Nov 15, 2018 14:15:59 GMT -5 @elusive said:

Does it work in SecondBASIC? If not, what error does SecondBASIC give during compilation?

No. It gives the "Runtime error 5: Invalid procedure call or argument". After this, it closes.

SecondBASIC seems weak near BasiegaXorz. Anything wrong it is picky and annoying.

I compiled the code with the label and goto commented,

but there is the Stef's audio driver. Seems like the driver is interfering.

[Deleted]

Nov 15, 2018 23:34:46 GMT -5 emuvvx said:

Nov 15, 2018 14:15:59 GMT -5 @elusive said:

Does it work in SecondBASIC? If not, what error does SecondBASIC give during compilation?

No. It gives the "Runtime error 5: Invalid procedure call or argument". After this, it closes.

SecondBASIC seems weak near BasiegaXorz. Anything wrong it is picky and annoying.

I compiled the code with the label and goto commented,

but there is the Stef's audio driver. Seems like the driver is interfering.

You are welcome to use whatever compiler you want. I don’t support BEX, so you may keep continuing to use what you feel is a stronger platform.

[Deleted]

Actually, like moon and titan, I’m kind of sick of the mentality and lack of paying attention to the support others try to give. With that, I’m deleting my account here

[emuvvx]

I improvised a solution. 
I put a gosub <label> before the endif and goto to take the execution out the first label. 
The gosub <label> takes to an empty label that do nothing. 
Seems it's good enough to take the execution out the first label, 
although it's a improvisation.