以这个思路做了个简单的回到原位的脚本可是一直不成功一直固定朝着一个方向跑怎么办呢
Rem 开始
ux = 908
uy = 83
Call 坐标()
ZX=group
ux = 932
Call 坐标()
ZY=group
If ZX> 211 Then
MoveTo 415, 380
Delay 50
LeftClick 1
Delay 2000
End If
If ZX < 207 Then
MoveTo 940, 380
Delay 50
LeftClick 1
Delay 2000
End If
If ZY > 147 Then
MoveTo 675, 155
Delay 50
LeftClick 1
Delay 2000
End If
If ZY < 142 Then
MoveTo 675, 520
Delay 50
LeftClick 1
Delay 2000
End If
Goto 开始
Sub 坐标()
For 3
code=""
y = uy
For 8
x = ux
For 5
GetColor=GetPixelColor(x,y)
If GetColor = "00FFFF" Then
i = "1"
Else
i = "0"
End If
code = code & i
x = x + 1
Next
y = y + 1
Next
NO0="0111010001100011000110001100011000101110"
NO1="0010001100001000010000100001000010001110"
NO2="0111010001100010001000100010001000011111"
NO3="0111010001000010011000001000011000101110"
NO4="0001000110010100101010010011110001000011"
NO5="1111110000100001111000001000011000101110"
NO6="0111010010100001111010001100011000101110"
NO7="1111110010000100010000100001000010000100"
NO8="0111010001100010111010001100011000101110"
NO9 = "0111010001100011000101111000010100101110"
If code=NO0 Then
num="0"
ElseIf code=NO1 Then
num="1"
ElseIf code=NO2 Then
num="2"
ElseIf code=NO3 Then
num="3"
ElseIf code=NO4 Then
num="4"
ElseIf code=NO5 Then
num="5"
ElseIf code=NO6 Then
num="6"
ElseIf code=NO7 Then
num="7"
ElseIf code=NO8 Then
num="8"
ElseIf code=NO9 Then
num="9"
Else
num="?"
End If
ux = ux + 6
group = group & num
Next
End Sub