mirror of
https://github.com/A2osX/A2osX.git
synced 2024-08-11 07:29:00 +00:00
Kernel 0.93+
This commit is contained in:
parent
7f593583f4
commit
a29ddf7f75
Binary file not shown.
@ -272,8 +272,17 @@ Ctrl.CR jsr BUF.ComputeCOffset
|
|||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
>INCW.G FileY
|
|
||||||
>STZ.G FileX
|
>STZ.G FileX
|
||||||
|
>LDA.G CurY
|
||||||
|
inc
|
||||||
|
>DEBUG
|
||||||
|
>CMP.G ViewPortHm1
|
||||||
|
beq .8 Bottom line, all done
|
||||||
|
|
||||||
|
>STA.G CurY
|
||||||
|
dec
|
||||||
|
>CMP.G ViewPortHm1
|
||||||
|
beq .1 No scoll needed
|
||||||
|
|
||||||
>LDA.G ScreenH
|
>LDA.G ScreenH
|
||||||
dec
|
dec
|
||||||
@ -287,8 +296,6 @@ Ctrl.CR jsr BUF.ComputeCOffset
|
|||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
bcs .9
|
bcs .9
|
||||||
|
|
||||||
jsr SCRN.UpdateCurrentLine
|
|
||||||
|
|
||||||
>LDA.G ScreenH
|
>LDA.G ScreenH
|
||||||
dec
|
dec
|
||||||
>PUSHA
|
>PUSHA
|
||||||
@ -296,7 +303,9 @@ Ctrl.CR jsr BUF.ComputeCOffset
|
|||||||
>LDYA L.SEQ.SCROLLRGN
|
>LDYA L.SEQ.SCROLLRGN
|
||||||
>SYSCALL printf
|
>SYSCALL printf
|
||||||
|
|
||||||
|
.1 jsr SCRN.UpdateCurrentLine
|
||||||
|
|
||||||
|
.8 clc
|
||||||
.9 rts
|
.9 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
Ctrl.O ldy #FileY+1
|
Ctrl.O ldy #FileY+1
|
||||||
|
Loading…
Reference in New Issue
Block a user