give PFS Pascal its own string since it's not really the Activision protection

src/patchers/pfs.pascal.a

@@ -20,7 +20,7 @@
          !byte $C9,$93    ; CMP #$93
          bcs   @variation2; passport-test-suite/PFS Graph.woz [C=0] matches
          jsr   PrintByID
-         !byte s_fbff
+         !byte s_pfs
          inx
          jsr   modify1
          !byte $25        ; unconditional jump to success path
@@ -35,7 +35,7 @@
          !byte $C9,$AD    ; CMP #$AD
          bcs   @writeCheck; passport-test-suite/PFS Write 1984-11-01.woz [C=0] matches
          jsr   PrintByID
-         !byte s_fbff
+         !byte s_pfs
          inx
          jsr   modify1
          !byte $2F        ; unconditional jump to success path

src/strings/en.a

@@ -212,6 +212,7 @@ StringTableLow            ; must be kept in sync with constants in enid.a
          !byte <.lockitupserial
          !byte <.protection
          !byte <.baudville
+         !byte <.pfs
 
 StringTableHigh           ; must be kept in sync with constants in enid.a
          !byte >.header
@@ -363,11 +364,12 @@ StringTableHigh           ; must be kept in sync with constants in enid.a
          !byte >.lockitupserial
          !byte >.protection
          !byte >.baudville
+         !byte >.pfs
 
 .passport
          !text "Passport ",$00
 .header
-         !text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2022-06-25",$00
+         !text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2022-06-26",$00
 .bar9
          !text "_________",$00
 .bar18
@@ -752,3 +754,5 @@ StringTableHigh           ; must be kept in sync with constants in enid.a
          !text "@",s_found,"5-5-5 spiral @",s_bootloader,$8D,$00
 .baudville
          !text "@",s_found,"Baudville @",s_bootloader,$8D,$00
+.pfs
+         !text "@",s_found,"PFS @",s_protectioncheck,$8D,$00

src/strings/enid.a

@@ -150,3 +150,4 @@ s_erasingserialnumber = $91
 s_lockitupserial = $92
 s_protection = $93
 s_baudville  = $94
+s_pfs        = $95