4cade/src/prelaunch/cavrn.creatures.a

64 lines
1.1 KiB
Plaintext

;license:MIT
;(c) 2022 by qkumba
!cpu 6502
!to "build/PRELAUNCH.INDEXED/CAVRN.CREATURES",plain
*=$106
!source "src/prelaunch/common.a"
callback1
+ENABLE_ACCEL
lda #$4C
sta $8F9
lda #<callback2
sta $8FA
lda #>callback2
sta $8FB
jmp $800 ; decompress
callback2
lda #<callback1
sta $BE13
lda #>callback1
sta $BE14
ldx #$60
lda $D49
cmp #'0'
beq patch0
cmp #'1'
beq patch1
cmp #'2'
beq patch2
stx $83BB
jsr $6000 ; decompress
jsr noaccel
jmp $800
patch0
stx $1812
jsr $1800 ; decompress
jsr noaccel
jmp $1C00
patch1
stx $2023
jsr $2000 ; decompress
jsr noaccel
jmp $4A00
patch2
stx $2039
jsr $2000 ; decompress
jsr noaccel
jmp $1A4E
noaccel
+DISABLE_ACCEL
rts
!if * > $1C0 {
!error "code is too large, ends at ", *
}