Call 界面(1,1)
Delay 300
MoveTo 592, 17
Delay 100
LeftClick 1
Delay 100
MoveTo 592, 55
Delay 100
LeftClick 1
Delay 300
MoveTo 592, 17
Delay 100
LeftClick 1
Delay 100
MoveTo 592, 55
Delay 100
LeftClick 1
Delay 300
MoveTo 625, 17
Delay 100
LeftClick 2
Delay 1000
End Sub
Sub 找人(xx,yy)
Call 界面(1,1)
Delay 300
i=0
While i = 0
IfColor xx,yy,"6EB3D8",0 Then //没有到
MoveTo xx,yy
Delay 200
RightClick 1
Delay 100
MoveTo 478, 438
Delay 500
Else
IfColor xx, yy, "26130E", 0 Then //到了
i = 1
Else
IfColor xx, yy+1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx, yy+2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx, yy-1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx, yy-2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+1, yy, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+1, yy+1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+1, yy+2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+1, yy-1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+1, yy-2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx-1, yy, "26130E", 0 Then //到了
i = 1
Else
IfColor xx-1, yy+1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx-1, yy+2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx-1, yy-1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx-1, yy-2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+2, yy, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+2, yy+1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+2, yy+2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+2, yy-1, "26130E", 0 Then //到了
i = 1
Else
IfColor xx+2, yy-2, "26130E", 0 Then //到了
i = 1
Else
IfColor xx-2, yy, "26130E", 0 Then //到了