mirror of
https://github.com/a2-4am/4cade.git
synced 2024-09-29 09:55:29 +00:00
33 lines
845 B
Plaintext
33 lines
845 B
Plaintext
|
;license:MIT
|
||
|
;(c) 2019 by 4am
|
||
|
|
||
|
!cpu 6502
|
||
|
!to "build/PRELAUNCH/SERPENTINE",plain
|
||
|
*=$106
|
||
|
|
||
|
!source "src/prelaunch/common.a"
|
||
|
|
||
|
+GET_MACHINE_STATUS
|
||
|
and #CHEATS_ENABLED
|
||
|
sta cheat
|
||
|
ldx #$0E ; copy patch code to zero page (stack will be destroyed by the time we need to patch)
|
||
|
- lda patch,x
|
||
|
sta $F1,x
|
||
|
dex
|
||
|
bpl -
|
||
|
lda #$F1 ; call patch instead of $222
|
||
|
sta $8BE3
|
||
|
lda #$00
|
||
|
sta $8BE4
|
||
|
jmp $43F5 ; decompress and show title
|
||
|
patch
|
||
|
jsr $0100 ; decompress
|
||
|
cheat=*+1
|
||
|
lda #0 ; SMC
|
||
|
beq +
|
||
|
lda #$A5
|
||
|
sta $868F ; patch - don't decrease lives
|
||
|
; lives are capped at 3 so no further patches
|
||
|
+
|
||
|
jmp $0800
|