From 8bcc24c3f513df198f573d25871ffd044d75ebc0 Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Wed, 14 Apr 2021 23:35:14 -0400
Subject: [PATCH] add label for CFFA3000-managed targets

---
 src/passport.a     | 20 +++++++++++++++++---
 src/strings/en.a   |  4 ++++
 src/strings/enid.a |  1 +
 3 files changed, 22 insertions(+), 3 deletions(-)

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