4cade/src/prelaunch/zaxxon.a

51 lines
940 B
Plaintext
Raw Permalink Normal View History

2019-09-16 02:10:09 +00:00
;license:MIT
2020-04-14 03:41:30 +00:00
;(c) 2020 by qkumba/Frank M.
2019-09-16 02:10:09 +00:00
!cpu 6502
!to "build/PRELAUNCH.INDEXED/ZAXXON",plain
2019-09-16 02:10:09 +00:00
*=$106
!source "src/macros.a"
2019-09-16 02:10:09 +00:00
2024-04-29 04:02:44 +00:00
+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
2020-04-29 19:21:59 +00:00
inc $BF87
2019-09-16 02:10:09 +00:00
@skip_mb
pla
and #CHEATS_ENABLED
beq +
ldy #$bd
sty $1a40
sty $1a61
2020-05-29 04:17:12 +00:00
+ +READ_RAM2_WRITE_RAM2
ldy #0
jmp $41D0
2019-12-13 05:51:54 +00:00
!if * > $1C0 {
!error "code is too large, ends at ", *
}