mirror of
https://github.com/A2osX/A2osX.git
synced 2025-08-07 11:26:36 +00:00
Kernel 0.94
This commit is contained in:
Binary file not shown.
@@ -56,9 +56,11 @@ SRC.ParseLine.LABEL
|
|||||||
beq SRC.ParseLine.InvLbl illegal OUTSIDE macro
|
beq SRC.ParseLine.InvLbl illegal OUTSIDE macro
|
||||||
|
|
||||||
.2 >LDA.G SYM.bInGlobal Not relative to Global label...
|
.2 >LDA.G SYM.bInGlobal Not relative to Global label...
|
||||||
bpl SRC.ParseLine.InvLbl
|
bmi .3
|
||||||
|
>DEBUG
|
||||||
|
bra SRC.ParseLine.InvLbl
|
||||||
|
|
||||||
jsr SRC.GetNextChar
|
.3 jsr SRC.GetNextChar
|
||||||
bcs SRC.ParseLine.InvLbl
|
bcs SRC.ParseLine.InvLbl
|
||||||
|
|
||||||
jsr SRC.GetDecimal
|
jsr SRC.GetDecimal
|
||||||
|
@@ -211,12 +211,10 @@ SYM.NewGlobal jsr SYM.StoreGlobal
|
|||||||
tay
|
tay
|
||||||
lda #0
|
lda #0
|
||||||
sta (ZPSymbolBuf),y
|
sta (ZPSymbolBuf),y
|
||||||
|
|
||||||
lda #$ff
|
lda #$ff
|
||||||
>STA.G SYM.bInGlobal
|
>STA.G SYM.bInGlobal
|
||||||
* >PUSHW.G SYM.GlobalID
|
|
||||||
* >PUSHBI 2
|
|
||||||
* >LDYA L.MSG.WORD
|
|
||||||
* >SYSCALL printf
|
|
||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
|
|
||||||
@@ -236,15 +234,7 @@ SYM.GetGlobal >PUSHB.G SYM.hList
|
|||||||
bcc .1
|
bcc .1
|
||||||
inc ZPLinePtr+1
|
inc ZPLinePtr+1
|
||||||
|
|
||||||
.1
|
.1 >PUSHB.G SYM.hList
|
||||||
* txa
|
|
||||||
* ora #$30
|
|
||||||
* >SYSCALL putchar
|
|
||||||
* >LDYA ZPLinePtr
|
|
||||||
* >SYSCALL puts
|
|
||||||
* >DEBUG
|
|
||||||
|
|
||||||
>PUSHB.G SYM.hList
|
|
||||||
>PUSHW.G SYM.GlobalID
|
>PUSHW.G SYM.GlobalID
|
||||||
>PUSHW ZPSymbolBuf
|
>PUSHW ZPSymbolBuf
|
||||||
>PUSHWI $ffff all
|
>PUSHWI $ffff all
|
||||||
@@ -364,6 +354,7 @@ SYM.PC2Acc ldy #ASM.PC+3
|
|||||||
rts
|
rts
|
||||||
*---------------------------------------
|
*---------------------------------------
|
||||||
SYM.Acc2Global ldy #SYMG-1
|
SYM.Acc2Global ldy #SYMG-1
|
||||||
|
|
||||||
.2 lda SRC.ACC.F,y
|
.2 lda SRC.ACC.F,y
|
||||||
sta (ZPSymbolBuf),y
|
sta (ZPSymbolBuf),y
|
||||||
dey
|
dey
|
||||||
|
@@ -354,7 +354,7 @@ CS.RUN ldy #S.PS.hStdIn
|
|||||||
|
|
||||||
.9 pha
|
.9 pha
|
||||||
jsr OUT.PrintLineErr
|
jsr OUT.PrintLineErr
|
||||||
|
jsr SYM.Dump
|
||||||
pla
|
pla
|
||||||
sec
|
sec
|
||||||
rts
|
rts
|
||||||
|
@@ -1,9 +1,8 @@
|
|||||||
NEW
|
NEW
|
||||||
PREFIX
|
AUTO 3,1
|
||||||
AUTO 4,1 Enable MASM3 auto line num
|
|
||||||
.LIST OFF
|
.LIST OFF
|
||||||
.OP 65C02 Target CPU, must match CPU level in header
|
.OP 65C02
|
||||||
.OR $2000 usualy $2000, but any value > $100 allowed
|
.OR $2000
|
||||||
.TF sbin/initd
|
.TF sbin/initd
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
.INB INC/MACROS.I
|
.INB INC/MACROS.I
|
||||||
@@ -14,7 +13,6 @@ AUTO 4,1 Enable MASM3 auto line num
|
|||||||
.DUMMY
|
.DUMMY
|
||||||
.OR ZPBIN
|
.OR ZPBIN
|
||||||
ZS.START
|
ZS.START
|
||||||
* MyPtr .BS 2
|
|
||||||
ZS.END
|
ZS.END
|
||||||
.ED
|
.ED
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
@@ -58,16 +56,20 @@ CS.RUN ldy #S.PS.PID
|
|||||||
lda (pPS),y
|
lda (pPS),y
|
||||||
cmp #1
|
cmp #1
|
||||||
bne .9
|
bne .9
|
||||||
|
|
||||||
>SYSCALL getchar
|
>SYSCALL getchar
|
||||||
bcs .1
|
bcs .1
|
||||||
|
|
||||||
cmp #$12 CTRL-R for Root mode
|
cmp #$12 CTRL-R for Root mode
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
>LDYA L.MSG.CTRLR
|
>LDYA L.MSG.CTRLR
|
||||||
>SYSCALL puts
|
>SYSCALL puts
|
||||||
>PUSHW L.BINSHELL
|
>PUSHW L.BINSHELL
|
||||||
>PUSHBI S.PS.F.HOLD
|
>PUSHBI S.PS.F.HOLD
|
||||||
>SYSCALL ExecL
|
>SYSCALL ExecL
|
||||||
>SLEEP
|
>SLEEP
|
||||||
|
|
||||||
.1 >LDYA L.MSG.ETCINIT
|
.1 >LDYA L.MSG.ETCINIT
|
||||||
>SYSCALL puts
|
>SYSCALL puts
|
||||||
>PUSHW L.ETCINIT
|
>PUSHW L.ETCINIT
|
||||||
@@ -76,13 +78,16 @@ CS.RUN ldy #S.PS.PID
|
|||||||
>SLEEP
|
>SLEEP
|
||||||
>LDYA L.MSG.RUNNING
|
>LDYA L.MSG.RUNNING
|
||||||
>SYSCALL puts
|
>SYSCALL puts
|
||||||
|
|
||||||
ldy #S.PS.F.HOLD
|
ldy #S.PS.F.HOLD
|
||||||
ora (pPS),y
|
ora (pPS),y
|
||||||
sta (pPS),y
|
sta (pPS),y
|
||||||
>SLEEP
|
>SLEEP
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
sec
|
sec
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.9 lda #E.SYN
|
.9 lda #E.SYN
|
||||||
sec
|
sec
|
||||||
rts
|
rts
|
||||||
@@ -105,8 +110,8 @@ CS.END
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
MSG.CTRLR .AZ "INITD:Ctrl-R Pressed, entering ROOT mode..."
|
MSG.CTRLR .AZ "INITD:Ctrl-R Pressed, entering ROOT mode..."
|
||||||
MSG.ETCINIT .AS "INITD:Executing ETC/INIT Script:"
|
MSG.ETCINIT .AS "INITD:Executing ETC/INIT Script:"
|
||||||
ETCINIT .AZ "${ROOT}etc/init"
|
|
||||||
BINSHELL .AZ "${ROOT}bin/sh"
|
BINSHELL .AZ "${ROOT}bin/sh"
|
||||||
|
ETCINIT .AZ "${ROOT}etc/init"
|
||||||
MSG.RUNNING .AZ "INITD:Running..."
|
MSG.RUNNING .AZ "INITD:Running..."
|
||||||
MSH.SHUTDOWN .AZ "INITD:Shutting down..."
|
MSH.SHUTDOWN .AZ "INITD:Shutting down..."
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
Reference in New Issue
Block a user