'ShowMessage rColor,3000,y,720-x-50
Dim x=array()
Dim y=array()
x(0)=295
y(0)=1002
x(1)=180
y(1)=863
x(2)=525
y(2)=632
x(3)=445
y(3)=701
x(4)=383
y(4)=540
x(5)=376
y(5)=326
x(6)=552
y(6)=883
x(7)=230
y(7)=636
x(8)=587
y(8)=994
do
rem 点击地点
If CmpColor(588, 679, "6BFFFF", 1) > -1 Then
tap 588,679
end if
rem 点击关卡
If CmpColor(355, 911, "29AAEF", 1) > -1 Then
tap 355, 911
end if
rem 点击关闭教程弹窗
If CmpColor(619, 820, "29394A", 1) > -1 Then
tap 619, 820
end if
rem 点击加速
If CmpColor(700, 1140, "102829", 1) > -1 Then
tap 700, 1140
end if
rem 点击出兵
If CmpColor(205, 62, "2120FF", 1) > -1 Then
tap 205, 62
end if
rem 战斗开始
If CmpColor(700, 1140, "087584", 1) > -1 Then
rem 点击出兵2
If CmpColor(205, 62, "2120FF", 1) > -1 Then
tap 205, 62
elseIf CmpColor(x(0), y(0), "8CBAD6", 1) > -1 Then
tap x(0), y(0)
delay 80
tap x(0)-70, y(0)+50
tap x(0)-70, y(0)+50
elseIf CmpColor(x(1), y(1), "8CB6D6", 1) > -1 Then
tap x(1), y(1)
delay 80
tap x(1)-70, y(1)+50
tap x(1)-70, y(1)+50
elseIf CmpColor(x(2), y(2), "8CB6D6", 1) > -1 Then
tap x(2), y(2)
delay 80
tap x(2)-70, y(2)+50
tap x(2)-70, y(2)+50
elseIf CmpColor(x(3), y(3), "84B6CE", 1) > -1 Then
tap x(3), y(3)
delay 80
tap x(3)-70, y(3)+50
tap x(3)-70, y(3)+50
elseIf CmpColor(x(4), y(4), "8CB6D6", 1) > -1 Then
tap x(4), y(4)
delay 80
tap x(4)-70, y(4)+50
tap x(4)-70, y(4)+50
elseIf CmpColor(x(5), y(5), "84B6D6", 1) > -1 Then
tap x(5), y(5)
delay 80
tap x(5)-70, y(5)+50
tap x(5)-70, y(5)+50
elseIf CmpColor(x(6), y(6), "8CB6D6", 1) > -1 Then
tap x(6), y(6)
delay 80
tap x(6)-70, y(6)+50
tap x(6)-70, y(6)+50
elseIf CmpColor(x(7), y(7), "8CB6D6", 1) > -1 Then
tap x(7), y(7)
delay 80
tap x(7)-70, y(7)+50
tap x(7)-70, y(7)+50
elseIf CmpColor(x(8), y(8), "8CB6D6", 1) > -1 Then
tap x(8), y(8)
delay 80
tap x(8)-70, y(8)+50
tap x(8)-70, y(8)+50
elseIf CmpColor(x(0), y(0), "F7DA31", 1) > -1 Then
tap x(0), y(0)
delay 80
tap x(0)+80, y(0)
tap x(0)+80, y(0)
elseIf CmpColor(x(1), y(1), "F6E131", 1) > -1 Then
tap x(1), y(1)
delay 80
tap x(1)+80, y(1)
tap x(1)+80, y(1)
elseIf CmpColor(x(2), y(2), "EEDA31", 1) > -1 Then
tap x(2), y(2)
delay 80
tap x(2)+80, y(2)
tap x(2)+80, y(2)
elseIf CmpColor(x(3), y(3), "D69211", 1) > -1 Then
tap x(3), y(3)
delay 80
tap x(3)+80, y(3)
tap x(3)+80, y(3)
elseIf CmpColor(x(4), y(4), "F7DB32", 1) > -1 Then
tap x(4), y(4)
delay 80
tap x(4)+80, y(4)
tap x(4)+80, y(4)
elseIf CmpColor(x(5), y(5), "F7EB3C", 1) > -1 Then
tap x(5), y(5)
delay 80
tap x(5)+80, y(5)
tap x(5)+80, y(5)
elseIf CmpColor(x(6), y(6), "F7E739", 1) > -1 Then
tap x(6), y(6)
delay 80
tap x(6)+80, y(6)
tap x(6)+80, y(6)
elseIf CmpColor(x(7), y(7), "DE9619", 1) > -1 Then
tap x(7), y(7)
delay 80
tap x(7)+80, y(7)
tap x(7)+80, y(7)
elseIf CmpColor(x(8), y(8), "F6DE31", 1) > -1 Then
tap x(8), y(8)
delay 80
tap x(8)+80, y(8)
tap x(8)+80, y(8)
end if
end if
rem 关闭推荐邮箱
If CmpColor(600, 640, "7BFBFF", 1) > -1 Then
tap 660, 70
end if
loop