当前位置:首页 » 编程软件 » 鼠标脚本

鼠标脚本

发布时间: 2022-01-15 17:27:11

㈠ 按键精灵 编写脚本 如何让鼠标移动

鼠标移动 move 例如50,80 deplay 48000 鼠标移动 move 例如90,100 deplay 48000 然后套个循环

㈡ 关于鼠标连续点击(或脚本)

按键精灵有免费的。
个人觉得他在完成单调的工作是很好的工具

㈢ 关于鼠标脚本

脚本精灵可以帮您操作电脑。不需要任何编程知识就可以做出功能强大的脚本。只要您在电脑前可以完成的动作,脚本精灵都可以替您完成。
脚本精灵内置上百个命令,提供全界面化的操作。脚本还可以生成独立的小精灵软件,发给朋友分享。
脚本精灵提供了强大的插件功能扩展,已经有数百位高手制作了上千个插件命令供您使用。
脚本精灵已推出通用的小精灵注册系统,脚本不再是自娱自乐的玩具,而是您创业的利器。

㈣ 按键精灵后台鼠标移动和点击脚本怎么制作。

具体代码如下:
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

㈤ 按键精灵 当鼠标中键按下时 执行脚本

关于上面脚本有时不能停止应该是,你停止的时间正好处在延时当中,所以不默认。可以试看看做两个脚本,第一个发现中键按下就无限点击,第二个脚本发现中键弹起就按全部脚本终止键(一般f12)

㈥ 按键精灵键盘模拟鼠标动作脚本

上:
MoveTo
683,
384
LeftDown
1
Delay
20
MoveTo
683,
384-20
LeftUp
1
下:
MoveTo
683,
384
LeftDown
1
Delay
20
MoveTo
683,
384+20
LeftUp
1
左:
MoveTo
683,
384
LeftDown
1
Delay
20
MoveTo
683-20,
384
LeftUp
1
右:
MoveTo
683,
384
LeftDown
1
Delay
20
MoveTo
683+20,
384
LeftUp
1
--------------
以上为你需要的代码。屏幕中心,你最好自己设。把分辨率除2就得到中心了。
你分别把上面四个代码做成4个按键小精灵,然后设快键为上下左右。就可以用了

㈦ 按键精灵鼠标移动和点击脚本

你可以录制一个,然后改一下
下面的是循环1000次,你可以改一下
到时候你可以在外面设置F10是开启,F12是暂停

For 1000
Delay 50
MoveTo 702, 520
LeftClick 1
Delay 50
MoveTo 722, 537
LeftClick 1
Next

㈧ 有没有可以控制鼠标每几秒点一下的工具或脚本

哎呀,鼠标不行了?让你马哥来帮你!!!!!!!

不管你的桌面处于任何状态,按win+e快捷键,打开windows的资源管理器。此时光标的默认位置定位于“我的电脑“上,按方向键移动到“控制面板“上,然后按tab键跳动光标,继续按动方向键,选择“辅助选项“,按enter键确认,这时你会发现弹出一个“辅助选项属性“对话框。将tab和方向键配合,选择对话框中的“鼠标“标签卡。到这一步,我们就可以着手设置“鼠标键“了。按下快捷键alt+m,选中“使用‘鼠标键‘“复选框,就可以使“鼠标键“生效,做完这一步,可以使用小键盘来控制鼠标的指针方向和点击操作。
上面的操作仅仅令“鼠标键“生效,如果想进一步设置鼠标键,则按alt+s键,弹出“鼠标键设置“对话框。
按alt+u选中“使用快捷方式“,则以后你可以按“左alt+在shift+numlock“键以快速打开(关闭)“鼠标键“。按alt+h选中“按住ctrl键进行加速或按shift键进行减速“,则以后利用“鼠标键“移动“鼠标“时,可配合ctrl键和shift键分别加速和减速移动鼠标指针。利用小键盘使用“鼠标键“,numlock是切换开关。如果按“alt+n“选定“打开“,意即当numlock按键处于打开状态时,小键盘用作“鼠标键“;反之,按“alt+f“选择“关闭“,则意味着当numlock按键处于关闭状态时,小键盘用作“鼠标键“。同理,按“alt+s“键,选中“在屏幕上显示鼠标键状态“复选框,则可以看到任务栏状态区中的“鼠标键“tray标志,方便日后查看“鼠标键“状态以及设置相关参数。
而鼠标键对鼠标操作的方法是:
1、移动
1)
要水平或垂直移动鼠标指针,请按小键盘上的“4“、“6“、“8“、“2“键,分别代表
←、→、↑、↓四个方向。
2)
要沿对角移动鼠标指针,请按小键盘上的“7“、“3“、“9“、“1“键,分别代表这四个方向。
2、点击
1)
如果欲单击某个对象,请按小键盘上的数字键5。
2)
如果要双击某个对象,则按小键盘中的加号“+“键。
3)
如果要右键点击,请先按小键盘中的减号“--“键,然后要单击则按数字键
5,要双击则按加号“+“键。
4)
如果要同时用两个鼠标键单击,请按小键盘上的星号“*“键
,然后要单击则按
5,要双击则按加号“+“键。
5)
如果要切换到标准单击状态,请按小键盘上的斜杠“/“键。
3、
拖放
1)
如果要在想移动的对象上移动鼠标指针,请按小键盘上的箭头键。
2)
如果要按住鼠标按钮,请按小键盘上的“
ins“键。
3)
如果要在欲将对象移动到的区域上移动指针,请按小键盘上的箭头键。
4)
如果要释放鼠标按钮,则按下小键盘上的“del“键即可

快采用我的啊啊啊

鲤鱼~~

㈨ 如何想编一个每隔一段时间鼠标自动点击的脚本(不用按键精灵)

如题,这样的脚本有可能制作吗?只用按键精灵可以制作吗? 如果可以制作,请//确定按钮坐标 LeftClick 1 //隔一段时间 Delay 10000 Goto 开始 ,jsqadD

㈩ 按键精灵设置鼠标移动脚本

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

热点内容
双存储冗余 发布:2024-12-23 12:09:16 浏览:664
解压缩太慢 发布:2024-12-23 12:08:36 浏览:535
linux恢复误删文件 发布:2024-12-23 11:59:36 浏览:493
平板电脑账号登录服务器错误 发布:2024-12-23 11:41:07 浏览:99
金蝶kis专业版数据库表 发布:2024-12-23 11:35:41 浏览:602
相册已经加密如何改密码 发布:2024-12-23 11:32:20 浏览:277
批量下载链接脚本 发布:2024-12-23 11:29:11 浏览:973
PHP画a梦 发布:2024-12-23 11:28:01 浏览:199
嗯安一个密码锁多少钱 发布:2024-12-23 11:21:19 浏览:864
ftp主动被动模式工作流程图 发布:2024-12-23 11:12:58 浏览:10