Else 
    Goto st0
EndIf 
Rem st0
//人物是否需要坐下补红
IfColor 8+200*Var11,49,000000,0
    KeyPress 122,1
    Rem zuoxia2
    Delay 4000
    IfColor 8+200*Var11,49,000000,0
        Goto zuoxia2
    Else 
        KeyPress 122,1
        Delay 200
        Goto st
    EndIf 
Else 
    Goto st
EndIf 
Rem st
m=6
Rem s
KeyDown 17,1
KeyPress 118,1
KeyUp 17,1
Delay 200
l=6
Rem 检查BOSS
KeyPress 9,1
Delay 50
VBSCall FindPic(484,1,670,29,"34.bmp",1.0,x,y)
If x>=0 and y>=0
    Goto BOSS1
Else 
    l=l-1
    If l<2
        Goto 开始找怪
    EndIf 
    Goto 检查BOSS
EndIf 
Rem 开始找怪
n=10
Rem 1
//看宠物在不在不在的话召唤出来
VBSCall FindPic(7,114,18,126,"bb2.bmp",0.9,x,y)
If x<0 and y<0
    KeyDown 17,1
    KeyPress 122,1
    KeyUp 17,1
    Delay 9000
    MoveTo 37,125
    Delay 100
    LeftClick 1
    KeyDown 17,1
    KeyPress 112,1
    KeyUp 17,1
    Delay 100
EndIf 
//看是否需要复活宠物
IfColor 45,134,0d1123,2
    MoveTo 45,135
    Delay 200
    LeftClick 1
    Delay 200
    KeyDown 17,1
    KeyPress 112,1
    KeyUp 17,1
    Delay 200
    KeyPress 27,1
EndIf 
//看宠物是否需要补蓝
IfColor 44+180*Var3,139,150d07,0
    MoveTo 45,135
    Delay 200
    LeftClick 1
    Delay 200
    KeyDown 17,1
    KeyPress 114,1
    KeyUp 17,1
    Delay 200
EndIf 
//看人物是否使用宠物技能补血
IfColor 8+200*Var4,49,000000,0
    MoveTo 37 12
    Delay 200
    LeftClick 1
    Delay 200
    KeyDown 18,1
    KeyPress 52,1
    KeyUp 18,1
    Delay 500
EndIf 
KeyPress 9,1
Delay 100
//检查有无黑点(是不是可攻击的物体)
Rem 检查有无黑点
VBSCall FindColorEx(491,6,660,17,"060606",1,0.9,x,y)
If x>=0 and y>=0
    n=n-1
    Goto t