main menu hotkey Ctrl-@ to enter CFFA3000 configuration (slot 7 only)

This commit is contained in:
4am 2017-02-19 22:41:48 -05:00
parent 100b8c00d0
commit df35e12a00
3 changed files with 25 additions and 2 deletions

17
src/cffa.a Normal file
View File

@ -0,0 +1,17 @@
!zone {
EnterCFFAIfAvailable
ldy #$04
- lda $C7F6, y
cmp CFFASignature, y
bne +
dey
bpl -
jsr $C730
clc
!byte $24 ; hide next SEC
+
sec
rts
CFFASignature
!byte $43,$46,$33,$4B,$31
}

View File

@ -158,6 +158,7 @@ FirstMover
!source "slots.a"
!source "prefs.a"
!source "keys.a"
!source "cffa.a"
!source "rwts.a"
OneTimeSetup
@ -203,7 +204,12 @@ MainMenu
jsr PrintByID
.getkey
jsr WaitForKey
cmp #$9B
cmp #$80
bne +
jsr EnterCFFAIfAvailable
bcc ResetVector
bcs .getkey
+ cmp #$9B
beq .jmptoexit
cmp #k_quit
bne +

View File

@ -194,7 +194,7 @@ StringTable
; can be set directly before calling PrintByID.
;
.header
!text "Passport by 4am 2017-02-14",00
!text "Passport by 4am 2017-02-19",00
.mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " "