From cd7182b97537d26701190257b3b6a45fb1f6be7b Mon Sep 17 00:00:00 2001
From: Joshua Bell <inexorabletash@gmail.com>
Date: Thu, 4 Jan 2018 13:14:07 -0800
Subject: [PATCH] Fix incorrect refactors

---
 desktop/s123_aux.s | 4 ++--
 desktop/s4_main1.s | 4 +++-
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/desktop/s123_aux.s b/desktop/s123_aux.s
index a1366a2..b338e1f 100644
--- a/desktop/s123_aux.s
+++ b/desktop/s123_aux.s
@@ -13327,7 +13327,7 @@ loop:   lda     $1F80,x
         .assert * = DESKTOP_COPY_TO_BUF, error, "Entry point mismatch"
         lda     #$00
 
-        sta     flag
+:       sta     flag
         jsr     DESKTOP_MAIN_PUSH_ADDRS
 
         lda     bufnum
@@ -13359,7 +13359,7 @@ set_copy_ptr:
         lda     table2,x         ; copy table2 entry to ptr
         sta     ptr
         lda     table2+1,x
-        sta     ptr
+        sta     ptr+1
         bit     flag
         bmi     copy_from
 
diff --git a/desktop/s4_main1.s b/desktop/s4_main1.s
index 619ee12..3199311 100644
--- a/desktop/s4_main1.s
+++ b/desktop/s4_main1.s
@@ -7246,7 +7246,9 @@ L81F7:  jsr     L821F
         jsr     L8253
         SETPOS_RELAY_CALL $E6E1
         jsr     L830F
-        SETPOS_RELAY_CALL $E6E5
+        lda     #<$E6E5
+        ldx     #>$E6E5
+        jmp     SETPOS_RELAY
 
 L821F:  lda     $EC43
         and     #$0F