应该点这个图
应该点这个图
反而点了这个图
- Dim 梦互,开始游戏,暂不更新,点叉叉,任务
- 梦互 = "319|151|48EFFF,339|150|1CD3FD,331|172|6D3816,350|184|9998F0,328|188|0A77C6,321|177|11A9F8"
- 开始游戏 = "170|514|FEFCFA,234|517|FEFCFA,188|525|FFFFFF,217|523|FDFBF9,200|516|FFFFFF,202|527|B3833E"
- 暂不更新 = "173|707|FEFEFE,219|708|E6D9D1,174|711|ECE2DB,207|712|FEFDFD,192|713|FCFAF9,199|715|B89177"
- 点叉叉 = "379|90|C4ECFF,373|85|DBF3FF,384|85|DBF3FF,373|94|A5DDFD,385|95|9DD9FD,379|100|3A94EC"
- //点画卷 = "215|30|34AC2F,262|30|44AD47,238|54|442BE2,212|66|438F67,258|67|50D85E,237|67|BBE2F2"
- 任务 = "152|751|217DB5,184|759|A2F4FD,150|779|DBFBFF,183|779|5F8EA6,169|779|A8D8F5,171|765|51ADDF"
- Sub 划屏
- Swipe 308, 519, 46, 504
- Delay 1000
- End Sub
- Sub 检测梦互
- If CmpColorEx(梦互, 0.9) Then
- TracePrint "找到梦互了"
- Delay 100
- Else
- TracePrint "没有找到梦互了"
- EndScript
- End If
- End Sub
- Sub 激活梦互
- Tap 329,166
- End Sub
- Sub 检测开始游戏
- If CmpColorEx(开始游戏, 0.9) Then
- TracePrint "找到开始游戏了"
- Delay 10000
- Else
- TracePrint "没有找到开始游戏了"
- EndScript
- End If
- End sub
- Sub 激活开始游戏
- Tap 201,519
- End Sub
- Sub 检测暂不更新
- If CmpColorEx(暂不更新, 0.9) Then
- TracePrint "找到暂不更新了"
- Delay 10000
- Else
- TracePrint "没有找到暂不更新了"
- EndScript
- End If
- End Sub
- Sub 激活暂不更新
- Tap 192,713
- End Sub
- Sub 检测点叉叉
- If CmpColorEx(点叉叉, 0.9) Then
- TracePrint "找到点叉叉了"
- Delay 3000
- Else
- TracePrint "没有找到点叉叉了"
- EndScript
- End If
- End Sub
- Sub 激活点叉叉
- Tap 379,90
- End Sub
- //Sub 检测点画卷
- // If CmpColorEx(点画卷, 0.7) Then
- // TracePrint "找到点画卷了"
- // Delay 3000
- // Else
- // TracePrint "没有找到点画卷了"
- // EndScript
- // End If
- //End Sub
- //Sub 激活点画卷
- // Tap 229,43
- //End Sub
- Sub 检测任务
- If CmpColorEx(任务, 0.9) Then
- TracePrint "找到任务了"
- Delay 3000
- Else
- TracePrint "没有找到任务了"
- EndScript
- End If
- End Sub
- Sub 激活任务
- Tap 173,766
- End Sub
- Sub 主函数
- 划屏
- 检测梦互
- 激活梦互
- 检测开始游戏
- 激活开始游戏
- 检测暂不更新
- 激活暂不更新
- 检测点叉叉
- 激活点叉叉
- // 检测点画卷
- // 激活点画卷
- 检测任务
- 激活任务
- End Sub
- Call 主函数()
复制代码
|