From f7f330b6e3a1741eda0ca4c87dd6a37b355e5acb Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Sun, 22 Jan 2017 21:32:23 -0800
Subject: [PATCH] fix import and page 3 state, faster l/r scroll

---
 src/4live.a | 13 +++++--------
 1 file changed, 5 insertions(+), 8 deletions(-)

diff --git a/src/4live.a b/src/4live.a
index 95b97fd..f5c2a0c 100644
--- a/src/4live.a
+++ b/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