KeyPress 113,1
    //F2等于上善
    Delay 1000
    KeyPress 9,1
EndIf 
Rem 判断听雨是否可用
VBSCall FindPic(126,653,480,696,"听雨.bmp",0.9,x001,y001
If x001>0 and y001>0
    KeyPress 49,1
    Delay 1700
    //判断怪物是否死亡
    VBSCall FindPic(614,154,736,174,"死亡.bmp",0.9,x9,y9)
    If x9>0 and y9>0
        KeyDown 16,1
        KeyPress 90,1
        KeyUp 16,1
        Delay 500
        Goto 开始
    EndIf 
Else 
EndIf 
Rem 归元
Rem 判断道归元是否可用
VBSCall FindPic(126,653,480,696,"归元.bmp",0.9,x6,y6)
If x6>0 and y6>0
    Rem 使用归元
    KeyPress 51,1
    Delay 1700
    //判断怪物是否死亡
    VBSCall FindPic(614,154,736,174,"死亡.bmp",0.9,x9,y9)
    If x9>0 and y9>0
        KeyDown 16,1
        KeyPress 90,1
        KeyUp 16,1
        Delay 500
        Goto 开始
    EndIf 
EndIf 
//*****************************************************
//****************************************************
Rem 流风
Rem 判段流风是否可用
VBSCall FindPic(126,653,480,696,"流风.bmp",0.9,x66,y66)
If x66>0 and y66>0
    KeyPress 52,1
    Delay 1700
    //判断怪物是否死亡
    VBSCall FindPic(614,154,736,174,"死亡.bmp",0.9,x9,y9)
    If x9>0 and y9>0
        KeyDown 16,1
        KeyPress 90,1
        KeyUp 16,1
        Delay 500
        Goto 开始
    EndIf 
EndIf 
Rem 玄炎
VBSCall FindPic(126,653,480,696,"玄炎.bmp",0.9,x7,y7)
If x7>0 and y7>0
    Rem 使用玄炎
    KeyPress 50,1
    Delay 1700
    //判断怪物是否死亡
    VBSCall FindPic(614,154,736,174,"死亡.bmp",0.9,x9,y9)
    If x9>0 and y9>0
        KeyDown 16,1
        KeyPress 90,1
        KeyUp 16,1
        Delay 500
        Goto 开始
    EndIf 
    Goto 近身打怪
EndIf 
//+++++++++++++++++++++++++++++++++++++++++
//++++++++++++++++++++++++++++++++++++++++
//判断怪物死亡
VBSCall FindPic(614,154,736,174,"死亡.bmp",0.9,x9,y9)
If x9>0 and y9>0
    KeyDown 16,1
    KeyPress 90,1
    KeyUp 16,1
    Delay 300
    Goto 开始
Else 
    Goto 开始打怪
EndIf 
//+++++++++++++++++++++++++++++++++++++++++
//++++++++++++++++++++++++++++++++++++++++
//++++++++++++++++++++++++++++++++++
//+++++++++++++++++++++++++++++++++++++