BASS-Music模块开源

本源码是BASS.DLL的应用封装。
.子程序 初始化, 逻辑型, 公开, 初始化设备，建议启动后调用。如果事先没有初始化，别的函数将失效。返回真表示初始化成功。；假表示失败
.参数 设备号, 整数型, 可空, 使用的设备，如果为空，则使用默认设备。否则 0 为第一个设备。常量：
.参数 采样, 整数型, 可空, 如果为空，默认为44100赫兹。
.参数 窗口句柄, 整数型, 可空, 如为空，默认为0，使用当前窗口。
.局部变量 ProcAddress, 整数型

hLibModule ＝ LoadMemLibrary (#bass)
ProcAddress ＝ GetMemProcAddress (hLibModule, “BASS_Init”)
.如果真 (ProcAddress ≠ 0)
返回 (Call (ProcAddress, 选择 (是否为空 (设备号), -1, 设备号), 选择 (是否为空 (采样), 44100, 采样), 0, 窗口句柄, 0) ≠ 0)
.如果真结束
返回 (假)