From c83910fd2d2a3ed5b51b765c78bc48dbd08b942c Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Mon, 6 Jun 2022 12:48:34 -0400
Subject: [PATCH] don't need to reload attract mode config data if we're
 skipping a module

---
 src/ui.attract.mode.a | 16 +++++++---------
 1 file changed, 7 insertions(+), 9 deletions(-)

diff --git a/src/ui.attract.mode.a b/src/ui.attract.mode.a
index b2f83487e..0508d56cb 100644
--- a/src/ui.attract.mode.a
+++ b/src/ui.attract.mode.a
@@ -34,10 +34,11 @@ MegaAttractMode
 
          jsr   BlankHGR              ; switch to HGR page 1 (once cleared)
 
-@next    jsr   LoadIndexedFile       ; load pre-parsed attract mode configuration data into $6000
+         jsr   LoadIndexedFile       ; load pre-parsed attract mode configuration data into $6000
 -        !word $6000
          !word kAttractModeIndexRecord
 
+@next
          jsr   pref_get              ; get attract mode module from prefs
          !word kNextAttract
          !word -
@@ -56,17 +57,14 @@ MegaAttractMode
 @mname   !word $FDFD                 ; SMC
          ldy   #1
          lda   (PTR),y
-         tax                         ; X = module type
-         and   #$F0
-         cmp   #$30
-         bne   +
-         txa
-         and   #$0F
+         tax                         ; X = module type as ASCII digit
+
+         and   #$0F                  ; do we want to display this module type
          tay
-         lda   gMegaAttractModeFilter ; do we want to display this module type
+         lda   gMegaAttractModeFilter
          and   kAttractModeFilters, y
          beq   @next
-+
+
          +LD16 @mname                ; A/Y = address of module name
          jsr   RunAttractModule
          lda   KBD