胎记：出生带金印三秒，三秒里刀刀二十

 fx-birthmark

-- @file BirthMark.lua
-- 胎记 —— 出生带金印三秒，三秒里刀刀二十

local BirthMark = {}

local CONST = {
    MARK_LIFE     = 3.0,
    MARK_AMP      = 2.0,
    BASE_DMG      = 10,

    COLOR_MARK    = "#d8b040",
    COLOR_DEEP    = "#584410",
    COLOR_GHOST   = "#f4e0a0",

    ZORDER_MARK   = 134,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1033000,
}

local _markT     = 0
local _markID    = 0
local _markFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "BHM",
        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 StampMark(tid)
    _markT = CONST.MARK_LIFE
    _markID = tid
    SafeRemove(_markFx)
    local tp = GetActorPos(tid)
    if tp then
        _markFx = GUI:Layout_Create(GUI:Attach_SceneF(),
            GenID("Mark"), tp.x, tp.y - 78, 0, 0, false)
        GUI:setLocalZOrder(_markFx, CONST.ZORDER_MARK)
    end
    SL:PlayBirthMarkFx(tid)
    SL:TipAbove(tid, "带胎记出生")
end

-- 金印判定：印亮时刀翻倍
SL:RegisterLUAEvent(LUA_EVENT_BEFORE_HURT, "BHM_Amp", function(tid, dmg)
    if _markT > 0 and tid == _markID then
        return math.floor(dmg * CONST.MARK_AMP)
    end
    return dmg
end)

-- 出生钩子：新生即发印
SL:RegisterLUAEvent(LUA_EVENT_ACTOR_SPAWN, "BHM_Born", function(tid)
    StampMark(tid)
end)

-- 定时器：金印倒计时与印的跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        if _markT <= 0 then return end
        _markT = _markT - dt
        local mp = GetActorPos(_markID)
        if _markFx and mp then
            GUI:setPosition(_markFx, mp.x, mp.y - 78)
        end
        if _markT <= 0 or not mp
            or SL:GetValue("ACTOR_DEAD", _markID) then
            _markT = 0
            SafeRemove(_markFx)
            ShowTip("胎记淡了——恢复平常刀，下一只再打点")
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("催生", function()
        local tid = SL:GetValue("MARK_TARGET_ID")
        if tid then StampMark(tid) end
    end)
    ShowTip("技能已加载: 胎记 (调试按钮触发)")
end, 1.0)

function BirthMark.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_BEFORE_HURT, "BHM_Amp")
    SL:UnregisterLUAEvent(LUA_EVENT_ACTOR_SPAWN, "BHM_Born")
    SafeRemove(_markFx)
    _markT = 0
end

return BirthMark