学习vb script

独有api

KeyPress “A”,1
//按A键1次

LeftClick 5
//按鼠标左键5次

MoveTo 100,200
//把鼠标移动到(100,200)这个点上

intX=50
//定义变量

If true Then
//“条件判断符合被通过!!”
End If

Goto 标记
//中间被跳过
Rem 标记

While true
//无限循环
Wend/EndWhile

For 10
//循环10次
Next

Sub 函数()
//定义函数
End Sub

Call 函数()
//调用这个函数

EndScript
//相当于 return的结束功能
ExitScript
//停止整个脚本
RestartScript
//重新开始整个脚本

函数2(“函数1没有返回值”) ///调用函数

Function 函数2(a)//定义函数2
函数2=‘2’//这个函数的返回值是2
End Function

//得到指定点的颜色

//找色
FindColor 0,0,800,600,“0000FF”,x,y
//在 0,0开始 600*800 的区域寻找 0000FF 并返回找到的坐标x,y
If x>0 and y>0 Then
MoveTo x,y
End If

//模糊找色
FindColorEx 0,0,800,600,“0000FF”,1,0.8,x,y
If x>0 and y>0 Then
MoveTo x,y
End If
//在区域(0,0,800,600)中，从中间开始找接近红色（“0000FF”）的点，如果找到，则把鼠标移动到这个点

//中心找色

//找图
FindPic 0,50,1023,767,“winmine.bmp”,0.9,intX,intY
If intX>0 and intY>0 Then
MoveTo intX,intY
MessageBox “找到图形，鼠标已经移到图形上面”
Else
MessageBox “没找到！请确认扫雷程序已经打开，并且您用的是WinXP系统”
End If

---

标准VBscript

Dim d '创建变量
Set d = CreateObject(“Scripting.Dictionary”)//对象
d.Add “a”, “Athens” '添加一些键和项目
d.Add “b”, “Belgrade”
d.Add “c”, “Cairo”

Dim names(2) // 创建数组 (3个元素)
names(0)=“Tove”
names(1)=“Jani”
names(2)=“Stale”
//为数组赋值

Dim table(4,6)
//5 行 7 列的 2 维数组
//table(4,6) 也是最后一个元素

手机api

KeyPress “Home”//按键

Swipe 100,100,200,200,300//滑动
//用300毫秒的时间，从点100,100划动到点200,200

Tap 100,100//点击

Touch 100,100,100//按住100毫秒

Goto 标记
//中间被跳过
Rem 标记

delay 3000//延时3秒

dim x
dim y

//找色
FindColor 0,0,540,540,“#FFFFFF”,1,0.8,x,y
If x>0 and y>0 Then
Tap x,y
End If

根据图
或者
固定的颜色

来判断的
才能写

像 3d敌人技能状态
动态展示的技能动画等都是不能做到的

地方英雄有血条
血条有颜色
应该是固定的

特定
放技能时鼠标自动移动到 以正中为圆心找色
然后移动鼠标自动释放

长存

判断自身的血量以放 金身/渴血

特定英雄
在自身周围画椭圆
只要这个区域内有地方英雄
则释放技能