VBSCall FindPic(0,0,800,600,"Attachment:\房屋列表.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo X+2,Y+28 LeftClick 1 Delay 500 MoveTo X+485,Y+270 LeftClick 1 Delay 3000 Goto 点房管 Else Goto 房屋列表P EndIf ////////////////---------回去交任务-------------////////////// //////////////////////////////////////////////////////////// EndScript EndScript MessageBox 买花上出错 //////////////////////////////////////////////////////////// //////////////------------买花-------------//////////// Rem 赵虎任务杂货滩买花任务P1 ////识别任务指向标记 MoveTo 0,0+100 KeyDown 120,1 Delay 110 KeyUp 120,1 MoveTo 0,0 VBSCall FindPic(0,0,800,600,"Attachment:\管家.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo x,y-50 Delay 100 LeftClick 1 MoveTo x,y-100 Delay 1000 Else Delay 3000 Goto 赵虎任务杂货滩买花任务P1 /////如果不对则返回 EndIf Rem 出门去赵虎杂货滩买花任务P1 ////同上 VBSCall FindPic(0,0,800,600,"Attachment:\送我去应天.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo x+20 y+5 Delay 100 LeftClick 1 Delay 3000 KeyDown 18,1 Delay 391 KeyDown 85,1 Delay 328 KeyUp 85,1 Delay 140 KeyUp 18,1 Else RightClick 1 Goto 赵虎任务杂货滩买花任务P1 /////// EndIf Rem 去赵虎1杂货滩买花任务P1 ////定义标记 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+113,Y+120 Delay 100 LeftDoubleClick 1 //Delay 3000 MoveTo 2,2 Goto 去赵虎杂货滩买花任务P1 ////如果应天地图打开为真则走向 GOTO Else Delay 1000 Goto 去赵虎1杂货滩买花任务P1 ///否则倒回上面 EndIf Rem 去赵虎杂货滩买花任务P1 //////////////标记 MoveTo 2,2 KeyDown 9,1 Delay 203 KeyUp 9,1 Delay 1000 /////////////////////按TAB关闭地图 Rem 发现赵虎杂货滩买花任务P1 VBSCall FindPic(0,0,800,600,"Attachment:\杂货滩坐标.bmp",0.9,X,Y) If X>0 and Y>0 Delay 2000 Goto 打开赵虎杂货滩买花任务P1 //////////如果发现要找人的人则指下 Else KeyDown 120,1 Delay 200 KeyUp 120,1 Goto 去赵虎1杂货滩买花任务P1 /////////按下F9返回找要发现人