fix Buck Rogers on IIGS

2024-11-17 05:09:02 +00:00 · 2020-06-20 10:44:13 -07:00 · 2020-06-20 10:44:13 -07:00 · 12469e1f42
commit 12469e1f42
parent e9d4c204df
1 changed files with 5 additions and 1 deletions
--- 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 {