UserVar YanShi=30 "任务刷新时间,单位:秒" UserVar YanShi1=5 "电脑刷新时间,单位:秒" GetCursorPos mx, my Delay 200 Rem 开始挂机 LeftClick 1 Delay 200 Call 蓝色任务() Call 金色任务() Delay YanShi1*1000 Rem 接绿色任务 Sub 绿色任务() For 5 FindPic 200,160,800,600,"Attachment:\绿.bmp",1,intX1,intY1 //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX1 > 0 And intY1 > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX1+10,intY1+5 Delay 200 LeftClick 1 Delay 200 IfColor intX1, intY1, "009955", 0 Then Goto 领取 Else Goto 接蓝色任务 End If End If Rem 领取 FindPic 200,160,1000,700,"Attachment:\领取.bmp",1,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX+10,intY+5 Delay 200 LeftClick 1 Delay 200 Else MessageBox "找不到领取" End If Next End Sub Rem 接蓝色任务 Sub 蓝色任务() For 5 FindPic 200,160,800,600,"Attachment:\蓝色1.bmp",0.9,intX2,intY2 //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX2 > 0 And intY2 > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX2+10,intY2+5 Delay 200 LeftClick 1 Delay 200 IfColor intX2, intY2, "FF9900", 0 Then Goto 领取 Else Goto 接金色任务 End If End If Rem 领取 FindPic 200,160,1000,700,"Attachment:\领取.bmp",1,intX,intY //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX > 0 And intY > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX+10,intY+5 Delay 200 LeftClick 1 Delay 200 End If Next End Sub Rem 接金色任务 Sub 金色任务() For 5 FindPic 200,160,800,600,"Attachment:\金色1.bmp",0.9,intX3,intY3 //以下是条件判断;如果返回的坐标大于0,那么就说明找到了。 If intX3 > 0 And intY3 > 0 Then //在这里可以添加找到坐标后,需要做的处理。 MoveTo intX3+10,intY3+5 Delay 200 LeftClick 1 Delay 200 IfColor intX3, intY3, "0044DD", 0 Then Goto 领取 Else Goto 延时 End If