4cade/src/demo/kamikaze.a

47 lines
977 B
Plaintext

;license:MIT
;(c) 2022 by qkumba
!cpu 6502
!to "res/DEMO/KAMIKAZE",plain
*=$300
!source "src/constants.a" ; no code in these
!source "src/macros.a"
+READ_RAM2_WRITE_RAM2
jsr EnableAccelerator
+LOAD_FILE_AT kamikaze, $739A
+READ_ROM_NO_WRITE
lda #$60
sta $7B12
jsr $739A ; decompress
lda #$D0
sta $69AF ; no sound
sta $6A33 ; no sound
sta $6A4E ; no sound
sta $6A56 ; no sound
sta $70A8 ; no sound
lda #$4C
sta $6158
sta $6173
ldx #0
stx $61C1
inx
stx $615A
stx $6175
stx $61C2
+DISABLE_ACCEL
jmp $9400
kamikaze
!byte kamikaze_e-kamikaze_b
kamikaze_b
!text "X/KAMIKAZE/KAMIKAZE"
kamikaze_e
!if * > $3F0 {
!error "code is too large, ends at ", *
}