易语言图像运动识别源码

系统结构:子程序1,子程序2,子程序3,取屏幕截图,处理图片,判断是否变化,解析RGB颜色,画出错误点,GdipCloneRegion,CreateDCA,BitBlt,GdipGraphicsClear,SetLayeredWindowAttributes,SetWindowLongA,GetWindowLongA,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ __启动窗口_将被销毁
           |  |
           |  |
======程序集1
           |  |
           |  |------ 子程序1
           |  |
           |  |------ 子程序2
           |  |
           |  |------ 子程序3
           |  |
           |  |------ 取屏幕截图
           |  |
           |  |------ 处理图片
           |  |
           |  |------ 判断是否变化
           |  |
           |  |------ 解析RGB颜色
           |  |
           |  |------ 画出错误点
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ __窗口_范围窗口_创建完毕
           |  |
           |  |------ __窗口_范围窗口_尺寸被改变
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GdipCloneRegion
           |  |
           |  |---[dll]------   CreateDCA
           |  |
           |  |---[dll]------   BitBlt
           |  |
           |  |---[dll]------   GdipGraphicsClear
           |  |
           |  |---[dll]------   SetLayeredWindowAttributes
           |  |
           |  |---[dll]------   SetWindowLongA
           |  |
           |  |---[dll]------   GetWindowLongA

调用的DLL命令:

.DLL命令 GdipCloneRegion, 整数型, "GdiPlus.dll", "GdipCloneRegion"
    .参数 region, 整数型
    .参数 cloneRegion, 整数型, 传址

.DLL命令 CreateDCA, 整数型, , "CreateDCA"
    .参数 lpDriverName, 文本型
    .参数 lpDeviceName, 文本型
    .参数 lpOutput, 文本型
    .参数 lpInitData, 整数型

.DLL命令 BitBlt, 整数型, , "BitBlt"
    .参数 hDestDC
    .参数 x
    .参数 y
    .参数 nWidth
    .参数 nHeight
    .参数 hSrcDC
    .参数 xSrc
    .参数 ySrc
    .参数 dwRop

.DLL命令 GdipGraphicsClear, 整数型, "GdiPlus.dll", "GdipGraphicsClear", 公开
    .参数 graphics, 整数型
    .参数 color, 整数型

.DLL命令 SetLayeredWindowAttributes, 整数型, , "SetLayeredWindowAttributes"
    .参数 句柄, 整数型
    .参数 抠像颜色, 整数型
    .参数 透明度, 整数型
    .参数 模式, 整数型

.DLL命令 SetWindowLongA, 整数型, , "SetWindowLongA"
    .参数 句柄, 整数型
    .参数 风格, 整数型
    .参数 参数, 整数型

.DLL命令 GetWindowLongA, 整数型, , "GetWindowLongA"
    .参数 句柄, 整数型
    .参数 参数, 整数型