Kernel version 0.8 : BUGFIX #10 ...more advanced ECHO command

This commit is contained in:
Rémy GIBERT 2016-11-03 17:26:02 +01:00
parent 17eeac3b1f
commit 71c0b8c149
4 changed files with 20 additions and 19 deletions

View File

@ -186,10 +186,11 @@ Cmd.Exec.CD lda ARGS
Cmd.Exec.PWD ldy #S.PS.hPREFIX Cmd.Exec.PWD ldy #S.PS.hPREFIX
lda (pPs),y lda (pPs),y
>SYSCALL GetMemPtrA >SYSCALL GetMemPtrA
>PUSHYA >SYSCALL PPrintFYA
>LDYA L.MSG.PSTR bcs .9
>SYSCALL PrintFYA lda #13
rts >SYSCALL COutA
.9 rts
Cmd.Exec.CD1 stz UsrBuf256 Cmd.Exec.CD1 stz UsrBuf256
lda ARGS+1 lda ARGS+1
@ -336,7 +337,7 @@ Cmd.Exec.SET lda ARGS
>PUSHW ZPPTR1 Push name >PUSHW ZPPTR1 Push name
>LDYA L.MSG.PRINTENV >LDYA L.MSG.PRINTENV
>SYSCALL PrintFYA >SYSCALL CPrintFYA
bcs .9 bcs .9
lda ZPPTR2 lda ZPPTR2
@ -384,7 +385,7 @@ Cmd.Exec.SETVAR tax
>PUSHYA push value >PUSHYA push value
>PUSHW L.ARGS push name >PUSHW L.ARGS push name
>LDYA L.MSG.PRINTENV >LDYA L.MSG.PRINTENV
>SYSCALL PrintFYA >SYSCALL CPrintFYA
.8 clc .8 clc
.9 rts .9 rts
@ -411,16 +412,18 @@ Cmd.Exec.TIME clc
.2 >PUSHW L.TIME .2 >PUSHW L.TIME
>SYSCALL PStrFTime >SYSCALL PStrFTime
>PUSHWI UsrBuf256 >LDYAI UsrBuf256
>LDYA L.MSG.PSTR bcs .9
>SYSCALL PrintFYA lda #13
rts >SYSCALL COutA
.9 rts
*-------------------------------------- *--------------------------------------
Cmd.Exec.ECHO lda ARGS Cmd.Exec.ECHO lda ARGS
beq Cmd.Exec.ECHO.SYN beq Cmd.Exec.ECHO.SYN
>PUSHW L.ARGS
>LDYA L.MSG.PSTR
>SYSCALL PrintFYA >LDYA L.ARGS
>SYSCALL PPrintFYA
clc clc
rts rts

View File

@ -43,7 +43,7 @@ ERR.Print >PUSHA Save EC for PrintF
.8 >PUSHW ZPPTR1 .8 >PUSHW ZPPTR1
>LDYA L.MSG.ERROR >LDYA L.MSG.ERROR
>SYSCALL PrintFYA >SYSCALL CPrintFYA
rts rts
*-------------------------------------- *--------------------------------------
MAN MAN

View File

@ -51,7 +51,7 @@ TXT.ReadFile >PUSHWI UsrBuf256+1
>PUSHW pData >PUSHW pData
>LDYA L.MSG.ECHO >LDYA L.MSG.ECHO
>SYSCALL PrintFYA >SYSCALL CPrintFYA
.8 clc .8 clc
.9 rts .9 rts
*-------------------------------------- *--------------------------------------

View File

@ -41,7 +41,6 @@ L.MSG.GREETINGS .DA MSG.GREETINGS
L.MSG.PROMPT .DA MSG.PROMPT L.MSG.PROMPT .DA MSG.PROMPT
L.MSG.ECHO .DA MSG.ECHO L.MSG.ECHO .DA MSG.ECHO
L.MSG.ERROR .DA MSG.ERROR L.MSG.ERROR .DA MSG.ERROR
L.MSG.PSTR .DA MSG.PSTR
L.MSG.PRINTENV .DA MSG.PRINTENV L.MSG.PRINTENV .DA MSG.PRINTENV
L.ENV.PATH .DA ENV.PATH L.ENV.PATH .DA ENV.PATH
L.ENV.PWD .DA ENV.PWD L.ENV.PWD .DA ENV.PWD
@ -93,7 +92,7 @@ CS.INIT.INTERACTIVE
lda (pPs),y lda (pPs),y
>PUSHA >PUSHA
>LDYA L.MSG.GREETINGS >LDYA L.MSG.GREETINGS
>SYSCALL PrintFYA >SYSCALL CPrintFYA
lda (pPs) lda (pPs)
ora #S.PS.F.EVENT Now accept events ora #S.PS.F.EVENT Now accept events
@ -353,7 +352,7 @@ PrintPrompt >LDYA L.ENV.PS1
pla pla
>SYSCALL FreeMemA >SYSCALL FreeMemA
>LDYA L.MSG.PROMPT >LDYA L.MSG.PROMPT
>SYSCALL PrintFYA >SYSCALL CPrintFYA
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
* Remove extra SPACE & comment * Remove extra SPACE & comment
@ -460,7 +459,6 @@ MSG.ECHO >CSTR ">%S\n"
MSG.ERROR >CSTR "%S ($%h)\n" MSG.ERROR >CSTR "%S ($%h)\n"
FMT.DATE >PSTR "%A, %B %d %Y" FMT.DATE >PSTR "%A, %B %d %Y"
FMT.TIME >PSTR "%H:%M:%S (%I:%M:%S%p)" FMT.TIME >PSTR "%H:%M:%S (%I:%M:%S%p)"
MSG.PSTR >CSTR "%S\n"
MSG.PRINTENV >CSTR "%S=%S\n" MSG.PRINTENV >CSTR "%S=%S\n"
*-------------------------------------- *--------------------------------------
.INB X.ERRORS.S .INB X.ERRORS.S