易语言手柄模拟鼠标键盘源码

系统结构:API_取鼠标位置_,API_移动鼠标_,API_模拟鼠标_,API_模拟键盘行动_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _输入设备1_控制器按钮改变
           |  |
           |  |------ _输入设备1_控制器位置改变
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ _输入设备1_键盘按键状态被改变
           |  |
           |  |------ _动画框1_按下某键
           |  |
           |  |------ _输入设备1_鼠标按键被改变
           |  |
           |  |------ _输入设备1_鼠标位置改变
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_取鼠标位置_
           |  |
           |  |---[dll]------   API_移动鼠标_
           |  |
           |  |---[dll]------   API_模拟鼠标_
           |  |
           |  |---[dll]------   API_模拟键盘行动_

调用的DLL命令:

.DLL命令 API_取鼠标位置_, 整数型, "user32.dll", "GetCursorPos", , ,
    .参数 位置, 坐标_

.DLL命令 API_移动鼠标_, , "user32.dll", "SetCursorPos", , user32.dll
    .参数 x, 整数型
    .参数 y, 整数型

.DLL命令 API_模拟鼠标_, , "user32.dll", "mouse_event", , , mouse_event,模拟一次鼠标事件
    .参数 标志组合, 整数型, , dwFlags，1-鼠标移动,2-左键按下,4-左键抬起,8-右键按下,16-右键抬起,32-中键按下,64-中键抬起,128-是否用绝对值坐标
    .参数 水平方向, 整数型, , dx，指定鼠标沿x轴的绝对位置或者从上次鼠标事件产生以来移动的数量，依赖于MOUSEEVENTF_ABSOLUTE的设置
    .参数 垂直方向, 整数型, , dy，指定鼠标沿y轴的绝对位置或者从上次鼠标事件产生以来移动的数量，依赖于MOUSEEVENTF_ABSOLUTE的设置
    .参数 数据信息, 整数型, , dwData，如果dwFlags为MOUSEEVENTF_WHEEL，则dwData指定鼠标轮移动的数量。正值表明鼠标轮向前转动，即远离用户的方向；负值表明鼠标轮向后转动，即朝向用户。一个轮击定义为WHEEL_DELTA，即120
    .参数 扩展数据信息, 整数型, , dwExtraInfo，指定与鼠标事件相关的附加32位值。调用函数GetMessageExtraInfo来获得此附加信息

.DLL命令 API_模拟键盘行动_, 整数型, "user32.dll", "keybd_event", , , 这个函数模拟了键盘行动
    .参数 键代码, 整数型, , bVk,欲模拟的虚拟键码，1～254之间
    .参数 键扫描码, 整数型, , bScan,键的OEM扫描码，一般为0
    .参数 标志值, 整数型, , dwFlags,标志常数，0按下，2弹起
    .参数 特定值, 整数型, , dwExtraInfo,通常不用的一个值，一般为0