Narrow down the randomness of a "sometimes-occuring" bug to specific criteria that must be met to reproduce the problem.

.

Code: [Select]

Lbl DIFF1
0→A→B→C→S→T→R→U→D→I→θ→G→{L1}→{L2}

storing something into a Ram location pointed to and will return the address of that location, not the value.

You're basically doing that - which is not what you want:

Code: [Select]

0→{L1}
L1→{L2}


then, the elses here make absolutely no sense to me:

Code: [Select]

:If K=15
:Goto DIE:End
:If K=33
:0→L:Else:End
:If K=34
:1→L:Else:End
:If K=26
:2→L:Else:End
:If K=16
:3→L:Else:End
You could also use a LUT and the inData( Command.

Use + instead of "or" and * instead of "and" in when doing conditionals, those are bitwise operations.

Code: [Select]

If {L1+(θ*4)}=(X+1) or ({L1+(θ*4)}=(X-2)) or ({L1+(θ*4)}=X) or ({L1+(θ*4)}=(X-1)) or ({L1+(θ*4)}=(X+2))

Quote from: Derf321 on September 03, 2012, 10:12:47 pm

What is a LUT and what does inData do?

LUT stands for Look-up-table. It is basically just a constant array with values. You can get each value by accessing the data with an index. That is usually a lot faster than having a calculation for it.

Example:

Code: [Select]

{0,1,4,9,16,25,36,49,64,81,100,121,144,169,196,225}→GBD1  ; a LUT with the squares of 0-15
...
instead of a calculation like
A²→B
you can use the LUT:
{A+GBD1}→B


You can use an LUT also the other way round. Axe provides the function inData() for that.

Quote from: Axe Command List

inData(BYTE,PTR)     Searches for BYTE in the zero-terminated data. If found, it returns the position it was found in (starting at 1). If not found, 0 is returned.

Zero-terminated means, that the last value of the LUT has to be 0 respectively the first 0 in the LUT is considered as the end.

Say, at the beginning of the code we have a LUT with our keys, ending with 0:

Code: [Select]

{33,34,26,16,0}→GBD1at the point where we need the data, we use inData().

Code: [Select]

If inData(K,GBD1)→F   ; if the key is one of the weapon selectors
F-1→L         ; take this value (1-4) and subtract 1 (then we have 0-3) and store it in L.
End
optimized to save a variable:

Code: [Select]

If inData(K,GBD1)  
-1→L   ; that is the subtraction minus sign, same as above. It subtracts from the last evaluated expression, which is "inData"
End