火油阵：先泼油再点灯，两步烧一条线

 fx-oilline

--------------------------------------------------------------------------------
-- @file        OilLine.lua
-- @brief       火油阵 —— 先泼油再点灯，两步烧一条线
--              客户端表现模块：配置表 / 油面构件 / 火线构件 / 定时器
--------------------------------------------------------------------------------

local OilLine = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    OIL_LIFE      = 8.0,        -- 油面八秒挥发
    OIL_CD        = 4.0,        -- 泼油冷却
    LIT_CD        = 2.0,        -- 点灯冷却
    BURN_LIFE     = 4.0,        -- 火线烧四秒
    BURN_GAP      = 1.0,        -- 一秒一跳
    BURN_DMG      = 15,         -- 一跳十五
    BURN_WIDTH    = 70,         -- 油面横宽

    -- 颜色
    COLOR_FIRE    = "#f0883e",  -- 烈火橙
    COLOR_DEEP    = "#7a3a0e",  -- 深橙
    COLOR_OIL     = "#4a4428",  -- 油褐
    COLOR_GHOST   = "#ffd8a8",  -- 火白

    ZORDER_GROUND = 118,
    ZORDER_FIRE   = 126,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 935000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _oils       = {}            -- 油面表：未燃与燃烧共用
local _oilCd      = 0
local _litCd      = 0
local _scheduler  = nil
local _autoInc    = 0

local m_sin  = math.sin
local m_rand = math.random

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "OIL", 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 CreateOilNode(x, y)
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Oil"), x, y, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_GROUND)
    for i = 1, 20 do
        local a1 = (i - 1) / 20 * 6.28
        local a2 = i / 20 * 6.28
        GUI:DrawLine_Create(node, string.format("o_%d", i), 0, 0, 3,
            m_cos(a1) * CONST.BURN_WIDTH, m_sin(a1) * 16,
            m_cos(a2) * CONST.BURN_WIDTH, m_sin(a2) * 16,
            CONST.COLOR_OIL, 200)
    end
    return node
end

--------------------------------------------------------------------------------
-- 泼油与点灯
--------------------------------------------------------------------------------
function OilLine.Spill(x)
    if _oilCd > 0 then return end
    _oilCd = CONST.OIL_CD
    local node = CreateOilNode(x, 0)
    table.insert(_oils, { x = x, t = CONST.OIL_LIFE, lit = false, tick = 0, node = node })
end

function OilLine.Light(x)
    if _litCd > 0 then return end
    _litCd = CONST.LIT_CD
    for i = 1, #_oils do
        local o = _oils[i]
        if not o.lit and math.abs(o.x - x) <= CONST.BURN_WIDTH then
            o.lit = true
            o.t = CONST.BURN_LIFE
            o.tick = 0
            SL:TipAboveAt(o.x, "着了！")
            return true
        end
    end
    ShowTip("空烧——地上没油")
    return false
end

--------------------------------------------------------------------------------
-- 定时器：挥发、燃烧与扣血
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _oilCd = math.max(0, _oilCd - dt)
        _litCd = math.max(0, _litCd - dt)
        local myID = SL:GetValue("USER_ID")
        local mp = GetActorPos(myID)
        local tid = SL:GetValue("MARK_TARGET_ID")
        local tp = tid and GetActorPos(tid)
        for i = #_oils, 1, -1 do
            local o = _oils[i]
            o.t = o.t - dt
            if o.t <= 0 then
                SafeRemove(o.node)
                table.remove(_oils, i)
            elseif o.lit then
                o.tick = o.tick + dt
                if o.tick >= CONST.BURN_GAP then
                    o.tick = o.tick - CONST.BURN_GAP
                    if tp and math.abs(tp.x - o.x) <= CONST.BURN_WIDTH then
                        SL:ActorHurt(tid, CONST.BURN_DMG)
                        SL:TipAbove(tid, "-" .. CONST.BURN_DMG)
                    end
                end
                if m_rand() > 0.6 then
                    SL:PlayFlameParticle(o.x + (m_rand() - 0.5) * CONST.BURN_WIDTH * 2)
                end
            elseif mp and math.abs(mp.x - o.x) <= 20 then
                ShowTip("别站在油上——点了灯你也是柴")
            end
        end
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_SCENE_CLEAR, "OIL_Clear", function()
    for i = #_oils, 1, -1 do SafeRemove(_oils[i].node) end
    _oils = {}
end)

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 火油阵 (调试按钮触发)")
end, 1.0)

return OilLine