镇魂碑：立碑镇住它，大招读不完

 fx-soulstele

--------------------------------------------------------------------------------
-- @file        SoulStele.lua
-- @brief       镇魂碑 —— 立碑镇住它，大招读不完
--              客户端表现模块：配置表 / 碑体构件 / 读条冻结 / 定时器
--------------------------------------------------------------------------------

local SoulStele = {}

--------------------------------------------------------------------------------
-- 配置与常量
--------------------------------------------------------------------------------
local CONST = {
    STELE_LIFE    = 6.0,        -- 碑立六秒
    STELE_CD      = 10.0,       -- 立碑冷却
    STELE_RANGE   = 90,         -- 镇域横宽九十
    ULTI_GAP      = 7.0,        -- 大招七秒一凝
    ULTI_CHANNEL  = 2.0,        -- 读条两秒
    ULTI_DMG      = 60,         -- 大招六十

    -- 颜色
    COLOR_STELE   = "#8b9cf5",  -- 碑紫蓝
    COLOR_DEEP    = "#3a3a7a",  -- 深蓝
    COLOR_GHOST   = "#cdd4ff",  -- 碑白

    ZORDER_GROUND = 118,
    ZORDER_STELE  = 130,
    ZORDER_EFFECT = 135,

    AUTOINC_BASE  = 932000,
}

--------------------------------------------------------------------------------
-- 模块内部状态
--------------------------------------------------------------------------------
local _steleT    = 0              -- 碑的余时
local _steleX    = 0
local _cdLeft    = 0
local _ultiT     = CONST.ULTI_GAP
local _chanT     = 0              -- 读条余量
local _frozen    = false
local _scheduler = nil
local _autoInc   = 0

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

--------------------------------------------------------------------------------
-- 辅助函数
--------------------------------------------------------------------------------
local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "SST", 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 CreateSteleNode(x, y)
    local node = GUI:Layout_Create(GUI:Attach_SceneF(), GenID("Stele"), x, y, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_STELE)
    GUI:DrawLine_Create(node, "body_l", 0, 0, 16, -8, 0, -8, -58, CONST.COLOR_DEEP, 230)
    GUI:DrawLine_Create(node, "body_r", 0, 0, 16, 8, 0, 8, -58, CONST.COLOR_DEEP, 230)
    GUI:DrawLine_Create(node, "cap", 0, 0, 10, -12, -58, 12, -58, CONST.COLOR_GHOST, 240)
    GUI:Text_Create(node, "word", 0, -30, 14, CONST.COLOR_GHOST, "镇魂")
    return node
end

--------------------------------------------------------------------------------
-- 立碑与镇域判定
--------------------------------------------------------------------------------
local function InZone(mx)
    if _steleT <= 0 then return false end
    return math.abs(mx - _steleX) <= CONST.STELE_RANGE
end

function SoulStele.Cast(x)
    if _cdLeft > 0 or _steleT > 0 then return end
    _cdLeft = CONST.STELE_CD
    _steleT = CONST.STELE_LIFE
    _steleX = x
    CreateSteleNode(x, SL:GetValue("ACTOR_POSITION_Y", SL:GetValue("USER_ID")) + 2)
    ShowTip("碑立了——把它引进圈里")
end

--------------------------------------------------------------------------------
-- 大招通道：冻结覆盖层
--------------------------------------------------------------------------------
local function Ulti_Update(dt, mx)
    _frozen = InZone(mx)
    if _chanT > 0 then
        if not _frozen then
            _chanT = _chanT - dt
            if _chanT <= 0 then
                SL:UltiBlast(mx)
                ShowTip("大招出膛了——六十，下块碑立快点")
            end
        end
        return
    end
    _ultiT = _ultiT - dt
    if _ultiT <= 0 then
        _ultiT = CONST.ULTI_GAP
        _chanT = CONST.ULTI_CHANNEL
        ShowTip(_frozen and "它凝大招了——碑镇着，读条冻住" or "它凝大招了——两秒后六十点")
    end
end

--------------------------------------------------------------------------------
-- 定时器与调试
--------------------------------------------------------------------------------
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _steleT > 0 then
            _steleT = _steleT - dt
        end
        local mp = GetActorPos(SL:GetValue("USER_ID"))
        Ulti_Update(dt, mp and mp.x + 340 or 0)
    end, 0.02)
end

SL:RegisterLUAEvent(LUA_EVENT_SCENE_CLEAR, "SST_Clear", function()
    _steleT, _chanT, _ultiT, _frozen = 0, 0, CONST.ULTI_GAP, false
end)

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 镇魂碑 (调试按钮触发)")
end, 1.0)

return SoulStele