鼠标模拟点击

Panel

周末了想下个游戏发现逃离塔克夫下载过程中每隔几分钟会提示一个网络报错导致下载终止，所以就写了一个模拟点击重试的小工具
食用方法：
1.鼠标放到要模拟点击的位置按下F8
2.点击“开启点击”就开始模拟点击了，3秒模拟一次
3.按下F9关闭模拟点击
4.易语言写的，报毒无法
5.下载地址：https://fbxy.lanzouq.com/iRNBU1jdutkd



源码：

[C] 纯文本查看 复制代码

.版本 2
.支持库 eAPI

.程序集 窗口程序集_启动窗口
.程序集变量 jyzb, 精易_坐标
.程序集变量 xcid, 整数型

.子程序 __启动窗口_创建完毕

窗口_热键注册 (取窗口句柄 (), , #F8键, &rjsj, 99)
窗口_热键注册 (取窗口句柄 (), , #F9键, &jsxc, 100)


.子程序 rjsj

jyzb ＝ 鼠标_取位置 ()
编辑框1.内容 ＝ 到文本 (jyzb.横)
编辑框2.内容 ＝ 到文本 (jyzb.纵)



.子程序 jsxc

线程_销毁 (xcid)


.子程序 _按钮1_被单击

xcid ＝ 线程_启动 (&djjj, , )


.子程序 djjj

.判断循环首 (真)
    模拟鼠标点击 (jyzb.横, jyzb.纵, 1)
    延时 (3000)
.判断循环尾 ()

Panel

代码风格很拉跨，因为当初只是想着自己用所以就随便写的。。。

xionghuaxin

以下是源码对吧，我粘贴进去，运行报错，麻烦大侠帮我看看我哪个地方出错了，谢谢！
.版本 2
.支持库 eAPI

.程序集 窗口程序集_启动窗口
.程序集变量 jyzb, 精易_坐标
.程序集变量 xcid, 整数型

.子程序 __启动窗口_创建完毕

窗口_热键注册 (取窗口句柄 (), , #F8键, &rjsj, 99)
窗口_热键注册 (取窗口句柄 (), , #F9键, &jsxc, 100)


.子程序 rjsj

jyzb ＝ 鼠标_取位置 ()
编辑框1.内容 ＝ 到文本 (jyzb.横)
编辑框2.内容 ＝ 到文本 (jyzb.纵)



.子程序 jsxc

线程_销毁 (xcid)


.子程序 _按钮1_被单击

xcid ＝ 线程_启动 (&djjj, , )


.子程序 djjj

.判断循环首 (真)
    模拟鼠标点击 (jyzb.横, jyzb.纵, 1)
    延时 (3000)
.判断循环尾 ()

雾都孤尔

能加入间隔时间的设置吗？感谢分享。

Panel

雾都孤尔 发表于 2023-12-30 15:38
能加入间隔时间的设置吗？感谢分享。

有源码的，自己改一下即可

aijiujiu123

666.厉害

KYJLX1314

可以用来打穿越火线吗，会不会封号呀

27149

感谢楼主分享！

霹雳游侠

有个缺点啊,就是启动没有快捷键

同舟

易语言写就是最方便，