From b8cba65dec900cd933d3c9c797209443ebe059d3 Mon Sep 17 00:00:00 2001
From: mgcaret <mgcaret@users.noreply.github.com>
Date: Tue, 26 Sep 2017 19:13:40 -0700
Subject: [PATCH] iie.card: better speed setter routine; mig.insp: enable ROM
 ID

---
 iie.card.s | 23 +++++++++++------------
 mig.insp.s |  2 +-
 2 files changed, 12 insertions(+), 13 deletions(-)

diff --git a/iie.card.s b/iie.card.s
index 9f57808..3bdaa9a 100644
--- a/iie.card.s
+++ b/iie.card.s
@@ -99,20 +99,19 @@ fast:     jsr   xmess
           rts
 .endproc
 .proc     setspeed
-          cpy   #$00
+          lda   #%00000100      ; bit position of speed in $c05c and $c02b
+          cpy   #$00            ; y reg will determine selected speed.  Is 0?
           beq   norm            ; set normal
-          dey 
-          beq   fast
-          lda   $c05c
-          and   #%00000100      ; bit 2 = option panel speed
-          beq   norm
-fast:     lda   #%00000100
-          ora   $c02b
-store:    sta   $c02b
+          dey                   ; is 1?
+          beq   fast            ; fast instead
+          ; default fall through to option panel speed
+          trb   $c02b           ; default to slow
+          and   $c05c           ; bit 2 of $c05c reflects option panel setting
+          ; fall through to tsb, which will do nothing if a = $00 (slow)
+fast:     tsb   $c02b
+          rts
+norm:     trb   $c02b
           rts
-norm:     lda   #%11111011
-          and   $c02b
-          bra   store
 .endproc
 .proc     dispslot
           jsr   xmess
diff --git a/mig.insp.s b/mig.insp.s
index 3a270f1..5c7b2f2 100644
--- a/mig.insp.s
+++ b/mig.insp.s
@@ -45,7 +45,7 @@
 .include "davex-mg.inc"
 
 ; build options
-SKIPROMID = 1                 ; skip ROM identification
+SKIPROMID = 0                 ; skip ROM identification
                               ; lets you use on a non-
                               ; IIc Plus, but obviously
                               ; isn't useful beyond some