易语言水波纹源码

系统结构:装载图片,水周期,水波特效,装载图片_,接收装载图返回的整数,水周期_,窗口绘图,水波特效_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ __启动窗口_鼠标位置被移动
  ======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 装载图片
           |  |
           |  |------ 水周期
           |  |
           |  |------ 水波特效
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   装载图片_
           |  |
           |  |---[dll]------   接收装载图返回的整数
           |  |
           |  |---[dll]------   水周期_
           |  |
           |  |---[dll]------   窗口绘图
           |  |
           |  |---[dll]------   水波特效_

调用的DLL命令:

.DLL命令 装载图片_, 整数型, , "LoadImageA"
    .参数 其它, 整数型, , 一般设置为0
    .参数 图片路径, 文本型, , 图片路径
    .参数 其它, 整数型, , 一般设置为0
    .参数 其它, 整数型, , 一般设置为0
    .参数 其它, 整数型, , 一般设置为0
    .参数 设置为16, 整数型, , 可以设置为16

.DLL命令 接收装载图返回的整数, 整数型, "waterdll.dll", "WaterInit"
    .参数 装载图片返回的整数, 整数型

.DLL命令 水周期_, 整数型, "waterdll.dll", "WaterTimer"
    .参数 窗口绘图返回的, 整数型
    .参数 其它, 整数型, , 设置为0就可以了
    .参数 其它, 整数型, , 这只为0就可以了

.DLL命令 窗口绘图, 整数型, , "GetDC"
    .参数 窗口句柄, 整数型

.DLL命令 水波特效_, 整数型, "waterdll.dll", "WaterMouseAction"
    .参数 窗口绘图返回的, 整数型
    .参数 其它, 整数型, , 设置为0
    .参数 其它, 整数型, , 设置为0
    .参数 横行位置, 整数型
    .参数 纵向位置, 整数型
    .参数 扩张半径, 整数型, , 扩展半径  一般为5最佳
    .参数 扩张深度, 整数型, , 扩展深度  一般为100最佳