//Vbcrlf 第2行
UserVar xue = 70 少于%时加血
UserVar lzc = 70 蓝少于%加蓝
Plugin Hwnd = Window.Foreground()
//下面这句是移动窗口到(0, 0)位置
Plugin Window.Move(Hwnd, 0, 0)
Delay 100*15
Rem 一开始
Delay 100*5
Rem 123
IfColor 661,39,4038f8,0
    Delay 500*2
    Goto 123
Else 
    //////////////////////以下为血
    x1=58
    y1=39
    Delay 100*5
    x2=118
    y2=39
    Delay 100*5
    xuet=x2-x1
    //xuet=60
    i=xue/100*xuet
    r=i+58
    Delay 100*5
    IfColor 661,39,4038f8,0
        Goto 123
    Else 
    EndIf 
    Delay 100*5
    IfColor r,y1 4038f8 0
    Else 
        MessageBox +H
        MoveTo r,y1
        Delay 100*5
        RightClick 1
    EndIf 
    IfColor 661,39,4038f8,0
        Goto 123
    Else 
    EndIf 
    x11=58
    y22=51
    x111=118
    y222=52
    IfColor 661,39,4038f8,0
        Goto 123
    Else 
    EndIf 
    ///////////////////////以上为坐标////////////////
    lzco=x111-x11
    //lzco=血总长
    lanc=lzco/100*lzco
    s=lanc+58
    //LANC
    //LANN=蓝处始坐标
    IfColor s,51 f86008 0
        //不用蓝
    Else 
        // +蓝
        MessageBox +L
        Delay 100*5
        MoveTo s,y22
        Delay 100*5
        RightClick 1
    EndIf 
    Delay 100*3
    Goto 一开始
EndIf 
Delay 100*3
Goto 一开始
Sub OnScriptExit
    MessageBox "脚本已经停止！欢迎使用"
Return