永发信息网

按键精灵脚本,我想开3个窗口,隔20秒自动移动到下个窗口点击按钮,依次类推,点完第三个然后从头重复操作

答案:2  悬赏:10  手机版
解决时间 2021-02-03 06:55
  • 提问者网友:风月客
  • 2021-02-02 09:29
按键精灵脚本,我想开3个窗口,隔20秒自动移动到下个窗口点击按钮,依次类推,点完第三个然后从头重复操作
最佳答案
  • 五星知识达人网友:不甚了了
  • 2021-02-02 10:51
1、打开按键精灵
2、点击“新建”
3、点击“源文件”
4、将以下内容粘贴上去:
Hwnd = Plugin.Window.Foreground()
Delay 500
Rem SSS
Delay 500
Call Plugin.Bkgnd.KeyDown(Hwnd, 37)
Delay 500
Call Plugin.Bkgnd.KeyUp(Hwnd, 37)
Delay 500
Delay 3000
Call Plugin.Bkgnd.KeyDown(Hwnd, 39)
Delay 500
Call Plugin.Bkgnd.KeyUp(Hwnd, 39)
Delay 500
Delay 3000
Goto SSS
5、点击“保存退出”
F10开始,F12结束
后台操作,可最小化。不知道DNF有没有效果,你试试吧。要是DNF不支持后台的话就改成前台的吧。
晕 发错了
全部回答
  • 1楼网友:不想翻身的咸鱼
  • 2021-02-02 11:00
dim i,n dim x(2),y(2) i=0 n=0 vbscall getcursorpos(x(i),y(i)) while i<2 //设置延时,2分钟内5次 delay 120000/5 //这里用绝对值函数,使i在0与1之间互相转化 i=abs(i-1) vbscall getcursorpos(x(i),y(i)) if x(0)=x(1) and y(0)=y(1) n=n+1 else n=0 endif //上面的if语句里比较最近两次鼠标坐标,只要一有变化则计数器n清0 //当连续5次鼠标无变化时,则执行 if n>4 moveto 450,350 delay 5 leftclick 1 n=0 endif endwhile 把上面的粘贴到按键精灵里会睇得更清楚。 其实无必要比较完5次啦,只要比较最近两次有无变化就行了。如果确实要看比较5次的脚本,那可以有如下程序(上下两个脚本效果一样): dim i,n dim x(5),y(5) i=0 while i<5 delay 120000/5 vbscall getcursorpos(x(i),y(i)) n=0 while n<i //这个循环用来比较数组内的数值 if x(n)=x(i) and y(n)=y(i) if n=3 moveto 450,350 delay 5 leftclick 1 i=-1 //这里初始化i,就可以不断循环检测 endif n=n+1 else i=-1 endif endwhile i=i+1 endwhile
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯