Kernel 0.93+

This commit is contained in:
Rémy GIBERT 2019-10-11 22:05:54 +02:00
parent 244d1e59c7
commit 8d9f861997
4 changed files with 20 additions and 7 deletions

Binary file not shown.

View File

@ -110,10 +110,11 @@ CMD.CD.YA >SYSCALL realpath
bne .14
lda ZPTmpW
jmp CMD.SetCWDA already ends with a /
bra CMD.SetCWDA already ends with a /
.14 iny
iny
.14 iny back to /
iny at \0
iny add+1 for adding \0 after adding '/'
lda #0
>SYSCALL getmem
bcs .19

View File

@ -500,8 +500,8 @@ ToUpperCase cmp #'a'
CS.END
*--------------------------------------
MSG.GREETINGS .AZ "\r\nA2osX-SH %d.%d\r\n\r\n"
MSG.PROMPT .AZ "\e[7h$ " Enable Line Wrap
MSG.PROMPTCRLF .AZ "\e[7l\r\n" Disable Line Wrap
MSG.PROMPT .AZ "\e[?7h$ " Enable Line Wrap
MSG.PROMPTCRLF .AZ "\e[?7l\r\n" Disable Line Wrap
MSG.TRACE .AS ">"
MSG.BATCHLINE .AZ "%s\r\n"
MSG.BATCHERR .AZ "%s^\r\nLine #%D:"

View File

@ -209,7 +209,8 @@ DRV.TERM.READ jsr DRV.TERM.GetIOCTLBufCntDCB
.6 ldy #S.DCB.TTY.OUTTAIL
lda (ZPDCBPtr),y
iny cmp (ZPDCBPtr),y OUTHEAD
iny
cmp (ZPDCBPtr),y OUTHEAD
beq .9 no char in output buffer...
.7 stz .8+1
.70 inc ZPCount
@ -444,18 +445,22 @@ DRV.TERM.CSI ldy #S.DCB.TTY.INBUFFER
DRV.TERM.CSI.Exec
stz CsiHeader
stz CsiParamCnt
lda #S.DCB.TTY.INBUFFER+1 EscSeq Ptr
clc
adc ZPDCBPtr
sta ZPPtr2
lda /S.DCB.TTY.INBUFFER+1
adc ZPDCBPtr+1
sta ZPPtr2+1
lda (ZPPtr2)
cmp #'?'
bne .2
sta CsiHeader
.1 jsr SHARED.NextCharPtr2
.2 jsr MATH.Dec2ACC32
@ -477,6 +482,7 @@ DRV.TERM.CSI.Exec
beq .1
.5 jsr RESET.MODE
lda (ZPPtr2)
ldx #CsiCodes.Cnt-1
@ -508,26 +514,32 @@ Csi.ResetMode clc
ldx CsiParamCnt
beq .99
dex
bne .99
ldx CsiHeader
lda CsiParams
php
cmp #20 bCRLF
bne .1
txa
bne .98
ldy #S.DCB.TTY.bCRLF
bra .8
.1 cmp #7
bne .98
cpx #'?'
bne .98
ldy #S.DCB.TTY.bLINEWRAP
.8 plp
ror
sta (ZPDCBPtr),y