From 4c32ad028c38d4d446faebe6137fc82ae53d54dd Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Mon, 18 Sep 2017 20:39:45 -0400
Subject: [PATCH] add support for JSR8635 self-decrypting nibble check

---
 src/passport.a         |  1 +
 src/patchers/jsr8635.a | 39 +++++++++++++++++++++++++++++++++++++++
 src/strings/en.a       |  2 +-
 3 files changed, 41 insertions(+), 1 deletion(-)
 create mode 100644 src/patchers/jsr8635.a

diff --git a/src/passport.a b/src/passport.a
index f31db06..dc36181 100755
--- a/src/passport.a
+++ b/src/passport.a
@@ -754,6 +754,7 @@ _applyToAll
          !source "patchers/jmpb412.a"           ; T02 only
          !source "patchers/jmpb400.a"           ; T02 && gIsBoot0 only
          !source "patchers/advint.a"            ; gAdventureInternational only
+         !source "patchers/jsr8635.a"           ; gIsRWTS only
 
          lda   gPatchCount
          beq   .nopatches
diff --git a/src/patchers/jsr8635.a b/src/patchers/jsr8635.a
new file mode 100644
index 0000000..05c31fe
--- /dev/null
+++ b/src/patchers/jsr8635.a
@@ -0,0 +1,39 @@
+;-------------------------------
+; #JSR8635
+; self-decrypting nibble check at $8635 finds D5D5F7 sequence on track 3
+;
+; tested on
+; Moon Bingo (1985, Grolier)
+; Rhyme-A-Line (1985, Grolier)
+; Rhymo's Falling star (1985, Grolier)
+; The Story of Miss Mouse (1985, Grolier)
+; Rhyme Land (1985, Grolier)
+; First Steps to Reading: Phonics I (1985, Grolier)
+; First Steps to Reading: Phonics II (1985, Grolier)
+;-------------------------------
+!zone {
+         lda   gIsBoot0
+         bne   .exit
+         lda   #$0F
+         sta   .sector+1
+.sector  lda   #$FF       ; modified at runtime
+         sta   gDisplayBytes
+         ldx   #$00
+         ldy   #$0A
+         jsr   compare
+         !byte $35,$86    ; BLOAD address
+         !byte WILDCARD,WILDCARD; BLOAD length
+         !byte $4E,$38,$86; LSR $8638
+         !byte $DD,$3B,$86
+         bcs   +
+         lda   #s_d5d5f7
+         jsr   PrintByID
+         lda   gDisplayBytes
+         ldx   #$04
+         ldy   #$01
+         jsr   modify
+         !byte $60
++        dec   .sector+1
+         bpl   .sector
+.exit
+}
diff --git a/src/strings/en.a b/src/strings/en.a
index c4702a6..2a410c6 100755
--- a/src/strings/en.a
+++ b/src/strings/en.a
@@ -230,7 +230,7 @@ StringTable
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2017-09-12",$00
+         !text "Passport by 4am               2017-09-18",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "