From bc6fcf1741b0dc081df87ea6d620e9e99925d035 Mon Sep 17 00:00:00 2001
From: scawful <justin.scofield@outlook.com>
Date: Wed, 5 Jun 2024 11:25:32 -0400
Subject: [PATCH] shock palette preserve A register

---
 Overworld/time_system.asm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Overworld/time_system.asm b/Overworld/time_system.asm
index 628a25e..890803c 100644
--- a/Overworld/time_system.asm
+++ b/Overworld/time_system.asm
@@ -510,13 +510,17 @@ FixSaveAndQuit:
 
 FixShockPalette:
 {
+  PHA
   LDA $1B : BNE .indoors
+  PLA
   STA !pal_color
   PHX
   JSL ColorSubEffect
   PLX
   STA.l $7EC500, X
+  RTL
   .indoors
+  PLA
   RTL
 }