Kernel version 0.8 : CAT,BUGFIX #3 #11 suppressing unwanted CR and no more resetting linecounter between files..

This commit is contained in:
Rémy GIBERT 2016-11-04 11:53:21 +01:00
parent e816f33bf1
commit 0048e92a4a
3 changed files with 6 additions and 9 deletions

Binary file not shown.

Binary file not shown.

View File

@ -205,6 +205,9 @@ CS.RUN.PRINT sty BytesRead Y,A = Bytes read
cmp #' '
bcs .6
cmp #13 Allow printing of CR even if not bPrintAll
beq .6
ldy #bPrintAll
lda (pData),y
bpl .7
@ -240,8 +243,7 @@ CS.RUN.PRINT sty BytesRead Y,A = Bytes read
dec BytesRead
bne .20
.8 lda #13
>SYSCALL COutA
.8 clc
.9 rts
*--------------------------------------
@ -280,13 +282,8 @@ CS.RUN.OPEN >SYSCALL GetFullPathYA
jsr .99
pha
ldy #LineNum
lda #0
sta (pData),y
iny
sta (pData),y
ldy #bPrintedBlankLine
ldy #bPrintedBlankLine Reset this flag for the new file
sta (pData),y
pla