BASSMOD
BASSMOD是仅用于演示的MOD（XM，IT，S3M，MOD，MTM，UMX）版本的BASS，或者您想要播放一些MOD音乐的其他任何东西。
网站：http：//www.un4seen.com/bassmod.html
支持平台：Win32，Linux
标题包括：bassmod.bi
标题版本：2.0
示例：在examples / sound / BASS /
网站：http：//www.un4seen.com/bassmod.html
支持平台：Win32，Linux
标题包括：bassmod.bi
标题版本：2.0
示例：在examples / sound / BASS /
例子
#include once "bassmod.bi"
Const SOUND_FILE = "test.mod"
If (BASSMOD_GetVersion() < 2) Then
Print "要求BASSMOD版本2以上"
End 1
End If
If (BASSMOD_Init(-1, 44100, 0) = 0) Then
Print "无法初始化BASSMOD"
End 1
End If
If (BASSMOD_MusicLoad(FALSE, SOUND_FILE, 0, 0, BASS_MUSIC_LOOP) = 0) Then
Print "BASSMOD无法加载'" & SOUND_FILE & "'"
BASSMOD_Free()
End 1
End If
BASSMOD_MusicPlay()
Print "声音播放;等待按键停止并退出..."
Sleep
BASSMOD_MusicStop()
BASSMOD_MusicFree()
BASSMOD_Free()
Const SOUND_FILE = "test.mod"
If (BASSMOD_GetVersion() < 2) Then
Print "要求BASSMOD版本2以上"
End 1
End If
If (BASSMOD_Init(-1, 44100, 0) = 0) Then
Print "无法初始化BASSMOD"
End 1
End If
If (BASSMOD_MusicLoad(FALSE, SOUND_FILE, 0, 0, BASS_MUSIC_LOOP) = 0) Then
Print "BASSMOD无法加载'" & SOUND_FILE & "'"
BASSMOD_Free()
End 1
End If
BASSMOD_MusicPlay()
Print "声音播放;等待按键停止并退出..."
Sleep
BASSMOD_MusicStop()
BASSMOD_MusicFree()
BASSMOD_Free()