4cade/src/prelaunch/starglider.a

55 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 #5
- lda reset,x
sta $120,x
dex
bpl -
lda #$20
sta $7323
lda #1
sta $732B
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
reset lda $C089
jmp $FAA6
!if * > $1C0 {
!error "code is too large, ends at ", *
}