mirror of
https://github.com/A2osX/A2osX.git
synced 2024-12-25 19:30:44 +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
|
||||
|
||||
@ -228,9 +238,8 @@ CS.RUN.GETLINE >PUSHWI 256
|
||||
|
||||
ldy #S.PS.hStdIn
|
||||
lda (pPS),y
|
||||
|
||||
.1 >SYSCALL fgets
|
||||
|
||||
.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
|
||||
@ -117,7 +120,7 @@ CORE.Run >LDYA ZPInputBufPtr Save Actual cmd for looping
|
||||
.5 >LDYA L.CORE.IO
|
||||
jsr CORE.LookupInputBuf
|
||||
bcs .6
|
||||
|
||||
|
||||
jsr CORE.SkipCharsA
|
||||
|
||||
jsr CORE.IO.JMP
|
||||
@ -137,6 +140,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 |
|
||||
|
||||
@ -177,7 +182,7 @@ CORE.ExecCmd.1 lda #0
|
||||
rts
|
||||
|
||||
CORE.ExecExtCmd >PUSHB.G CORE.PSFlags
|
||||
>LDYA ZPArgVBuf
|
||||
>LDYA ZPArgVBuf
|
||||
>SYSCALL execv
|
||||
|
||||
CORE.ExecExtCmd.Exit
|
||||
@ -388,12 +393,15 @@ CORE.IO.2OUT.1 jsr CORE.IO.Open
|
||||
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