易语言MusicBpm游戏源码

系统结构:写到记录文件,YiMaTime,取指定文本,取指定秒音符,My_WindowCall,节拍高亮,UnAllRegHotKey,RegHotKey,New_WindowCall,UnregisterHotKey,RegisterHotKey,SetWindowLongA,CallWindowProcA,Sleep,GetForegroundWindow,BASS_ChannelGetPosition,BASS_StreamFree,BASS_ChannelStop,BASS_ChannelPlay,BASS_ChannelBytes2Seconds,BASS_Init,BASS_StreamCreateFile,BASS_ChannelGetLength,

======窗口程序集1
           |  |
           |  |------ _Button_1_被单击
           |  |
           |  |------ 写到记录文件
           |  |
           |  |------ _Timer_1_周期事件
           |  |
           |  |------ YiMaTime
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 取指定文本
           |  |
           |  |------ 取指定秒音符
           |  |
           |  |------ My_WindowCall
           |  |
           |  |------ 节拍高亮
           |  |
           |  |------ _Timer_2_周期事件
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _Button_2_被单击
           |  |
           |  |------ _Button_3_被单击
           |  |
           |  |
======Key
           |  |
           |  |------ UnAllRegHotKey
           |  |
           |  |------ RegHotKey
           |  |
           |  |------ New_WindowCall
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   UnregisterHotKey
           |  |
           |  |---[dll]------   RegisterHotKey
           |  |
           |  |---[dll]------   SetWindowLongA
           |  |
           |  |---[dll]------   CallWindowProcA
           |  |
           |  |---[dll]------   Sleep
           |  |
           |  |---[dll]------   GetForegroundWindow
           |  |
           |  |---[dll]------   BASS_ChannelGetPosition
           |  |
           |  |---[dll]------   BASS_StreamFree
           |  |
           |  |---[dll]------   BASS_ChannelStop
           |  |
           |  |---[dll]------   BASS_ChannelPlay
           |  |
           |  |---[dll]------   BASS_ChannelBytes2Seconds
           |  |
           |  |---[dll]------   BASS_Init
           |  |
           |  |---[dll]------   BASS_StreamCreateFile
           |  |
           |  |---[dll]------   BASS_ChannelGetLength

调用的DLL命令:

.DLL命令 UnregisterHotKey, 整数型, , "UnregisterHotKey"
    .参数 hWnd, 整数型
    .参数 HotKeyID, 整数型

.DLL命令 RegisterHotKey, 整数型, "user32.dll", "RegisterHotKey"
    .参数 hWnd, 整数型
    .参数 id, 整数型
    .参数 fsModifoers, 整数型
    .参数 vk, 整数型

.DLL命令 SetWindowLongA, 子程序指针, , "SetWindowLongA"
    .参数 hWnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 子程序指针

.DLL命令 CallWindowProcA, 整数型, , "CallWindowProcA"
    .参数 lpPrevWndFunc, 子程序指针
    .参数 hWnd, 整数型
    .参数 Msg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 Sleep, , , "Sleep"
    .参数 dwMilliseconds, 整数型

.DLL命令 GetForegroundWindow, 整数型, "user32", "GetForegroundWindow", , 获取前台窗口的窗口句柄

.DLL命令 BASS_ChannelGetPosition, 长整数型, "bass.dll", "BASS_ChannelGetPosition", 公开, 获取位置
    .参数 handle, 整数型
    .参数 mode, 整数型

.DLL命令 BASS_StreamFree, 逻辑型, "bass.dll", "BASS_StreamFree", 公开, 释放流
    .参数 handle, 整数型

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

.DLL命令 BASS_ChannelPlay, 逻辑型, "bass.dll", "BASS_ChannelPlay", 公开, 播放
    .参数 handle, 整数型
    .参数 restart, 逻辑型

.DLL命令 BASS_ChannelBytes2Seconds, 双精度小数型, "bass.dll", "BASS_ChannelBytes2Seconds", 公开
    .参数 handle, 整数型
    .参数 pos, 长整数型

.DLL命令 BASS_Init, 逻辑型, "bass.dll", "BASS_Init", 公开, 初始化
    .参数 device, 整数型, , 设备，-1:默认
    .参数 freq, 整数型, , 采样:44100
    .参数 flags, 整数型
    .参数 win, 整数型, , 窗口句柄
    .参数 clsid, 整数型

.DLL命令 BASS_StreamCreateFile, 整数型, "bass.dll", "BASS_StreamCreateFile", 公开, 新建文件流
    .参数 mem, 逻辑型
    .参数 file, 文本型
    .参数 offset, 长整数型
    .参数 length, 长整数型
    .参数 flags, 整数型

.DLL命令 BASS_ChannelGetLength, 长整数型, "bass.dll", "BASS_ChannelGetLength", 公开, 获取长度
    .参数 handle, 整数型
    .参数 mode, 整数型