化劲诀：一口重伤化成十秒轻伤慢慢还

 fx-softenflow

--------------------------------------------------------------------------------
-- @file        SoftenFlow.lua
-- @brief       化劲诀 —— 一口重伤化成十秒轻伤慢慢还
--              客户端表现模块：配置表 / 慢账队列 / 分帧扣款机 / 定时器
--------------------------------------------------------------------------------

local SoftenFlow = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    FLOW_LIFE     = 8.0,        -- 化劲八秒
    FLOW_CD       = 7.0,        -- 冷却七秒
    NOW_CUT       = 0.2,        -- 当场掉两成
    DEFER_LIFE    = 8.0,        -- 慢账还八秒
    DRAIN_GAP     = 0.5,        -- 半秒一扣

    -- 颜色
    COLOR_FLOW    = "#39c5cf",  -- 化青
    COLOR_DEEP    = "#0e4a52",  -- 深青
    COLOR_GHOST   = "#c5f3f7",  -- 残白

    ZORDER_GROUND = 118,
    ZORDER_FLOW   = 134,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 931000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _flowT     = 0              -- 化劲余时
local _cdLeft    = 0
local _queue     = {}             -- 慢账队列：每笔 {left = 剩余扣额}
local _drainT    = 0              -- 扣款计时
local _scheduler = nil
local _autoInc   = 0

local m_cos = math.cos
local m_sin = math.sin

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "SFW", CONST.AUTOINC_BASE + _autoInc)
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 CreateFlowRing()
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Flow"),
        SL:GetValue("ACTOR_POSITION_X", SL:GetValue("USER_ID")),
        SL:GetValue("ACTOR_POSITION_Y", SL:GetValue("USER_ID")) - 46, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_FLOW)
    for i = 1, 22 do
        local a1 = (i - 1) / 22 * 6.28
        local a2 = i / 22 * 6.28
        GUI:DrawLine_Create(node, string.format("f_%d", i), 0, 0, 2,
            m_cos(a1) * 28, m_sin(a1) * 54, m_cos(a2) * 28, m_sin(a2) * 54,
            CONST.COLOR_FLOW, 180)
    end
    return node
end

--------------------------------------------------------------------------------
-- 入账与拆账
--------------------------------------------------------------------------------
local function Hurt_Split(raw)
    if _flowT <= 0 then
        SL:PlayerHurt(raw)
        return
    end
    local now = math.round(raw * CONST.NOW_CUT)
    local defer = raw - now
    SL:PlayerHurt(now)
    table.insert(_queue, { left = defer })
    SL:TipAboveMe("余账" .. defer)
end

--------------------------------------------------------------------------------
-- 分帧扣款机
--------------------------------------------------------------------------------
local function Queue_Drain()
    if #_queue <= 0 then return end
    local pay = 0
    for i = #_queue, 1, -1 do
        _queue[i].left = _queue[i].left - 1.5
        pay = pay + 1.5
        if _queue[i].left <= 0 then
            table.remove(_queue, i)
        end
    end
    SL:PlayerHurt(pay)
    SL:TipAboveMe("-" .. pay)
end

--------------------------------------------------------------------------------
-- 开关与总读数
--------------------------------------------------------------------------------
function SoftenFlow.Cast()
    if _cdLeft > 0 or _flowT > 0 then return end
    _cdLeft = CONST.FLOW_CD
    _flowT = CONST.FLOW_LIFE
    CreateFlowRing()
    ShowTip("劲化开了——八秒里挨的刀都摊成慢账")
end

function SoftenFlow.Owe()
    local owed = 0
    for i = 1, #_queue do
        owed = owed + _queue[i].left
    end
    return owed
end

--------------------------------------------------------------------------------
-- 定时器与调试
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _flowT > 0 then
            _flowT = _flowT - dt
            if _flowT <= 0 then
                ShowTip("劲散了——下一刀又是实价")
            end
        end
        _drainT = _drainT + dt
        if _drainT >= CONST.DRAIN_GAP then
            _drainT = _drainT - CONST.DRAIN_GAP
            Queue_Drain()
        end
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_LOCAL_HURT, "SFW_Hurt", function(data)
    if data and data.raw then
        Hurt_Split(data.raw)
    end
end)

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 化劲诀 (调试按钮触发)")
end, 1.0)

return SoftenFlow