Kernel 0.92

This commit is contained in:
Rémy GIBERT 2018-11-27 22:26:03 +01:00
parent 338d15bd36
commit c80fd90d2b
4 changed files with 20 additions and 14 deletions

Binary file not shown.

Binary file not shown.

View File

@ -124,17 +124,19 @@ IO.PrintBatchErrMsg
cmp #$0D
beq .6
phy
>SYSCALL PutChar
>PUSHA
ldy #S.PS.hStdErr
lda (pPS),y
>SYSCALL fputc
ply
bra .5
.6 lda #$0D
>SYSCALL PutChar
lda #$0A
>SYSCALL PutChar
.6 >PUSHBI 0
>PUSHW L.MSG.ECHOCRLF
ldy #S.PS.hStdErr
lda (pPS),y
>SYSCALL fprintf
lda ZPFileBufPtr
sec
sbc ZPPtr2
@ -142,8 +144,10 @@ IO.PrintBatchErrMsg
tay
.7 phy
lda #'-'
>SYSCALL PutChar
>PUSHBI '-'
ldy #S.PS.hStdErr
lda (pPS),y
>SYSCALL fputc
ply
dey
bne .7
@ -151,8 +155,10 @@ IO.PrintBatchErrMsg
.8 >PUSHW ZPPtr3
>PUSHBI 2
>LDYA L.MSG.BATCHERR
>SYSCALL printf
>PUSHW L.MSG.BATCHERR
ldy #S.PS.hStdErr
lda (pPS),y
>SYSCALL fprintf
rts
*--------------------------------------

View File

@ -558,9 +558,9 @@ CS.END
MSG.GREETINGS .AZ "\r\nA2osX-Shell %d.%d\r\n\r\n"
MSG.PROMPT .AZ "\e[7h$ "
MSG.TRACE .AS ">%s"
MSG.ECHOCRLF .AZ "\r\n"
MSG.BATCHERR .AZ "^\r\nLine #%D:"
MSG.ERROR .AZ "[$%h]:%S.\r\n"
MSG.ERROR .AS "[$%h]:%S."
MSG.ECHOCRLF .AZ "\r\n"
MSG.PRINTENV .AZ "%s = %s\r\n"
MSG.PID .AZ "PID=%d\r\n"
FMT.DATE .AZ "%A (%w), %B %d %Y"