MoveTo intX + 15, intY + 5 Delay 300 LeftClick 1 Delay 2500 Else i = 0 While i = 0 Delay 300 FindPic 0,0,1280,1024,"Attachment:\桃花源车夫NPC.bmp",1,intX,intY If intX > 0 And intY > 0 Then MoveTo intX+15, intY+5 Delay 300 LeftDoubleClick 1 Delay 1000 End If FindPic 0,0,1280,1024,"Attachment:\传送清源村.bmp",1,intX,intY If intX > 0 And intY > 0 Then i=1 MoveTo intX + 15, intY + 5 Delay 300 LeftClick 1 Delay 2500 End if Wend End If //桃花源进入清源村 FindPic 0,0,1280,1024,"Attachment:\清源村逍遥子NPC.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX + 15, intY + 5 Delay 300 LeftClick 1 Delay 300 MoveTo 610, 736 Delay 10000 End If FindPic 0,0,1280,1024,"Attachment:\清源村逍遥子任务接受太感谢了.bmp",1,intX,intY If intX > 0 And intY > 0 Then MoveTo intX + 15, intY + 5 Delay 300 LeftClick 1 Delay 300 Goto 回桃源地图分析 Else Rem 逍遥子任务循环分析 i=0 While i = 0 FindPic 0,0,1280,1024,"Attachment:\清源村逍遥子NPC.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX + 15, intY + 5 Delay 300 LeftClick 1 Delay 300 MoveTo 610, 736 Delay 2500 End If FindPic 0,0,1280,1024,"Attachment:\清源村逍遥子任务接受太感谢了.bmp",1,intX,intY If intX > 0 And intY > 0 Then i=1 MoveTo intX + 15, intY + 5 Delay 300 LeftClick 1 Delay 500 End If Wend End If //循环查找交接逍遥子任务 Rem 回桃源地图分析 i = 0 While i = 0 FindPic 0,0,1280,1024,"Attachment:\清源村逍遥子NPC.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then Goto 逍遥子任务循环分析 End If FindPic 0,0,1280,1024,"Attachment:\清源村家族总管.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then i = 1 End If Wend FindPic 0,0,1280,1024,"Attachment:\清源村车夫NPC.bmp",1,intX,intY If intX > 0 And intY > 0 Then MoveTo intX+15, intY+5 Delay 300 LeftDoubleClick 1 Delay 10000 End If FindPic 0,0,1280,1024,"Attachment:\传送桃花源.bmp",1,intX,intY If intX > 0 And intY > 0 Then MoveTo intX+15, intY+5 Delay 300 LeftDoubleClick 1 Delay 2500 Else i = 0 While i = 0 FindPic 0,0,1280,1024,"Attachment:\清源村车夫NPC.bmp",1,intX,intY If intX > 0 And intY > 0 Then MoveTo intX+15, intY+5 Delay 300 LeftDoubleClick 1 Delay 1000