From 5d048bdd0dcd4601b013473c0455524f26545540 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Thu, 25 Jan 2018 11:56:43 -0800
Subject: [PATCH 1/2] support Amnesia

---
 src/id/ea.a       |  7 +++++++
 src/patchers/ea.a | 20 ++++++++++++++++++++
 src/strings/en.a  |  2 +-
 3 files changed, 28 insertions(+), 1 deletion(-)

diff --git a/src/id/ea.a b/src/id/ea.a
index 053e5e7..67fd005 100644
--- a/src/id/ea.a
+++ b/src/id/ea.a
@@ -30,6 +30,13 @@ IDEA
          !byte $8D,$F4,$03,$A9,$00,$8D,$C7,$09
          !byte $AD,$E9,$C0,$A9,$B7,$48,$A9,$B0
          !byte $85,$3E,$A9,$00,$20,$00,$0C
+         bcc   +
+         lda   #$00
+         tax
+         ldy   #16
+         jsr   compare
+         !byte $01,$A5,$27,$C9,$09,$D0,$2E,$A2
+         !byte $10,$8A,$9D,$EF,$03,$CA,$D0,$F9
 +        rts
 
 foundea
diff --git a/src/patchers/ea.a b/src/patchers/ea.a
index 513fe86..4f4766e 100644
--- a/src/patchers/ea.a
+++ b/src/patchers/ea.a
@@ -285,6 +285,26 @@
          jsr   modify
          !byte $E0         ;lda from known-zero instead
 
++        ldy   #23
+         jsr   SearchTrack
+         !byte $03,$4C     ;LDI  #$00
+         !byte $06,$E1,$E0 ;STA  $39e2
+         !byte $05,$D3,$EE ;JSRA $37d0
+         !byte $05,$D3,$EE ;JSRA $37d0
+         !byte $05,$D3,$EE ;JSRA $37d0
+         !byte $05,$D3,$EE ;JSRA $37d0
+         !byte $04,$EB,$19 ;LDA  $c0e8
+         !byte $04,$E1,$E0 ;LDA  $39e2
+         bcs   +
+         pha
+         txa
+         adc   #21
+         tax
+         pla
+         ldy   #1
+         jsr   modify
+         !byte $E0         ;lda from known-zero instead
+
 +        ldy   #16
          jsr   SearchTrack
          !byte $49,$4E     ;EOR #$4E
diff --git a/src/strings/en.a b/src/strings/en.a
index 1b6dae7..d9132d2 100755
--- a/src/strings/en.a
+++ b/src/strings/en.a
@@ -138,7 +138,7 @@ StringTable
 ; can be set directly before calling PrintByID.
 ;
 .header
-         !text "Passport by 4am               2018-01-20",$00
+         !text "Passport by 4am               2018-01-25",$00
 .mainmenu
          !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
          !text "              "

From c40ab9eb4fa27df614a4fba30aecbfc600e44114 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Thu, 25 Jan 2018 15:27:11 -0800
Subject: [PATCH 2/2] support Last Gladiator rev 2

---
 src/patchers/ea.a | 47 ++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 46 insertions(+), 1 deletion(-)

diff --git a/src/patchers/ea.a b/src/patchers/ea.a
index 4f4766e..455a05b 100644
--- a/src/patchers/ea.a
+++ b/src/patchers/ea.a
@@ -305,6 +305,30 @@
          jsr   modify
          !byte $E0         ;lda from known-zero instead
 
++        ldy   #31
+         jsr   SearchTrack
+         !byte $03,$4C     ;LDI  #$00
+         !byte $06,$E1,$7B ;STA  $a2e2
+         !byte $03,$AB     ;LDI  #$e7
+         !byte $05,$02,$78 ;JSRA $a101
+         !byte $03,$AD     ;LDI  #$e1
+         !byte $05,$02,$78 ;JSRA $a101
+         !byte $03,$AB     ;LDI  #$e7
+         !byte $05,$02,$78 ;JSRA $a101
+         !byte $03,$A9     ;LDI  #$e5
+         !byte $05,$02,$78 ;JSRA $a101
+         !byte $04,$EB,$19 ;LDA  $c0e8
+         !byte $04,$E1,$7B ;LDA  $a2e2
+         bcs   +
+         pha
+         txa
+         adc   #29
+         tax
+         pla
+         ldy   #1
+         jsr   modify
+         !byte $D1         ;lda from known-zero instead
+
 +        ldy   #16
          jsr   SearchTrack
          !byte $49,$4E     ;EOR #$4E
@@ -332,7 +356,7 @@
          !byte $D0,$FA
          !byte $C9,$A0
          !byte $F0
-         bcs   .exit
+         bcs   +
          pha
          txa
          adc   #12
@@ -342,6 +366,27 @@
          jsr   modify
          !byte $A1         ;new checksum value for eor
 
++        ldy   #25
+         jsr   SearchTrack
+         !byte $04,$4F,$D9 ;LDA $004c
+         !byte $0A,$03,$7B ;LDX ($a200,A)
+         !byte $10,$F1,$70 ;SUB $a9f2
+         !byte $06,$F1,$70 ;STA $a9f2
+         !byte $0C,$4F,$D9 ;INC $004c
+         !byte $07,$AC     ;CMP #$e0
+         !byte $0F,$E5,$71 ;BNE $a8e6
+         !byte $04,$F1,$70 ;LDA $a9f2
+         !byte $07,$AB     ;CMP #$e7
+         bcs   .exit
+         pha
+         txa
+         adc   #24
+         tax
+         pla
+         ldy   #1
+         jsr   modify
+         !byte $BB         ;new checksum value for eor
+
 .dostitles
          lda   gIsBoot0
          bne   .exit