扎根桩：站得越久刀越重，挪一步清零

 fx-takeroot

--------------------------------------------------------------------------------
-- @file        TakeRoot.lua
-- @brief       扎根桩 —— 站得越久刀越重，挪一步清零
--              客户端表现模块：配置表 / 根须构件 / 静止累计状态机 / 定时器
--------------------------------------------------------------------------------

local TakeRoot = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    ROOT_CAP      = 5,          -- 五层封顶
    ROOT_GAP      = 1.0,        -- 一秒长一层
    ROOT_BONUS    = 0.15,       -- 每层加一成五
    STILL_EPS     = 4,          -- 静止判定阈值 (步)
    ANCHOR_LIFE   = 6.0,        -- 锚定六秒
    ANCHOR_STACKS = 3,          -- 锚定直钉三层
    ANCHOR_CD     = 8.0,        -- 扎根冷却

    -- 颜色
    COLOR_ROOT    = "#3fb950",  -- 根绿
    COLOR_DEEP    = "#9c6f14",  -- 土褐
    COLOR_GHOST   = "#7ee2a8",  -- 残影青

    ZORDER_GROUND = 118,
    ZORDER_ROOT   = 119,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 925000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _stacks   = 0
local _growT    = 0
local _anchorT  = 0
local _cdLeft   = 0
local _lastX    = nil
local _scheduler = nil
local _autoInc  = 0

local m_cos = math.cos
local m_rand = math.random

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "TRT", CONST.AUTOINC_BASE + _autoInc)
end

local function GetActorPos(actorID)
    if not actorID then return nil end
    local x = SL:GetValue("ACTOR_POSITION_X", actorID)
    local y = SL:GetValue("ACTOR_POSITION_Y", actorID)
    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 CreateRootNode(idx)
    local mp = GetActorPos(SL:GetValue("USER_ID"))
    if not mp then return end
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Root" .. idx),
        mp.x, mp.y, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_ROOT)
    local a = idx * 1.9
    local len = 20 + idx * 5
    for i = 0, 3 do
        GUI:DrawLine_Create(node, string.format("r_%d", i), 0, 0, 2,
            m_cos(a) * 6 * i * 0.4, 2 + i * 2,
            m_cos(a) * len * 0.4, 6 + i * 2.4,
            CONST.COLOR_DEEP, 200)
    end
    GUI:runAction(node, GUI:ActionSequence(
        GUI:ActionFadeIn(0.18),
        GUI:DelayTime(9.9),
        GUI:ActionFadeOut(0.4),
        GUI:CallFunc(function() SafeRemove(node) end)
    ))
    return node
end

--------------------------------------------------------------------------------
-- 根须与清零
--------------------------------------------------------------------------------
local function Root_Reset(reason)
    if _stacks > 0 then
        ShowTip(reason or "根断")
    end
    _stacks = 0
    _growT = 0
end

local function Root_Grow(nodeBag)
    if _stacks >= CONST.ROOT_CAP then return end
    _stacks = _stacks + 1
    nodeBag[#nodeBag + 1] = CreateRootNode(_stacks)
    SL:TipAboveMe("根" .. _stacks)
end

--------------------------------------------------------------------------------
-- 扎根入口
--------------------------------------------------------------------------------
function TakeRoot.Cast(nodeBag)
    if _cdLeft > 0 then return end
    _cdLeft = CONST.ANCHOR_CD
    _anchorT = CONST.ANCHOR_LIFE
    for i = 1, CONST.ANCHOR_STACKS do
        if _stacks < CONST.ROOT_CAP then
            Root_Grow(nodeBag)
        end
    end
    ShowTip("扎根！钉死六秒")
end

function TakeRoot.Bonus()
    return _stacks * CONST.ROOT_BONUS
end

--------------------------------------------------------------------------------
-- 定时器与静止累计链
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        _anchorT = math.max(0, _anchorT - dt)
        local mp = GetActorPos(SL:GetValue("USER_ID"))
        if mp then
            local moved = _lastX and math.abs(mp.x - _lastX) > CONST.STILL_EPS
            if moved and _anchorT <= 0 then
                Root_Reset("挪步——根须清零")
            end
            _lastX = mp.x
            if not moved or _anchorT > 0 then
                _growT = _growT + dt
                if _growT >= CONST.ROOT_GAP then
                    _growT = _growT - CONST.ROOT_GAP
                    Root_Grow(_rootBag or {})
                end
            end
        end
        local bonus = TakeRoot.Bonus()
        SL:SetNextAttackAmp(bonus > 0 and 1 + bonus or 1.0)
    end, 0.02)
end

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 扎根桩 (调试按钮触发)")
end, 1.0)

SL:RegisterLUAEvent(LUA_EVENT_LOCAL_STUN, "TRT_Stun", function()
    Root_Reset("被控——根须散了")
end)

return TakeRoot