Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-10 06:29:33 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.92

Browse Source
This commit is contained in:
Rémy GIBERT 2018-11-23 22:36:31 +01:00
parent fe897c3257
commit 3fb363ee6a
3 changed files with 13 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

12
BIN/SHELL.S.CMD.txt
View File

@ -276,7 +276,7 @@ Cmd.INT.SET.1 >STZ.G CMD.Varname
bcs .99
>PUSHEA.G M32.Buf
>PUSHYA
>LDA.G CMD.Varname
tax
jsr Cmd.GetArgX
@ -286,7 +286,7 @@ Cmd.INT.SET.1 >STZ.G CMD.Varname
.8 clc
rts
.99 lda #E.SYN
.99 lda #E.SYNTAX
sec
rts
@ -820,13 +820,14 @@ Cmd.GetEXP >LDA.G CMD.ArgIndex
bcc .1
>LDA.G CMD.ArgIndex no op, return text value
tax
jsr Cmd.GetArgX
rts
.1 >PUSHYA
>LDYA L.CMD.IF.TOKEN4 + - .... ?
jsr Lookup
bcs .9
bcs .90
txa
>STA.G CMD.Operator
@ -849,7 +850,7 @@ Cmd.GetEXP >LDA.G CMD.ArgIndex
>PULLL.G M32.ARG
jsr .80
bcs .9
.90 bcs .9
>PUSHL.G M32.ACC
>PUSHBI 4
@ -857,6 +858,9 @@ Cmd.GetEXP >LDA.G CMD.ArgIndex
>LDYA L.M32.Printf
>SYSCALL sprintf
bcs .9
>LEA.G M32.Buf
rts
.9 lda #E.BADEXP

11
SBIN/LOGIN.S.txt
View File

@ -94,7 +94,6 @@ CS.RUN lda #0
lda #C.LF
>SYSCALL PutChar
bcs .9
jsr CS.RUN.SETENV
bcs .9
>PUSHBI S.PS.F.HOLD
@ -102,13 +101,13 @@ CS.RUN lda #0
>SYSCALL ExecL
rts
*--------------------------------------
CS.RUN.SETENV >PUSHW L.ENV.HOME
>LDYA L.HOME
CS.RUN.SETENV >PUSHW L.HOME
>LDYA L.ENV.HOME
>SYSCALL setenv
bcs .9
>PUSHW L.ENV.SHELL
>LDYA L.SHELL
>PUSHW L.SHELL
>LDYA L.ENV.SHELL
>SYSCALL setenv
bcs .9
@ -205,7 +204,7 @@ MSG.LOGIN .AZ "\r\nlogin:"
MSG.PASSWORD .AZ "\r\npassword:"
ENV.SHELL .AZ "SHELL"
ENV.HOME .AZ "HOME"
SHELL .AZ "${ROOT}SBIN/SHELL"
SHELL .AZ "${ROOT}BIN/SHELL"
HOME .AZ "${ROOT}ROOT"
.HS 00
*--------------------------------------