天平：两条血条平一平，谁高谁吃亏

 fx-hpbalance

-- @file HpBalance.lua
-- 天平 —— 两条血条平一平，谁高谁吃亏

local HpBalance = {}

local CONST = {
    BALANCE_CD    = 6.0,
    FLOOR_PCT     = 0.04,

    COLOR_SCALE   = "#b89840",
    COLOR_DEEP    = "#504010",
    COLOR_GHOST   = "#f0e0a0",

    ZORDER_SCALE  = 134,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1049000,
}

local _cdLeft    = 0
local _scaleFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "HPB",
        CONST.AUTOINC_BASE + _autoInc)
end

local function GetActorPos(id)
    if not id then return nil end
    local x = SL:GetValue("ACTOR_POSITION_X", id)
    local y = SL:GetValue("ACTOR_POSITION_Y", id)
    if not x or not y then return nil end
    return { x = x, y = y }
end

local function SafeRemove(node)
    if node and not GUI:Widget_IsNull(node) then
        GUI:removeFromParent(node)
    end
end

local function ShowTip(msg)
    if msg and msg ~= "" then SL:ShowSystemTips(msg) end
end

local function GetPct(id)
    local hp = SL:GetValue("ACTOR_HP", id)
    local hpM = SL:GetValue("ACTOR_MAX_HP", id)
    if not hp or not hpM or hpM <= 0 then return nil end
    return hp / hpM
end

function HpBalance.Weigh()
    if _cdLeft > 0 then
        ShowTip("秤在动——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    local myID = SL:GetValue("USER_ID")
    local tid = SL:GetValue("MARK_TARGET_ID")
    local pp = GetPct(myID)
    local mp = GetPct(tid)
    if not pp or not mp then return end
    _cdLeft = CONST.BALANCE_CD
    local avg = (pp + mp) / 2
    SL:SetActorHpPct(myID, math.max(avg, CONST.FLOOR_PCT))
    SL:SetActorHpPct(tid, math.max(avg, CONST.FLOOR_PCT))
    SL:PlayWeighFx(myID, tid)
    SL:TipAboveMe(pp > mp and "称亏" or "称赚")
    ShowTip("平完了——两管血一起落到"
        .. math.floor(avg * 100) .. "%")
end

-- 定时器：秤面演出与冷却推进
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _scaleFx then
            local myID = SL:GetValue("USER_ID")
            local mp = GetActorPos(myID)
            if _scaleFx and mp then
                GUI:setPosition(_scaleFx, mp.x, mp.y - 110)
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("称平", function()
        HpBalance.Weigh()
    end)
    ShowTip("技能已加载: 天平 (调试按钮触发)")
end, 1.0)

function HpBalance.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SafeRemove(_scaleFx)
    _scaleFx = nil
end

return HpBalance