Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-02-08 11:30:41 +00:00
Code Issues Projects Releases Wiki Activity

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

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
A2OSX.BOOT.po
View File

Binary file not shown.

BIN
A2OSX.SRC.po
View File

Binary file not shown.

15
BIN/CAT.S.txt
View File

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