Rem 使用听雨 KeyPress 49,1 KeyPress 49,1 Goto 抢怪 EndIf Delay 500 KeyDown 65,1 Delay 150 KeyUp 65,1 Delay 200 KeyPress 9,1 Delay 500 VBSCall FindPic(536,125,612,201,"猴子.bmp",0.9,x2,y2) Rem 如果找到老虎则 If x2>0 and y2>0 Rem 使用听雨 KeyPress 49,1 KeyPress 49,1 Goto 抢怪 EndIf KeyDown 65,1 Delay 400 KeyUp 65,1 Delay 200 Goto 开始找怪 EndIf //====================================================== //====================================================== Rem 抢怪 Rem 判断怪是否被抢了 IfColor 731,147,454545,2 Goto 开始找怪 Else EndIf //===================================================== //===================================================== //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++ //====================================================== Rem 开始打怪 KeyPress 192,1 Rem 道生火 Rem 判断道生火是否可用 VBSCall FindPic(126,653,480,696,"道生火.bmp",0.9,x3,y3) If x3>0 and y3>0 Rem 使用道生火 KeyPress 81,1 Delay 2300 VBSCall FindPic(126,653,480,696,"幻心.bmp",0.9,x33,y33) If x33>0 and y33>0 KeyPress 74,1 Delay 2000 KeyPress 192,1 Goto 近身打怪 EndIf Else Goto 有归于无 EndIf //***************************************************** //****************************************************** Rem 有归于无 Rem 判断有归是否可用 VBSCall FindPic(126,653,480,696,"有归.bmp",0.9,x4,y4) If x4>0 and y4>0 Rem 使用有归 KeyPress 69,1 Delay 2300 VBSCall FindPic(126,653,480,696,"幻心.bmp",0.9,x33,y33) If x33>0 and y33>0 KeyPress 74,1 Delay 2000 KeyPress 192,1 Goto 近身打怪 EndIf Else VBSCall FindPic(126,653,480,696,"幻心.bmp",0.9,x33,y33) If x33>0 and y33>0 KeyPress 74,1 Delay 2000 KeyPress 192,1 EndIf Goto 近身打怪 EndIf //***************************************************** //**************************************************** //*********************************************** //*********************************************** //++++++++++++++++++++++++++++++++++++++++++++++++++ //+++++++++++++++++++++++++++++++++++++++++++++++++ Rem 近身打怪 Rem 判断血 IfColor xue/100*(314-188)+188,107,454545,2 KeyPress 117,1 //F6等于葫芦药 Delay 256 EndIf Rem 判断蓝 IfColor mo/100*(313-200)+200,127,454545,2 MoveTo 151,133 LeftClick 1 Delay 1500