From f4aee49c5fa2b5bbbe5d1c6b83128c71298a50a0 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Fri, 4 Feb 2022 21:58:17 -0800
Subject: [PATCH] support RDOS with modified prologue

---
 src/id/trace32.a | 10 ++++++++++
 src/strings/en.a |  2 +-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/src/id/trace32.a b/src/id/trace32.a
index 545edb6..6b347bc 100644
--- a/src/id/trace32.a
+++ b/src/id/trace32.a
@@ -298,10 +298,20 @@ FFer
 
 ;standard 13-sector prologue on T00
 ;because we can't decode the 16-sector version
+         lda   $BC76
+         pha
+         lda   $BC8B
+         pha
          lda   #$D5
          sta   $BC76
          lda   #$B5
          sta   $BC8B
+         jsr   +
+         pla
+         sta   $BC8B
+         pla
+         sta   $BC76
+         rts
 
 +        lda   gAddress
          sta   $BAF7
diff --git a/src/strings/en.a b/src/strings/en.a
index 5d8b6c8..785c7e2 100755
--- a/src/strings/en.a
+++ b/src/strings/en.a
@@ -365,7 +365,7 @@ StringTableHigh           ; must be kept in sync with constants in enid.a
 .passport
          !text "Passport ",$00
 .header
-         !text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2022-02-03",$00
+         !text "@",s_passport,"by 4am@",s_space7,"@",s_space7," 2022-02-04",$00
 .bar9
          !text "_________",$00
 .bar18