From 3d94228f0d32c675d7160fdb6d71a45a5cb46045 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Mon, 28 May 2018 18:15:45 -0700
Subject: [PATCH] support Advent side 'B'

---
 src/id/advent.a  |  7 +++++--
 src/passport.a   | 14 ++++++++++++++
 src/strings/en.a |  3 ++-
 3 files changed, 21 insertions(+), 3 deletions(-)

diff --git a/src/id/advent.a b/src/id/advent.a
index 1fbcd79..a1894b5 100644
--- a/src/id/advent.a
+++ b/src/id/advent.a
@@ -61,19 +61,22 @@ foundadvent
 .prologtbl1
          !byte $96, $97, $9A, $9B, $9D, $9E, $9F, $A6
          !byte $ED, $EE, $EF, $F2, $F3, $F4, $F5, $F6
+         !byte $AA ;extra entry for unprotected sectors
 
 .prologtbl2
          !byte $ED, $EE, $EF, $F2, $F3, $F4, $FF, $F7
          !byte $96, $A6, $AA, $D5, $DF, $EA, $AE, $FE
+         !byte $96 ;extra entry for unprotected sectors
 
 .checktrk
+         ldy   #$10
          lda   gTrack
          beq   +
          and   #$0f
          tay
-         lda   .prologtbl1, y
++        lda   .prologtbl1, y
          sta   UNIV_A2
          lda   .prologtbl2, y
          sta   UNIV_A3
-+        jmp   $B944
+         jmp   $B944
 }
diff --git a/src/passport.a b/src/passport.a
index 454233e..ca5f41e 100755
--- a/src/passport.a
+++ b/src/passport.a
@@ -578,8 +578,22 @@ TheEnd
          jsr   WaitForKey
          cmp   #$9B
          beq   CleanExit
+         cmp   #k_redo
+         beq   HandleRedo
          jmp   MainMenu
 
+HandleRedo
+         jsr   ClearScreen
+         lda   #s_header
+         jsr   PrintByID
+         lda   #s_progbar
+         jsr   PrintByID
+         lda   VPOS
+         sta   TEXTTOP
+         lda   #s_reading
+         jsr   PrintByID
+         jmp   RestartScan
+
 CleanExit
          jsr   SwapProDOS
          lda   gChangedPrefs
diff --git a/src/strings/en.a b/src/strings/en.a
index 3c44574..3d7a368 100755
--- a/src/strings/en.a
+++ b/src/strings/en.a
@@ -9,6 +9,7 @@ k_demuffin =   "D"
 k_crack  =     "C"
 k_slot   =     "S"
 k_quit   =     "Q"
+k_redo   =     "2" ;for some side 'B'
 ; <Esc> will also quit
 
 !source "strings/enid.a"
@@ -141,7 +142,7 @@ StringTable
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2018-05-26",$00
+         !text "Passport by 4am               2018-05-28",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "