From 8c96618beb30acf1d5fcdb4cdea896dc2edc6076 Mon Sep 17 00:00:00 2001
From: Peter Ferrie <peter.ferrie@gmail.com>
Date: Thu, 4 Oct 2018 19:29:40 -0700
Subject: [PATCH] support Gelfling Adventure

---
 src/patchers/sierra.a | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/src/patchers/sierra.a b/src/patchers/sierra.a
index 5775a98..22b4b05 100755
--- a/src/patchers/sierra.a
+++ b/src/patchers/sierra.a
@@ -272,6 +272,18 @@
          !byte $84,$C2,$CC,$CF,$C1,$C4,$A0,$D7,$C1,$CC,$D4
                            ;"BLOAD WALT..."
 +        bcc   +
+         ldy   #26
+         jsr   SearchTrack
+         !byte $20,$0D,$09 ;JSR $090D
+         !byte $AD,$F1,$08 ;LDA $08F1
+         !byte $D0,$6B     ;BNE $08C3
+         !byte $A9,$01     ;LDA #$01
+         !byte $8D,$F1,$08 ;STA $08F1
+         !byte $20,$16,$16 ;JSR $1616
+         !byte $20,$3D,$18 ;JSR $183D
+         !byte $80,$1B,$C2,$CC,$CF,$C1,$C4
+                           ;"BLOAD ..."
+         bcc   +
          lda   #$60 ;RTS
          sta   .patchstyle
          ldy   #14