|
数据模块范例：
- 冒险模式 = Array(519, 1121, 604, 1208, "6CDABC", "-14|198|C5FFFF,457|-333|28DDF7")
- 世界对战 = Array(199, 1424, 355, 1694, "FBFFB3", "-17|5|9D5C1A,-74|46|FEE752,62|33|FFFFFF,-91|16|F8AA83")
- 爱心不足 = Array(155,540,260,630, "ECF5F9","8|3|FFFFFF,-12|36|053380,13|578|B5FDFF,380|143|E5E2D7,366|197|C58418")
多点找色模块：
多点找色的命令使用的比较频繁，所以我们可以把他封装成一个函数，这样要找色的时候直接调用这个函数就可以了
这个函数功能就是只要传入多点的数组名称，就可以直接进行多点找色了。找到就返回true，没找到就返回false。方便进行判断
- Function 找多点(数组)
- 找多点 = False
- Dim arr,intX,intY
- arr = 数组
- FindMultiColor arr(0), arr(1), arr(2), arr(3), arr(4), arr(5), 0, 0.9, intX, intY
- If intX > -1 Then
- 找多点 = True
- End If
- End Function
复制代码 进阶版：
- Function 找多点(数组,模式)
- 找多点 = False
- Dim arr,intX,intY
- arr = 数组
- FindMultiColor arr(0), arr(1), arr(2), arr(3), arr(4), arr(5), 0, 0.9, intX, intY
- If intX > -1 Then
- 找多点 = True
- If 模式 = 1 Then
- Tap intX, intY
- End If
- End If
- End Function
复制代码
|
