dos33fsprogs/games/mist_hgr/linking_noise.s
2021-07-08 00:41:45 -04:00

35 lines
576 B
ArmAsm

linking_noise = $d000
LINKING_NOISE_LENGTH = 43
;============================
; play the linking noise
;============================
play_link_noise:
lda SOUND_STATUS
bmi done_link_noise
; only avail if language card
and #SOUND_IN_LC
beq done_link_noise
; switch in language card
; read RAM, no write, $d000 bank 1
bit $C088
; call the btc player
lda #<linking_noise
sta BTC_L
lda #>linking_noise
sta BTC_H
ldx #LINKING_NOISE_LENGTH ; 45 pages long???
jsr play_audio
; restore rom, no write, $d000 bank 1
bit $c08A
done_link_noise:
rts