mirror of
https://github.com/a2-4am/4live.git
synced 2024-06-25 17:29:35 +00:00
a bit smaller
This commit is contained in:
parent
ff6e099b31
commit
e0a89cf88e
29
src/4live.a
29
src/4live.a
|
@ -1012,7 +1012,19 @@ HandleKeyPrevPage
|
||||||
pla
|
pla
|
||||||
tax
|
tax
|
||||||
jsr SetTextCoords2
|
jsr SetTextCoords2
|
||||||
jmp ExchangeVirtualBuffer
|
|
||||||
|
;copy virtual buffer to another virtual buffer
|
||||||
|
;hack existing buffer copy to redirect target,
|
||||||
|
;since it copies exactly the size that we want
|
||||||
|
|
||||||
|
ExchangeVirtualBuffer
|
||||||
|
lda #>(TEMPBUFFER - <(LoadSaveStart - LastLine))
|
||||||
|
sta ExchangeBankedPatch + 1
|
||||||
|
clc ;enable full path even if not DiversiDOS
|
||||||
|
jsr ExchangeBanked1 + 1
|
||||||
|
lda #>(SWAPBUFFER - <(LoadSaveStart - LastLine))
|
||||||
|
sta ExchangeBankedPatch + 1
|
||||||
|
rts
|
||||||
|
|
||||||
SetPrevPage
|
SetPrevPage
|
||||||
lda CurPage + 1
|
lda CurPage + 1
|
||||||
|
@ -1054,19 +1066,6 @@ HandleKeyHighlight
|
||||||
bpl -
|
bpl -
|
||||||
rts
|
rts
|
||||||
|
|
||||||
;copy virtual buffer to another virtual buffer
|
|
||||||
;hack existing buffer copy to redirect target,
|
|
||||||
;since it copies exactly the size that we want
|
|
||||||
|
|
||||||
ExchangeVirtualBuffer
|
|
||||||
lda #>(TEMPBUFFER - <(LoadSaveStart - LastLine))
|
|
||||||
sta ExchangeBankedPatch + 1
|
|
||||||
clc ;enable full path even if not DiversiDOS
|
|
||||||
jsr ExchangeBanked1 + 1
|
|
||||||
lda #>(SWAPBUFFER - <(LoadSaveStart - LastLine))
|
|
||||||
sta ExchangeBankedPatch + 1
|
|
||||||
rts
|
|
||||||
|
|
||||||
ScrollEditBufferLeft ;called with carry set
|
ScrollEditBufferLeft ;called with carry set
|
||||||
lda #-WIDTH
|
lda #-WIDTH
|
||||||
sta SCROLLLINE
|
sta SCROLLLINE
|
||||||
|
@ -1344,7 +1343,7 @@ SecondLine
|
||||||
!fill WIDTH * 7, $A0
|
!fill WIDTH * 7, $A0
|
||||||
!text " 4LIVE by 4am && qkumba "
|
!text " 4LIVE by 4am && qkumba "
|
||||||
!fill WIDTH, $A0
|
!fill WIDTH, $A0
|
||||||
!text " Revision 03 / Serial number 161122 "
|
!text " Revision 03 / Serial number 161123 "
|
||||||
!fill WIDTH * 2, $A0
|
!fill WIDTH * 2, $A0
|
||||||
!text " https://github.com/a2-4am/4live "
|
!text " https://github.com/a2-4am/4live "
|
||||||
!fill WIDTH * 9, $A0
|
!fill WIDTH * 9, $A0
|
||||||
|
|
Loading…
Reference in New Issue
Block a user