4cade/src/prelaunch/warp.destroyer.a

43 lines
1.2 KiB
Plaintext

;license:MIT
;(c) 2019, 2021-2022 by qkumba
!cpu 6502
!to "build/PRELAUNCH.INDEXED/WARP.DESTROYER",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$4C
sta $893
jsr $800 ; decompress
ldx #1
stx $6692
dex
stx $669C
lda #$B0
sta $76D1
lda #$13
sta $76D2 ; disable unknown hardware support
; otherwise hangs on IIGS
+READ_RAM2_NO_WRITE
lda MachineStatus
and #CHEATS_ENABLED
beq +
lda #$ad
sta $644D ; patch - don't increase damage
sta $6455 ; patch - don't increase damage
sta $646D ; patch - don't increase damage
sta $647B ; patch - don't increase damage
sta $6488 ; patch - don't increase damage
sta $649A ; patch - don't increase damage
sta $64AC ; patch - don't increase damage
+
jsr DisableAccelerator
+READ_ROM_NO_WRITE
lda #0
jmp $896
!if * > $1C0 {
!error "code is too large, ends at ", *
}