4cade/src/prelaunch/zaxxon.a

51 lines
950 B
Plaintext

;license:MIT
;(c) 2020 by qkumba/Frank M.
!cpu 6502
!to "build/PRELAUNCH.INDEXED/ZAXXON",plain
*=$106
!source "src/prelaunch/common.a"
+READ_RAM2_WRITE_RAM2
+LC_REBOOT
lda MachineStatus
pha
lda MockingboardStuff
pha
lda #$60
sta $41C6
jsr $4000 ; decompress
pla
beq @skip_mb
pha
jsr $D15B ; decompress Mockingboard code
tax
pla
and #7
ora #$C0
- ldy $70B, x
cpy #$C4
bne +
sta $70B, x
+ inx
bne -
sta $81D
inc $BF87
@skip_mb
pla
and #CHEATS_ENABLED
beq +
ldy #$bd
sty $1a40
sty $1a61
+ +READ_RAM2_WRITE_RAM2
ldy #0
jmp $41D0
!if * > $1C0 {
!error "code is too large, ends at ", *
}