From 02780b53ab5dc6e9dea7e4ca839da833dc547132 Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Thu, 7 Feb 2019 17:33:09 -0500
Subject: [PATCH] add support for ArtSci RWTS swapper on T00S0A

---
 src/mods/t00only.a    |  1 +
 src/patchers/artsci.a | 40 ++++++++++++++++++++++++++++++++++++++++
 src/strings/en.a      |  2 +-
 3 files changed, 42 insertions(+), 1 deletion(-)
 create mode 100644 src/patchers/artsci.a

diff --git a/src/mods/t00only.a b/src/mods/t00only.a
index 1843deb..8fb5186 100644
--- a/src/mods/t00only.a
+++ b/src/mods/t00only.a
@@ -113,6 +113,7 @@ AnalyzeT00
          !source "../patchers/swordthrust.a"
          !source "../patchers/dakin5.a"
          !source "../patchers/muserwts.a"
+         !source "../patchers/artsci.a"
 
 ;add only above this line
          rts
diff --git a/src/patchers/artsci.a b/src/patchers/artsci.a
new file mode 100644
index 0000000..77cd83c
--- /dev/null
+++ b/src/patchers/artsci.a
@@ -0,0 +1,40 @@
+;-------------------------------
+; #ARTSCI
+; loader on T00,S0A changes epilogue
+;
+; tested on
+; - AceCalc (ArtSci)
+; - Magicalc (ArtSci)
+; - Photar
+;-------------------------------
+!zone {
+         bit   gMode      ; nothing to do here in verify-only mode
+         bpl   .exit
+         lda   gIsRWTS
+         bne   .exit
+
+         lda   #$0A
+         ldx   #$FE
+         ldy   #$02
+         jsr   compare
+         !byte $DE,$D5
+         bcs   .exit
+
+         ldy   #(@searchend-@searchstart)
+         jsr   SearchTrack
+@searchstart
+         LDY   #$35
+         TXA
+         STA   ($3C),Y
+@searchend
+         bcs   .exit
+         sta   gDisplayBytes
+         pha
+         lda   #s_bytrack
+         jsr   PrintByID
+         pla
+         ldy   #$01
+         jsr   modify
+         !byte $60
+.exit
+}
diff --git a/src/strings/en.a b/src/strings/en.a
index ea2b130..80bb195 100755
--- a/src/strings/en.a
+++ b/src/strings/en.a
@@ -152,7 +152,7 @@ StringTable
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2019-02-04",$00
+         !text "Passport by 4am               2019-02-07",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "