按键精灵后台点击鼠标
以下是我自己写的后台点击左键的脚本PluginHwnd=Window.MousePoint()Plugins=Window.GetClientRect(hwnd)XYAr...
以下是我自己写的后台点击左键的脚本
Plugin Hwnd = Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
Rem loop
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 100
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 1000
Goto loop
我的本意是让他不停的双击游戏中一个位置,可是实际效果却是我鼠标放哪里他点哪里,根本就不能后台点击那个位置啊。有没高手教下怎么回事?
1楼兄弟的回答让我有醍醐灌顶的感觉,太感谢了。不过,我按照你说的去做,发现我那个游戏还是不能后台动作,可能是那游戏根本就不支持后台鼠标移动吧。我把脚本改进了一下:
Plugin Window.MousePoint()[a]
Delay 100
VBSCall GetCursorPos(hx,hy)
Delay 100
Plugin BGKM5.ScrToCli(a,hx,hy)[x|y]
Delay 100
MoveTo 0,0
Delay 100
Rem wokao
Plugin BGKM5.MMove(a,x,y)
Delay 100
Plugin BGKM5.LClick(a,x,y)
Delay 500
Goto wokao
发现和以前的问题一样,应该是这个游戏屏蔽了后台鼠标移动,但是允许后台点击。
再次感谢1楼 展开
Plugin Hwnd = Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
Rem loop
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 100
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 1000
Goto loop
我的本意是让他不停的双击游戏中一个位置,可是实际效果却是我鼠标放哪里他点哪里,根本就不能后台点击那个位置啊。有没高手教下怎么回事?
1楼兄弟的回答让我有醍醐灌顶的感觉,太感谢了。不过,我按照你说的去做,发现我那个游戏还是不能后台动作,可能是那游戏根本就不支持后台鼠标移动吧。我把脚本改进了一下:
Plugin Window.MousePoint()[a]
Delay 100
VBSCall GetCursorPos(hx,hy)
Delay 100
Plugin BGKM5.ScrToCli(a,hx,hy)[x|y]
Delay 100
MoveTo 0,0
Delay 100
Rem wokao
Plugin BGKM5.MMove(a,x,y)
Delay 100
Plugin BGKM5.LClick(a,x,y)
Delay 500
Goto wokao
发现和以前的问题一样,应该是这个游戏屏蔽了后台鼠标移动,但是允许后台点击。
再次感谢1楼 展开
3个回答
展开全部
今天才看见你的帖子,呵呵。脚本里面有错误,首先是后台鼠标没有固定位置,其次是没有把前台鼠标移出窗口。脚本修改平台按键7.31
Plugin Hwnd = Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
//增加前台鼠标移出
MoveTo 0,0
Delay 100
Rem loop
//向后台窗口句柄(变量:Hwnd)发送一个鼠标移动到客户区域(坐标:688-dx, 410-dy)处
Plugin Bkgnd.MoveTo(Hwnd, 688-dx, 410-dy)
Delay 100
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 100
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 1000
Goto loop
Plugin Hwnd = Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
//增加前台鼠标移出
MoveTo 0,0
Delay 100
Rem loop
//向后台窗口句柄(变量:Hwnd)发送一个鼠标移动到客户区域(坐标:688-dx, 410-dy)处
Plugin Bkgnd.MoveTo(Hwnd, 688-dx, 410-dy)
Delay 100
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 100
Plugin Bkgnd.LeftClick(hwnd,688-dx,410-dy)
Delay 1000
Goto loop
展开全部
http://zhidao.baidu.com/question/123468976.html
有最佳答案。由于字数限制100字,你还是看原帖好了。就不多说了
有最佳答案。由于字数限制100字,你还是看原帖好了。就不多说了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询