diff --git a/src/passport.a b/src/passport.a index 1de74ba..9d86ca2 100755 --- a/src/passport.a +++ b/src/passport.a @@ -183,11 +183,25 @@ MainMenu jsr PrintByID lda #s_mainmenu jsr PrintByID - lda #s_targetdisk ldx gUsingHardDisk - bne .printtargettype + beq .usingharddisk + lda SLOT + and #$0F + ora #$C0 + ldx #$28 + ldy #$06 + jsr CompareMemory + !byte $20,$33,$CD + !byte $18 + !byte $90,$2E + bcc .usingcffa + lda #s_targetdisk + !byte $2C +.usingcffa + lda #s_targetcffa + !byte $2C +.usingharddisk lda #s_targetfile -.printtargettype jsr PrintByID .getkey jsr WaitForKey diff --git a/src/strings/en.a b/src/strings/en.a index 89a165a..6fae1d3 100755 --- a/src/strings/en.a +++ b/src/strings/en.a @@ -157,6 +157,7 @@ StringTableLow !byte <.writingto !byte <.targetdisk !byte <.targetfile + !byte <.targetcffa StringTableHigh !byte >.header @@ -301,6 +302,7 @@ StringTableHigh !byte >.writingto !byte >.targetdisk !byte >.targetfile + !byte >.targetcffa ; ; Text can contain substitution strings, which @@ -363,6 +365,8 @@ StringTableHigh !text "disk)",$00 .targetfile !text "file)",$00 +.targetcffa + !text "CFFA)",$00 .progbar !byte $8D !text " _@",s_bar,"_",$8D diff --git a/src/strings/enid.a b/src/strings/enid.a index fad2b2c..0d5d357 100644 --- a/src/strings/enid.a +++ b/src/strings/enid.a @@ -144,3 +144,4 @@ s_addressepilogue = $8A s_writingto = $8B s_targetdisk = $8C s_targetfile = $8D +s_targetcffa = $8E