mirror of
https://github.com/A2osX/A2osX.git
synced 2024-10-21 20:24:31 +00:00
Kernel 0.92+
This commit is contained in:
parent
7c6773c19f
commit
5a954d6792
Binary file not shown.
@ -151,6 +151,7 @@ CS.RUN.LOOP ldy #S.PS.hStdIn
|
|||||||
|
|
||||||
jsr CS.RUN.PRINT
|
jsr CS.RUN.PRINT
|
||||||
bcc CS.RUN.LOOP
|
bcc CS.RUN.LOOP
|
||||||
|
rts
|
||||||
|
|
||||||
.7 cmp #MLI.E.EOF
|
.7 cmp #MLI.E.EOF
|
||||||
bne .9
|
bne .9
|
||||||
@ -193,8 +194,7 @@ CS.RUN.PRINT >INCW.G LineNum
|
|||||||
sta (pData),y
|
sta (pData),y
|
||||||
bra .2
|
bra .2
|
||||||
|
|
||||||
.1 lda #0
|
.1 >STZ.G bPrintedBlankLine
|
||||||
>STA.G bPrintedBlankLine
|
|
||||||
|
|
||||||
.2 jsr CS.RUN.PRINTNUM
|
.2 jsr CS.RUN.PRINTNUM
|
||||||
bcs .99
|
bcs .99
|
||||||
|
@ -342,7 +342,7 @@ CMD.ECHO stz ZPPtr1 echo -N
|
|||||||
stz ZPPtr1+1 Token Cnt
|
stz ZPPtr1+1 Token Cnt
|
||||||
|
|
||||||
lda (ZPArgVBufPtr)
|
lda (ZPArgVBufPtr)
|
||||||
beq .8
|
beq .7
|
||||||
|
|
||||||
.1 jsr CMD.IsSwitch
|
.1 jsr CMD.IsSwitch
|
||||||
bcs .2
|
bcs .2
|
||||||
@ -371,7 +371,7 @@ CMD.ECHO stz ZPPtr1 echo -N
|
|||||||
.4 jsr CORE.ArgV.Next
|
.4 jsr CORE.ArgV.Next
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
bit ZPPtr1
|
.7 bit ZPPtr1
|
||||||
bmi .8
|
bmi .8
|
||||||
|
|
||||||
>PUSHBI 0
|
>PUSHBI 0
|
||||||
|
Loading…
Reference in New Issue
Block a user