脚本鼠标
⑴ 按键精灵设置鼠标移动脚本
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
⑵ 高分求一个按键精灵后台鼠标脚本
运行脚本前,先把鼠标移到需要点击的坐标 按启动热键 然后就可以做其他的事情了 还有就是这个只能单击 至于按键Y和U你可以加在EndFor 前面 但是不支持组合按键 所有ctrl+v无法实现 因为现在按键精灵还不支持后台组合按键 不过你可以用按住ctrl 延时 500毫秒 在按键v 延时500毫秒 然后谈起ctrl 你实验一下 应该成功
Plugin hw=Window.MousePoint()
VBSCall GetCursorPos(x,y)
Plugin winxy=BGKM5.ScrToCli(hw,x,y)
VBS StrXY_len = InStr(winxy,"|")
VBS wdx=Left(winxy,StrXY_len-1)
wdx=int(wdx)
VBS wdY=Right(winxy,StrXY_len-1)
wdy=int(wdy)
While
Plugin BGKM5.LClick(hw,wdx,wdy)
Delay 300
EndFor
⑶ 关于鼠标连续点击(或脚本)
按键精灵有免费的。
个人觉得他在完成单调的工作是很好的工具
⑷ 按键精灵鼠标移动和点击脚本
你可以录制一个,然后改一下
下面的是循环1000次,你可以改一下
到时候你可以在外面设置F10是开启,F12是暂停
For 1000
Delay 50
MoveTo 702, 520
LeftClick 1
Delay 50
MoveTo 722, 537
LeftClick 1
Next
⑸ 按键精灵后台鼠标移动和点击脚本怎么制作。
具体代码如下:
PutAttachment "d:\p", "*.*"
//获取窗口句柄
Hwnd = Plugin.Window.MousePoint()
//获取窗口客户区左上角坐标
sRect = Plugin.Window.GetClientRect(Hwnd)
xyArray = Split(sRect, "|", - 1 , 1)
dx = xyArray(0)
dy = xyArray(1)
//转移窗口
KMData = Plugin.bgkms6_10.KMTransform(hwnd, 0)
//Plugin.BGCP2_02.TransformWindow 参数1
//加载图片
tu = Plugin.BGCP2_02.LoadBMP("d:\p\4.bmp")
tu1 = Plugin.BGCP2_02.LoadBMP("d:\p\12.bmp")
Do
Call Plugin.Bkgnd.KeyPress(Hwnd, 9)
Delay 100
Call Plugin.Bkgnd.KeyPress(Hwnd, 49)
Delay 3000
For 60
Call Plugin.BGCP2_02.FindPicture(hwnd, 0, 0, 1024, 768 ,tu(0), 30, 0.9, ipX, ipY)
If ipX > 0 And ipY > 0 Then
Call Plugin.Bkgnd.KeyPress(Hwnd, 51)
Delay 1000
Call Plugin.BGCP2_02.FindPicture(hwnd, 0, 0, 1024, 768 ,tu1(0), 30, 0.9, intX, intY)
If intX > 0 And intY > 0 Then
Call Plugin.bgkms6_10.MoveTo(KMData, intX, intY) //
Delay 1000
call Plugin.bgkms6_10.LeftClick (KMData) //这里后台点击鼠标左击没反应,是不是那地方写错了?
Delay 200
End If
End If
//End If
Next
Delay 100
Loop
Sub OnScriptExit
//释放转移窗口
Call Plugin.BGCP2_02.UnTransformWindow(Hwnd)
call Plugin.bgkms6_10.KMUntransform (KMData)
End Sub
⑹ 如何想编一个每隔一段时间鼠标自动点击的脚本(不用按键精灵)
如题,这样的脚本有可能制作吗?只用按键精灵可以制作吗? 如果可以制作,请//确定按钮坐标 LeftClick 1 //隔一段时间 Delay 10000 Goto 开始 ,jsqadD
⑺ 按键精灵 编写脚本 如何让鼠标移动
鼠标移动 move 例如50,80 deplay 48000 鼠标移动 move 例如90,100 deplay 48000 然后套个循环
⑻ 按键精灵能否在脚本运行的过程中,停止物理鼠标的任何操作该如何输入脚本命令
看你的介绍,你用的鼠标操作是前台吧,换成后台就不影响了,不过你要知道坐标哦
⑼ linux下 如何写一个脚本模拟鼠标左键连续点击
安装xdotool
然后就是调用xdotool,很容易,你可以看xdotool的帮助手册;给你个小例子(搜索当前这个网络知道窗口,然后在这个窗口的(400,300)位置连续连续点击100次,每次间隔50毫秒):
#!/bin/bash
for i in {1..100} ;
do
xdotool click1
done
这里click1是这样的xdotool脚本:
search --name --limit 1 "linux下 如何写一个脚本模拟鼠标左键连续点击_网络知道"
windowactivate --sync %1
mousemove --window %1 --clearmodifiers 400 300 click 1
sleep 50