shave some bytes

a2-4am · Oct 8, 2019 · f9bd909 · f9bd909
1 parent d23ed3e
commit f9bd909
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 15 deletions.
diff --git a/src/constants.a b/src/constants.a
@@ -9,7 +9,7 @@
 ; D000..E611 - persistent data structures (per-game cheat categories,
 ;              gGlobalPrefsStore, gGamesListStore)
 ; ...unused...
-; EBEC..FFF9 - main program code
+; EBF2..FFF9 - main program code
 ; FFFA..FFFF - NMI, reset, IRQ vectors
 ;
 ; LC RAM BANK 2

diff --git a/src/ui.credits.a b/src/ui.credits.a
@@ -21,28 +21,23 @@ Credits
          jsr   DrawPage              ; draw credits
          jsr   ShowOtherPage         ; show credits
          jsr   WaitForKeyFor30Seconds; wait
-         bit   CLEARKBD              ; don't care about key
+--       bit   CLEARKBD              ; don't care about key
          jsr   ShowOtherPage         ; back to previous page
-         clc                         ; if called from search mode, tell caller not to refresh
+-        clc                         ; if called from search mode, tell caller not to refresh
          rts
 
 Help
 ; clobbers all
          jsr   LoadHelpOffscreen
          jsr   ShowOtherPage
          jsr   WaitForKeyFor30Seconds
+         cmp   #$88
+         beq   +
          cmp   #$83
-         beq   @exitWithoutShowingOtherPage
+         beq   -
          jsr   IsUpDownOrRightArrow
-         beq   @exitWithoutShowingOtherPage
-         cmp   #$88
-         beq   @exitViaBrowse
+         beq   -
          jsr   IsSearchKey
-         beq   @exitWithoutShowingOtherPage
-         bit   CLEARKBD
-         jsr   ShowOtherPage
-@exitWithoutShowingOtherPage
-         clc
-         rts
-@exitViaBrowse
-         jmp   BrowseMode
+         beq   -
+         bne   --
++        jmp   BrowseMode