求一个彩虹岛跑动挖矿代码(按键精灵)
来源:百度知道 编辑:UC知道 时间:2024/07/02 11:49:08
先写出来,坐标颜色就用变量表示。每步含义请写清楚,谢谢各位!
我有宠物捡东西
我有宠物捡东西
彩虹岛的挖矿脚本 我也见了很多 也都试用过
很多人提到 不能用键盘控制任务移动
在此 我就以我发布的商业版彩虹岛包裹中的采矿的全代码来给大家 分析下
代码和分析如下:
首先获得当前屏幕的分辨率的宽和高
Plugin screenX=GetSysInfo.GetScreenResolutionX()
Plugin screenY=GetSysInfo.GetScreenResolutionY()
求出中心点坐标,由于观察发现 除非人物走到底图边缘 屏幕始终是把人物放在屏幕中间的
CenterX=ScreenX/2
CenterY=ScreenY/2
设定一个face变量 来代表 人物的面朝方向
face=1
设置一个死循环 程序循环运行
While 1=1
开始时先在屏幕范围内查找有没有掉落的包裹
VBSCall FindPic(0,CenterY-200,screenX,CenterY+200,"包裹.bmp",0.9,intX1,intY1)
如果包裹存在则执行向包裹移动
If intX1<>-1 and intY1<>-1
包裹intX1是图片坐上角坐标,所以判断
intX1+20<CenterX时
判断向左方移动
If intX1<(CenterX-20)
左键按下50毫秒后弹起,因为尝试过点击左键无效果
KeyDownH 37,1
Delay 50
KeyUpH 37,1
如果包裹在人物右方则按下右键
ElseIf intX1>(CenterX+