重伤印：一道印拍上去，它的奶断一截

 fx-gravewound

--------------------------------------------------------------------------------
-- @file        GraveWound.lua
-- @brief       重伤印 —— 一道印拍上去，它的奶断一截
--              客户端表现模块：配置表 / 封印构件 / 治疗折算 / 定时器
--------------------------------------------------------------------------------

local GraveWound = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    MARK_LIFE     = 6.0,        -- 盖印六秒
    MARK_CD       = 5.0,        -- 拍印冷却
    HEAL_CUT      = 0.5,        -- 回血折半
    SEAL_TEXT     = "断奶",

    -- 颜色
    COLOR_MARK    = "#f85149",  -- 印红
    COLOR_DEEP    = "#7a1d1d",  -- 深红
    COLOR_GHOST   = "#ffc9c9",  -- 印白

    ZORDER_GROUND = 118,
    ZORDER_SEAL   = 134,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 927000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _markT     = 0              -- 封印倒计时
local _markUnit  = nil            -- 被盖印的单位
local _cdLeft    = 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 "GVW", 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 CreateSeal(x, y)
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Seal"), x, y, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_SEAL)
    GUI:DrawLine_Create(node, "frame_l", 0, 0, 2.5, -14, -14, -14, 14, CONST.COLOR_MARK, 220)
    GUI:DrawLine_Create(node, "frame_r", 0, 0, 2.5, 14, -14, 14, 14, CONST.COLOR_MARK, 220)
    GUI:DrawLine_Create(node, "frame_t", 0, 0, 2.5, -14, -14, 14, -14, CONST.COLOR_MARK, 220)
    GUI:DrawLine_Create(node, "frame_b", 0, 0, 2.5, -14, 14, 14, 14, CONST.COLOR_MARK, 220)
    GUI:Text_Create(node, "txt", -8, -8, 16, CONST.COLOR_MARK, "伤")
    return node
end

--------------------------------------------------------------------------------
-- 治疗折算：一切回血的汇合口
--------------------------------------------------------------------------------
local function OnUnitHeal(unitID, amount)
    if _markT > 0 and _markUnit == unitID then
        local cut = math.round(amount * CONST.HEAL_CUT)
        SL:TipAbove(unitID, "断奶")
        return cut
    end
    return amount
end

--------------------------------------------------------------------------------
-- 拍印与到期
--------------------------------------------------------------------------------
local function Seal_Apply(targetID)
    _markT = CONST.MARK_LIFE
    _markUnit = targetID
    local tp = GetActorPos(targetID)
    if tp then
        local node = CreateSeal(tp.x, tp.y - 88)
        SL:TipAbove(targetID, "重伤印！")
        return node
    end
end

function GraveWound.Cast(myID, targetID)
    if _cdLeft > 0 then return end
    if _markT > 0 then return end
    _cdLeft = CONST.MARK_CD
    Seal_Apply(targetID)
end

--------------------------------------------------------------------------------
-- 定时器与调试
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _markT > 0 then
            _markT = _markT - dt
            if _markT <= 0 then
                _markUnit = nil
                ShowTip("印揭了——下一张跟上")
            end
        end
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_UNIT_HEAL, "GVW_Heal", function(data)
    if data and data.unitID and data.amount then
        return OnUnitHeal(data.unitID, data.amount)
    end
end)

SL:RegisterLUAEvent(LUA_EVENT_ACTOR_DEAD, "GVW_Dead", function(data)
    if data and data.id == _markUnit then
        _markT = 0
        _markUnit = nil
    end
end)

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 重伤印 (调试按钮触发)")
end, 1.0)

return GraveWound