mirror of
https://github.com/A2osX/A2osX.git
synced 2024-08-10 16:29:28 +00:00
Kernel 0.93+
This commit is contained in:
parent
244d1e59c7
commit
8d9f861997
Binary file not shown.
@ -110,10 +110,11 @@ CMD.CD.YA >SYSCALL realpath
|
|||||||
bne .14
|
bne .14
|
||||||
|
|
||||||
lda ZPTmpW
|
lda ZPTmpW
|
||||||
jmp CMD.SetCWDA already ends with a /
|
bra CMD.SetCWDA already ends with a /
|
||||||
|
|
||||||
.14 iny
|
.14 iny back to /
|
||||||
iny
|
iny at \0
|
||||||
|
iny add+1 for adding \0 after adding '/'
|
||||||
lda #0
|
lda #0
|
||||||
>SYSCALL getmem
|
>SYSCALL getmem
|
||||||
bcs .19
|
bcs .19
|
||||||
|
@ -500,8 +500,8 @@ ToUpperCase cmp #'a'
|
|||||||
CS.END
|
CS.END
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
MSG.GREETINGS .AZ "\r\nA2osX-SH %d.%d\r\n\r\n"
|
MSG.GREETINGS .AZ "\r\nA2osX-SH %d.%d\r\n\r\n"
|
||||||
MSG.PROMPT .AZ "\e[7h$ " Enable Line Wrap
|
MSG.PROMPT .AZ "\e[?7h$ " Enable Line Wrap
|
||||||
MSG.PROMPTCRLF .AZ "\e[7l\r\n" Disable Line Wrap
|
MSG.PROMPTCRLF .AZ "\e[?7l\r\n" Disable Line Wrap
|
||||||
MSG.TRACE .AS ">"
|
MSG.TRACE .AS ">"
|
||||||
MSG.BATCHLINE .AZ "%s\r\n"
|
MSG.BATCHLINE .AZ "%s\r\n"
|
||||||
MSG.BATCHERR .AZ "%s^\r\nLine #%D:"
|
MSG.BATCHERR .AZ "%s^\r\nLine #%D:"
|
||||||
|
@ -209,7 +209,8 @@ DRV.TERM.READ jsr DRV.TERM.GetIOCTLBufCntDCB
|
|||||||
|
|
||||||
.6 ldy #S.DCB.TTY.OUTTAIL
|
.6 ldy #S.DCB.TTY.OUTTAIL
|
||||||
lda (ZPDCBPtr),y
|
lda (ZPDCBPtr),y
|
||||||
iny cmp (ZPDCBPtr),y OUTHEAD
|
iny
|
||||||
|
cmp (ZPDCBPtr),y OUTHEAD
|
||||||
beq .9 no char in output buffer...
|
beq .9 no char in output buffer...
|
||||||
.7 stz .8+1
|
.7 stz .8+1
|
||||||
.70 inc ZPCount
|
.70 inc ZPCount
|
||||||
@ -444,18 +445,22 @@ DRV.TERM.CSI ldy #S.DCB.TTY.INBUFFER
|
|||||||
DRV.TERM.CSI.Exec
|
DRV.TERM.CSI.Exec
|
||||||
stz CsiHeader
|
stz CsiHeader
|
||||||
stz CsiParamCnt
|
stz CsiParamCnt
|
||||||
|
|
||||||
lda #S.DCB.TTY.INBUFFER+1 EscSeq Ptr
|
lda #S.DCB.TTY.INBUFFER+1 EscSeq Ptr
|
||||||
clc
|
clc
|
||||||
adc ZPDCBPtr
|
adc ZPDCBPtr
|
||||||
sta ZPPtr2
|
sta ZPPtr2
|
||||||
|
|
||||||
lda /S.DCB.TTY.INBUFFER+1
|
lda /S.DCB.TTY.INBUFFER+1
|
||||||
adc ZPDCBPtr+1
|
adc ZPDCBPtr+1
|
||||||
sta ZPPtr2+1
|
sta ZPPtr2+1
|
||||||
|
|
||||||
lda (ZPPtr2)
|
lda (ZPPtr2)
|
||||||
cmp #'?'
|
cmp #'?'
|
||||||
bne .2
|
bne .2
|
||||||
|
|
||||||
sta CsiHeader
|
sta CsiHeader
|
||||||
|
|
||||||
.1 jsr SHARED.NextCharPtr2
|
.1 jsr SHARED.NextCharPtr2
|
||||||
|
|
||||||
.2 jsr MATH.Dec2ACC32
|
.2 jsr MATH.Dec2ACC32
|
||||||
@ -477,6 +482,7 @@ DRV.TERM.CSI.Exec
|
|||||||
beq .1
|
beq .1
|
||||||
|
|
||||||
.5 jsr RESET.MODE
|
.5 jsr RESET.MODE
|
||||||
|
|
||||||
lda (ZPPtr2)
|
lda (ZPPtr2)
|
||||||
ldx #CsiCodes.Cnt-1
|
ldx #CsiCodes.Cnt-1
|
||||||
|
|
||||||
@ -508,26 +514,32 @@ Csi.ResetMode clc
|
|||||||
|
|
||||||
ldx CsiParamCnt
|
ldx CsiParamCnt
|
||||||
beq .99
|
beq .99
|
||||||
|
|
||||||
dex
|
dex
|
||||||
bne .99
|
bne .99
|
||||||
|
|
||||||
ldx CsiHeader
|
ldx CsiHeader
|
||||||
|
|
||||||
lda CsiParams
|
lda CsiParams
|
||||||
php
|
php
|
||||||
|
|
||||||
cmp #20 bCRLF
|
cmp #20 bCRLF
|
||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
txa
|
txa
|
||||||
bne .98
|
bne .98
|
||||||
|
|
||||||
ldy #S.DCB.TTY.bCRLF
|
ldy #S.DCB.TTY.bCRLF
|
||||||
bra .8
|
bra .8
|
||||||
|
|
||||||
.1 cmp #7
|
.1 cmp #7
|
||||||
bne .98
|
bne .98
|
||||||
|
|
||||||
cpx #'?'
|
cpx #'?'
|
||||||
bne .98
|
bne .98
|
||||||
|
|
||||||
ldy #S.DCB.TTY.bLINEWRAP
|
ldy #S.DCB.TTY.bLINEWRAP
|
||||||
|
|
||||||
.8 plp
|
.8 plp
|
||||||
ror
|
ror
|
||||||
sta (ZPDCBPtr),y
|
sta (ZPDCBPtr),y
|
||||||
|
Loading…
Reference in New Issue
Block a user