4sports/src/prelaunch/black.belt.a
2023-09-08 08:58:14 -07:00

57 lines
1.2 KiB
Plaintext

;license:MIT
;(c) 2023 by qkumba
!cpu 6502
!to "build/PRELAUNCH.INDEXED/BLACK.BELT",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$4C
sta $85F
jsr $800 ; decompress
+DISABLE_ACCEL
jsr $8F00 ; title
+ENABLE_ACCEL
lda #$4C
sta $8A0
ldy #0
jsr $865 ; decompress
+READ_RAM2_NO_WRITE
lda MockingboardStuff
beq .nomock
pha
lda #$a9
sta $1506
jsr $BC0E ; decompress new Mockingboard support
pla
and #$20
bne .newmock
jsr $BC07 ; decompress old Mockingboard support
.newmock
.nomock
lda #$4C
sta $BC12
lda #<callback
sta $BC13
lda #>callback
sta $BC14
jsr DisableAccelerator
+READ_ROM_NO_WRITE
jmp $8A3
callback
+ENABLE_ACCEL
lda #0
sta $B6
jsr $BC16
+DISABLE_ACCEL
lda #0
rts
!if * > $1C0 {
!error "code is too large, ends at ", *
}