概述
彩虹六号按键精灵挂机脚本制作教程
首先你需要对按键精灵的基础语法有所了解,建议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
最后
以上就是瘦瘦钢笔为你收集整理的彩虹六号按键精灵挂机脚本制作教程彩虹六号按键精灵挂机脚本制作教程主要代码的全部内容,希望文章能够帮你解决彩虹六号按键精灵挂机脚本制作教程彩虹六号按键精灵挂机脚本制作教程主要代码所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
发表评论 取消回复