mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-11-08 16:07:14 +00:00
b1238af49d
this will probably upset people
35 lines
576 B
ArmAsm
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
|