diff --git a/BIN/ASM.S.SRC.txt b/BIN/ASM.S.SRC.txt index 9505069e..a4a57e0c 100644 --- a/BIN/ASM.S.SRC.txt +++ b/BIN/ASM.S.SRC.txt @@ -280,15 +280,35 @@ SRC.ParseLine.OpCode sta ZPPtr3+1 .10 lda (ZPPtr2) End Of OpCode List + ldy #1 + ora (ZPPtr2),y beq .9 + lda ZPPtr2 + clc + adc #2 + sta ZPPtr1 + lda ZPPtr2+1 + adc #0 + sta ZPPtr1+1 + + lda (ZPPtr1) tax ldy #0 + >DEBUG + .1 lda (ZPLinePtr),y - iny - cmp (ZPPtr2),y + cmp #'a' + bcc .11 + cmp #'z'+1 + bcs .11 + + eor #$20 + +.11 iny + cmp (ZPPtr1),y bne .7 dex @@ -337,11 +357,11 @@ SRC.ParseLine.OpCode .2 clc rts -.7 lda ZPPtr1 +.7 lda ZPPtr2 clc adc (ZPPtr2) tax - lda ZPPtr1+1 + lda ZPPtr2+1 ldy #1 adc (ZPPtr2),y stx ZPPtr2