地葬：把它整个按进土里，出土还懵半天

 fx-burial

-- @file Burial.lua
-- 地葬 —— 把它整个按进土里，出土还懵半天

local Burial = {}

local CONST = {
    SINK_LIFE     = 2.0,
    SINK_CD       = 6.0,
    SINK_DEPTH    = 90,
    BURST_DMG     = 12,
    DIZZY_LIFE    = 0.8,

    COLOR_BURIAL  = "#a08050",
    COLOR_DEEP    = "#4a3418",
    COLOR_GHOST   = "#e8d8b0",

    ZORDER_HOLE   = 128,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1008000,
}

local _sinkT     = 0
local _sinkID    = 0
local _cdLeft    = 0
local _holeFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "BRL",
        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 CreateHoleFx(x, y)
    local node = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Hole"), x, y, 0, 0, false)
    GUI:setLocalZOrder(node, CONST.ZORDER_HOLE)
    GUI:DrawEllipse_Create(node, "pit", 0, -2, 30, 8,
        CONST.COLOR_DEEP, 240)
    return node
end

function Burial.Cast()
    if _cdLeft > 0 or _sinkT > 0 then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    local tp = GetActorPos(tid)
    if not tid or not tp then return end
    _cdLeft = CONST.SINK_CD
    _sinkT = CONST.SINK_LIFE
    _sinkID = tid
    SL:FreezeActorAll(tid, CONST.SINK_LIFE)
    SafeRemove(_holeFx)
    _holeFx = CreateHoleFx(tp.x, tp.y)
    SL:PlaySinkFx(tid, CONST.SINK_DEPTH)
    SL:TipAbove(tid, "葬！")
    SL:ScreenShake(3, 0.2)
    ShowTip("按进土里了——两秒闷一记，出土还懵")
end

-- 出土结算：闷伤加懵态
local function SurfaceUp()
    local tp = GetActorPos(_sinkID)
    SL:PlaySurfaceFx(_sinkID)
    if tp then
        SL:ActorHurt(_sinkID, CONST.BURST_DMG)
        SL:TipAbove(_sinkID, "-12")
        SL:StunActor(_sinkID, CONST.DIZZY_LIFE)
        SL:ScreenShake(3, 0.2)
        ShowTip("出土了——先吃十二点，再懵零点八秒")
    end
    SafeRemove(_holeFx)
    _holeFx = nil
end

-- 定时器：土里的倒计时
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _sinkT > 0 then
            _sinkT = _sinkT - dt
            if _sinkT <= 0
                or SL:GetValue("ACTOR_DEAD", _sinkID) then
                _sinkT = 0
                if not SL:GetValue("ACTOR_DEAD", _sinkID) then
                    SurfaceUp()
                else
                    SafeRemove(_holeFx)
                    _holeFx = nil
                end
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("地葬", function()
        Burial.Cast()
    end)
    ShowTip("技能已加载: 地葬 (调试按钮触发)")
end, 1.0)

function Burial.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    if _sinkT > 0 then
        SL:ThawActorAll(_sinkID)
        SafeRemove(_holeFx)
    end
    _sinkT = 0
end

return Burial