铜墙：挨一刀添一层甲，五层就是铜墙铁壁

 fx-stonewall

-- @file StoneWall.lua
-- 铜墙 —— 挨一刀添一层甲，五层就是铜墙铁壁

local StoneWall = {}

local CONST = {
    ARMOR_LIFE    = 8.0,
    ARMOR_CD      = 8.0,
    LAYER_CAP     = 5,
    CUT_PER_LAYER = 0.1,

    COLOR_ARMOR   = "#8a8a9a",
    COLOR_DEEP    = "#2e2e3e",
    COLOR_GHOST   = "#d8d8e8",

    ZORDER_LAYER  = 131,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1004000,
}

local _armorT    = 0
local _layers    = 0
local _cdLeft    = 0
local _armorFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "STW",
        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 AddLayer()
    if _layers >= CONST.LAYER_CAP then return end
    _layers = _layers + 1
    SL:PlayLayerUpFx(SL:GetValue("USER_ID"), _layers)
    if _layers >= CONST.LAYER_CAP then
        ShowTip("五层铜墙——刀刀只掉四点，稳如老墙")
    end
end

function StoneWall.Cast()
    if _cdLeft > 0 or _armorT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    if not myID then return end
    _cdLeft = CONST.ARMOR_CD
    _armorT = CONST.ARMOR_LIFE
    _layers = 0
    SafeRemove(_armorFx)
    _armorFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Armor"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_armorFx, CONST.ZORDER_LAYER)
    SL:PlayArmorUpFx(myID)
    SL:TipAboveMe("开甲！")
    ShowTip("甲开了——八秒里挨一刀添一层，越挨越硬")
end

-- 阶梯减伤出口：扣血前查层数
SL:RegisterLUAEvent(LUA_EVENT_BEFORE_HURT, "STW_Cut", function(tid, dmg)
    if _armorT > 0 and tid == SL:GetValue("USER_ID") then
        AddLayer()
        local cut = 1 - _layers * CONST.CUT_PER_LAYER
        local out = math.max(4, math.floor(dmg * cut))
        SL:TipAboveMe("甲" .. _layers .. "层")
        return out
    end
    return dmg
end)

-- 定时器：甲期倒计时与卸甲清理
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _armorT > 0 then
            _armorT = _armorT - dt
            local myID = SL:GetValue("USER_ID")
            local mp = GetActorPos(myID)
            if _armorFx and mp then
                GUI:setPosition(_armorFx, mp.x, mp.y - 40)
            end
            if _armorT <= 0 then
                _armorT = 0
                _layers = 0
                SafeRemove(_armorFx)
                ShowTip("甲卸了——层数清零，下轮再开")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("开甲", function()
        StoneWall.Cast()
    end)
    ShowTip("技能已加载: 铜墙 (调试按钮触发)")
end, 1.0)

function StoneWall.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_BEFORE_HURT, "STW_Cut")
    SafeRemove(_armorFx)
end

return StoneWall