留情善纹：刀下留情，它念你的好

 fx-mercywave

-- @file MercyWave.lua
-- 留情善纹 —— 刀下留情，它念你的好

local MercyWave = {}

local CONST = {
    MERCY_LIFE    = 10.0,
    MERCY_CD      = 3.0,
    THRESHOLD     = 0.3,
    REGAIN_PER_S  = 3,
    RAGE_LIFE     = 5.0,

    COLOR_MERCY   = "#d888a0",
    COLOR_DEEP    = "#583038",
    COLOR_GHOST   = "#f8d0e0",

    ZORDER_MERCY  = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1133000,
}

local _mercyT    = 0
local _rageT     = 0
local _cdLeft    = 0
local _tid       = 0
local _mercyFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "MCW",
        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

function MercyWave.InMercy()
    return _mercyT > 0
end

-- 留情门槛：血薄才留，留了进恩情期
function MercyWave.Spare()
    if _cdLeft > 0 or MercyWave.InMercy() then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    local hp = SL:GetValue("ACTOR_HP", tid) or 0
    local hpM = SL:GetValue("ACTOR_HP_MAX", tid) or 1
    if hp > hpM * CONST.THRESHOLD then
        ShowTip("它血还厚——留情要等它见红")
        return
    end
    _cdLeft = CONST.MERCY_CD
    _mercyT = CONST.MERCY_LIFE
    _tid = tid
    SL:AddBuff(tid, "MERCY_CALM", CONST.MERCY_LIFE)
    SafeRemove(_mercyFx)
    _mercyFx = GUI:Layout_Create(GUI:Attach_Scene(),
        GenID("Halo"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_mercyFx, CONST.ZORDER_MERCY)
    SL:PlayMercyUpFx(tid)
    ShowTip("留情了——它记恩不咬，你每秒回三点")
end

-- 背信判定：恩情期里你出手，恩当仇报
SL:RegisterLUAEvent(LUA_EVENT_MELEE_HIT, "MCW_Betray", function(tid)
    if not MercyWave.InMercy() or tid ~= _tid then return 0 end
    _mercyT = 0
    SafeRemove(_mercyFx)
    _rageT = CONST.RAGE_LIFE
    SL:AddBuff(tid, "BETRAY_RAGE", CONST.RAGE_LIFE)
    SL:TipAbove(tid, "恩将仇报!")
    ShowTip("恩将仇报——它红眼五秒")
    return 0
end)

-- 定时器：恩情倒计时、回血与红眼消化
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _mercyT > 0 then
            _mercyT = _mercyT - dt
            local myID = SL:GetValue("USER_ID")
            local hp = SL:GetValue("ACTOR_HP", myID) or 0
            SL:SetValue("ACTOR_HP", myID,
                math.min(SL:GetValue("ACTOR_HP_MAX", myID),
                    hp + CONST.REGAIN_PER_S))
            if _mercyT <= 0 then
                SafeRemove(_mercyFx)
                ShowTip("恩情到期——它又不认人了")
            end
        end
        if _rageT > 0 then
            _rageT = _rageT - dt
            if _rageT <= 0 then
                ShowTip("它消气了——回到平常的爪")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("留情", function()
        MercyWave.Spare()
    end)
    ShowTip("技能已加载: 留情纹 (调试按钮触发)")
end, 1.0)

function MercyWave.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_HIT, "MCW_Betray")
    SafeRemove(_mercyFx)
    _mercyT = 0
    _rageT = 0
end

return MercyWave