Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-14 02:29:33 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.93+

Browse Source
This commit is contained in:
Rémy GIBERT 2019-12-18 22:52:43 +01:00
parent f6f253068a
commit c05c0c38d5
2 changed files with 14 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

27
BIN/EDIT.S.SCRN.txt
View File

@ -299,14 +299,16 @@ SCRN.UpdateLineAtALenY
inc
sta TmpLen+1
jsr SCRN.LineBufInitEdit
ldy TmpLen+1
jsr SCRN.LineBufGotoLineY
>LDA.G ScreenX
cmp TmpLen
bcc .1
bcs SCRN.UpdateLineAtBufPtr.END
clc
rts
.1 tay
tay
clc
adc BUF.LOffset
sta BUF.COffset
@ -321,10 +323,7 @@ SCRN.UpdateLineAtALenY
bcc .2
inc BufPtr+1
.2 jsr SCRN.LineBufInitEdit
ldy TmpLen+1
jsr SCRN.LineBufGotoLineY
.2
SCRN.UpdateLineAtBufPtr
>LDA.G ScreenW
@ -367,12 +366,14 @@ SCRN.UpdateLineAtBufPtr
bne .2
.8 bit bSelected
bpl .80
bpl SCRN.UpdateLineAtBufPtr.END
jsr SCRN.ToggleSel
.80 jmp SCRN.LineBufOut
.9 rts
SCRN.UpdateLineAtBufPtr.END
ldx #SEQ.CEOL-SEQS
jsr SCRN.SEQS.ToLineBuf
jmp SCRN.LineBufOut
*--------------------------------------
SCRN.ToggleSel ldy #SEQ.NORM-SEQS