//吃药冷却延时 EndIf IfColor lan/100*(231-126)+126 52 cda262,2 //蓝百分比吃蓝脚本 KeyPress jn3,1 //吃药按钮 Delay lanT //吃药冷却延时 EndIf Else IfColor 441,49,1914a4,2 //判断怪物是否死亡 Goto 战斗 EndIf EndIf EndIf Return 吃血打坐 Sub 外挂提示 VBSCall FindPic(196,49,1017,434,"kdxy1.bmp",0.7,x,y) //当反外挂提示到最后一分钟后弹出的窗口判定 If x>=0 and y>=0 //不想要报警声音的话就吧这句脚本删除 Gosub 登出 //........... Gosub 重新登录 //......... EndIf Return 外挂提示 Sub 登出 //这里就是当反外挂出现4分钟后自动返回登出的脚本 MoveTo 995,726 Delay 500 LeftClick 1 Delay 500 Rem 继续登出 IfColor 959,671,80f8ff,2 MoveTo 959,671 Delay 200 LeftClick 1 Delay 1000 EndIf VBSCall FindPic(389,390,502,430,"kdxys.bmp",0.5,x,y) If x>=0 and y>=0 MoveTo x+12,y+12 Delay 200 LeftClick 1 Delay 2000 IfColor 959,671,80f8ff,2 Goto 继续登出 EndIf EndIf Return 登出 Sub 重新登录 //这就是退出后 又自动登录的脚本 Rem 继续登录 VBSCall FindPic(450,700,570,736,"kdjr.bmp",0.5,x,y) If x>=0 and y>=0 MoveTo 171,m Delay 200 LeftClick 1 Delay 200 MoveTo x,y Delay 200 LeftClick 1 Else Goto 继续登录 EndIf Rem 登录中 VBSCall FindPic(689,340,717,419,"kdjr1.bmp",0.5,x,y) If x>=0 and y>=0 Delay 2000 Else Goto 登录中 EndIf Return 重新登录 Sub 召唤宝宝 VBSCall FindPic(184,683,222,718,"kdxybb.bmp",0.5,x,y) //1号宝宝召唤方式的脚本 可以选择是 合体 和召唤战斗 If x>=0 and y>=0 MoveTo x-v,y+5 Delay 50 LeftClick 1 MoveTo 931,645 Delay 3000 EndIf VBSCall FindPic(179,731,213,763,"kdxybb.bmp",0.5,x,y) //2宝宝召唤方式的脚本 可以选择是 合体 和召唤战斗 If x>=0 and y>=0 MoveTo x-b,y+5 Delay 50 LeftClick 1 Delay 3000 MoveTo 31,690 Delay 50 LeftClick 1 Delay 50 MoveTo 931,645 EndIf Return 召唤宝宝 Sub 宝宝加血一号