Mockingboard auto-config in Apple Cider Spider

src/prelaunch/cider.spider.a

@@ -1,5 +1,5 @@
 ;license:MIT
-;(c) 2019 by 4am/Frank M.
+;(c) 2019, 2021 by 4am/Frank M./qkumba
 
 !cpu 6502
 !to "build/PRELAUNCH/AC",plain
@@ -11,12 +11,21 @@
          lda   #$60
          sta   $2076
          jsr   $1FFD      ; decompress
-         +GET_MACHINE_STATUS
+         +GET_MOCKINGBOARD_SLOT_AND_MACHINE_STATUS
          and   #CHEATS_ENABLED
          beq   +
          lda   #$BD
          sta   $19C5      ; patch - don't decrease lives
          sta   $196A      ; patch - don't increase lives
++
+         bcc   +
+         stx   mbslot+1
+         lda   #0
+         sta   $1C1B
+         lda   #<callback
+         sta   $1C1D
+         lda   #>callback
+         sta   $1C1E
 +
          lda   #0
          sta   $10AC
@@ -26,6 +35,10 @@
          +DISABLE_ACCEL
          jmp   $1000
 
+callback
+mbslot   lda   #$D1       ; SMC
+         jmp   $963D
+
 !if * > $1C0 {
   !error "code is too large, ends at ", *
 }