Sub 捡包()
TracePrint "6"
for 3
Delay 100
FindColorEx 0,0,1024,768,"97FFFF",0,0.97,intX,intY
If intX > 0 And intY > 0 Then
// FindPic 0,0,1024,768,"Attachment:\包裹.bmp",0.7,X,Y
//If X > 0 And Y > 0 Then
MoveTo intX, intY
TracePrint "7"
LeftDoubleClick 1
Delay 1000
End If
FindColor 0,0,1024,768,"78EBFD",intX,intY
If intX > 0 And intY > 0 Then
// FindPic 0,0,1024,768,"Attachment:\全部拾取.bmp",0.9,X,Y
//If X > 0 And Y > 0 Then
TracePrint "8"
MoveTo intX ,intY
LeftClick 1
Delay 100
Goto 寻怪打怪
End If
Next
End Sub
// 回苏州
Rem 回苏州
TracePrint "10"
Delay 1500
FindColor 0,0,1024,768,"00131B",X,Y
//以下是条件判断;如果返回的坐标大于0,那么就说明找到了。
If X > 0 And Y > 0 Then
//在这里可以添加找到坐标后,需要做的处理。
MoveTo X, Y
Delay 100
LeftClick 1
Delay 500
End If
FindColor 0,0,1024,768,"63F2FF",X,Y
If X > 0 And Y > 0 Then
MoveTo X, Y
LeftClick 1
Delay 100
MoveTo X+30, Y
LeftClick 1
Delay 100
SayString "34"
Delay 100
MoveTo X+60, Y
LeftClick 1
Delay 100
SayString "50"
Delay 100
MoveTo X+120, Y
LeftClick 1
Delay 3000
Delay 5000
End If
EndScript
//'计算时间差
Sub 时间差大于1分钟返程()
i=0
TracePrint "9"
sTime4= Plugin.Sys.GetTime()
Delay 1000
i = sTime4 - sTime3
If i / 1000>= 600 Then