loading请求处理中...
10大优享服务
62项会员特权

按键精灵后台脚本制作

问题补充:我想做一个百度武侠风云的后台脚本前台的脚本会做,第一次想尝试一下后台的。意思很简单,就是到第一坐标击一下,然后按回车。再到第2个坐标点击一下其实很简单的,但是偏偏就运行不了。我用7.21版本的按键精灵附带的WQM录制就可以后台,但是WQM很不稳定,有时候会吧游戏直接断开连接,然后什么网页都打不开了,必须重新开启WQM。 Plugin hwnd=Window.MousePoint() Delay 100Plugin Bkgnd.LeftClick(hwnd,902,307)Delay 100Plugin Bkgnd.KeyDown(hwnd,13) 上面就是我第一次写的后台,可惜无法用不了。网页游戏地址是 http://s1-baidu.wx.kunlun.com/index.php如果有会做的大大,能给我做一下吗?顺便附带一下教程。最好是按照百度的武侠风云来做,随便注册个号,到新手村的麦场就可以做了。
提问者:libin520820 1回答 浏览次数:4032 提问时间: 2021/12/01 11:44
提问者采纳
1、游戏句柄
后台的意思就是当窗口被遮盖或移开的时候,仍能够正常的执行脚本动作,所以必须先找到该游戏的窗口句柄,这样可以保证我们编辑的脚本语句有正确的使用方向,获取窗口句柄的方法有很多,我一般使用以下的方法:
Dim hwnd
Plugin hwnd=Window.MousePoint()
Plugin是调用插件命令,凡是调用插件都需要使用这个命令,hwnd就是得到的句柄,Window是插件的名称MousePoint()返回鼠标所在的窗口的句柄
关于窗口这里需要多说几句,以网页游戏为例,鼠标放在标题栏上和放在游戏窗口所得到的句柄是不一样的,游戏窗口是IE的一个子窗口,因此在运行脚本前,将你的鼠标放在游戏窗口的区域内再运行脚本。
得到句柄费函数很多,有兴趣的自己去试试看,不过知道一个就足够了。
2、模拟动作
得到窗口句柄后,你就可以向这个窗口模拟需要的动作了,在这里要用到按键精灵7的插件(既然已经有7了以前的插件就不作介绍了),模拟动作的函数有如下几个
-模拟鼠标点击
Plugin Bkgnd.LeftClick(句柄,横坐标,纵坐标) //模拟鼠标左键点击
Plugin Bkgnd.RightClick(句柄,横坐标,纵坐标) //模拟鼠标右键点击
其中的句柄就是上面我们已经得到的句柄,这里的横坐标和纵坐标是针对游戏窗口,而不是针对屏幕的(看晕了吧^_^关于这一点足足困扰了我一个礼拜的时间才弄明白)。
屏幕坐标,是以屏幕左上角为基点(0,0),右下角的坐标是和屏幕分辨率有关的,而窗口坐标,不是在屏幕的左上角,例如word中的编辑窗口的0,0位置是在工具栏下面的,看不懂也没关系,你只要记住下面的方法就行了,首先在得到窗口句柄后加上如下的代码:
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
其次,在横坐标和纵坐标的后面都分别减去dx和dy就行了,为什么!!不用去管他,反正这样做不会错,举例说明
例如你抓点得到的横坐标是x,纵坐标是y,那么模拟鼠标左键点击的语句应该是这样的:
Plugin Bkgnd.LeftClick(句柄x-dx,y-dy)
-模拟键盘动作
Plugin Bkgnd.KeyPress(句柄,按键码) //模拟键盘动作
这里的按键码可以很容易的在按键精灵中查到,包括组合键
-输入字符串
Plugin Window.SendString(句柄,字符串)
这个函数在登陆和喊话时是非常有用的,其中的字符串可以是字符串变量
3、后台找色
后台脚本尽量少用找色语句,否则你的游戏将“卡巴死机”,即使少用也会出现很多的“马赛克”幸运的是不影响找色功能,即使游戏图像已经乱七八糟,既然是要后台操作,难看就难看吧^_^。
Plugin c1=BkgndColor.GetPixelColor(hwnd,631-dx,121-dy)
强烈建议用这个函数,至于什么区域找色,区域照图之类,如果你的电脑速度足够快再去尝试吧。
找色是有技巧的,一定要找到一个不同画面分别对应不同颜色的点,当然只有一个点是不可靠的。我的思路是,找到几个点的颜色值记录下来,再根据这几个点的不同组合来决定脚本的走向,采取这种方法后,我在游戏时已经基本可以看到大体的画面了。
附一个网页游戏《明朝时代》61级刷铁矿的简单例子(我就用的这个脚本:)):
Dim hwnd
Plugin hwnd=Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
vx = 655-dx
vy = 336-dy
vx1 = 638-dx
vy1 = 305-dy
For 1000
Delay 156
Delay 16
Plugin Bkgnd.LeftClick(hwnd,vx,vy)
Delay 7000
Delay 500
Plugin Bkgnd.LeftClick(hwnd,vx1,vy1)
Delay 1000
EndFor
Rem

全部回答

问题分类

技术服务
我 要 回 答 我 要 提 问
问题分类   验证码 换一组

相关问题