mirror of
https://github.com/A2osX/A2osX.git
synced 2025-02-07 20:30:43 +00:00
Kernel 0.9.2
This commit is contained in:
parent
384aa458b0
commit
046fe81b53
Binary file not shown.
Binary file not shown.
@ -54,10 +54,7 @@ Cmd.Parse >STZ.G CMD.bCmd
|
||||
lda (ZPCMDBuf)
|
||||
beq .8
|
||||
|
||||
.1 >LDYA ZPCMDBuf
|
||||
>SYSCALL puts
|
||||
|
||||
>LDA.G CMD.bCmd
|
||||
.1 >LDA.G CMD.bCmd
|
||||
bne .6 we already have Cmd, go check args
|
||||
|
||||
ldy #2
|
||||
@ -257,12 +254,12 @@ Cmd.INT.CD ldx #1
|
||||
beq .8 we have '/'
|
||||
|
||||
>PUSHEA.G CMD.Stat
|
||||
>LDYA ZPPTR2
|
||||
>LDYA ZPCMDBuf
|
||||
>SYSCALL STAT
|
||||
bcs .9
|
||||
|
||||
>LDA.G CMD.Stat+S.STAT.P.TYPE
|
||||
cmp #$0F Directory ?
|
||||
cmp #S.FI.T.DIR
|
||||
bne Cmd.Exec.ERRSYN
|
||||
|
||||
.8 >LDYA ZPCMDBuf
|
||||
@ -286,9 +283,7 @@ Cmd.Exec.ERRSYN lda #E.SYN
|
||||
sec
|
||||
rts
|
||||
*--------------------------------------
|
||||
Cmd.INT.SET >DEBUG
|
||||
|
||||
ldx #1
|
||||
Cmd.INT.SET ldx #1
|
||||
jsr Cmd.GetArgX
|
||||
bcc Cmd.INT.SETVAR
|
||||
|
||||
@ -341,7 +336,7 @@ Cmd.INT.SET >DEBUG
|
||||
.9 rts
|
||||
*--------------------------------------
|
||||
Cmd.INT.SETVAR >STYA ZPPTR1
|
||||
|
||||
>SYSCALL puts
|
||||
lda (ZPPTR1)
|
||||
cmp #'=' string is '=value' ?
|
||||
beq .99 syntax error
|
||||
@ -422,7 +417,6 @@ Cmd.INT.ECHO ldx #1
|
||||
ldy #S.PS.hStdOut
|
||||
lda (pPs),y
|
||||
>SYSCALL fputs
|
||||
>DEBUG
|
||||
bcs .9
|
||||
|
||||
ldx #2
|
||||
@ -448,10 +442,10 @@ Cmd.INT.ECHO ldx #1
|
||||
.71 >LDA.G bECHO.N
|
||||
bmi .8
|
||||
|
||||
>PUSHBI 0
|
||||
>LDYA L.MSG.ECHOCRLF
|
||||
>SYSCALL printf
|
||||
rts
|
||||
* >PUSHBI 0
|
||||
* >LDYA L.MSG.ECHOCRLF
|
||||
* >SYSCALL printf
|
||||
* rts
|
||||
|
||||
.8 clc
|
||||
.9 rts
|
||||
@ -632,6 +626,7 @@ CMD.NextCmdBufToken
|
||||
CMD.AddTokenToArgV
|
||||
>LDYA ZPCmdBuf
|
||||
CMD.AddYAToArgV >STYA ZPPtr1
|
||||
|
||||
>LDYA ZPArgVBuf
|
||||
>STYA ZPPtr2
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user