Kernel 0.93

This commit is contained in:
Rémy GIBERT 2019-05-29 07:58:28 +02:00
parent 5242799ba0
commit 44ca710187
4 changed files with 8 additions and 8 deletions

Binary file not shown.

View File

@ -495,15 +495,15 @@ BUF.CheckSelected
iny #SelEnd
lda (pData),y
cmp BUF.COffset
lda BUF.COffset
cmp (pData),y
iny
lda (pData),y
sbc BUF.COffset+1
lda BUF.COffset+1
sbc (pData),y
.9 rol $80 = selected
.9 ror $80 = selected
rts
*--------------------------------------
* Out : CC if ok, YA=SelLen

View File

@ -180,7 +180,7 @@ SCRN.UpdateLineAtALenY
eor bSelected
bpl .5
jsr SCRN.ToggleSel
.5 lda (BufPtr)
jsr SCRN.ToLineBuf
@ -210,7 +210,7 @@ SCRN.UpdateLineAtALenY
rts
.9 jmp Ctrl.Q
*--------------------------------------
SCRN.ToggleSel ldy #$0
SCRN.ToggleSel ldy #0
lda bSelected
bpl .1

View File

@ -450,8 +450,8 @@ SEQ.INIT .AZ "\ec\e[7h\e[2;%dr" \e[?6h
SEQ.RESET .AZ "\ec"
SEQ.SCROLLUP .AZ "\e[%d;%dH\eD"
SEQ.SCROLLDN .AZ "\e[%d;%dH\eM"
SEQ.INV .AZ "\e[7m"
SEQ.NORM .AZ "\e[0m"
SEQ.INV .AZ "\e[7m"
SEQ.CEOL .AZ "\e[K"
MSG.TOPBAR .AZ "\e[1;1HA2osX Edit:%s\e[0m"
MSG.STATUSBAR .AZ "Press Ctrl-A For Help Length:%5D,Col:%3d,Line:%5D"