Merge pull request #52 from peterferrie/master

support Advent side '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
 }

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

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 "              "