From cabaf81ebbb4e53fddba816bb6019f99e3a7bbe8 Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Mon, 27 Apr 2020 11:28:15 -0400
Subject: [PATCH] minor catalog UI tweaks

---
 src/ui.catalog.a   | 17 ++++++++++-------
 src/ui.main.a      |  4 ++--
 src/ui.main.keys.a |  4 ++--
 3 files changed, 14 insertions(+), 11 deletions(-)

diff --git a/src/ui.catalog.a b/src/ui.catalog.a
index 7057a7c..d406c6f 100644
--- a/src/ui.catalog.a
+++ b/src/ui.catalog.a
@@ -144,13 +144,13 @@ catLineNum
          !byte 4
 @ln2     !byte $FD                   ; SMC
          !word kCatLetter
-        
+
          inc   catLineNum
          inc   kCatLetter + 1
          rts
 
 kCatLetter
-         !text "[A]",0
+         !text "(A)",0
 
 ;------------------------------------------------------------------------------
 ; User clicked on the screen, X, Y contain absolute mouse position
@@ -216,14 +216,14 @@ catalog_next
          cmp   gameCount
          beq   @good
          bcc   @good
-         jmp   SoftBell                ; at end of list
+         jmp   catalog_previous
 @good    sta   startIndex
          jmp   RefreshCatalog
 
 catalog_previous
          lda   startIndex
          bne   @1
-         jmp   SoftBell                ; at beginning of list
+         jmp   catalog_next
 @1
          sec
          sbc   #MAXGAMES               ; page back and refresh
@@ -274,10 +274,13 @@ kStringCatalogFrame
          !text "Catalog",0
 
 kStringCatPrevious
-         !text "<--",0
+         !text "< "
+         !byte 144
+         !text "revious",0
 
 kStringCatNext
-         !text "-->",0
+         !byte 142
+         !text "ext page >",0
 
 kStringCatMain
-         !text "<ESC> Main",0
+         !text "Cancel",0
diff --git a/src/ui.main.a b/src/ui.main.a
index 9e1a56b..656f587 100644
--- a/src/ui.main.a
+++ b/src/ui.main.a
@@ -408,8 +408,8 @@ kStringNext
          !byte $0E                   ; 'N' inverse
          !text "ext game >",0
 kStringCatalog
-         !byte $03                   ; 'C' inverse
-         !text "atalog",0
+         !byte $0A                   ; 'J' inverse
+         !text "ump to",0
 kStringOptions
          !byte $13                   ; 'S' inverse
          !text "ettings",0
diff --git a/src/ui.main.keys.a b/src/ui.main.keys.a
index 6bd1ee2..111158e 100644
--- a/src/ui.main.keys.a
+++ b/src/ui.main.keys.a
@@ -28,8 +28,8 @@ kMainKeys
          !byte $E1,ID_BOXART         ; a
          !byte $D6,ID_VERSIONS       ; V
          !byte $F6,ID_VERSIONS       ; v
-         !byte $C3,ID_CATALOG        ; C
-         !byte $E3,ID_CATALOG        ; c
+         !byte $CA,ID_CATALOG        ; J
+         !byte $EA,ID_CATALOG        ; j
          !byte $D3,ID_OPTIONS        ; S
          !byte $F3,ID_OPTIONS        ; s
          !byte $D0,ID_PREVIOUS       ; P