mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-25 20:33:13 +00:00
Kernel 0.93+
This commit is contained in:
parent
fef666df2c
commit
91c0734c6b
Binary file not shown.
@ -142,9 +142,9 @@ DLG.Close ldy #S.DLG.H
|
||||
ldy #S.DLG.Y
|
||||
lda (ZPPTR1),y
|
||||
|
||||
sta TmpIndex
|
||||
sta TmpByte
|
||||
|
||||
>LDA.G ScreenY
|
||||
.1 >LDA.G ScreenY
|
||||
clc
|
||||
ldy #S.DLG.Y
|
||||
adc (ZPPTR1),y
|
||||
@ -154,15 +154,18 @@ DLG.Close ldy #S.DLG.H
|
||||
adc #0
|
||||
sta TmpIndex+1
|
||||
|
||||
.1 lda TmpIndex
|
||||
lda TmpIndex
|
||||
ldx TmpIndex+1
|
||||
jsr BUF.GetLineAX
|
||||
bcs .8
|
||||
|
||||
lda TmpIndex
|
||||
lda TmpByte
|
||||
jsr SCRN.UpdateLineAtALenY
|
||||
|
||||
inc TmpIndex
|
||||
bne .2
|
||||
inc TmpIndex+1
|
||||
.2 inc TmpByte
|
||||
dec TmpCount
|
||||
bne .1
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user