6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2024-07-03 05:29:30 +00:00
Code Issues Projects Releases Wiki Activity

Fix '_' in variable names

Browse Source
This commit is contained in:
David Schmenk 2014-11-27 21:14:51 -08:00
parent 626274d100
commit 97bddb2724
1 changed files with 14 additions and 24 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
src/toolsrc/sb.pla
View File

@ -811,21 +811,17 @@ end
asm isalpha
LDY #$00
LDA ESTKL,X
CMP #'_'
BEQ ISALTRU
CMP #'A'
BCC ISALRET
CMP #'Z'+1
BCS +
DEY
BNE ISALRET
+ CMP #'a'
BCC ISALTRU
CMP #'a'
BCC ISALRET
CMP #'z'+1
BCS +
DEY
BNE ISALRET
+ CMP #'_'
BNE ISALRET
DEY
BCS ISALRET
ISALTRU DEY
ISALRET STY ESTKL,X
STY ESTKH,X
RTS
@ -863,27 +859,21 @@ end
asm isalphanum
LDY #$00
LDA ESTKL,X
CMP #'_'
BEQ ISANTRU
CMP #'0'
BCC ISANRET
CMP #'9'+1
BCS +
DEY
BNE ISANRET
+ CMP #'A'
BCC ISANTRU
CMP #'A'
BCC ISANRET
CMP #'Z'+1
BCS +
DEY
BNE ISANRET
+ CMP #'a'
BCC ISANTRU
CMP #'a'
BCC ISANRET
CMP #'z'+1
BCS +
DEY
BNE ISANRET
+ CMP #'_'
BNE ISANRET
DEY
BCS ISANRET
ISANTRU DEY
ISANRET STY ESTKL,X
STY ESTKH,X
RTS