4cade/src/prelaunch/space.spikes.a

58 lines
1.1 KiB
Plaintext

;license:MIT
;(c) 2022 by qkumba
!cpu 6502
!to "build/PRELAUNCH.INDEXED/SPACE.SPIKES",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$60
sta $88D
sta $905
sta $96E
jsr $800 ; decompress
- lda x_b, y
sta $250, y
iny
bne -
lda #<callback1
sta $9501
lda #<callback2
sta $95B1
lda #>callback1
sta $9502
sta $95B2
jmp $9500
x_b !pseudopc $250 {
callback1
+READ_RAM2_NO_WRITE
jsr EnableAccelerator
jsr $9503
+DISABLE_ACCEL
jsr $BC69
sta $C010
callback2
+READ_RAM2_NO_WRITE
jsr EnableAccelerator
jsr $BC78
+READ_RAM2_NO_WRITE
lda MachineStatus
and #CHEATS_ENABLED
beq +
lda #$ad
sta $6B5C ; patch - don't decrease lives
+
jsr DisableAccelerator
+READ_ROM_NO_WRITE
jmp $A00
}
!if * > $1C0 {
!error "code is too large, ends at ", *
}