Delay 100
//对话框颜色取点
IfColor 529,152,cef7ff,0
Delay 32
MoveTo 560,370
Delay 300
LeftClick 1
Delay 100
Else
Goto 接
EndIf
Return 接任务
Sub 交任务
Delay 100
VBSCall call FindPic(0,0,1280,1024,"Attachment:\lian.bmp",0.9,lx,ly)
If lx>=0 and ly>=0
MoveTo lx,ly+60
Else
Gosub 交任务
EndIf
Delay 500
RightClick 1
Delay 1000
Rem 交
Delay 100
IfColor 529,152,cef7ff,0
Delay 32
MoveTo 560,390
Delay 300
LeftClick 1
Else
Goto 交
EndIf
Return 交任务
Sub 从北到阪
Delay 500
//t1=now
Rem 北车夫
Delay 100
//找车夫,精确为1,否则有可能与任务NPC冲突
VBSCall call FindPic(0,0,1024,768,"Attachment:\chefu.bmp",1,x1,y1)
If x1>=0 and y1>=0
MoveTo x1-15,y1+73
Delay 500
RightClick 1
Delay 1000
//车夫对话框弹出判断
Rem 北车夫1
Delay 100
IfColor 557,156,cef7ff,0
Delay 32
MoveTo 586,358
Delay 1000
LeftClick 1
Delay 2000
Else
Goto 北车夫1
EndIf
Else
//找不到车夫,移动到车夫
Delay 1000
//打开大图
KeyPress 9,1
Delay 1000
MoveTo 202,128
Delay 1000
LeftClick 1
Delay 1000
//关闭大图
KeyPress 9,1
Delay 10000
Goto 北车夫
EndIf
Rem 阪
Delay 100
//过地图颜色判断
IfColor 664,3,94ffff,0
Gosub 做任务
Else
Goto 阪
EndIf
Return 从北到阪
Sub 从阪到北
If zhiye<>2
//AW自控打怪,其他职业HOME自动打怪,此处为关才自动
KeyPress 36,1
EndIf
Delay 2000
//打开大图
KeyPress 9,1
Delay 1000
//移动到阪车夫
MoveTo 507,280
Delay 1000
LeftClick 1
Delay 1000
//关闭大图
KeyPress 9,1
Gosub 当前坐标
inputx=191:inputy=218:t1=now:gamex1=cint(gamex1):gamey1=cint(gamey1)