Delay 1000
Goto 去赵虎1杂货滩
////再倒回最上面
Else
RightClick 1
RightClick 1
RightClick 1
RightClick 1
Goto 去赵虎1杂货滩
//如果没XX则按几下右键关闭东西倒回最上面
EndIf
EndScript
//////////////------------杂货滩-------------////////////
////////////////////////////////////////////////////////////
//////////////////////////////////////////////////
///////////-回去交任务--//////
///////////-回去交任务--//////
Rem 回去交任务
RightClick 1
Rem 房管地图P
MoveTo 2,2
KeyDown 9,1
Delay 500
KeyUp 9,1
Delay 100
MoveTo 2,2
VBSCall FindPic(0,0,800,600,"Attachment:\应天地图.bmp",0.9,X,Y)
If X>0 and Y>0
MoveTo x+334 ,y+98
Delay 100
LeftDoubleClick 1
//Delay 3000
MoveTo 2,2
Goto 去房管地图P
Else
Delay 1000
Goto 房管地图P
EndIf
Rem 去房管地图P
MoveTo 2,2
KeyDown 9,1
Delay 203
KeyUp 9,1
Delay 1000
Rem 发现房管P
VBSCall FindPic(0,0,800,600,"Attachment:\房管坐标.bmp",0.9,X,Y)
If X>0 and Y>0
Delay 2000
Goto 打开房管P
Else
KeyDown 120,1
Delay 200
KeyUp 120,1
Goto 房管地图P
EndIf
Rem 打开房管P
VBSCall FindPic(0,0,800,600,"Attachment:\房管坐标.bmp",0.9,X,Y)
If X>0 and Y>0
MoveTo x+17 ,y-40
Delay 500
LeftDown 1
LeftUp 1
Delay 3000
Else
Goto 打开房管P
EndIf
//////////打开房管了
Rem 确定打开P
VBSCall FindPic(0,0,800,600,"Attachment:\房管说话.bmp",0.9,X,Y)
If X>0 and Y>0
Goto 回到房子P
Else
Goto 打开错误P
EndIf
Rem 打开错误P
VBSCall FindPic(0,0,800,600,"Attachment:\关闭按扭.bmp",0.9,X,Y)
If X>0 and Y>0
MoveTo x+5,y+5
Delay 500
LeftClick 1
Goto 房管地图P
Else
RightClick 1
RightClick 1
RightClick 1
Goto 房管地图P
EndIf
////
Rem 回到房子P
VBSCall FindPic(0,0,800,600,"Attachment:\查看房屋列表.bmp",0.9,X,Y)
If X>0 and Y>0
MoveTo X+2,Y+2
LeftClick 1
Delay 2000
Goto 房屋列表P
Else
Delay 2000
Goto 回到房子P
EndIf
Rem 房屋列表P