support Advent side 'B'

This commit is contained in:
Peter Ferrie 2018-05-28 18:15:45 -07:00
parent 52934e4566
commit 3d94228f0d
3 changed files with 21 additions and 3 deletions

View File

@ -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
}

View File

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

View File

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