Kernel 0.9.2

This commit is contained in:
Rémy GIBERT 2018-11-08 17:45:05 +01:00
parent bb787e2247
commit 69d012b525
4 changed files with 5 additions and 4 deletions

Binary file not shown.

Binary file not shown.

Binary file not shown.

View File

@ -86,9 +86,10 @@ CSH.Quit >LDA.G CSH.hBuf
.8 rts .8 rts
*-------------------------------------- *--------------------------------------
CSH.Run jsr CL.RESET CSH.Run jsr CL.RESET
jsr CSH.GetCharNB jsr CSH.GetCharNB
bcs .9 bcs .9
cmp #'}' End of block ? cmp #'}' End of block ?
bne .1 bne .1
@ -162,7 +163,7 @@ CSH.Run jsr CL.RESET
.6 lda (ZPCSHBufPtr),y .6 lda (ZPCSHBufPtr),y
beq .7 beq .7
cmp #13 cmp #C.CR
beq .7 beq .7
sta (ZPCMDBuf),y sta (ZPCMDBuf),y
iny iny
@ -186,13 +187,13 @@ CSH.Run jsr CL.RESET
>STA.G bCmdBufexec >STA.G bCmdBufexec
>LDA.G bSET.X >LDA.G bSET.X
beq .80 * beq .80
>PUSHW ZPCMDBuf >PUSHW ZPCMDBuf
>PUSHBI 2 >PUSHBI 2
>LDYA L.MSG.ECHO >LDYA L.MSG.ECHO
>SYSCALL printf >SYSCALL printf
.80 clc .80 clc
rts rts
*-------------------------------------- *--------------------------------------