易语言仿按键精灵录制键盘鼠标操作的代码易语言仿按键精灵录制键盘鼠标操作的代码
今天小编就为大家分享一篇关于易语言仿按键精灵录制键盘鼠标操作的代码，小编觉得内容挺不错的，现在分
享给大家，具有很好的参考价值，需要的朋友一起跟随小编来看看吧
DLL命令表命令表
.版本 2
.DLL命令 取按键状态, 短整数型, "user32.dll", "GetAsyncKeyState"
.参数 鼠标键, 整数型
.DLL命令 取鼠标位置, 整数型, "user32.dll", "GetCursorPos"
.参数 当前鼠标位置, 鼠标位置, 传址
.DLL命令 模拟鼠标按键, , , "mouse_event"
.参数 鼠标动作, 整数型
.参数 水平位置, 整数型
.参数 垂直位置, 整数型
.参数 鼠标按键, 整数型
.参数 扩展信息, 整数型
.DLL命令 模拟键盘按键, , , "keybd_event"
.参数 bVk, 字节型
.参数 bScan, 字节型
.参数 dwFlags, 整数型
.参数 dwExtraInfo, 整数型
自定义数据类型自定义数据类型
.版本 2
.数据类型 鼠标位置
.成员 横向坐标, 整数型
.成员 纵向坐标, 整数型
.数据类型 按键记录, , 记录长度13个字节.
.成员 时间间隔, 整数型
.成员 键值, 字节型, , , 0，鼠标移动；其他为键盘键值
.成员 键盘动作, 整数型, , , 或者是 鼠标水平位置
.成员 垂直位置, 整数型, , , 鼠标垂直位置
鼠标键盘录制的代码鼠标键盘录制的代码
.版本 2
.程序集 程序集_主窗口
.程序集变量 按键状态, 整数型, , "256"
.程序集变量 时间线, 整数型
.程序集变量 鼠标前次位置, 鼠标位置
.程序集变量 操作记录, 按键记录, , "92000"
.程序集变量 缓冲区记录数, 文本型
.程序集变量 当前记录, 整数型
.程序集变量 可否中断, 逻辑型
.程序集变量 屏幕宽度, 整数型
.程序集变量 屏幕高度, 整数型
.程序集变量 停止回放, 逻辑型
.子程序 判断按键
.参数 键值, 字节型
.参数 当前状态, 整数型
.判断开始 (当前状态 ＝ 0)
.如果真 (按键状态 [键值 ＋ 1] ≠ 0)
添加记录 (键值, #键抬起, 0)
.如果真结束
.判断 (当前状态 ≠ 0)
.如果 (键值 ＝ #F3键)
可否中断 ＝ 真
返回 ()
.否则
.如果结束
.如果真 (按键状态 [键值 ＋ 1] ＝ 0)
添加记录 (键值, #键按下, 0)
.如果真结束
.默认
.判断结束
按键状态 [键值 ＋ 1] ＝ 当前状态
.子程序 添加记录
.参数 键值, 字节型, , 为0表示鼠标移动，其他表示按键
.参数 键盘动作, 整数型, , 或 “水平位置”，传入的双精度数
.参数 垂直位置, 整数型
当前记录 ＝ 当前记录 ＋ 1
.如果 (当前记录 ＞ 取数组成员数 (操作记录))
可否中断 ＝ 真
信息框 (“缓冲区已满，录制被迫中止。”, #错误图标, “录制出错”)
返回 ()
评论1