mirror of
https://github.com/A2osX/A2osX.git
synced 2024-09-28 18:55:10 +00:00
Kernel 0.93+
This commit is contained in:
parent
3e7d70ffe6
commit
85102b35d7
Binary file not shown.
@ -204,7 +204,7 @@ DLG.CTRL.Draw sta TmpByte A=CtrlID
|
|||||||
jmp (J.DLG.CTRL.Draw,x)
|
jmp (J.DLG.CTRL.Draw,x)
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
DLG.CTRL.Draw.LBL
|
DLG.CTRL.Draw.LBL
|
||||||
jsr SCRN.LineBufInitDlg
|
jsr SCRN.LineBufInitLbl
|
||||||
|
|
||||||
jsr DLG.CTRL.GotoOrg
|
jsr DLG.CTRL.GotoOrg
|
||||||
bcs .9
|
bcs .9
|
||||||
@ -224,7 +224,9 @@ DLG.CTRL.Draw.LBL
|
|||||||
iny
|
iny
|
||||||
bra .1
|
bra .1
|
||||||
|
|
||||||
.8 jmp SCRN.LineBufOut
|
.8 jsr SCRN.LineBufOut
|
||||||
|
* >DEBUG
|
||||||
|
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
DLG.CTRL.Draw.TB
|
DLG.CTRL.Draw.TB
|
||||||
@ -380,6 +382,7 @@ DLG.CTRL.Focus sta TmpByte A=CtrlID
|
|||||||
tay
|
tay
|
||||||
lda (ZPPTR1),y Ctrl Type
|
lda (ZPPTR1),y Ctrl Type
|
||||||
tax
|
tax
|
||||||
|
|
||||||
jmp (J.DLG.CTRL.Focus,x)
|
jmp (J.DLG.CTRL.Focus,x)
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
DLG.CTRL.Focus.LBL
|
DLG.CTRL.Focus.LBL
|
||||||
|
@ -545,6 +545,10 @@ SCRN.LineBufInitDlg
|
|||||||
phx
|
phx
|
||||||
ldx #SEQ.DLG-SEQS
|
ldx #SEQ.DLG-SEQS
|
||||||
bra SCRN.LineBufInit
|
bra SCRN.LineBufInit
|
||||||
|
SCRN.LineBufInitLBL
|
||||||
|
phx
|
||||||
|
ldx #SEQ.DLG.LBL-SEQS
|
||||||
|
bra SCRN.LineBufInit
|
||||||
SCRN.LineBufInitTB
|
SCRN.LineBufInitTB
|
||||||
phx
|
phx
|
||||||
ldx #SEQ.DLG.TB-SEQS
|
ldx #SEQ.DLG.TB-SEQS
|
||||||
|
@ -413,8 +413,9 @@ SEQ.DLG .AS "\e[30;46m"
|
|||||||
SEQ.DLG.RIGHT .AS "\e[37;40m"
|
SEQ.DLG.RIGHT .AS "\e[37;40m"
|
||||||
.DA #C.SO,#'x',#C.SI
|
.DA #C.SO,#'x',#C.SI
|
||||||
.DA #0
|
.DA #0
|
||||||
SEQ.DLG.BUT .AZ "\e[7m\e[93;44m"
|
SEQ.DLG.LBL .AZ "\e[0m\e[30;46m"
|
||||||
SEQ.DLG.TB .AZ "\e[0m\e[93;44m"
|
SEQ.DLG.TB .AZ "\e[0m\e[93;44m"
|
||||||
|
SEQ.DLG.BUT .AZ "\e[7m\e[93;44m"
|
||||||
SEQ.INV .AZ "\e[7m"
|
SEQ.INV .AZ "\e[7m"
|
||||||
SEQ.EDIT .AS "\e[0m\e[93;44m" +CEOL
|
SEQ.EDIT .AS "\e[0m\e[93;44m" +CEOL
|
||||||
SEQ.CEOL .AZ "\e[K"
|
SEQ.CEOL .AZ "\e[K"
|
||||||
|
@ -15,9 +15,13 @@ CMD.. lda (ZPArgVBufPtr)
|
|||||||
lda #$C0+C..
|
lda #$C0+C..
|
||||||
jmp CORE.StkPush
|
jmp CORE.StkPush
|
||||||
|
|
||||||
.9 jmp CMD.E.CSYN
|
.9
|
||||||
|
CMD...9 jmp CMD.E.CSYN
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CMD.NOHUP lda #S.PS.F.NOHUP
|
CMD.NOHUP lda (ZPArgVBufPtr)
|
||||||
|
beq CMD...9
|
||||||
|
|
||||||
|
lda #S.PS.F.NOHUP
|
||||||
tsb CORE.PSFlags
|
tsb CORE.PSFlags
|
||||||
>LDYA ZPArgVBuf
|
>LDYA ZPArgVBuf
|
||||||
jmp CORE.ExecExtCmd
|
jmp CORE.ExecExtCmd
|
||||||
|
Loading…
Reference in New Issue
Block a user