EndIf Rem 打开赵虎杂货滩买花任务H1 /////发现要找的人后 VBSCall FindPic(0,0,800,600,"Attachment:\杂货滩坐标.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo X+30,Y-50 Delay 500 LeftDown 1 LeftUp 1 Delay 3000 //////////打开要找的了 Else Goto 去赵虎1杂货滩买花任务Y1 EndIf Rem 确定赵虎杂货滩买花任务H1 VBSCall FindPic(0,0,800,600,"Attachment:\看看都有些什么杂货.bmp",0.9,X,Y) If X>0 and Y>0 //////打开的标记 Goto 看看都有些什么杂货1 //////////标记成功指向///////////----输出//------ Else Goto 打开错误赵虎杂货滩买花任务H1 ////否则指向错误修正 EndIf Rem 打开错误赵虎杂货滩买花任务H1 /////////修正的标记 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 Delay 1000 Goto 去赵虎1杂货滩买花任务H1 ////再倒回最上面 Else RightClick 1 RightClick 1 RightClick 1 RightClick 1 Goto 去赵虎1杂货滩买花任务Y1 //如果没XX则按几下右键关闭东西倒回最上面 EndIf //////-----买花--------///// Rem 看看都有些什么杂货1 VBSCall FindPic(0,0,800,600,"Attachment:\看看都有些什么杂货.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo X,Y Delay 100 LeftClick 1 Delay 4000 Goto 买蝴蝶兰 Else Delay 2000 Goto 确定打开杂滩3 EndIf Rem 买蝴蝶兰 VBSCall FindPic(0,0,800,600,"Attachment:\蝴蝶兰.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo X+15,Y+15 Delay 100 LeftClick 1 Delay 1000 KeyPress 52,1 MoveTo X+10,Y+287 Delay 100 LeftClick 1 Goto 买满天星 Delay 500 EndIf //////// Rem 买满天星 VBSCall FindPic(0,0,800,600,"Attachment:\满天星.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo X+15,Y+15 Delay 100 LeftClick 1 Delay 1000 KeyPress 52,1 MoveTo X+200,Y+245 Delay 100 LeftClick 1 Delay 500 EndIf ////////////// VBSCall FindPic(0,0,800,600,"Attachment:\菊花.bmp",0.9,X,Y) If X>0 and Y>0 MoveTo X+15,Y+15 Delay 100 LeftClick 1 Delay 1000 KeyPress 52,1 MoveTo X+160,Y+245 Delay 100 LeftClick 1 Delay 500 EndIf //////////// VBSCall FindPic(0,0,800,600,"Attachment:\勿忘我.bmp",0.9,X,Y) If X>0 and Y>0