//间隔36，Y取值729.F1坐标558，729. 技能栏空时颜色为738ea5
//人物血条坐标起点65，56 终点185，56 空血颜色1b1f1a
//人物蓝条坐标起点65，62 终点185，62 空蓝颜色1b1f1a
//宠物血条坐标起点91，95 终点185，95 空血颜色111310
UserVar XueZong=100 输入人物总血量
UserVar LanZong=100  输入人物总蓝量
UserVar ChongZong=100  输入宠物总血量
UserVar XueJia=100  输入人物加血底线
UserVar LanJia=100  输入人物加蓝底线
UserVar ChongJia=100  输入宠物加血底线
UserVar Fhong=8 吃红快捷键位，默认F8
UserVar Flan=9 吃蓝快捷键位，默认F9
UserVar Fchong=10 喂宠快捷键位，默认F10
UserVar JiaXue=DropList{自动加血:1|手动加血:0}=0 是否自动加血
UserVar JiaLan=DropList{自动加蓝:1|手动加蓝:0}=0 是否自动加蓝
UserVar JiaChong=DropList{自动加宠:1|手动加宠:0}=0 是否自动加宠
Rem Main
Delay 1000
If Jiaxue=1
    Gosub 检查红药
EndIf 
If JiaLan=1
    Gosub 检查蓝药
EndIf 
If JiaChong=1
    Gosub 检查宠药
EndIf 
Goto Main
Sub 检查红药
    IfColor 558+(Fhong-1)*36,729,738ea5,2
        SayString "无可用红药！！！"
        KeyPress 13,1
        Goto 等待置药
    Else 
        Delay 500
        Gosub 加红
    EndIf 
Return 检查红药
Sub 检查蓝药
    IfColor 558+(Flan-1)*36,729,738ea5,2
        SayString "无可用蓝药！！！"
        KeyPress 13,1
        Goto 等待置药
    Else 
        Delay 500
        Gosub 加蓝
    EndIf 
Return 检查蓝药
Sub 检查宠药
    IfColor 558+(Fchong-1)*36,729,738ea5,2
        SayString "无可用宠药！！！"
        KeyPress 13,1
        Goto 等待置药
    Else 
        Delay 500
        Gosub 加宠
    EndIf 
Return 检查宠药
Sub 等待置药
    Delay 200
    KeyDown 18,1
    KeyPress 65,1
    KeyUp 18,1
    Rem 放药提示
    Delay 500
    SayString "请放入对应药品，放置结束按Y键"
    KeyPress 13,1
    WaitKey key
    If key=89
        Goto Main
    Else 
        Goto 放药提示
    EndIf 
Return 等待置药
Sub 加红
    IfColor 65+XueJia/XueZong*120,56,1b1f1a,2
        i=Fhong+111
        KeyDown i,1
        Delay 200
        KeyUp i,1
    EndIf 
Return 加红
Sub 加蓝
    IfColor 65+LanJia/Lanzong*120,62,1b1f1a,2
        i=Flan+111
        KeyDown i,1
        Delay 200
        KeyUp i,1
    EndIf 
Return 加蓝
Sub 加宠
    IfColor 91+ChongJia/ChongZong*94,95,111310,2
        i=Fchong+111
        KeyDown i,1
        Delay 200
        KeyUp i,1
    EndIf 
Return 加宠