4cade/src/prelaunch/succession.a

32 lines
738 B
Plaintext

;license:MIT
;(c) 2022 by qkumba
!cpu 6502
!to "build/PRELAUNCH.INDEXED/SUCCESSION",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$60
sta $8789
jsr $6F94 ; decompress
+READ_RAM2_NO_WRITE
lda MachineStatus
and #CHEATS_ENABLED
beq +
lda #$a5
sta $670D ; patch - don't decrease lives
sta $683D ; patch - don't increase time
sta $68A9 ; patch - don't decrease time
sta $6CC6 ; patch - don't increase lives
+
jsr DisableAccelerator
+READ_ROM_NO_WRITE
jmp $6000
!if * > $1C0 {
!error "code is too large, ends at ", *
}