//函数变量定义
//主函数
dim xb1,yb1,xb,yb,mb,t2,xb3,yb3,xb4,yb4,xb5,yb5
dim xe,xe1,ye,ye1,re
dim per1,per2
//坐标读取函数
dim x,y,d,txt,z1,z2
//坐标移动函数
dim xa0,ya0,ra,damax,na.damax1
//范围检测函数
dim xc,yc,xc1,yc1,dc
//防止卡住函数
dim t1,xd,yd,xd1,yd1,xd2,yd2,nd,md,xd3,yd3
//定时技能函数
dim t3,t4,kt1,kt2
//参数设置~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//坐标读取第一个数字的左顶点坐标,2个数字间的距离
x=962:y=100:d=6
//找怪坐标修正(打不同的怪可能修正值不同)
xb4=0:yb4=-10
//挂机点坐标(xa0,ya0),挂机半径(ra)
//na是移动终点精确系数(na越大,移动越精确)
//ma是范围挂机开关(1为开,0为关)
xa0=48:ya0=68:ra=30:damax=20:na=2
mb=0
//当血为%多少时休息(per1),当血为%多少时用血瓶(per2)
per1=50:per2=25
//定时技能间隔时间(单位:秒)
kt1=300:kt2=300
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
t2=now
//卡住的解决变量
nd=1
t1=now
xd1=0:xd2=0:yd1=0:yd2=0
//坐标小移动参数
re=300
//脚本开始前释放一次定时技能
KeyPress 116,1
Delay 500
KeyPress 117,1
Delay 500
t3=now
t4=now
//脚本开始~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Rem 开始
Rem 找怪
Delay 300
VBSCall FindColor(864,25,1019,96,"4255FF",xb2,yb2)
//小地图中找怪红点坐标
VBSCall FindCenterColor(864,25,1019,96,"4245FF",xb1,yb1)
If xb1>=0 and yb1>=0
    //红点有9个象素 小地图坐标修正
    If xb1>946
        xb1=xb1+1
    ElseIf xb1<935
        xb1=xb1-1
    EndIf 
    //人在大地图上的坐标计算
    //地图边缘坐标修正
    If xb2>=902 and xb2<=976
        xb5=512
    ElseIf xb2<902
        xb5=(xb2-902)*12.43+512
    Else 
        xb5=(xb2-976)*12.43+512
    EndIf 
    If yb2>=48 and yb2<=63
        yb5=384
    ElseIf yb2<48
        yb5=(yb2-48)*12.43+384
    Else 
        yb5=(yb2-63)*12.43+384
    EndIf 
    //注意后面的大地坐标修正
    xb=(xb1-xb2-1)*12.43+xb5+xb4
    yb=(yb1-yb2-1)*12.43+yb5+yb4
    If yb>=120 and yb<=700
        If xb>=30 and xb<=1000
            Rem 打怪
            MoveTo xb,yb
            Delay 128
            LeftClick 1
            Delay 256
            //技能F1
            KeyPress 112,1
            Delay 500
            //调的比较大 刷其他的怪可以改的
            For 6
                KeyPress 113,1
                Delay 400
            EndFor 
            //判断是否进入战斗 如果没有继续找怪
            IfColor 1019,19,847500,0
                Delay 200