From 12469e1f421599f0056cc9719a187db7c46419f7 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Sat, 20 Jun 2020 10:44:13 -0700
Subject: [PATCH] fix Buck Rogers on IIGS

---
 src/prelaunch/buck.rogers.a | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/prelaunch/buck.rogers.a b/src/prelaunch/buck.rogers.a
index 044a5858d..fbdf5866e 100644
--- a/src/prelaunch/buck.rogers.a
+++ b/src/prelaunch/buck.rogers.a
@@ -1,5 +1,5 @@
 ;license:MIT
-;(c) 2019 by qkumba
+;(c) 2019-2020 by qkumba
 
 !cpu 6502
 !to "build/PRELAUNCH/BUCK.ROGERS",plain
@@ -19,7 +19,11 @@
          sta   $803       ; patch - don't decrease lives
          sta   $998       ; patch - don't decrease lives
 +
+         lda   $7fe       ; Buck Rogers code
+         pha
          +DISABLE_ACCEL
+         pla
+         sta   $7fe       ; overwritten by GS acceleration
          jmp   $400
 
 !if * > $1C0 {