mirror of
https://github.com/A2osX/A2osX.git
synced 2025-04-27 20:38:05 +00:00
EDIT:Save bugfix
This commit is contained in:
parent
340ce51779
commit
e5abc173c6
Binary file not shown.
@ -228,37 +228,31 @@ FILE.Save.CRLF sec
|
||||
.1 lda (BufPtr)
|
||||
beq .8
|
||||
|
||||
ldy #$ff
|
||||
ldy #0
|
||||
|
||||
.2 iny
|
||||
lda (BufPtr),y
|
||||
sta (LineBufPtr),y
|
||||
beq .3
|
||||
.2 lda (BufPtr)
|
||||
beq .4
|
||||
|
||||
inc BufPtr
|
||||
bne .3
|
||||
|
||||
inc BufPtr+1
|
||||
|
||||
.3 sta (LineBufPtr),y
|
||||
iny
|
||||
|
||||
cmp #C.CR
|
||||
bne .2
|
||||
|
||||
iny
|
||||
|
||||
bit TmpIndex+1
|
||||
bpl .3
|
||||
bpl .4
|
||||
|
||||
lda #C.LF
|
||||
sta (LineBufPtr),y
|
||||
|
||||
iny
|
||||
|
||||
.3 tya
|
||||
beq .8
|
||||
|
||||
clc
|
||||
adc BufPtr
|
||||
sta BufPtr
|
||||
bcc .7
|
||||
|
||||
inc BufPtr+1
|
||||
|
||||
.7 jsr FILE.WriteY
|
||||
.4 jsr FILE.WriteY
|
||||
bcs FILE.Save.99
|
||||
|
||||
bra .1
|
||||
|
Loading…
x
Reference in New Issue
Block a user