fix Superstar Ice Hockey reset vector

2024-06-02 00:41:31 +00:00 · 2024-05-17 21:03:43 -07:00 · 2024-05-17 21:03:43 -07:00 · cc1a9ead97
commit cc1a9ead97
parent 19f1519b11
1 changed files with 49 additions and 0 deletions
--- a/src/prelaunch/super.icehockey.a
+++ b/src/prelaunch/super.icehockey.a
@ -0,0 +1,49 @@
+;license:MIT
+;(c) 2024 by qkumba
+
+!cpu 6502
+!to "build/PRELAUNCH.INDEXED/SUPER.ICEHOCKEY",plain
+*=$106
+
+    !source "src/prelaunch/common.a"
+
+         +ENABLE_ACCEL
+
+         lda   #$60
+         sta   $A02
+         jsr   $800       ; load "DOS"
+         lda   #<callback
+         sta   $B748
+         lda   #>callback
+         sta   $B749
+         jmp   $B700
+
+callback
+         ldx   #0
+         stx   $9E52
+         inx
+         stx   $9E53
+         lda   #<callback2
+         sta   $B7B8
+         lda   #>callback2
+         sta   $B7B9
+         +DISABLE_ACCEL
+         jmp   $9D84
+
+callback2
+         jsr   $BD00
+         lda   $B7EC
+         eor   #$14
+         bne   +
+         lda   $B7ED
+         eor   #$0E
+         bne   +
+         sta   $9688
+         lsr   $968D      ; reset vector
+         +LC_REBOOT
+         clc
+        rts
+
+!if * > $1C0 {
+  !error "code is too large, ends at ", *
+}