赞
踩
首先你需要对按键精灵的基础语法有所了解,建议b站,基本上几个小时就能掌握(有一定开发语言基础)。以下代码会帮你以极快的速度开发出一个能用的挂机脚本。
编译器下载地址:按键精灵官网
玩的时间有限,不能啥脚本都自己开发,大家一起开发能共享就共享吧。
Global x Global y //全局声明 游戏位置 电脑左上角为坐标原点 hwnd = Plugin.Window.Find(0, "Rainbow Six")//获取彩六的窗口 其他游戏一样 从窗口名获取游戏窗口信息 sWindow = Plugin.Window.IsWindow(Hwnd) If sWindow=1 Then Rem prostart //程序可以跳回到这个位置 Rect = Plugin.Window.GetWindowRect(Hwnd) MyArray = Split(Rect, "|") x = Clng(MyArray(0)):y = Clng(MyArray(1))//这里的(x,y)是窗口包含边框的左上角坐标,可用后台操作Rect = Plugin.Window.GetClientRect(Hwnd)MyArray = Split(Rect, "|")x = Clng(MyArray(0))y = Clng(MyArray(1))//这里的(x,y)是窗口不含边框(称为客户区)的左上角坐标 If x < - 1000 Then //游戏打开了 但窗口未置前 MsgBox "请保持游戏靠前,脚本退出,重启脚本" ExitScript End If // 主要代码写在这里 Call xuanren()//调用选人函数 Call chongshi() //主要代码区 Goto prostart //跳回到prostart位置 所有脚本没有触发热键就会一直连续执行 ElseIf sWindow = 0 Then MessageBox "游戏未打开 打开后再重启脚本" ExitScript End If
选人函数
Function xuanren()//选人 Dim MyArray1 A=Plugin.Color.FindMutiColor(x+180,y+60,x+450,y+220,"975B10","7|6|975B10,10|8|FFFFFF,12|8|FFFFFF,13|14|FFFFFF,12|20|FFFFFF",1) //这是核心 识别游戏特定页面上的图像 前四个参数是限制监控屏幕范围(按键精灵编译器有解释) MyArray = Split(A, "|") Ax = CInt(MyArray(0)): Ay = CInt(MyArray(1)) If Ax > 0 Then TracePrint "选人" For 5 Delay 1000 KeyPress "Enter", 1 //间隔1s连续执行5次按下enter Next End If End Function
重试函数
Function chongshi() B=Plugin.Color.FindMutiColor(x+140,y+340,x+420,y+410,"E18411","19|0|E18411,51|1|E18411,33|6|FFFFFF,27|12|FFFFFF,24|15|FFFFFF,14|17|E18411,23|21|E18411,39|14|E18411",1) dim MyArray2 //局部变量 不要和全局变量一样命名 MyArray2 = Split(B, "|") Bx = CInt(MyArray2(0)): By = CInt(MyArray2(1)) // If Bx > 0 and By > 0 Then TracePrint "重试" MoveTo x + 220, y + 220//鼠标移动 Delay 500 LeftClick 1 Delay 1000 MoveTo X + 550, Y + 650 Delay 500 LeftClick 1 Delay 1000 KeyPress "Enter", 1 End If End Function
Copyright © 2003-2013 www.wpsshop.cn 版权所有,并保留所有权利。