按键精灵脚本,如何实现按了键盘上Q之后,鼠标右键点击一次自动点击10次,求高手代码
如果按了键盘上Q以外的键,再点鼠标则还原成正常点击,我写了一个,不知道哪错了,求高手指点。remab=waitkeyifb="q"thenDokey=WaitClickI...
如果按了键盘上Q以外的键,再点鼠标则还原成正常点击,我写了一个,不知道哪错了,求高手指点。
rem a
b = waitkey
if b = "q" then
Do
key = WaitClick
If key = 32773 Then
RightClick 10
End If
Loop
Goto a
else goto a
End If 展开
rem a
b = waitkey
if b = "q" then
Do
key = WaitClick
If key = 32773 Then
RightClick 10
End If
Loop
Goto a
else goto a
End If 展开
3个回答
展开全部
b = WaitKey()
If b = 81 Then
Do
Delay 500
key = GetLastClick()
If key = 32774 Then
for 10
RightClick 1
Delay 500
Next
End If
Loop
End If
不要用RightClick 10 因为这太快了,你根本看不到。
32773 鼠标按下。
key = WaitClick() 是按下任意鼠标键
If b = 81 Then
Do
Delay 500
key = GetLastClick()
If key = 32774 Then
for 10
RightClick 1
Delay 500
Next
End If
Loop
End If
不要用RightClick 10 因为这太快了,你根本看不到。
32773 鼠标按下。
key = WaitClick() 是按下任意鼠标键
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
q设置成开始脚本
然后当右键单击后循环脚本10次单击事件
用for循环
然后当右键单击后循环脚本10次单击事件
用for循环
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
i = 0
While i=0
Key=GetLastKey()
If Key = 81 Then
i = 1
c = 0
While c=0
Mouse=GetLastClick()
If Mouse = 32774 Then
c=1
RightClick 10
End If
Wend
End If
Wend
While i=0
Key=GetLastKey()
If Key = 81 Then
i = 1
c = 0
While c=0
Mouse=GetLastClick()
If Mouse = 32774 Then
c=1
RightClick 10
End If
Wend
End If
Wend
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询