易语言可调速WAV播放源码

系统结构:字节转毫秒,一位数字补0,千分之1秒,回调函数,反相数据流,播放速度缓冲区,设置波形输出参数,开始输出,停止输出,复制一块内存,复制一块内存2,复制一块内存3,打开一个文件,读取一个数据流,移动文件指针,关闭句柄,c获取文件大小,暂停输出,向设备写入一个数据块,

======窗口程序集1
           |  |
           |  |------ 字节转毫秒
           |  |
           |  |------ 一位数字补0
           |  |
           |  |------ 千分之1秒
           |  |
           |  |------ _打开设备_被单击
           |  |
           |  |------ 回调函数
           |  |
           |  |------ _关闭设备_被单击
           |  |
           |  |------ 反相数据流
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 播放速度缓冲区
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _滑块条1_位置被改变
           |  |
           |  |------ _选择框1_被单击
           |  |
           |  |------ _复位按钮_被单击
           |  |
           |  |------ _正向播放按钮_被单击
           |  |
           |  |------ _反相播放按钮_被单击
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   设置波形输出参数
           |  |
           |  |---[dll]------   开始输出
           |  |
           |  |---[dll]------   停止输出
           |  |
           |  |---[dll]------   复制一块内存
           |  |
           |  |---[dll]------   复制一块内存2
           |  |
           |  |---[dll]------   复制一块内存3
           |  |
           |  |---[dll]------   打开一个文件
           |  |
           |  |---[dll]------   读取一个数据流
           |  |
           |  |---[dll]------   移动文件指针
           |  |
           |  |---[dll]------   关闭句柄
           |  |
           |  |---[dll]------   c获取文件大小
           |  |
           |  |---[dll]------   暂停输出
           |  |
           |  |---[dll]------   向设备写入一个数据块

调用的DLL命令:

.DLL命令 设置波形输出参数, 整数型, "EWaveOut.dll", "E_WaveOutInit"
    .参数 设备ID, 整数型, , 此为填写设备ID号，如填写-1则使用系统默认设备
    .参数 声道, 整数型
    .参数 位数, 整数型
    .参数 采样率, 整数型
    .参数 回调函数指针, 子程序指针

.DLL命令 开始输出, , "EWaveOut.dll", "E_WaveOutStartOutput", , 操作型函数，没有参数

.DLL命令 停止输出, , "EWaveOut.dll", "E_WaveOutStopOutput", , 操作型函数，没有参数

.DLL命令 复制一块内存, , "kernel32.dll", "RtlMoveMemory", 公开
    .参数 目标, 短整数型, 传址 数组
    .参数 源, 字节型, 传址 数组
    .参数 长度, 整数型

.DLL命令 复制一块内存2, , "kernel32.dll", "RtlMoveMemory", 公开
    .参数 目标, 字节型, 传址 数组
    .参数 源, 短整数型, 传址 数组
    .参数 长度, 整数型

.DLL命令 复制一块内存3, , "kernel32.dll", "RtlMoveMemory", 公开
    .参数 目标, 字节型, 传址
    .参数 源, 字节型, 传址 数组
    .参数 长度, 整数型

.DLL命令 打开一个文件, 整数型, "kernel32.dll", "CreateFileA", 公开
    .参数 文件名, 文本型
    .参数 s打开方式, 整数型
    .参数 共享模式, 整数型
    .参数 security类型, SECURITY_ATTRIBUTES, 传址
    .参数 操作方法, 整数型
    .参数 标志或属性, 整数型
    .参数 文件模板, 整数型

.DLL命令 读取一个数据流, 整数型, "kernel32.dll", "ReadFile", 公开
    .参数 文件句柄, 整数型
    .参数 数据缓冲区, 字节型, 传址 数组
    .参数 读取长度, 整数型
    .参数 返回读取字节数, 整数型, 传址
    .参数 异步方式, 整数型

.DLL命令 移动文件指针, 整数型, "kernel32.dll", "SetFilePointer"
    .参数 文件句柄, 整数型
    .参数 字节偏移量, 整数型
    .参数 高字节偏移量, 整数型
    .参数 移动方法, 整数型

.DLL命令 关闭句柄, 整数型, "kernel32.dll", "CloseHandle"
    .参数 句柄对象, 整数型

.DLL命令 c获取文件大小, 整数型, "kernel32.dll", "GetFileSize"
    .参数 文件句柄, 整数型
    .参数 lpFileSizeHigh, 整数型

.DLL命令 暂停输出, , "EWaveOut.dll", "E_WaveOutPauseOutput", , 操作型函数，没有参数

.DLL命令 向设备写入一个数据块, , "EWaveOut.dll", "E_WaveOutPutData"
    .参数 缓冲区, 字节型, 数组
    .参数 缓冲大小, 整数型