mirror of
https://github.com/A2osX/A2osX.git
synced 2024-12-26 11:30:07 +00:00
Kernel 0.92+
This commit is contained in:
parent
2069187dd2
commit
578f8fc22f
Binary file not shown.
@ -65,6 +65,7 @@ CS.RUN >LDYA L.MemStat
|
||||
>PUSHBI 8
|
||||
>LDYA L.MSG.Stat
|
||||
>SYSCALL printf
|
||||
>SLEEP
|
||||
*--------------------------------------
|
||||
>LDYA L.MSG.Aux
|
||||
>SYSCALL puts
|
||||
@ -83,6 +84,7 @@ CS.RUN >LDYA L.MemStat
|
||||
>PUSHBI 8
|
||||
>LDYA L.MSG.Stat
|
||||
>SYSCALL printf
|
||||
>SLEEP
|
||||
*--------------------------------------
|
||||
>LDYA L.MSG.Kernel
|
||||
>SYSCALL puts
|
||||
|
@ -115,9 +115,14 @@ CS.RUN
|
||||
CS.RUN.LOOP >SLEEP
|
||||
|
||||
jsr CS.RUN.GETLINE
|
||||
bcs .13
|
||||
bcc .1
|
||||
|
||||
>INCW.G LineNum
|
||||
tay
|
||||
beq CS.RUN.LOOP
|
||||
|
||||
bra .13
|
||||
|
||||
.1 >INCW.G LineNum
|
||||
|
||||
>LDA.G LineCount
|
||||
bne .22
|
||||
@ -185,8 +190,13 @@ CS.RUN.PAUSE >PUSHBI 0
|
||||
bne .10
|
||||
|
||||
jsr CS.RUN.ERASE
|
||||
|
||||
.40 >SLEEP
|
||||
jsr CS.RUN.GETLINE
|
||||
bcc .5
|
||||
tay
|
||||
beq .40
|
||||
|
||||
cmp #MLI.E.EOF
|
||||
bne .99
|
||||
|
||||
@ -230,7 +240,6 @@ CS.RUN.GETLINE >PUSHWI 256
|
||||
lda (pPS),y
|
||||
|
||||
.1 >SYSCALL fgets
|
||||
|
||||
bcs .9
|
||||
|
||||
lda (ZPBufPtr)
|
||||
|
@ -201,7 +201,7 @@ CS.QUIT clc
|
||||
rts
|
||||
*--------------------------------------
|
||||
CS.END
|
||||
MSG0 .AZ "\e[7lID CPU% Flags UID PID Command Line"
|
||||
MSG0 .AZ "\e[7lID CPU\% Flags UID PID Command Line\r\n"
|
||||
MSG1 .AZ "%03d %3d\% %s %03d %03d"
|
||||
MSG2 .AZ " %s"
|
||||
MSG3 .AZ "\r\n"
|
||||
|
@ -88,6 +88,9 @@ CORE.Run >LDYA ZPInputBufPtr Save Actual cmd for looping
|
||||
|
||||
jsr CORE.GetNextCharNB
|
||||
bcs CORE.Run.CSYN
|
||||
bra .3
|
||||
|
||||
.21 jsr IO.Reset
|
||||
|
||||
.3 cmp #'.'
|
||||
bne .4
|
||||
@ -138,6 +141,8 @@ CORE.Run >LDYA ZPInputBufPtr Save Actual cmd for looping
|
||||
jsr IO.Pipe.Out
|
||||
bcs CORE.Run.RTS
|
||||
|
||||
jsr CORE.IO.AMP run in background
|
||||
|
||||
bra CORE.ExecCmd.1 Do not skip |
|
||||
|
||||
CORE.Run.RTS rts
|
||||
@ -389,11 +394,14 @@ CORE.IO.Open pha Open Mode
|
||||
jsr CORE.GetCharNB
|
||||
bcs .9 no arg left....
|
||||
|
||||
jsr CORE.ArgV.Add Get Filename
|
||||
|
||||
>PUSHWI 0 Aux type
|
||||
>PUSHBI S.FI.T.TXT ftype
|
||||
pla
|
||||
>PUSHA flags
|
||||
>LDYA ZPInputBufPtr
|
||||
>LDYA ZPArgVBufPrev
|
||||
>STYA ZPArgVBufPtr Discard filename
|
||||
>SYSCALL fopen
|
||||
rts
|
||||
|
||||
|
10
BIN/SH.S.txt
10
BIN/SH.S.txt
@ -210,7 +210,6 @@ CS.RUN jsr CL.Init
|
||||
>LDYA L.MSG.GREETINGS
|
||||
>SYSCALL printf
|
||||
bcs CS.INIT.RTS
|
||||
bra CS.RUN.LOOP
|
||||
|
||||
>PUSHEA.G StatBuf
|
||||
>LDYA L.HOME.PROFILE
|
||||
@ -306,6 +305,11 @@ CS.RUN.INTERACTIVE
|
||||
>LDA.G CL.bReady Something to execute ?
|
||||
bpl .1
|
||||
|
||||
>PUSHBI 0
|
||||
>LDYA L.MSG.ECHOCRLF
|
||||
>SYSCALL printf
|
||||
bcs .9
|
||||
|
||||
lda (ZPCLBuf)
|
||||
beq .8 Empty line
|
||||
|
||||
@ -360,9 +364,7 @@ CS.RUN.READ jsr CL.RESET
|
||||
|
||||
.8 jmp CS.RUN.LOOP.END
|
||||
*--------------------------------------
|
||||
CS.RUN.BATCH jsr IO.Reset
|
||||
|
||||
>SYSCALL GetChar
|
||||
CS.RUN.BATCH >SYSCALL GetChar
|
||||
bcs .2
|
||||
|
||||
cmp #3 test Ctrl-c
|
||||
|
@ -224,7 +224,7 @@ MSG.ECHOCRLF .AZ "\r\n"
|
||||
MSG.ECHODEL .DA #C.BS,#C.SPACE,#C.BS,#0
|
||||
ENV.SHELL .AZ "SHELL"
|
||||
ENV.HOME .AZ "HOME"
|
||||
SHELL .AZ "${ROOT}BIN/SHELL"
|
||||
SHELL .AZ "${ROOT}BIN/SH"
|
||||
HOME .AZ "${ROOT}ROOT/"
|
||||
.HS 00
|
||||
*--------------------------------------
|
||||
|
Loading…
Reference in New Issue
Block a user