遗泽：倒下的怪留一圈遗泽，站进去三秒加两成五

 fx-legacyring

-- @file LegacyRing.lua
-- 遗泽 —— 倒下的怪留一圈遗泽，站进去三秒加两成五

local LegacyRing = {}

local CONST = {
    RING_LIFE     = 12.0,
    RING_RADIUS   = 60,
    STAND_NEED    = 3.0,
    BUFF_LIFE     = 6.0,
    BUFF_AMP      = 1.25,

    COLOR_RING    = "#5aa068",
    COLOR_DEEP    = "#1e4a28",
    COLOR_GHOST   = "#c0ecd0",

    ZORDER_RING   = 128,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1030000,
}

local _rings     = {}
local _standT    = 0
local _buffT     = 0
local _cdLeft    = 0
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "LGR",
        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 GrantBuff()
    _buffT = CONST.BUFF_LIFE
    _standT = 0
    SL:PlayLegacyBuffFx(SL:GetValue("USER_ID"))
    SL:TipAboveMe("泽+25%")
    ShowTip("泽气上身——六秒里刀刀加两成五")
end

local function DropRing(x)
    table.insert(_rings, { x = x, t = CONST.RING_LIFE })
    ShowTip("小的倒下留了一圈泽——站进去或踏掉都行")
end

-- 死亡钩子：尸位落环
SL:RegisterLUAEvent(LUA_EVENT_ACTOR_DEATH, "LGR_Drop", function(tid)
    if not SL:GetValue("ACTOR_IS_SMALL", tid) then return end
    local tp = GetActorPos(tid)
    if tp then DropRing(tp.x) end
end)

-- 踏泽出口：吸干最近一环
function LegacyRing.Step()
    if _cdLeft > 0 then
        ShowTip("泽在吸——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    local myID = SL:GetValue("USER_ID")
    local mp = GetActorPos(myID)
    if not mp then return end
    local best, bd = nil, 999
    for i, r in ipairs(_rings) do
        local d = math.abs(r.x - mp.x)
        if d < bd then bd = d; best = i end
    end
    if not best then
        ShowTip("地上没泽环——先放倒一只小的")
        return
    end
    _cdLeft = 6.0
    table.remove(_rings, best)
    GrantBuff()
end

-- 定时器：站环累计与泽环寿命
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _buffT > 0 then
            _buffT = _buffT - dt
            if _buffT <= 0 then ShowTip("泽气散了——下一环再踏") end
        end
        local myID = SL:GetValue("USER_ID")
        local mp = GetActorPos(myID)
        local inRing = false
        for i = #_rings, 1, -1 do
            local r = _rings[i]
            r.t = r.t - dt
            if r.t <= 0 then table.remove(_rings, i)
            elseif mp and math.abs(r.x - mp.x) <= CONST.RING_RADIUS then
                inRing = true
            end
        end
        if inRing and _buffT <= 0 then
            _standT = _standT + dt
            if _standT >= CONST.STAND_NEED then GrantBuff() end
        else
            _standT = math.max(0, _standT - dt)
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("踏泽", function()
        LegacyRing.Step()
    end)
    ShowTip("技能已加载: 遗泽 (调试按钮触发)")
end, 1.0)

function LegacyRing.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_ACTOR_DEATH, "LGR_Drop")
    _rings = {}
end

return LegacyRing