烫手：这一拳烫手，谁接谁挨炸

 fx-hotcoal

-- @file HotCoal.lua
-- 烫手 —— 这一拳烫手，谁接谁挨炸

local HotCoal = {}

local CONST = {
    BASE_PRICE    = 8,
    PRICE_STEP    = 4,
    BURN_GAP      = 1.5,
    LIGHT_CD      = 6.0,

    COLOR_COAL    = "#e87830",
    COLOR_DEEP    = "#5e2810",
    COLOR_GHOST   = "#f8c890",

    ZORDER_COAL   = 134,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1019000,
}

local _holder    = 0
local _price     = 0
local _burnT     = 0
local _cdLeft    = 0
local _coalFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "HTC",
        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 MoveCoal(toID)
    _holder = toID
    _price = _price + CONST.PRICE_STEP
    _burnT = CONST.BURN_GAP
    local tp = GetActorPos(toID)
    if _coalFx and tp then
        GUI:setPosition(_coalFx, tp.x, tp.y - 124)
    end
    SL:TipAbove(toID, "接炭+" .. _price)
end

function HotCoal.Light()
    if _cdLeft > 0 then
        ShowTip("火在划——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    if _holder ~= 0 then
        ShowTip("炭已经烧着——在" .. (_holder == 0 and "" or "") .. "它头上")
        return
    end
    _cdLeft = CONST.LIGHT_CD
    local tid = SL:GetValue("MARK_TARGET_ID")
    local tp = GetActorPos(tid)
    if not tid or not tp then return end
    _holder = tid
    _price = CONST.BASE_PRICE
    _burnT = CONST.BURN_GAP
    SafeRemove(_coalFx)
    _coalFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Coal"), tp.x, tp.y - 124, 0, 0, false)
    GUI:setLocalZOrder(_coalFx, CONST.ZORDER_COAL)
    SL:PlayLightCoalFx(tid)
    SL:TipAbove(tid, "点炭！")
    ShowTip("炭点它头上了——八点一跳，谁接谁挨")
end

-- 易主判定：持有者被命中，炭打给命中方
SL:RegisterLUAEvent(LUA_EVENT_BEFORE_HURT, "HTC_Move", function(tid, dmg)
    if _holder == 0 then return dmg end
    if dmg > 0 and (tid == _holder or true) then
        if tid ~= _holder then
            MoveCoal(tid)
        end
    end
    return dmg
end)

-- 定时器：炭火跳血与跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _holder == 0 then return end
        _burnT = _burnT - dt
        if _burnT > 0 then
            local hp = GetActorPos(_holder)
            if _coalFx and hp then
                GUI:setPosition(_coalFx, hp.x, hp.y - 124)
            end
            return
        end
        _burnT = CONST.BURN_GAP
        SL:ActorHurt(_holder, _price)
        SL:TipAbove(_holder, "烫-" .. _price)
        SL:PlayCoalBurnFx(_holder)
        if SL:GetValue("ACTOR_DEAD", _holder) then
            SafeRemove(_coalFx)
            _holder = 0
            _price = 0
            ShowTip("炭火熄了——持炭的人倒下了")
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("点火", function()
        HotCoal.Light()
    end)
    ShowTip("技能已加载: 烫手 (调试按钮触发)")
end, 1.0)

function HotCoal.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SafeRemove(_coalFx)
    _holder = 0
    _price = 0
end

return HotCoal