目录
1 基础教程
1.1 定义变量
1.2 运算符
1.2.1 算数运算符
1.2.2 逻辑运算符
1.2.3 关系运算符
1.2.4 连接运算符
1.3选择结构
1.4 循环结构
1.5 定义函数
1.6 Sub子程序
1.7 Rem标记
1.8 Goto跳转
1.9 函数调用
2 基本命令
2.1 触摸命令
2.1.1 按键控制
2.1.2 短暂点击控制
2.1.3 持续点击控制
2.1.4 滑动控制
2.2 控制命令
2.2.1 循环
2.2.2 选择
2.2.3 子程序
2.2.4 调用子程序
2.2.5 结束程序
2.3 颜色命令
2.3.1 根据坐标获取颜色值
2.3.2 指定范围查找坐标
2.3.3 在整个屏幕中查找
2.4 图形命令
2.4.1 指定范围找图片
2.4.2 整个屏幕找图片
2.5 设备命令
2.5.1 获取屏幕宽度
2.5.2 获取屏幕高度
2.5.3 获取屏幕色彩值
2.5.4 保存屏幕状态
2.5.5 返回设备唯一编号
2.5.6 播放音频
2.5.7 振动
2.6 其他命令
2.6.1 输入文本
2.6.2 输出文本
2.6.3 屏幕提示信息
2.6.4 延时
2.6.5 启动应用
1 基础教程
1.1 定义变量
定义一个或多个变量，数组
Dim a, arr()a = "这是变量"b(0) = "这是第一个数字元素"TracePrint a, arr(0)
1.2 运算符
1.2.1 算数运算符
1.2.2 逻辑运算符
1.2.3 关系运算符
1.2.4 连接运算符
1.3选择结构
if选择
If 条件 Then执行语句End If
Select Case多重选择
Select Case 变量Case 值1[,值2,...]执行语句1Case Else执行语句2End Select循环体Wend
1.4 循环结构
while循环
While 条件循环体Wend
do循环
例子1：//可以使用Exit Do 命令退出循环Do TracePrint "死循环了"Loop//最常见的无限循环（死循环）例子2：Dim i=1//当循环条件成立的时候，反复执行循环体Do While i=1TracePrint "死循环了"Loop例子3：Dim i=1//当循环条件成立的时候，离开循环体Do Until i=1TracePrint "来执行我呀"LoopTracePrint "循环结束"例子4：Dim i=0//当循环条件不成立的时候，反复执行循环体Do Until i=1TracePrint "我停不下来啦!!快住手"Loop例子5：Dim i=0Do TracePrint "至少执行了一次"//条件放后面，前面的循环内容可以执行一次！Loop While i <> 0例子6：Dim n=0Do While trueTracePrint "我将循环10次停下来!!"If n>=10 Then//当循环条件成立的时候，离开循环体Exit doEnd ifn=n+1LoopTracePrint n & "次"
for循环
For 次数执行语句Next
例子1：固定循环次数后离开For 10 '固定循环10次跳出TracePrint "循环中……"NextTracePrint "离开循环"例子2：范围循环Dim iFor i = 0 To 9 '这里没写步长，默认每次循环结束 i 都+1，那么10次后等于9，第11次等于10，大于9，离开循环TracePrint "循环中，i=" & iNextTracePrint "离开循环，i=" & iDim iFor i = 0 To 19 Step 2 '步长为2，每次循环结束 i 都+2，那么10次后等于18，第11次等于20，大于19，离开循环TracePrint "循环中，i=" & iNextTracePrint "离开循环，i=" & iDim iFor i = 9 To 0 Step -1 '步长为-1，每次循环结束 i 都-1，那么10次后等于0，第11次等于-1，小于0，离开循环TracePrint "循环中，i=" & iNextTracePrint "离开循环，i=" & i例子3：循环离开Dim ii=5For i=0 To 10TracePrint "循环中，i=" & iIf i=5 ThenExit For '离开当前For循环End IfNext
for each...in循环
For Each 变量名 in 数组执行语句Next
Dim ArrArr=Array("我","爱","编","程")For Each a In Arr TracePrint a //输出数组的所有元素Next
1.5 定义函数
Function 函数名([自定义参数1, 自定义参数2, ...])执行语句[函数名=返回值]End Function
1.6 Sub子程序
注：子程序的功能和函数的功能很类似，只是子程序没有返回值，而函数可以有自己的返回值
Sub 子程序名([自定义参数1, 自定义参数2, ...])执行语句End Sub
例子1：子程序调用Call 子程序()EndScriptSub 子程序()TracePrint "我是子程序,被你调用了"End Sub例子2：子程序调用并传入参数，参数可支持多个。Dim 变量1,变量2变量1="我是字符串信息"变量2=123Call 子程序(变量1,变量2,"第三个参数",456)EndScript//定义一个过程,可以在脚本中调用这个过程Sub 子程序(参数1,参数2,参数3,参数4)TracePrint "我是子程序,被你调用了"TracePrint "参数1=" & 参数1TracePrint "参数2=" & 参数2TracePrint "参数3=" & 参数3TracePrint "参数4=" & 参数4End Sub//支持Exit Sub 命令直接退出子程序过程
1.7 Rem标记
Rem identifier
1.8 Goto跳转
Goto sign
1.9 函数调用
Call 过程名([自定义参数1, 自定义参数2, ...])
2 基本命令
2.1 触摸命令
2.1.1 按键控制
可以模拟手机上的按键，如数字1-9,字母A-Z，home键，back键等
KeyPress "Home"KeyPress "Back"KeyPress "EndCall"KeyPress "0"KeyPress "A"
2.1.2 短暂点击控制
第一个0代表X坐标，第二个0代表Y坐标
Tap 0, 0Tap 1, 1Tap 100, 100
2.1.3 持续点击控制
0,0代表坐标，1000代表时间（单位毫秒）
Touch 0, 0, 1000Touch 1, 1, 1000Touch 100, 100, 1000
2.1.4 滑动控制
0,0代表第一个点的坐标，1,1代表第二个点的坐标
Swipe 0, 0, 1, 1Swipe 0, 0, 100, 100Swipe 10, 10, 20, 20
2.2 控制命令
2.2.1 循环
// 循环一次For 1// 程序逻辑Next// 循环十次For 10// 程序逻辑Next
2.2.2 选择
注：falge为我们自定义的变量或表达式，如果条件为true，则执行程序逻辑的内容
If falge Then // 程序逻辑End If
2.2.3 子程序
Sub sub1()// 子程序1逻辑End SubSub sub2()// 子程序2逻辑End Sub
2.2.4 调用子程序
Call sub1()Call sub2()
2.2.5 结束程序
EndScript
2.3 颜色命令
2.3.1 根据坐标获取颜色值
Dim rColorrColor = GetPixelColor(0, 0)
2.3.2 指定范围查找坐标
// 1.左上--> 右下Dim intX, intYFindColor 0, 0, 10, 10, "0000FF", 0, 0.90, intX, intY//如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 ThenEnd If// 2.中心-->四周Dim intX, intYFindColor 0, 0, 10, 10, "0000FF", 1, 0.90, intX, intY//如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 ThenEnd If// 3.右下-->左上Dim intX, intYFindColor 0, 0, 10, 10, "0000FF", 2, 0.90, intX, intY//如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 ThenEnd If// 4.左下-->右上//Dim intX, intYFindColor 0, 0, 10, 10, "0000FF", 3, 0.90, intX, intY//如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 ThenEnd If// 右上左下//Dim intX, intYFindColor 0, 0, 10, 10, "0000FF", 4, 0.90, intX, intY//如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 ThenEnd If
2.3.3 在整个屏幕中查找
Dim intX, intYFindColor 0, 0, 0, 0, "0000FF", 1, 0.90, intX, intY//如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 ThenEnd If
2.4 图形命令
2.4.1 指定范围找图片
Dim intX, intYFindPic 0, 0, 100, 100, "Attachment:1.png", "000000", 0, 0.9, intX, intY// 如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 Then // 程序逻辑End If
2.4.2 整个屏幕找图片
Dim intX, intYFindPic 0, 0, 0, 0, "Attachment:1.png", "000000", 0, 0.9, intX, intY// 如果没有找到，intX和intY的值都会被置为-1If intX > -1 And intY > -1 Then // 程序逻辑End If
2.5 设备命令
2.5.1 获取屏幕宽度
Dim screenXscreenX = GetScreenX()
2.5.2 获取屏幕高度
Dim screenYscreenY = GetScreenY()
2.5.3 获取屏幕色彩值
Dim colorDepcolorDep = GetScreenColorDep()
2.5.4 保存屏幕状态
// 屏幕常开KeepScreen True// 屏幕关闭KeepScreen False
2.5.5 返回设备唯一编号
Dim deviceIDdeviceID = GetDeviceID()
2.5.6 播放音频
PlaySound "1.mp3"
2.5.7 振动
Vibrate 1000
2.6 其他命令
2.6.1 输入文本
InputText "这是脚本语言"
2.6.2 输出文本
TracePrint "这是脚本语言"
2.6.3 屏幕提示信息
ShowMessage "这是提示信息"
2.6.4 延时
Delay 1000
2.6.5 启动应用
根据包名来启动应用
RunApp "包名"
第一种获取包名的方式：在界面的其它命令里直接插入
第二种获取包名的方式：通过系统命令获取
首先在模拟器上打开将要被获取包名的软件，接着在按键精灵手机助手调试命令
Dim 当前应用包名当前应用包名 = Sys.GetFront()TracePrint 当前应用包名
