EDIT:Save bugfix

This commit is contained in:
burniouf 2022-03-24 22:12:54 +01:00
parent 340ce51779
commit e5abc173c6
2 changed files with 13 additions and 19 deletions

Binary file not shown.

View File

@ -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