From 834c380511777e31b15b6d63ccba9fb81d87973e Mon Sep 17 00:00:00 2001
From: 4am <a2_4am@sent.com>
Date: Sat, 23 May 2020 11:30:34 -0400
Subject: [PATCH] infinite lives cheat for Pac-Man

---
 res/GAMES.CONF          |  2 +-
 src/prelaunch/pac.man.a | 10 +++++++++-
 2 files changed, 10 insertions(+), 2 deletions(-)

diff --git a/res/GAMES.CONF b/res/GAMES.CONF
index acdee6fc4..03b1ef736 100755
--- a/res/GAMES.CONF
+++ b/res/GAMES.CONF
@@ -189,7 +189,7 @@
 0000,OOTW=Out of This World
 0000,OUTPOST
 0000,OUTWORLD
-0000,PAC.MAN=Pac-Man
+0001,PAC.MAN=Pac-Man
 0100,PAPERBOY
 1001,PENETRATOR
 1001,PENTAPUS
diff --git a/src/prelaunch/pac.man.a b/src/prelaunch/pac.man.a
index 3f8e0d771..5a87d0395 100755
--- a/src/prelaunch/pac.man.a
+++ b/src/prelaunch/pac.man.a
@@ -1,5 +1,5 @@
 ;license:MIT
-;(c) 2019 by qkumba/Frank M.
+;(c) 2019 by qkumba/Frank M./4am
 
 !cpu 6502
 !to "build/PRELAUNCH/PAC.MAN",plain
@@ -18,6 +18,14 @@
          lda   #1
          sta   $104A      ; reset vector patch
 
+         +READ_RAM2_NO_WRITE
+         lda   MachineStatus
+         and   #CHEATS_ENABLED
+         beq   +
+         lda   #$A5
+         sta   $5C0E      ; patch - don't decrease lives
+         sta   $4135      ; patch - don't increase lives
++
          +DISABLE_ACCEL
          jmp   $1000