爆桶：油桶就在它脚边，一箭的事

 fx-barrelpop

-- @file BarrelPop.lua
-- 爆桶 —— 油桶就在它脚边，一箭的事

local BarrelPop = {}

local CONST = {
    BARREL_COUNT  = 2,
    RESPAWN_TIME  = 3.0,
    BOOM_RADIUS   = 80,
    BOOM_DMG      = 30,
    SHOT_CD       = 2.0,

    COLOR_BOOM    = "#c8862f",
    COLOR_DEEP    = "#5e3a10",
    COLOR_GHOST   = "#f8dca8",

    ZORDER_BARREL = 130,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1036000,
}

local _barrels    = {}
local _cdLeft     = 0
local _barrelFx   = nil
local _scheduler  = nil
local _autoInc    = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "BRP",
        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 SpawnBarrel(idx)
    _barrels[idx] = { x = 380 + SL:Random(240),
        alive = true, respawn = 0 }
    SL:PlayBarrelDropFx(_barrels[idx].x)
end

local function PopBarrel(x)
    SL:PlayBoomFx(x)
    SL:ScreenShake(3.8, 0.24)
    local hit = false
    for _, tid in ipairs(SL:GetAllActorsInView()) do
        local tp = GetActorPos(tid)
        if tp and math.abs(tp.x - x) <= CONST.BOOM_RADIUS then
            SL:ActorHurt(tid, CONST.BOOM_DMG)
            SL:TipAbove(tid, "-30")
            hit = true
        end
    end
    return hit
end

-- 点桶出口：射最近的可爆桶
function BarrelPop.Shoot()
    if _cdLeft > 0 then
        ShowTip("箭在搭——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    local target = SL:GetValue("MARK_TARGET_ID")
    local tp = GetActorPos(target)
    if not tp then return end
    local best, bd = nil, 999
    for i, b in ipairs(_barrels) do
        if b.alive then
            local d = math.abs(b.x - tp.x)
            if d < bd then bd = d; best = i end
        end
    end
    if not best then
        ShowTip("没桶可点——等桶刷新")
        return
    end
    _cdLeft = CONST.SHOT_CD
    SL:PlayShootFx(SL:GetValue("USER_ID"))
    SL:DelayCall(0.2, function()
        local b = _barrels[best]
        if not b or not b.alive then return end
        b.alive = false
        b.respawn = CONST.RESPAWN_TIME
        local hit = PopBarrel(b.x)
        if not hit then ShowTip("桶响了——可惜它站得远，溅不着") end
    end)
end

-- 定时器：刷桶与桶的存续
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        for _, b in ipairs(_barrels) do
            if not b.alive then
                b.respawn = b.respawn - dt
                if b.respawn <= 0 then SpawnBarrelTo(b) end
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    for i = 1, CONST.BARREL_COUNT do SpawnBarrel(i) end
    SL:BindDebugButton("点桶", function()
        BarrelPop.Shoot()
    end)
    ShowTip("技能已加载: 爆桶 (调试按钮触发)")
end, 1.0)

function BarrelPop.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    _barrels = {}
end

return BarrelPop