From 0731ca7ba8449be5d5d375fcb0f9b6fbbfdcfcd9 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Fri, 5 Jun 2020 17:09:51 -0700
Subject: [PATCH] allow About and Cheat from global Help

---
 src/ui.credits.a | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/ui.credits.a b/src/ui.credits.a
index 6aac74175..87a32b6ba 100644
--- a/src/ui.credits.a
+++ b/src/ui.credits.a
@@ -31,7 +31,12 @@ Credits
          jsr   ShowOtherPage         ; show credits
          jsr   WaitForKeyFor30Seconds; wait
          bit   CLEARKBD              ; don't care about key
-         sec                         ; if called from search mode, tell caller to refresh
+         cmp   #$81                  ; Ctrl-A = about
+         beq   Credits
+         cmp   #$83                  ; Ctrl-C = toggle cheat mode
+         bne   +
+         jsr   ToggleCheat
++        sec                         ; if called from search mode, tell caller to refresh
          rts
 
 ;------------------------------------------------------------------------------