易语言bass内存音效源码

系统结构:BASS_Init,BASS_Free,BASS_ChannelPlay,BASS_ChannelSetAttribute,BASS_StreamCreateFile_内存,BASS_ChannelStop,BASS_ChannelGetAttribute,BASS_GetDeviceInfo,BASS_StreamCreateFile_文件,BASS_StreamFree,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |
======窗口程序集_窗口1
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _滑块条1_位置被改变
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _窗口1_可否被关闭
           |  |
           |  |------ _组合框1_列表项被选择
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   BASS_Init
           |  |
           |  |---[dll]------   BASS_Free
           |  |
           |  |---[dll]------   BASS_ChannelPlay
           |  |
           |  |---[dll]------   BASS_ChannelSetAttribute
           |  |
           |  |---[dll]------   BASS_StreamCreateFile_内存
           |  |
           |  |---[dll]------   BASS_ChannelStop
           |  |
           |  |---[dll]------   BASS_ChannelGetAttribute
           |  |
           |  |---[dll]------   BASS_GetDeviceInfo
           |  |
           |  |---[dll]------   BASS_StreamCreateFile_文件
           |  |
           |  |---[dll]------   BASS_StreamFree

调用的DLL命令:

.DLL命令 BASS_Init, 逻辑型, "bass.dll", "BASS_Init", 公开, 初始化
    .参数 设备, 整数型, , 默认-1
    .参数 频率, 整数型, , 采样44100
    .参数 标记, 整数型
    .参数 句柄, 整数型
    .参数 GUID, 整数型

.DLL命令 BASS_Free, 逻辑型, "bass.dll", "BASS_Free", 公开, 释放Bass

.DLL命令 BASS_ChannelPlay, 逻辑型, "bass.dll", "BASS_ChannelPlay", 公开, 播放
    .参数 句柄, 整数型
    .参数 重新播放, 逻辑型

.DLL命令 BASS_ChannelSetAttribute, 逻辑型, "bass.dll", "BASS_ChannelSetAttribute", 公开, 设置通道音量
    .参数 句柄, 整数型
    .参数 欲置属性, 整数型
    .参数 欲置参数, 小数型

.DLL命令 BASS_StreamCreateFile_内存, 整数型, "bass.dll", "BASS_StreamCreateFile", 公开, 从内存加载音效
    .参数 mem, 逻辑型
    .参数 file, 字节集
    .参数 offset, 长整数型
    .参数 length, 长整数型
    .参数 flags, 整数型

.DLL命令 BASS_ChannelStop, 逻辑型, "bass.dll", "BASS_ChannelStop", 公开, 停止
    .参数 句柄, 整数型

.DLL命令 BASS_ChannelGetAttribute, 逻辑型, "bass.dll", "BASS_ChannelGetAttribute", 公开, 取通道音量
    .参数 句柄, 整数型
    .参数 欲取属性, 整数型
    .参数 保存变量, 小数型, 传址

.DLL命令 BASS_GetDeviceInfo, 逻辑型, "bass.dll", "BASS_GetDeviceInfo", 公开, 获取设备信息
    .参数 device, 整数型
    .参数 info, BASS_DEVICEINFO, 传址, BASS_DEVICEINFO

.DLL命令 BASS_StreamCreateFile_文件, 整数型, "bass.dll", "BASS_StreamCreateFile", 公开, 从文件加载音效
    .参数 分配信息, 逻辑型
    .参数 文件路径, 文本型
    .参数 偏移位置, 长整数型
    .参数 音乐长度, 长整数型
    .参数 标记, 整数型

.DLL命令 BASS_StreamFree, 逻辑型, "bass.dll", "BASS_StreamFree", 公开, 关闭文件
    .参数 句柄, 整数型