changed "spc" to "c_sp"

This commit is contained in:
Gorilla Sapiens
2025-06-04 06:37:59 +00:00
parent 3d118dc6e5
commit b6f42f9ab2
204 changed files with 913 additions and 909 deletions

View File

@@ -24,7 +24,7 @@
.importzp tmp2
.import __defdev
.endif
.importzp tmp3,ptr4,spc
.importzp tmp3,ptr4,c_sp
.import subysp,addysp
.export ucase_fn
@@ -63,13 +63,13 @@ hasdev:
ldy #0
loop2: lda (ptr4),y
sta (spc),y
sta (c_sp),y
beq copy_end
bmi L1 ; Not lowercase (also, invalid, should reject)
cmp #'a'
bcc L1 ; Not lowercase
and #$DF ; make upper case char, assume ASCII chars
sta (spc),y ; store back
sta (c_sp),y ; store back
L1:
iny
bpl loop2 ; bpl: this way we only support a max. length of 127
@@ -93,15 +93,15 @@ copy_end:
jsr subysp ; adjust stack pointer
dey
cpdev: lda __defdev,y
sta (spc),y ; insert device name, number and ':'
sta (c_sp),y ; insert device name, number and ':'
dey
bpl cpdev
hasdev2:
.endif
; leave A and X pointing to the modified filename
lda spc
ldx spc+1
lda c_sp
ldx c_sp+1
clc ; indicate success
rts