蓄雷匣：打它攒雷，攒满一键全放

 fx-thunderbox

--------------------------------------------------------------------------------
-- @file        ThunderBox.lua
-- @brief       蓄雷匣 —— 打它攒雷，攒满一键全放
--              客户端表现模块：配置表 / 闪电链构件 / 电容状态机 / 定时器
--------------------------------------------------------------------------------

local ThunderBox = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    CHARGE_PER_HIT = 8,         -- 一刀充八格
    BOX_CAP        = 80,        -- 匣子八十格封顶
    RELEASE_MIN    = 30,        -- 三十格起放
    RELEASE_RATE   = 1.2,       -- 释放乘一点二
    LEAK_DELAY     = 2.0,       -- 闲两秒开始漏
    LEAK_RATE      = 3.0,       -- 每秒漏三格

    BOLT_SEGMENTS  = 7,         -- 闪电七节
    BOLT_STEP_GAP  = 0.042,     -- 每节间隔 (秒)

    -- 颜色
    COLOR_BOLT     = "#58a6ff", -- 雷蓝
    COLOR_DEEP     = "#1f4f8f", -- 深蓝
    COLOR_CORE     = "#c8e1ff", -- 电白

    ZORDER_BOX     = 130,
    ZORDER_BOLT    = 134,
    ZORDER_EFFECT  = 135,

    AUTOINC_BASE   = 922000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _box       = { charge = 0 }
local _idleT     = 0
local _scheduler = nil
local _autoInc   = 0

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

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "TBX", 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 CreateBoltNode(x, y, seg)
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Bolt" .. seg), x, y, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_BOLT)
    local r = 6 + (seg % 2) * 4
    for i = 1, 8 do
        local a1 = (i - 1) / 8 * 6.28
        local a2 = i / 8 * 6.28
        GUI:DrawLine_Create(node, string.format("b_%d", i), 0, 0, 2,
            m_cos(a1) * r, m_sin(a1) * r, m_cos(a2) * r, m_sin(a2) * r,
            seg % 2 == 0 and CONST.COLOR_CORE or CONST.COLOR_BOLT, 220)
    end
    GUI:runAction(node, GUI:ActionSequence(
        GUI:ActionFadeOut(0.20),
        GUI:CallFunc(function() SafeRemove(node) end)
    ))
    return node
end

--------------------------------------------------------------------------------
-- 充能与漏电
--------------------------------------------------------------------------------
local function Box_OnHit()
    _box.charge = math.min(_box.charge + CONST.CHARGE_PER_HIT, CONST.BOX_CAP)
    _idleT = 0
end

local function Box_Update(dt)
    _idleT = _idleT + dt
    if _idleT > CONST.LEAK_DELAY and _box.charge > 0 then
        _box.charge = math.max(0, _box.charge - CONST.LEAK_RATE * dt)
    end
end

--------------------------------------------------------------------------------
-- 释放：闪电链与清算
--------------------------------------------------------------------------------
local function Bolt_Fire(fromPos, toPos)
    for seg = 1, CONST.BOLT_SEGMENTS do
        local k = seg / CONST.BOLT_SEGMENTS
        local lx = fromPos.x + (toPos.x - fromPos.x) * k
        local ly = fromPos.y - 58 - m_sin(k * 3.14) * 40 + (m_rand() - 0.5) * 22
        SL:ScheduleOnce(function()
            CreateBoltNode(lx, ly, seg)
        end, (seg - 1) * CONST.BOLT_STEP_GAP)
    end
end

function ThunderBox.Release(myID, targetID)
    if _box.charge < CONST.RELEASE_MIN then
        ShowTip("雷不足" .. CONST.RELEASE_MIN .. "格")
        return
    end
    local fromPos = GetActorPos(myID)
    local toPos   = GetActorPos(targetID)
    if not fromPos or not toPos then return end
    local vd = math.round(_box.charge * CONST.RELEASE_RATE)
    _box.charge = 0
    Bolt_Fire(fromPos, toPos)
    SL:ScheduleOnce(function()
        SL:ActorHurt(targetID, vd)
        ShowTip("放雷 " .. vd)
    end, CONST.BOLT_SEGMENTS * CONST.BOLT_STEP_GAP)
end

--------------------------------------------------------------------------------
-- 命中钩子与定时器
--------------------------------------------------------------------------------
SL:RegisterLUAEvent(LUA_EVENT_LOCAL_HIT, "TBX_Hit", function(data)
    if data and data.isNormal then
        Box_OnHit()
    end
end)

if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        ThunderBox.Update(dt)
        Box_Update(dt)
    end, 0.02)
end

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

return ThunderBox