Delay 10
//***************************************
//****************找怪*******************
//***************************************
Gosub 喂宠
Delay 100
//按Tab找怪
KeyPress 9,1
Delay 100
Gosub 匹配
Delay 10
If shiquKG=0
    For o
        KeyPress shiqu,1
        Delay 300
    EndFor 
    Delay 100
    Gosub 喂宠
EndIf 
Delay 100
//按Tab找怪
KeyPress 9,1
Delay 100
Goto 匹配11
Delay 100
If shiquKG=0
    For o
        KeyPress shiqu,1
        Delay 300
    EndFor 
    Delay 100
EndIf 
Rem 定点
Delay 10
bb=bb+1
Delay 10
If dingdianKG=0
    If bb=DDKG
        Gosub 回定点
    ElseIf bb>DDKG
        bb=1
        Delay 10
    EndIf 
EndIf 
Delay 10
Goto stat
EndScript 
//***************************************
//****************子程序*****************
//***************************************
Sub 匹配
    Delay 100
    VBSCall FindPic(0,0,1024,768,"Attachment:\怪物1024.bmp",0.9,x,y)
    //区域找图  0,0,1024,768为区域范围  "神盾.bmp"为图片名（路径）  0.9为找图的相似度 x,y为找到图片后的坐标变量
    If x>=0 and y>=0
        //找到怪
        l=x+139
        n=l-98
        m=y+34
        Delay 10
        If shiquKG=0
            For o
                KeyPress shiqu,1
                Delay 10
            EndFor 
        EndIf 
        Delay 100
        Gosub 人物补血补蓝
        Delay 10
        Gosub 匹配1
    Else 
        KeyDown 87,1
        Delay 400
        KeyUp 87,1
        Delay 100
        VBSCall FindPic(0,0,1024,768,"Attachment:\怪物1024.bmp",0.9,x,y)
        //区域找图  0,0,1024,768为区域范围  "神盾.bmp"为图片名（路径）  0.9为找图的相似度 x,y为找到图片后的坐标变量
        If x>=0 and y>=0
            //找到怪
            l=x+139
            n=l-98
            m=y+34
            Delay 10
        Else 
            Goto stat
        EndIf 
    EndIf 
Return 匹配
Sub 匹配1
    Delay 100
    IfColor l-30,m,000000ff,0
        Delay 10
        If gj1=0
            Goto 攻击
        EndIf 
        Gosub 匹配2
    Else 
        Goto stat
    EndIf 
Return 匹配1