mirror of
https://github.com/a2-4am/4live.git
synced 2024-12-30 09:30:41 +00:00
fix import and page 3 state, faster l/r scroll
This commit is contained in:
parent
d93528716b
commit
f7f330b6e3
13
src/4live.a
13
src/4live.a
@ -895,9 +895,9 @@ ClearScreen ; does not clear status line
|
||||
;copy from virtual buffer to real screen
|
||||
;;todo: add camera flash and click effect ;-)
|
||||
HandleKeyImportScreen ;called with carry set
|
||||
lda #<(LoadSaveEnd - WIDTH)
|
||||
lda #<LoadSaveEnd
|
||||
sta OPSRC1L
|
||||
lda #>(LoadSaveEnd - WIDTH)
|
||||
lda #>LoadSaveEnd
|
||||
sta OPSRC1H
|
||||
|
||||
ldx #(HEIGHT - 2)
|
||||
@ -962,6 +962,7 @@ PreventAddPage
|
||||
lda MyCV + 1
|
||||
pha
|
||||
lda #0
|
||||
sta PreventAddPage + 1
|
||||
sta MyCH + 1
|
||||
sta MyCV + 1
|
||||
jsr SeekReadWrite
|
||||
@ -1180,13 +1181,9 @@ ScrollEditPatch2
|
||||
inc OPDST1H
|
||||
+ dex
|
||||
bpl -
|
||||
|
||||
;animation delay
|
||||
|
||||
jsr Delay ;returns A=0
|
||||
plp ;restore carry
|
||||
bcc + ;the ScrollRight path
|
||||
tay
|
||||
ldy #0
|
||||
inc SCROLLLINE
|
||||
bne --
|
||||
rts
|
||||
@ -1529,7 +1526,7 @@ SecondLine
|
||||
!fill WIDTH * 7, SPACE
|
||||
!text " 4LIVE by 4am && qkumba "
|
||||
!fill WIDTH, SPACE
|
||||
!text " Revision 03 / Serial number 170120 "
|
||||
!text " Revision 03 / Serial number 170122 "
|
||||
!fill WIDTH * 2, SPACE
|
||||
!text " https://github.com/a2-4am/4live "
|
||||
!fill WIDTH * 9, SPACE
|
||||
|
Loading…
Reference in New Issue
Block a user