mirror of
https://github.com/A2osX/A2osX.git
synced 2024-10-10 12:23:45 +00:00
Kernel 0.92
This commit is contained in:
parent
fe897c3257
commit
3fb363ee6a
Binary file not shown.
@ -276,7 +276,7 @@ Cmd.INT.SET.1 >STZ.G CMD.Varname
|
|||||||
|
|
||||||
bcs .99
|
bcs .99
|
||||||
|
|
||||||
>PUSHEA.G M32.Buf
|
>PUSHYA
|
||||||
>LDA.G CMD.Varname
|
>LDA.G CMD.Varname
|
||||||
tax
|
tax
|
||||||
jsr Cmd.GetArgX
|
jsr Cmd.GetArgX
|
||||||
@ -286,7 +286,7 @@ Cmd.INT.SET.1 >STZ.G CMD.Varname
|
|||||||
.8 clc
|
.8 clc
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.99 lda #E.SYN
|
.99 lda #E.SYNTAX
|
||||||
sec
|
sec
|
||||||
rts
|
rts
|
||||||
|
|
||||||
@ -820,13 +820,14 @@ Cmd.GetEXP >LDA.G CMD.ArgIndex
|
|||||||
bcc .1
|
bcc .1
|
||||||
|
|
||||||
>LDA.G CMD.ArgIndex no op, return text value
|
>LDA.G CMD.ArgIndex no op, return text value
|
||||||
|
tax
|
||||||
jsr Cmd.GetArgX
|
jsr Cmd.GetArgX
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.1 >PUSHYA
|
.1 >PUSHYA
|
||||||
>LDYA L.CMD.IF.TOKEN4 + - .... ?
|
>LDYA L.CMD.IF.TOKEN4 + - .... ?
|
||||||
jsr Lookup
|
jsr Lookup
|
||||||
bcs .9
|
bcs .90
|
||||||
txa
|
txa
|
||||||
>STA.G CMD.Operator
|
>STA.G CMD.Operator
|
||||||
|
|
||||||
@ -849,7 +850,7 @@ Cmd.GetEXP >LDA.G CMD.ArgIndex
|
|||||||
|
|
||||||
>PULLL.G M32.ARG
|
>PULLL.G M32.ARG
|
||||||
jsr .80
|
jsr .80
|
||||||
bcs .9
|
.90 bcs .9
|
||||||
|
|
||||||
>PUSHL.G M32.ACC
|
>PUSHL.G M32.ACC
|
||||||
>PUSHBI 4
|
>PUSHBI 4
|
||||||
@ -857,6 +858,9 @@ Cmd.GetEXP >LDA.G CMD.ArgIndex
|
|||||||
>LDYA L.M32.Printf
|
>LDYA L.M32.Printf
|
||||||
>SYSCALL sprintf
|
>SYSCALL sprintf
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
|
>LEA.G M32.Buf
|
||||||
|
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.9 lda #E.BADEXP
|
.9 lda #E.BADEXP
|
||||||
|
@ -94,7 +94,6 @@ CS.RUN lda #0
|
|||||||
lda #C.LF
|
lda #C.LF
|
||||||
>SYSCALL PutChar
|
>SYSCALL PutChar
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
jsr CS.RUN.SETENV
|
jsr CS.RUN.SETENV
|
||||||
bcs .9
|
bcs .9
|
||||||
>PUSHBI S.PS.F.HOLD
|
>PUSHBI S.PS.F.HOLD
|
||||||
@ -102,13 +101,13 @@ CS.RUN lda #0
|
|||||||
>SYSCALL ExecL
|
>SYSCALL ExecL
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN.SETENV >PUSHW L.ENV.HOME
|
CS.RUN.SETENV >PUSHW L.HOME
|
||||||
>LDYA L.HOME
|
>LDYA L.ENV.HOME
|
||||||
>SYSCALL setenv
|
>SYSCALL setenv
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>PUSHW L.ENV.SHELL
|
>PUSHW L.SHELL
|
||||||
>LDYA L.SHELL
|
>LDYA L.ENV.SHELL
|
||||||
>SYSCALL setenv
|
>SYSCALL setenv
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
@ -205,7 +204,7 @@ MSG.LOGIN .AZ "\r\nlogin:"
|
|||||||
MSG.PASSWORD .AZ "\r\npassword:"
|
MSG.PASSWORD .AZ "\r\npassword:"
|
||||||
ENV.SHELL .AZ "SHELL"
|
ENV.SHELL .AZ "SHELL"
|
||||||
ENV.HOME .AZ "HOME"
|
ENV.HOME .AZ "HOME"
|
||||||
SHELL .AZ "${ROOT}SBIN/SHELL"
|
SHELL .AZ "${ROOT}BIN/SHELL"
|
||||||
HOME .AZ "${ROOT}ROOT"
|
HOME .AZ "${ROOT}ROOT"
|
||||||
.HS 00
|
.HS 00
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user