mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-23 14:29:59 +00:00
Kernel 0.93+
This commit is contained in:
parent
d704c9b5cc
commit
db180a8f1a
Binary file not shown.
|
@ -19,7 +19,7 @@ BIN.R.Stop .BS 2
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
K.LoadLib jsr ENV.Search.LIB
|
K.LoadLib jsr ENV.Search.LIB
|
||||||
bcs .9
|
bcs .9
|
||||||
jsr BIN.Load Y,A = "/PATH/BIN"
|
jsr BIN.Load K.Buf256 = "/PATH/BIN"
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>STYA .1+1
|
>STYA .1+1
|
||||||
|
@ -66,7 +66,7 @@ K.LoadDrv >STYA .2+1 Save "BIN\0ARGS\0\0"
|
||||||
|
|
||||||
jsr ENV.Search.DRV
|
jsr ENV.Search.DRV
|
||||||
bcs .9
|
bcs .9
|
||||||
jsr BIN.Load Y,A = "/PATH/BIN"
|
jsr BIN.Load K.Buf256 = "/PATH/BIN"
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>STYA .3+1
|
>STYA .3+1
|
||||||
|
@ -105,7 +105,7 @@ BIN.Load.Cleanup.RTS
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
* BIN.Load
|
* BIN.Load
|
||||||
* in :
|
* in :
|
||||||
* Y,A = /BIN/PATH (CSTR)
|
* K.Buf256 = /BIN/PATH (CSTR)
|
||||||
* out :
|
* out :
|
||||||
* Y,A = MEMPTR
|
* Y,A = MEMPTR
|
||||||
* X = hMem of Code Segment
|
* X = hMem of Code Segment
|
||||||
|
@ -202,6 +202,7 @@ BIN.Load.1 >LDYA K.S.STAT+S.STAT.P.AUXTYPE
|
||||||
ldy #S.MEM.BIN
|
ldy #S.MEM.BIN
|
||||||
sta (ZPMemMgrSPtr),y
|
sta (ZPMemMgrSPtr),y
|
||||||
|
|
||||||
|
ldx BIN.hMem setup X = CS hMem
|
||||||
clc
|
clc
|
||||||
jmp MEM.GetMEMPTR ...and Y,A=PTR to CS
|
jmp MEM.GetMEMPTR ...and Y,A=PTR to CS
|
||||||
|
|
||||||
|
|
|
@ -291,7 +291,7 @@ PS.Load.SCRIPT ldx #$ff
|
||||||
|
|
||||||
.1 inx
|
.1 inx
|
||||||
.2 lda $ffff,x SELF MODIFIED
|
.2 lda $ffff,x SELF MODIFIED
|
||||||
sta K.Buf256,x K.Buf256 = "/ROOT/"
|
sta K.Buf256,x K.Buf256 = "$ROOT"
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
ldy #0
|
ldy #0
|
||||||
|
@ -306,12 +306,12 @@ PS.Load.SCRIPT ldx #$ff
|
||||||
.4 iny
|
.4 iny
|
||||||
inx
|
inx
|
||||||
lda K.IOBuf+128-1,y
|
lda K.IOBuf+128-1,y
|
||||||
sta K.Buf256-1,x K.Buf256 = "/ROOT/BIN/SHELL"
|
sta K.Buf256-1,x K.Buf256 = "${ROOT}BIN/SHELL"
|
||||||
beq .5
|
beq .5
|
||||||
eor #C.CR
|
eor #C.CR
|
||||||
bne .4
|
bne .4
|
||||||
|
|
||||||
sta K.Buf256-1,x K.Buf256 = "/ROOT/BIN/SHELL\0"
|
sta K.Buf256-1,x K.Buf256 = "${ROOT}BIN/SHELL\0"
|
||||||
|
|
||||||
.5 >PUSHWI K.S.STAT
|
.5 >PUSHWI K.S.STAT
|
||||||
>LDYAI K.Buf256
|
>LDYAI K.Buf256
|
||||||
|
@ -321,9 +321,9 @@ PS.Load.SCRIPT ldx #$ff
|
||||||
|
|
||||||
lda K.S.STAT+S.STAT.P.TYPE
|
lda K.S.STAT+S.STAT.P.TYPE
|
||||||
cmp #S.FI.T.BIN
|
cmp #S.FI.T.BIN
|
||||||
bne PS.Load.IBIN K.Buf256= /.../SHELL, K.IOBuf=/.../SCRIPT
|
bne PS.Load.IBIN
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
PS.LoadBIN jsr BIN.Load
|
PS.LoadBIN jsr BIN.Load K.Buf256= "${ROOT}BIN/SHELL\0", K.IOBuf=/.../SCRIPT
|
||||||
bcs .9
|
bcs .9
|
||||||
>STYA ZPPtr4 save PTR to Code Segment
|
>STYA ZPPtr4 save PTR to Code Segment
|
||||||
|
|
||||||
|
|
|
@ -1276,7 +1276,11 @@ DRV.TERM.SETUP.L1X
|
||||||
DRV.TERM.SETUP.L1X.SCR
|
DRV.TERM.SETUP.L1X.SCR
|
||||||
lda SCR.BASEL,x
|
lda SCR.BASEL,x
|
||||||
sta ZPScrBaseL1
|
sta ZPScrBaseL1
|
||||||
lda SCR.BASEH,x
|
txa
|
||||||
|
lsr
|
||||||
|
and #$3
|
||||||
|
ora #4
|
||||||
|
* lda SCR.BASEH,x
|
||||||
sta ZPScrBaseL1+1
|
sta ZPScrBaseL1+1
|
||||||
DRV.TERM.SETUP.L1X.8
|
DRV.TERM.SETUP.L1X.8
|
||||||
rts
|
rts
|
||||||
|
@ -1313,6 +1317,92 @@ SB.IS.NAWS .DA #IAC,#SB,#TELOPT.NAWS,#SB.IS
|
||||||
.DA #IAC,#SE
|
.DA #IAC,#SE
|
||||||
SB.IS.NAWS.LEN .EQ *-SB.IS.NAWS
|
SB.IS.NAWS.LEN .EQ *-SB.IS.NAWS
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
RESET.VALUES .DA #0 S.DCB.TTY.MODE
|
||||||
|
.DA #0 S.DCB.TTY.CH
|
||||||
|
.DA #0 S.DCB.TTY.CV
|
||||||
|
.DA #0 S.DCB.TTY.SCROLLTOP
|
||||||
|
.DA #23 S.DCB.TTY.SCROLLBOT
|
||||||
|
.DA #0 S.DCB.TTY.bCURON
|
||||||
|
.DA #0 S.DCB.TTY.bTITLE
|
||||||
|
|
||||||
|
.DA #$80 S.DCB.TTY.bNORMAL
|
||||||
|
.DA #$80 S.DCB.TTY.bLINEWRAP
|
||||||
|
.DA #$80 S.DCB.TTY.bCRLF
|
||||||
|
|
||||||
|
.DA #0
|
||||||
|
|
||||||
|
.DA #0 S.DCB.TTY.bG0G1
|
||||||
|
.DA #0 S.DCB.TTY.bG0ALT
|
||||||
|
.DA #$80 S.DCB.TTY.bG1ALT
|
||||||
|
|
||||||
|
.DA #S.DCB.TTY.OUTBUFFER S.DCB.TTY.OUTTAIL
|
||||||
|
.DA #S.DCB.TTY.OUTBUFFER S.DCB.TTY.OUTHEAD
|
||||||
|
.DA #S.DCB.TTY.INBUFFER S.DCB.TTY.INBUFFER
|
||||||
|
*--------------------------------------
|
||||||
|
DRV.TERM.DIB .DA #S.DIB.S.WRITE+S.DIB.S.READ
|
||||||
|
.DA #0,#0,#0
|
||||||
|
>PSTR "A2osX VT100 TERM"
|
||||||
|
.DA #S.DIB.T.CHAR
|
||||||
|
.DA #0
|
||||||
|
.DA K.VER
|
||||||
|
*--------------------------------------
|
||||||
|
* ` a b c d e f g h i j k l m n o
|
||||||
|
REMAP.E0.FF .HS 5B4142434445464748495FA0DF544e4f
|
||||||
|
* p q r s t u v w x y z { | } ~ DEL
|
||||||
|
.HS 50DF5253545556575F595a5b5c5d5e5f
|
||||||
|
*--------------------------------------
|
||||||
|
BUF.BASEL .DA #0
|
||||||
|
.DA #80
|
||||||
|
.DA #160
|
||||||
|
.DA #240
|
||||||
|
.DA #320
|
||||||
|
.DA #400
|
||||||
|
.DA #480
|
||||||
|
.DA #560
|
||||||
|
.DA #640
|
||||||
|
.DA #720
|
||||||
|
.DA #800
|
||||||
|
.DA #880
|
||||||
|
.DA #960
|
||||||
|
.DA #1040
|
||||||
|
.DA #1120
|
||||||
|
.DA #1200
|
||||||
|
.DA #1280
|
||||||
|
.DA #1360
|
||||||
|
.DA #1440
|
||||||
|
.DA #1520
|
||||||
|
.DA #1600
|
||||||
|
.DA #1680
|
||||||
|
.DA #1760
|
||||||
|
.DA #1840
|
||||||
|
BUF.BASEH .DA /0
|
||||||
|
.DA /80
|
||||||
|
.DA /160
|
||||||
|
.DA /240
|
||||||
|
.DA /320
|
||||||
|
.DA /400
|
||||||
|
.DA /480
|
||||||
|
.DA /560
|
||||||
|
.DA /640
|
||||||
|
.DA /720
|
||||||
|
.DA /800
|
||||||
|
.DA /880
|
||||||
|
.DA /960
|
||||||
|
.DA /1040
|
||||||
|
.DA /1120
|
||||||
|
.DA /1200
|
||||||
|
.DA /1280
|
||||||
|
.DA /1360
|
||||||
|
.DA /1440
|
||||||
|
.DA /1520
|
||||||
|
.DA /1600
|
||||||
|
.DA /1680
|
||||||
|
.DA /1760
|
||||||
|
.DA /1840
|
||||||
|
*--------------------------------------
|
||||||
|
SCR.BASEL .HS 00.80.00.80.00.80.00.80.28.A8.28.A8.28.A8.28.A8.50.D0.50.D0.50.D0.50.D0
|
||||||
|
*SCR.BASEH .HS 04.04.05.05.06.06.07.07.04.04.05.05.06.06.07.07.04.04.05.05.06.06.07.07
|
||||||
|
*--------------------------------------
|
||||||
MAN
|
MAN
|
||||||
SAVE USR/SRC/SYS/KERNEL.S.TERM
|
SAVE USR/SRC/SYS/KERNEL.S.TERM
|
||||||
LOAD USR/SRC/SYS/KERNEL.S
|
LOAD USR/SRC/SYS/KERNEL.S
|
||||||
|
|
|
@ -147,7 +147,11 @@ DRV.TERM.COPY.XtoL1
|
||||||
|
|
||||||
lda SCR.BASEL,x
|
lda SCR.BASEL,x
|
||||||
sta ZPScrBaseL2
|
sta ZPScrBaseL2
|
||||||
lda SCR.BASEH,x
|
* lda SCR.BASEH,x
|
||||||
|
txa
|
||||||
|
lsr
|
||||||
|
and #$3
|
||||||
|
ora #4
|
||||||
sta ZPScrBaseL2+1
|
sta ZPScrBaseL2+1
|
||||||
|
|
||||||
sta SET80STORE
|
sta SET80STORE
|
||||||
|
@ -269,92 +273,6 @@ GetCharAtCurPos ldy #S.DCB.TTY.CV
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
* TEMP
|
* TEMP
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
RESET.VALUES .DA #0 S.DCB.TTY.MODE
|
|
||||||
.DA #0 S.DCB.TTY.CH
|
|
||||||
.DA #0 S.DCB.TTY.CV
|
|
||||||
.DA #0 S.DCB.TTY.SCROLLTOP
|
|
||||||
.DA #23 S.DCB.TTY.SCROLLBOT
|
|
||||||
.DA #0 S.DCB.TTY.bCURON
|
|
||||||
.DA #0 S.DCB.TTY.bTITLE
|
|
||||||
|
|
||||||
.DA #$80 S.DCB.TTY.bNORMAL
|
|
||||||
.DA #$80 S.DCB.TTY.bLINEWRAP
|
|
||||||
.DA #$80 S.DCB.TTY.bCRLF
|
|
||||||
|
|
||||||
.DA #0
|
|
||||||
|
|
||||||
.DA #0 S.DCB.TTY.bG0G1
|
|
||||||
.DA #0 S.DCB.TTY.bG0ALT
|
|
||||||
.DA #$80 S.DCB.TTY.bG1ALT
|
|
||||||
|
|
||||||
.DA #S.DCB.TTY.OUTBUFFER S.DCB.TTY.OUTTAIL
|
|
||||||
.DA #S.DCB.TTY.OUTBUFFER S.DCB.TTY.OUTHEAD
|
|
||||||
.DA #S.DCB.TTY.INBUFFER S.DCB.TTY.INBUFFER
|
|
||||||
*--------------------------------------
|
|
||||||
DRV.TERM.DIB .DA #S.DIB.S.WRITE+S.DIB.S.READ
|
|
||||||
.DA #0,#0,#0
|
|
||||||
>PSTR "A2osX VT100 TERM"
|
|
||||||
.DA #S.DIB.T.CHAR
|
|
||||||
.DA #0
|
|
||||||
.DA K.VER
|
|
||||||
*--------------------------------------
|
|
||||||
* ` a b c d e f g h i j k l m n o
|
|
||||||
REMAP.E0.FF .HS 5B4142434445464748495FA0DF544e4f
|
|
||||||
* p q r s t u v w x y z { | } ~ DEL
|
|
||||||
.HS 50DF5253545556575F595a5b5c5d5e5f
|
|
||||||
*--------------------------------------
|
|
||||||
BUF.BASEL .DA #0
|
|
||||||
.DA #80
|
|
||||||
.DA #160
|
|
||||||
.DA #240
|
|
||||||
.DA #320
|
|
||||||
.DA #400
|
|
||||||
.DA #480
|
|
||||||
.DA #560
|
|
||||||
.DA #640
|
|
||||||
.DA #720
|
|
||||||
.DA #800
|
|
||||||
.DA #880
|
|
||||||
.DA #960
|
|
||||||
.DA #1040
|
|
||||||
.DA #1120
|
|
||||||
.DA #1200
|
|
||||||
.DA #1280
|
|
||||||
.DA #1360
|
|
||||||
.DA #1440
|
|
||||||
.DA #1520
|
|
||||||
.DA #1600
|
|
||||||
.DA #1680
|
|
||||||
.DA #1760
|
|
||||||
.DA #1840
|
|
||||||
BUF.BASEH .DA /0
|
|
||||||
.DA /80
|
|
||||||
.DA /160
|
|
||||||
.DA /240
|
|
||||||
.DA /320
|
|
||||||
.DA /400
|
|
||||||
.DA /480
|
|
||||||
.DA /560
|
|
||||||
.DA /640
|
|
||||||
.DA /720
|
|
||||||
.DA /800
|
|
||||||
.DA /880
|
|
||||||
.DA /960
|
|
||||||
.DA /1040
|
|
||||||
.DA /1120
|
|
||||||
.DA /1200
|
|
||||||
.DA /1280
|
|
||||||
.DA /1360
|
|
||||||
.DA /1440
|
|
||||||
.DA /1520
|
|
||||||
.DA /1600
|
|
||||||
.DA /1680
|
|
||||||
.DA /1760
|
|
||||||
.DA /1840
|
|
||||||
*--------------------------------------
|
|
||||||
SCR.BASEL .HS 00.80.00.80.00.80.00.80.28.A8.28.A8.28.A8.28.A8.50.D0.50.D0.50.D0.50.D0
|
|
||||||
SCR.BASEH .HS 04.04.05.05.06.06.07.07.04.04.05.05.06.06.07.07.04.04.05.05.06.06.07.07
|
|
||||||
*--------------------------------------
|
|
||||||
MAN
|
MAN
|
||||||
SAVE USR/SRC/SYS/KERNEL.S.TERMLC
|
SAVE USR/SRC/SYS/KERNEL.S.TERMLC
|
||||||
LOAD USR/SRC/SYS/KERNEL.S
|
LOAD USR/SRC/SYS/KERNEL.S
|
||||||
|
|
Loading…
Reference in New Issue
Block a user