Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2025-06-05 20:41:12 +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 inc
sta TmpLen+1 sta TmpLen+1
jsr SCRN.LineBufInitEdit
ldy TmpLen+1
jsr SCRN.LineBufGotoLineY
>LDA.G ScreenX >LDA.G ScreenX
cmp TmpLen cmp TmpLen
bcc .1 bcs SCRN.UpdateLineAtBufPtr.END
clc tay
rts
.1 tay
clc clc
adc BUF.LOffset adc BUF.LOffset
sta BUF.COffset sta BUF.COffset
@ -321,10 +323,7 @@ SCRN.UpdateLineAtALenY
bcc .2 bcc .2
inc BufPtr+1 inc BufPtr+1
.2 jsr SCRN.LineBufInitEdit .2
ldy TmpLen+1
jsr SCRN.LineBufGotoLineY
SCRN.UpdateLineAtBufPtr SCRN.UpdateLineAtBufPtr
>LDA.G ScreenW >LDA.G ScreenW
@ -367,12 +366,14 @@ SCRN.UpdateLineAtBufPtr
bne .2 bne .2
.8 bit bSelected .8 bit bSelected
bpl .80 bpl SCRN.UpdateLineAtBufPtr.END
jsr SCRN.ToggleSel jsr SCRN.ToggleSel
.80 jmp SCRN.LineBufOut SCRN.UpdateLineAtBufPtr.END
ldx #SEQ.CEOL-SEQS
.9 rts jsr SCRN.SEQS.ToLineBuf
jmp SCRN.LineBufOut
*-------------------------------------- *--------------------------------------
SCRN.ToggleSel ldy #SEQ.NORM-SEQS SCRN.ToggleSel ldy #SEQ.NORM-SEQS