MoveTo intX + 15, intY + 5
Delay 300
LeftClick 1
Delay 300
End If
Goto 找管理员进入家族
Wend
//循环查找桃花源李婆婆回话任务
Rem 找管理员进入家族
i = 0
While i = 0
Delay 300
MoveTo 570, 370
Delay 300
LeftClick 1
Delay 300
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
KeyUp "Ctrl", 1
Delay 2500
End If
Wend
//循环查找桃花源家族NPC进入家族地图
Goto  进入家族地图交家族任务

Rem 逍遥子任务找车夫离开家族地图
FindPic 0,0,1280,1024,"Attachment:\家族车夫.bmp",0.7,intX,intY
If intX > 0 And intY > 0 Then 
MoveTo intX, intY
Delay 300
LeftClick 1
Delay 300
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 2500
Goto 寻找清源村
Else
KeyPress "F", 1
Delay 300
End If
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 4000
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 2500
KeyPress "F", 1
Delay 300
Goto 寻找清源村
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
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
KeyPress "F", 1
Delay 300
End If
Wend
End If
Goto 寻找清源村
//离开家族地图了
Rem 寻找清源村
KeyPress "F", 1
Delay 1000
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 4000
End If
FindPic 0,0,1280,1024,"Attachment:\传送清源村.bmp",1,intX,intY
If intX > 0 And intY > 0 Then