allow About and Cheat from global Help

This commit is contained in:
Peter Ferrie 2020-06-05 17:09:51 -07:00
parent ccccf87839
commit 0731ca7ba8

View File

@ -31,7 +31,12 @@ Credits
jsr ShowOtherPage ; show credits jsr ShowOtherPage ; show credits
jsr WaitForKeyFor30Seconds; wait jsr WaitForKeyFor30Seconds; wait
bit CLEARKBD ; don't care about key 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 rts
;------------------------------------------------------------------------------ ;------------------------------------------------------------------------------