From 7d871c89d56d6097f2ee6a4c47cdc8b0ced0a56f Mon Sep 17 00:00:00 2001
From: Tom Greene <tom@cowgod.org>
Date: Fri, 22 May 2020 00:24:35 -0400
Subject: [PATCH] auto-patch lowercase for Dangerous Dave (#212)

---
 src/prelaunch/dangerous.dave.a | 20 +++++++++++++++++++-
 1 file changed, 19 insertions(+), 1 deletion(-)

diff --git a/src/prelaunch/dangerous.dave.a b/src/prelaunch/dangerous.dave.a
index bbe825131..2a3aa649c 100644
--- a/src/prelaunch/dangerous.dave.a
+++ b/src/prelaunch/dangerous.dave.a
@@ -10,7 +10,17 @@
          +ENABLE_ACCEL
          lda   #$60       ; patch loader to return
          sta   $20C6
-         jsr   $2000
+
+         ; auto-patch lowercase on II+
++        lda   ROM_MACHINEID
+         cmp   #$06
+         beq   +
+         lda   #<casefix
+         sta   $2390
+         lda   #>casefix
+         sta   $2391
+
++        jsr   $2000
 
          +GET_MACHINE_STATUS
          and   #CHEATS_ENABLED
@@ -31,6 +41,14 @@
          +DISABLE_ACCEL
          jmp   $20EC
 
+casefix
+         cmp   #$E1
+         bcc   +
+         and   #$DF
++        jsr   ROM_COUT
+         rts
+
+
 seed
          !byte   $80, $4F, $C7, $52, $FF