Kernel 0.93++

This commit is contained in:
Rémy GIBERT 2020-01-29 21:07:33 +01:00
parent 1ec69493f5
commit 581b82e934
2 changed files with 11 additions and 12 deletions

Binary file not shown.

View File

@ -80,9 +80,9 @@ CS.RUN
dex dex
bpl .2 bpl .2
.99 >PUSHBI 0 .99 >PUSHW L.MSG.USAGE
>LDYA L.MSG.USAGE >PUSHBI 0
>SYSCALL printf >SYSCALL printf2
lda #E.SYN lda #E.SYN
sec sec
.9 rts .9 rts
@ -223,18 +223,18 @@ CS.RUN.PRINT inc LineNum
bcc .6 bcc .6
inc ZPPtr1+1 inc ZPPtr1+1
bra .6 bra .6
.61 >PUSHW ZPPtr1
.61 >PUSHW L.MSG.CTRLCHAR
>PUSHW ZPPtr1
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.CTRLCHAR >SYSCALL printf2
>SYSCALL printf
bcs .9 bcs .9
.62 inc ByteIndex .62 inc ByteIndex
bne .4 bne .4
.7 >PUSHBI 0 .7 >PUSHW L.MSG.CRLF
>LDYA L.MSG.CRLF >PUSHBI 0
>SYSCALL printf >SYSCALL printf2
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -242,11 +242,10 @@ CS.RUN.PRINTNUM clc
lda bLineNum lda bLineNum
bpl .8 bpl .8
>PUSHW L.MSG.LINENUM
>PUSHW LineNum >PUSHW LineNum
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.LINENUM >SYSCALL printf2
>SYSCALL printf
.8 rts .8 rts
*-------------------------------------- *--------------------------------------
CS.QUIT lda hBuf CS.QUIT lda hBuf