[Script]UserVar hongBF=70 血量少于百分之多少时,自动吃红。
UserVar lanBF=30 蓝少于百分之多少时,自动吃蓝。
UserVar dihui=15 血量少于百分之多少时,自动回城。
UserVar hongyanshi=128 补红延时,1000=1秒
UserVar lanyanshi=128 补蓝延时,1000=1秒
UserVar wuguaiT=600 无怪时间,超过多少秒时间找不到怪自动报警。
UserVar fhong=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=0 红位置
UserVar flan=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=1 蓝位置
UserVar fdanJN=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=2 第一击JN位置
UserVar fqunJN=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=3 群JN位置
UserVar fjianqu=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=4 捡东西小手
UserVar f15JN=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=7 15级跑JN
UserVar fhuicheng=DropList{F1:0|F2:1|F3:2|F4:3|F5:4|F6:5|F7:6|F8:7|F9:8|F10:9}=8 回城F
UserVar beidong=DropList{是:0|否:1}=0 直接群攻UserVar fightT=30 技能防卡时间,为打死一只怪的最大时间(秒)。
UserVar Fanwei=40 战斗范围,请大于20
UserVar quanshu=3 搜索圈数
UserVar StepX=82 左右搜索距离
UserVar StepY=66 上下搜索距离
UserVar SearchT=32 搜索时间间隔,越小搜怪越快,1000=1秒
UserVar baojing=DropList{回城打坐:0|回城报警:1|回城关机:2}=0 回城后
VBS dim NumA,NumB,NumC,NumK,NumN,CenterX,CenterY,GBX,GBY,colorVBS Dim objFMVBS Set objFM=CreateObject("QMDispatch.QMFunction")
VBS Dim ScreenWidth,ScreenHeightVBSCall GetScreenResolution(ScreenWidth,ScreenHeight)CenterX = (ScreenWidth \ 2) - 1CenterY = (ScreenHeight \ 2) - 1VBS Dim MonX,MonY,TargetX,TargetY,DirectSIN,DirectCOS,MouseX,MouseY,lngHoldVBS MonX=0:MonY=0:DirectSIN=0:DirectCOS=1Gosub 快捷键设置Gosub LookDownGosub 补红蓝
VBSCall GetCurXY(CurX,CurY)@<find.vbs>
VBS TargetX=CurX
VBS TargetY=CurYSayString CurX