mirror of
https://github.com/A2osX/A2osX.git
synced 2024-08-10 16:29:28 +00:00
Kernel 0.93+
This commit is contained in:
parent
9a1ea30e6e
commit
807432e2af
Binary file not shown.
@ -281,7 +281,9 @@ Ctrl.O ldy #FileY+1
|
|||||||
jmp SCRN.UpdateViewPort
|
jmp SCRN.UpdateViewPort
|
||||||
|
|
||||||
.8 pla
|
.8 pla
|
||||||
jmp Ctrl.T
|
*--------------------------------------
|
||||||
|
Ctrl.T jsr SCRN.Home
|
||||||
|
jmp SCRN.UpdateViewPort
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
Ctrl.P ldy #FileY+1
|
Ctrl.P ldy #FileY+1
|
||||||
lda (pData),y
|
lda (pData),y
|
||||||
@ -316,7 +318,19 @@ Ctrl.P ldy #FileY+1
|
|||||||
|
|
||||||
.8 pla
|
.8 pla
|
||||||
pla
|
pla
|
||||||
jmp Ctrl.Y
|
*--------------------------------------
|
||||||
|
Ctrl.Y jsr BUF.GetNextLine
|
||||||
|
bcs .1
|
||||||
|
|
||||||
|
>INCW.G FileY
|
||||||
|
bra Ctrl.Y
|
||||||
|
|
||||||
|
.1 jsr BUF.GetLine
|
||||||
|
|
||||||
|
tya Y = line length
|
||||||
|
>STA.G FileX
|
||||||
|
|
||||||
|
jmp SCRN.UpdateViewPort
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
Ctrl.R lda #PromptModeReplace
|
Ctrl.R lda #PromptModeReplace
|
||||||
>STA.G PromptMode
|
>STA.G PromptMode
|
||||||
@ -350,22 +364,6 @@ Ctrl.S lda #PromptModeSave
|
|||||||
|
|
||||||
jmp SCRN.UpdateStatusBar
|
jmp SCRN.UpdateStatusBar
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
Ctrl.T jsr SCRN.Home
|
|
||||||
jmp SCRN.UpdateViewPort
|
|
||||||
*--------------------------------------
|
|
||||||
Ctrl.Y jsr BUF.GetNextLine
|
|
||||||
bcs .1
|
|
||||||
|
|
||||||
>INCW.G FileY
|
|
||||||
bra Ctrl.Y
|
|
||||||
|
|
||||||
.1 jsr BUF.GetLine
|
|
||||||
|
|
||||||
tya Y = line length
|
|
||||||
>STA.G FileX
|
|
||||||
|
|
||||||
jmp SCRN.UpdateViewPort
|
|
||||||
*--------------------------------------
|
|
||||||
Ctrl.FS jsr BUF.GetLine
|
Ctrl.FS jsr BUF.GetLine
|
||||||
bcs .8
|
bcs .8
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user