BASS-Music模块开源

易语言 2020-10-17 12:32:39

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

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