infinite lives cheat for Miner 2049er

This commit is contained in:
4am 2020-05-23 11:46:18 -04:00
parent 834c380511
commit 2d3fbea571
2 changed files with 30 additions and 1 deletions

View File

@ -164,7 +164,7 @@
0000,MEGABOTS 0000,MEGABOTS
1001,MICRO.INVADERS 1001,MICRO.INVADERS
0001,MICROWAVE 0001,MICROWAVE
1000,MINER.2049ER 1001,MINER.2049ER
1001,MINER.2049.II=Miner 2049er II 1001,MINER.2049.II=Miner 2049er II
1001,MINGS.CHALLENGE=Ming's Challenge 1001,MINGS.CHALLENGE=Ming's Challenge
0001,MINIT.MAN 0001,MINIT.MAN

View File

@ -0,0 +1,29 @@
;license:MIT
;(c) 2020 by 4am
!cpu 6502
!to "build/PRELAUNCH/MINER.2049ER",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #>callback
sta $2076
lda #<callback
sta $2075
jmp $2000 ; decompress
callback
+GET_MACHINE_STATUS
and #CHEATS_ENABLED
beq +
lda #$BD
sta $0964 ; patch - don't decrease lives
+
+DISABLE_ACCEL
jmp $0918
!if * > $1C0 {
!error "code is too large, ends at ", *
}