4cade/src/prelaunch/starglider.a
2022-05-27 16:29:52 -07:00

51 lines
1.2 KiB
Plaintext

;license:MIT
;(c) 2020, 2022 by qkumba
!cpu 6502
!to "build/PRELAUNCH.INDEXED/STARGLIDER",plain
*=$106
!source "src/prelaunch/common.a"
+READ_RAM2_NO_WRITE
jsr EnableAccelerator
lda MachineStatus
and #CHEATS_ENABLED
php
+READ_ROM_NO_WRITE
lda #$60
sta $81FC
jsr $800 ; decompress
jsr DisableAccelerator
jsr $BA7B
ldx #0
stx $7323
inx
stx $732B
inc $101
lda #$A6
sta $104
lda #$FA
sta $105 ; update reset hook to reboot
plp
beq +
lda #$a5
sta $76B3 ; patch - don't decrease fuel
sta $856B ; patch - don't increase damage
sta $8E13 ; patch - don't increase weapons
sta $9528 ; patch - don't increase damage
sta $9BC0 ; patch - don't increase damage
sta $9D34 ; patch - don't increase damage
sta $9D70 ; patch - don't increase damage
sta $9E37 ; patch - don't increase damage
+
jmp $BA00
!if * > $1C0 {
!error "code is too large, ends at ", *
}