TC官方合作论坛

标题: 【剑仙教程】按住鼠标左键，则开始连发。放开则停止连发。 [打印本页]

作者: 剑仙十号 时间: 2016-11-1 18:35
标题: 【剑仙教程】按住鼠标左键，则开始连发。放开则停止连发。
【剑仙教程】按住鼠标左键，则开始连发。放开则停止连发。
.
制作原理：前台和后台的api是分开的。先获取目标窗口句柄，
检测到前台的api按住时(GetAsyncKeyState)，用后台的api发送按键。
.
鼠标双击，获取鼠标指向的窗口句柄。代码记在
【剑仙教程】前台找图，后台找图，设置起点座标。
.

var hwndmp //鼠标指向的窗口句柄
hwndmp = 双击获取hwndmp()

//
功能双击获取hwndmp()

变量 arr = 数组(), i = 0,  hwndmp

消息框("把鼠标移到目标窗口,双击获取窗口句柄。\n\n回车键，空格键关闭本弹窗。")

消息框("注意：很多窗口，主窗口带有子窗口，子窗口带有孙窗口。鼠标请放在目标窗口。")

循环(真)

变量 code鼠标 = 鼠标等待点击()

如果(code鼠标 == 1001)

arr[i] = 获取系统时间()

i = i + 1

如果(i > 1)

变量单击间隔 = arr[i - 1] -  arr[i - 2]

调试输出("两次单击的间隔是:" & 单击间隔)

如果(单击间隔 < 600) //鼠标双击成立.

hwndmp = 窗口获取鼠标所在句柄()

消息框("窗口句柄为:" &  hwndmp & "\n\n回车/空格键关闭本弹窗。")

返回 hwndmp

结束

结束

结束

等待(30)

结束

结束

作者: aa7914 时间: 2017-2-22 14:34
这个,,是哪个版本使用的? 50 40 ?

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)