逆纹缓刀：重刀化三拍，分批慢慢疼

 fx-defercrest

-- @file DeferCrest.lua
-- 逆纹 —— 重刀化三拍，分批慢慢疼

local DeferCrest = {}

local CONST = {
    INSTANT_PCT   = 0.4,
    DEFER_PCT     = 0.6,
    DEBT_CAP      = 30,
    TICK_GAP      = 0.6,

    COLOR_DEFER   = "#5878a0",
    COLOR_DEEP    = "#1e2c48",
    COLOR_GHOST   = "#b8d0e8",

    ZORDER_DEFER  = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1088000,
}

local _on        = false
local _debt      = 0
local _tickGap   = 0
local _deferFx   = nil
local _scheduler = nil
local _autoInc   = 0

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

-- 立收拆解：披纹期的刀拆成当场与挂账两份
SL:RegisterLUAEvent(LUA_EVENT_BEFORE_HURT, "DFC_Split",
function(dmg)
    if not _on then return dmg end
    local instant = math.floor(dmg * CONST.INSTANT_PCT)
    _debt = math.min(CONST.DEBT_CAP,
        _debt + math.floor(dmg * CONST.DEFER_PCT))
    SL:TipAboveMe("挂账 " .. _debt)
    return instant
end)

-- 分期扣款：半拍一点二匀速还账
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        if not _on then return end
        if _debt > 0 then
            _tickGap = _tickGap + dt
            if _tickGap >= CONST.TICK_GAP then
                _tickGap = 0
                local pay = math.min(1.2, _debt)
                _debt = _debt - pay
                local myID = SL:GetValue("USER_ID")
                SL:SetValue("ACTOR_HP", myID,
                    math.max(0,
                        (SL:GetValue("ACTOR_HP", myID) or 0) - pay))
                SL:TipAboveMe("-" .. pay)
                if SL:GetValue("ACTOR_HP", myID) <= 0 then
                    ShowTip("分期也疼死了——你倒了")
                end
            end
        end
        local myID = SL:GetValue("USER_ID")
        local mp = GetActorPos(myID)
        if _deferFx and mp then
            GUI:setPosition(_deferFx, mp.x, mp.y - 62)
        end
    end, 0.02)
end

function DeferCrest.Toggle()
    local myID = SL:GetValue("USER_ID")
    _on = not _on
    if _on then
        SafeRemove(_deferFx)
        _deferFx = GUI:Layout_Create(GUI:Attach_SceneF(),
            GenID("Defer"), 0, 0, 0, 0, false)
        GUI:setLocalZOrder(_deferFx, CONST.ZORDER_DEFER)
        SL:PlayDeferUpFx(myID)
        ShowTip("逆纹披上了——重刀只立收六成")
    else
        _debt = 0
        SafeRemove(_deferFx)
        ShowTip("卸纹了——挂账一笔勾销")
    end
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("披纹", function()
        DeferCrest.Toggle()
    end)
    ShowTip("技能已加载: 逆纹 (调试按钮触发)")
end, 1.0)

function DeferCrest.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_BEFORE_HURT, "DFC_Split")
    SafeRemove(_deferFx)
    _on = false
    _debt = 0
end

return DeferCrest