千机匣：开一次匣随机吐一件机关，三件各管一摊

 fx-gearbox

--------------------------------------------------------------------------------
-- @file        GearBox.lua
-- @brief       千机匣 —— 开匣随机吐一件机关
--              客户端表现模块：配置表 / 匣体构件 / 三分支结算 / 定时器
--------------------------------------------------------------------------------

local GearBox = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    BOX_LIFE      = 8.0,        -- 匣开八秒
    BOX_CD        = 10.0,       -- 开匣冷却
    BOLT_GAP      = 0.9,        -- 弩枢零点九秒一射
    BOLT_DMG      = 8,          -- 一射八点
    FLAME_GAP     = 1.2,        -- 火油一点二秒一喷
    FLAME_DMG     = 14,         -- 一喷十四
    FLAME_RANGE   = 160,        -- 火油射程
    FROST_GAP     = 1.6,        -- 冰霜一点六秒一环
    FROST_DMG     = 6,          -- 一环六点
    FROST_SLOW    = 2.0,        -- 冻缓两秒

    -- 颜色
    COLOR_BOX     = "#d4a24e",  -- 机铜
    COLOR_DEEP    = "#6b4a1a",  -- 深铜
    COLOR_GHOST   = "#f5e8c8",  -- 机白

    ZORDER_GROUND = 118,
    ZORDER_BOX    = 130,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 959000,
}

--------------------------------------------------------------------------------
-- 机关签表
--------------------------------------------------------------------------------
local KIND_NAMES = { bolt = "弩枢", flame = "火油", frost = "冰霜" }

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _box        = nil            -- 机关对象
local _cdLeft     = 0
local _scheduler  = nil
local _autoInc    = 0

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

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "GBX", 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 CreateBoxNode(x, y)
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Box"), x, y - 22, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_BOX)
    GUI:DrawLine_Create(node, "body", 0, 0, 22, -11, -13, 11, 13, CONST.COLOR_DEEP, 240)
    GUI:DrawLine_Create(node, "lid", 0, 0, 10, -5, -13, 5, -17, CONST.COLOR_GHOST, 240)
    return node
end

--------------------------------------------------------------------------------
-- 开匣抽签
--------------------------------------------------------------------------------
function GearBox.Cast()
    if _cdLeft > 0 or _box then return end
    _cdLeft = CONST.BOX_CD
    local mp = GetActorPos(SL:GetValue("USER_ID"))
    local tp = GetActorPos(SL:GetValue("MARK_TARGET_ID"))
    local keys = { "bolt", "flame", "frost" }
    local kind = keys[m_rand(1, 3)]
    local x = mp and tp and (mp.x + tp.x) / 2 or (mp and mp.x or 0)
    _box = { kind = kind, x = x, t = CONST.BOX_LIFE, fireT = 0.8 }
    CreateBoxNode(x, 0)
    ShowTip("开出「" .. KIND_NAMES[kind] .. "」——八秒，看它怎么干活")
end

--------------------------------------------------------------------------------
-- 定时器：三分支结算
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if not _box then return end
        _box.t = _box.t - dt
        if _box.t <= 0 then
            SafeRemove(_box.node)
            _box = nil
            ShowTip("匣收了——机关随匣一起走")
            return
        end
        _box.fireT = _box.fireT - dt
        if _box.fireT > 0 then return end
        local tid = SL:GetValue("MARK_TARGET_ID")
        local tp = tid and GetActorPos(tid)
        if not tp then return end
        if _box.kind == "bolt" then
            _box.fireT = CONST.BOLT_GAP
            SL:ActorHurt(tid, CONST.BOLT_DMG)
            SL:TipAbove(tid, "-" .. CONST.BOLT_DMG)
        elseif _box.kind == "flame" then
            _box.fireT = CONST.FLAME_GAP
            if m_abs(tp.x - _box.x) <= CONST.FLAME_RANGE then
                SL:ActorHurt(tid, CONST.FLAME_DMG)
                SL:TipAbove(tid, "-" .. CONST.FLAME_DMG)
            else
                ShowTip("火油够不着——它站远了")
            end
        else
            _box.fireT = CONST.FROST_GAP
            if m_abs(tp.x - _box.x) <= 130 then
                SL:ActorHurt(tid, CONST.FROST_DMG)
                SL:SlowActor(tid, CONST.FROST_SLOW)
                SL:TipAbove(tid, "-冻缓")
            end
        end
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_SCENE_CLEAR, "GBX_Clear", function()
    if _box then SafeRemove(_box.node) end
    _box = nil
end)

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 千机匣 (调试按钮触发)")
end, 1.0)

return GearBox