24 lines
661 B
NASM
24 lines
661 B
NASM
;--------------------------------------------------------------------
|
|
; Starts the music playback with the given module
|
|
;
|
|
; Data and samples should be provided in fw_MusicData(a6) and
|
|
; fw_MusicSamples(a6) respectively.
|
|
;
|
|
fw_StartMusic:
|
|
move.l fw_MusicData(a6),a0
|
|
move.l fw_MusicSamples(a6),a1
|
|
bsr fw_MusicInit
|
|
move.w #1,fw_MusicEnabled(a6)
|
|
rts
|
|
|
|
;--------------------------------------------------------------------
|
|
; Stops the music playback if music is active
|
|
;
|
|
fw_StopMusic:
|
|
tst.w fw_MusicEnabled(a6)
|
|
bne.s .cont
|
|
rts
|
|
.cont clr.w fw_MusicEnabled(a6)
|
|
bra fw_MusicStop
|
|
|