易语言千千静听频谱源码

系统结构:滚动窗口标题,调整进度,调整音量,调整播放状态,初始化设置,初始化主窗口皮肤,取歌曲属性,滚动歌曲信息,取中间文本,十六进制到十进制,取文件目录,GetMP3V1,V1OrNot,GetMP3V2,V2OrNot,GetV2Longth,GetMP3V2Frame,字节集倒序,GetRGBValue,ComputeRECT,DrawRECT,DrawRECT_API,调整亮度,初始化位置,置时间,格式化秒,格式化分,取播放时间,置总时间,置反转,置图片,取图片,符号匹配,取信息,置位置,置透明标签,置图片框,取位置,提取配置,载入配置文件,初始化均衡器皮肤,BASS_GetVersion,BASS_Init,BASS_Free,BASS_StreamCreateFile,BASS_ChannelPlay,BASS_ChannelPause,BASS_ChannelStop,BASS_ChannelBytes2Seconds,BASS_ChannelGetPosition,BASS_ChannelSetPosition,BASS_ChannelGetLength,BASS_ChannelSeconds2Bytes,BASS_ChannelGetAttributes,BASS_ChannelSetAttributes,BASS_StreamFree,BASS_ChannelIsActive,BASS_ChannelGetLevel,BASS_ChannelGetData,MoveMemory1,MoveMemory2,SetWindowLong,CallWindowProc,GetWindowRect,mouse_event,SetTimer,KillTimer,Rectangle,GetDC,CreateCompatibleDC,CreateCompatibleBitmap,SelectObject,CreatePen,CreateSolidBrush,DeleteObject,BitBlt,ReleaseDC,DeleteDC,GradientFill,SetBkMode,FillRect,GetPixel,PostMessage,

======窗口程序集1
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |------ _图形按钮退出_被单击
           |  |
           |  |------ _时钟进度_周期事件
           |  |
           |  |------ 滚动窗口标题
           |  |
           |  |------ _透明标签进度_鼠标左键被按下
           |  |
           |  |------ _透明标签_VOLFill_鼠标左键被按下
           |  |
           |  |------ 调整进度
           |  |
           |  |------ 调整音量
           |  |
           |  |------ _图形按钮最小化_被单击
           |  |
           |  |------ _图形按钮打开_被单击
           |  |
           |  |------ _图形按钮静音_被单击
           |  |
           |  |------ _图形按钮暂停_被单击
           |  |
           |  |------ _图形按钮播放_被单击
           |  |
           |  |------ _图形按钮停止_被单击
           |  |
           |  |------ 调整播放状态
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 初始化设置
           |  |
           |  |------ 初始化主窗口皮肤
           |  |
           |  |------ _时钟频谱_周期事件
           |  |
           |  |------ 取歌曲属性
           |  |
           |  |------ _编辑框进度_内容被改变
           |  |
           |  |------ _编辑框音量_内容被改变
           |  |
           |  |------ _图形按钮进度_鼠标左键被按下
           |  |
           |  |------ _图形按钮进度_鼠标左键被放开
           |  |
           |  |------ _图形按钮音量_鼠标左键被放开
           |  |
           |  |------ _图形按钮进度_鼠标位置被移动
           |  |
           |  |------ _图形按钮音量_鼠标位置被移动
           |  |
           |  |------ _选择框1_被单击
           |  |
           |  |------ 滚动歌曲信息
           |  |
           |  |------ __启动窗口_鼠标右键被放开
           |  |
           |  |------ _千千选项_被选择
           |  |
           |  |------ _图形按钮时间_被单击
           |  |
           |  |------ _透明标签信息_鼠标左键被放开
           |  |
           |  |------ _图形按钮均衡器_被单击
           |  |
           |  |------ __启动窗口_位置被改变
           |  |
           |  |------ _查看总在最前_被选择
           |  |
           |  |------ _拖放对象_得到文件
           |  |
           |  |------ _播放_被选择
           |  |
           |  |------ _停止_被选择
           |  |
           |  |------ _快退5秒_被选择
           |  |
           |  |------ _快进5秒_被选择
           |  |
           |  |------ _上一首_被选择
           |  |
           |  |------ _下一首_被选择
           |  |
           |  |------ _播放文件_被选择
           |  |
           |  |------ _播放CDDVD_被选择
           |  |
           |  |------ _播放URL_被选择
           |  |
           |  |------ _关闭文件_被选择
           |  |
           |  |------ _音量增大_被选择
           |  |
           |  |------ _音量减小_被选择
           |  |
           |  |------ _音量静音_被选择
           |  |
           |  |------ _透明标签信息_被双击
           |  |
           |  |------ _图形按钮图标_被单击
           |  |
           |  |------ _气球提示框_提示框即将弹出
           |  |
           |  |------ __启动窗口_鼠标左键被按下
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |
======公用程序集
           |  |
           |  |------ 取中间文本
           |  |
           |  |------ 十六进制到十进制
           |  |
           |  |------ 取文件目录
           |  |
           |  |
======MP3信息
           |  |
           |  |------ GetMP3V1
           |  |
           |  |------ V1OrNot
           |  |
           |  |------ GetMP3V2
           |  |
           |  |------ V2OrNot
           |  |
           |  |------ GetV2Longth
           |  |
           |  |------ GetMP3V2Frame
           |  |
           |  |------ 字节集倒序
           |  |
           |  |
======视觉效果
           |  |
           |  |------ GetRGBValue
           |  |
           |  |------ ComputeRECT
           |  |
           |  |------ DrawRECT
           |  |
           |  |------ DrawRECT_API
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 调整亮度
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ _窗口设置_创建完毕
           |  |
           |  |------ 初始化位置
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _超级按钮2_被单击
           |  |
           |  |------ _超级按钮5_被单击
           |  |
           |  |------ _窗口设置_可否被关闭
           |  |
           |  |------ _常规选择框任务栏滚动标题_被单击
           |  |
           |  |------ _视觉效果滑块条宽度_位置被改变
           |  |
           |  |------ _视觉效果滑块条间隔_位置被改变
           |  |
           |  |------ _视觉效果滑块条频带衰减_位置被改变
           |  |
           |  |------ _视觉效果滑块条顶峰衰减_位置被改变
           |  |
           |  |------ _视觉效果滑块条顶峰延迟_位置被改变
           |  |
           |  |------ _窗口设置_被显示
           |  |
           |  |------ _常规选择框系统栏显示图标_被单击
           |  |
           |  |------ _常规选择框多列显示曲目_被单击
           |  |
           |  |
======LED
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ 置时间
           |  |
           |  |------ 格式化秒
           |  |
           |  |------ 格式化分
           |  |
           |  |------ 取播放时间
           |  |
           |  |------ 置总时间
           |  |
           |  |------ 置反转
           |  |
           |  |
======Skins
           |  |
           |  |------ 置图片
           |  |
           |  |------ 取图片
           |  |
           |  |------ 符号匹配
           |  |
           |  |------ 取信息
           |  |
           |  |------ 置位置
           |  |
           |  |------ 置透明标签
           |  |
           |  |------ 置图片框
           |  |
           |  |------ 取位置
           |  |
           |  |------ 提取配置
           |  |
           |  |------ 载入配置文件
           |  |
           |  |
======主窗口皮肤
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |
======均衡器程序集
           |  |
           |  |------ _EQUALIZER_创建完毕
           |  |
           |  |------ 初始化均衡器皮肤
           |  |
           |  |------ _图形按钮退出_被单击
           |  |
           |  |------ _编辑框平衡_内容被改变
           |  |
           |  |------ _图形按钮平衡_鼠标左键被按下
           |  |
           |  |------ _图形按钮平衡_鼠标左键被放开
           |  |
           |  |------ _图形按钮环绕_鼠标左键被按下
           |  |
           |  |------ _图形按钮环绕_鼠标左键被放开
           |  |
           |  |------ _编辑框环绕_内容被改变
           |  |
           |  |
======窗口程序集3
           |  |
           |  |------ _MINI_创建完毕
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   BASS_GetVersion
           |  |
           |  |---[dll]------   BASS_Init
           |  |
           |  |---[dll]------   BASS_Free
           |  |
           |  |---[dll]------   BASS_StreamCreateFile
           |  |
           |  |---[dll]------   BASS_ChannelPlay
           |  |
           |  |---[dll]------   BASS_ChannelPause
           |  |
           |  |---[dll]------   BASS_ChannelStop
           |  |
           |  |---[dll]------   BASS_ChannelBytes2Seconds
           |  |
           |  |---[dll]------   BASS_ChannelGetPosition
           |  |
           |  |---[dll]------   BASS_ChannelSetPosition
           |  |
           |  |---[dll]------   BASS_ChannelGetLength
           |  |
           |  |---[dll]------   BASS_ChannelSeconds2Bytes
           |  |
           |  |---[dll]------   BASS_ChannelGetAttributes
           |  |
           |  |---[dll]------   BASS_ChannelSetAttributes
           |  |
           |  |---[dll]------   BASS_StreamFree
           |  |
           |  |---[dll]------   BASS_ChannelIsActive
           |  |
           |  |---[dll]------   BASS_ChannelGetLevel
           |  |
           |  |---[dll]------   BASS_ChannelGetData
           |  |
           |  |---[dll]------   MoveMemory1
           |  |
           |  |---[dll]------   MoveMemory2
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   mouse_event
           |  |
           |  |---[dll]------   SetTimer
           |  |
           |  |---[dll]------   KillTimer
           |  |
           |  |---[dll]------   Rectangle
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   CreateCompatibleBitmap
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   CreatePen
           |  |
           |  |---[dll]------   CreateSolidBrush
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   ReleaseDC
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   GradientFill
           |  |
           |  |---[dll]------   SetBkMode
           |  |
           |  |---[dll]------   FillRect
           |  |
           |  |---[dll]------   GetPixel
           |  |
           |  |---[dll]------   PostMessage

调用的DLL命令:

.DLL命令 BASS_GetVersion, 整数型, "bass.dll", "BASS_GetVersion"

.DLL命令 BASS_Init, 逻辑型, "bass.dll", "BASS_Init", , MediaInitialization
    .参数 device, 整数型
    .参数 freq, 整数型
    .参数 flags, 整数型
    .参数 win, 整数型
    .参数 clsid, 整数型

.DLL命令 BASS_Free, , "bass.dll", "BASS_Free", , 释放

.DLL命令 BASS_StreamCreateFile, 整数型, "bass.dll", "BASS_StreamCreateFile", , 打开文件
    .参数 mem, 逻辑型
    .参数 file, 文本型, 传址
    .参数 offset, 整数型
    .参数 length, 整数型
    .参数 flags, 整数型

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

.DLL命令 BASS_ChannelPause, 整数型, "bass.dll", "BASS_ChannelPause", , 暂停
    .参数 handle, 整数型

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

.DLL命令 BASS_ChannelBytes2Seconds, 小数型, "bass.dll", "BASS_ChannelBytes2Seconds", , 通过指针取位置/s
    .参数 handle, 整数型
    .参数 pos, 整数型
    .参数 poshigh, 整数型

.DLL命令 BASS_ChannelGetPosition, 整数型, "bass.dll", "BASS_ChannelGetPosition"
    .参数 handle, 整数型

.DLL命令 BASS_ChannelSetPosition, 整数型, "bass.dll", "BASS_ChannelSetPosition", , 设定当前位置
    .参数 handle, 整数型
    .参数 pos, 整数型
    .参数 mode, 整数型

.DLL命令 BASS_ChannelGetLength, 整数型, "bass.dll", "BASS_ChannelGetLength", , 取流长度指针
    .参数 handle, 整数型

.DLL命令 BASS_ChannelSeconds2Bytes, 整数型, "bass.dll", "BASS_ChannelSeconds2Bytes", , 当前位置指针
    .参数 handle, 整数型
    .参数 pos, 小数型

.DLL命令 BASS_ChannelGetAttributes, 整数型, "bass.dll", "BASS_ChannelGetAttributes", , getvol属性
    .参数 handle, 整数型, , 当前播放句柄
    .参数 freq, 整数型, 传址, 采样率
    .参数 volume, 整数型, 传址, 音量
    .参数 pan, 整数型, 传址

.DLL命令 BASS_ChannelSetAttributes, 整数型, "bass.dll", "BASS_ChannelSetAttributes", , setvol
    .参数 handle, 整数型
    .参数 freq, 整数型
    .参数 volume, 整数型
    .参数 pan, 整数型

.DLL命令 BASS_StreamFree, 整数型, "bass.dll", "BASS_StreamFree", , 释放选中歌曲
    .参数 handle, 整数型

.DLL命令 BASS_ChannelIsActive, 整数型, "bass.dll", "BASS_ChannelIsActive", , 状态
    .参数 handle, 整数型

.DLL命令 BASS_ChannelGetLevel, 整数型, "bass.dll", "BASS_ChannelGetLevel", , 声道峰值
    .参数 handle, 整数型

.DLL命令 BASS_ChannelGetData, 整数型, "bass.dll", "BASS_ChannelGetData", , FFT
    .参数 handle, 整数型
    .参数 buffer, 小数型, 数组
    .参数 length, 整数型

.DLL命令 MoveMemory1, , "kernel32.dll", "RtlMoveMemory", , CopyMemory
    .参数 pDest, 整数型
    .参数 pSrc, MINMAXINFO
    .参数 ByteLen, 字节型

.DLL命令 MoveMemory2, , "kernel32.dll", "RtlMoveMemory", , CopyMemory1　
    .参数 pDest, MINMAXINFO
    .参数 pSrc, 整数型
    .参数 ByteLen, 字节型

.DLL命令 SetWindowLong, 整数型, , "SetWindowLongA", , 在窗口结构中为指定的窗口设置信息  指定数据的前一个值
    .参数 hwnd, 整数型, , 窗口句柄，欲为其取得信息的窗口的句柄
    .参数 nIndex, 整数型, , 窗口信息值，请参考GetWindowLong函数的nIndex参数的说明
    .参数 dwNewLong, 整数型, , 窗口信息新值，由nIndex指定的窗口信息的新值

.DLL命令 CallWindowProc, 整数型, , "CallWindowProcA", , CallWindowProcA将消息传答窗口函数　
    .参数 lpPrevWndFunc, 整数型, , 前一窗口函数地址
    .参数 hwnd, 整数型, , 窗口句柄
    .参数 msg, 整数型, , 消息值
    .参数 wParam, 整数型, , 附加参数1
    .参数 lParam, 整数型, , 附加参数2

.DLL命令 GetWindowRect, , , "GetWindowRect", , 获得窗口的矩形坐标
    .参数 hWnd, 整数型
    .参数 lpRect, RECT

.DLL命令 mouse_event, , , "mouse_event", , 设置或读取鼠标事件
    .参数 dwFlags, 整数型, , 标志位集，指定点击按钮和鼠标动作的多种情况
    .参数 dx
    .参数 dy
    .参数 dwData
    .参数 dwExtraInfo

.DLL命令 SetTimer, 整数型, "user32.dll", "SetTimer", , SetTimer
    .参数 窗口句柄, 整数型, , hwnd
    .参数 事件标识符, 整数型, , nIDEvent
    .参数 时钟周期, 整数型, , uElapse
    .参数 回调函数地址, 整数型, , lpTimerFunc

.DLL命令 KillTimer, 整数型, "user32.dll", "KillTimer", , KillTimer
    .参数 窗口句柄, 整数型, , hwnd
    .参数 事件标识符, 整数型, , nIDEvent

.DLL命令 Rectangle, 整数型, "gdi32", "Rectangle", 公开, 用当前选定的画笔描绘矩形，并用当前选定的刷子进行填充  非零表示成功，零表示失败。会设置GetLastError
    .参数 设备场景句柄, 整数型, , 设备场景的句柄
    .参数 左上角横坐标, 整数型, , 指定矩形左上角位置
    .参数 左上角纵坐标, 整数型, , 同上
    .参数 右下角横坐标, 整数型, , 指定矩形右下角位置
    .参数 右下角纵坐标, 整数型, , 同上;

.DLL命令 GetDC, 整数型, "user32", "GetDC", 公开, 获取指定窗口的设备场景  指定窗口的设备场景句柄，出错则为0
    .参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;

.DLL命令 CreateCompatibleDC, 整数型, "gdi32", "CreateCompatibleDC", 公开, 创建一个与特定设备场景一致的内存设备场景  新设备场景句柄，若出错则为零
    .参数 设备场景句柄, 整数型, , 设备场景句柄。新的设备场景将与它一致。也可能为0以创建一个与屏幕一致的设备场景;

.DLL命令 CreateCompatibleBitmap, 整数型, "gdi32", "CreateCompatibleBitmap", 公开, 创建一幅与设备有关位图，它与指定的设备场景兼容  执行成功返回位图句柄，零表示失败
    .参数 设备场景句柄, 整数型, , 设备场景的句柄
    .参数 宽度, 整数型, , 位图宽度，以像素为单位
    .参数 高度, 整数型, , 位图高度，以像素为单位;

.DLL命令 SelectObject, 整数型, "gdi32", "SelectObject", 公开, 每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔决定了在设备场景中描绘的线段颜色及样式  与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION， ;    COMPLEXREGION 或 NULLREGION 对区域进行描述， GDI_ERROR 表示出错
    .参数 设备场景句柄, 整数型, , 一个设备场景的句柄
    .参数 对象句柄, 整数型, , 一个画笔、位图、刷子、字体或区域的句柄;

.DLL命令 CreatePen, 整数型, "gdi32", "CreatePen", 公开, 用指定的样式、宽度和颜色创建一个画笔  如函数执行成功，就返回指向新画笔的一个句柄；否则返回零
    .参数 风格, 整数型, , 指定画笔样式，可以是下述常数之一;PS_SOLID：画笔画出的是实线;PS_DASH：画笔画出的是虚线（nWidth必须是1）;PS_DOT：画笔画出的是点线（nWidth必须是1）;PS_DASHDOT：画笔画出的是点划线（nWidth必须是1）;PS_DASHDOTDOT：画笔画出的是点-点-划线（nWidth必须是1）;PS_NULL：画笔不能画图;PS_INSIDEFRAME：画笔在由椭圆、矩形、圆角矩形、饼图以及弦等生成的封闭对象框中画图。如指定的准确RGB颜色不存在，就进行抖动处理
    .参数 宽度, 整数型, , 以逻辑单位表示的画笔的宽度
    .参数 颜色, 整数型, , 画笔的RGB颜色;

.DLL命令 CreateSolidBrush, 整数型, "gdi32", "CreateSolidBrush", 公开, 用纯色创建一个刷子  如执行成功，返回新刷子的一个句柄；否则返回零
    .参数 颜色值, 整数型, , 数字的RGB彩色;

.DLL命令 DeleteObject, 整数型, "gdi32", "DeleteObject", 公开, 用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放  非零表示成功，零表示失败
    .参数 对象句柄, 整数型, , 一个GDI对象的句柄;

.DLL命令 BitBlt, 整数型, "gdi32", "BitBlt", 公开, 将一幅位图从一个设备场景复制到另一个。源和目标DC相互间必须兼容  非零表示成功，零表示失败。会设置GetLastError
    .参数 目标设备场景, 整数型, , 目标设备场景
    .参数 目标横坐标, 整数型, , 对目标DC中目标矩形左上角位置进行描述的那个点。用目标DC的逻辑坐标表示
    .参数 目标纵坐标, 整数型, , 同上
    .参数 传输图像宽度, 整数型, , 欲传输图象的宽度和高度
    .参数 传输图像高度, 整数型, , 同上
    .参数 源设备场景, 整数型, , 源设备场景。如光栅运算未指定源，则应设为0
    .参数 源横坐标, 整数型, , 对源DC中源矩形左上角位置进行描述的那个点。用源DC的逻辑坐标表示
    .参数 源纵坐标, 整数型, , 同上
    .参数 光栅运算方式, 整数型, , 传输过程要执行的光栅运算;

.DLL命令 ReleaseDC, 整数型, "user32", "ReleaseDC", 公开, 释放由调用GetDC或GetWindowDC函数获取的指定设备场景。它对类或私有设备场景无效（但这样的调用不会造成损害）  执行成功为1，否则为0
    .参数 窗口句柄, 整数型, , 要释放的设备场景相关的窗口句柄
    .参数 设备场景, 整数型, , 要释放的设备场景句柄;

.DLL命令 DeleteDC, 整数型, "gdi32", "DeleteDC", 公开, 删除专用设备场景或信息场景，释放所有相关窗口资源。不要将它用于GetDC函数取回的设备场景  执行成功则为非零，失败则为零
    .参数 设备场景句柄, 整数型, , 将要删除的设备场景  在vb里使用不要将它用于由vb hdc属性获取的设备场景句柄;

.DLL命令 GradientFill, 整数型, "msimg32.dll", "GradientFill", 公开
    .参数 hdc, 整数型
    .参数 pVertex, TRIVERTEX, 数组
    .参数 dwNumVertex, 整数型
    .参数 pMesh, 整数型
    .参数 dwNumMesh, 整数型
    .参数 dwMode, 整数型

.DLL命令 SetBkMode, , , "SetBkMode"
    .参数 hDC, 整数型
    .参数 Mode, 整数型

.DLL命令 FillRect, , , "FillRect"
    .参数 hDC, 整数型
    .参数 lprc, RECT, 传址
    .参数 hbr, 整数型

.DLL命令 GetPixel, 整数型, , "GetPixel"
    .参数 hdc, , , 设备环境句柄
    .参数 nXPos, , , 指定要检查的像素点的逻辑X轴坐标。
    .参数 nYPos, , , 指定要检查的像素点的逻辑Y轴坐标。

.DLL命令 PostMessage, 整数型, , "PostMessageA"
    .参数 hwnd
    .参数 msg
    .参数 wp
    .参数 lp