认领：第一刀认领，认过的怪挨你的刀加一成五

 fx-claimmark

-- @file ClaimMark.lua
-- 认领 —— 第一刀认领，认过的怪挨你的刀加一成五

local ClaimMark = {}

local CONST = {
    CLAIM_AMP     = 1.15,
    STAMP_CD      = 3.0,

    COLOR_CLAIM   = "#c85848",
    COLOR_DEEP    = "#4e1810",
    COLOR_GHOST   = "#f0b0a8",

    ZORDER_SEAL   = 134,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1031000,
}

local _markID    = 0
local _cdLeft    = 0
local _sealFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "CKM",
        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 StampSeal(tid)
    SafeRemove(_sealFx)
    local tp = GetActorPos(tid)
    if tp then
        _sealFx = GUI:Layout_Create(GUI:Attach_SceneF(),
            GenID("Seal"), tp.x, tp.y - 142, 0, 0, false)
        GUI:setLocalZOrder(_sealFx, CONST.ZORDER_SEAL)
    end
end

function ClaimMark.Stamp()
    if _cdLeft > 0 then
        ShowTip("印在盖——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    _cdLeft = CONST.STAMP_CD
    _markID = tid
    StampSeal(tid)
    SL:PlayClaimFx(tid)
    SL:TipAbove(tid, "认领")
    ShowTip("认领了这只——挨你的刀加一成五")
end

-- 第一刀自动盖印
SL:RegisterLUAEvent(LUA_EVENT_MELEE_HIT, "CKM_First", function(tid)
    if _markID == 0 and not SL:GetValue("ACTOR_DEAD", tid) then
        _markID = tid
        StampSeal(tid)
        ShowTip("第一刀认了领——这只以后挨你加一成五")
    end
end)

-- 认领增伤出口
SL:RegisterLUAEvent(LUA_EVENT_BEFORE_HURT, "CKM_Amp", function(tid, dmg)
    if _markID ~= 0 and tid == _markID then
        return math.floor(dmg * CONST.CLAIM_AMP)
    end
    return dmg
end)

-- 定时器：印的跟脚与失效守护
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _markID ~= 0 then
            local mp = GetActorPos(_markID)
            if _sealFx and mp then
                GUI:setPosition(_sealFx, mp.x, mp.y - 142)
            end
            if not mp or SL:GetValue("ACTOR_DEAD", _markID) then
                _markID = 0
                SafeRemove(_sealFx)
                ShowTip("认领的这只倒了——换下一只再认")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("认领", function()
        ClaimMark.Stamp()
    end)
    ShowTip("技能已加载: 认领 (调试按钮触发)")
end, 1.0)

function ClaimMark.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_HIT, "CKM_First")
    SL:UnregisterLUAEvent(LUA_EVENT_BEFORE_HURT, "CKM_Amp")
    SafeRemove(_sealFx)
    _markID = 0
end

return ClaimMark