蚀蓝纹咒：抽干它的法力，咒念憋在喉咙里

 fx-manadrain

-- @file ManaDrain.lua
-- 蚀蓝纹 —— 抽干它的蓝，咒就哑了

local ManaDrain = {}

local CONST = {
    DRAIN_LIFE    = 4.0,
    DRAIN_GAP     = 0.5,
    DRAIN_TICK    = 5,
    DRAIN_DMG     = 3,
    DRAIN_CD      = 6.0,
    HIT_DRAIN     = 4,

    COLOR_DRAIN   = "#5078c8",
    COLOR_DEEP    = "#1e2f58",
    COLOR_GHOST   = "#b8d0f4",

    ZORDER_DRAIN  = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1082000,
}

local _drainT    = 0
local _drainGap  = 0
local _cdLeft    = 0
local _drainFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "MDN",
        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

function ManaDrain.IsMute(tid)
    local mp = tid and SL:GetValue("ACTOR_MP", tid) or 0
    return mp <= 0
end

function ManaDrain.Cast()
    if _cdLeft > 0 or _drainT > 0 then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    if ManaDrain.IsMute(tid) then
        ShowTip("它早就空蓝了")
        return
    end
    _cdLeft = CONST.DRAIN_CD
    _drainT = CONST.DRAIN_LIFE
    _drainGap = 0
    SafeRemove(_drainFx)
    _drainFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Drain"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_drainFx, CONST.ZORDER_DRAIN)
    SL:PlayDrainUpFx(tid)
    SL:TipAbove(tid, "蚀蓝！")
    ShowTip("蚀纹贴上去了——四秒抽干它的蓝")
end

-- 施法闸：蓝不够的施法判定当场打回
SL:RegisterLUAEvent(LUA_EVENT_CAST_CHECK, "MDN_Gate", function(tid, cost)
    local mp = SL:GetValue("ACTOR_MP", tid) or 0
    if mp < cost then
        SL:TipAbove(tid, "咒哑")
        return false
    end
    SL:SetValue("ACTOR_MP", tid, mp - cost)
    return true
end)

-- 定时器：蚀蓝跳抽与蓝条跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _drainT > 0 then
            _drainT = _drainT - dt
            _drainGap = _drainGap + dt
            local tid = SL:GetValue("MARK_TARGET_ID")
            if _drainGap >= CONST.DRAIN_GAP then
                _drainGap = 0
                if tid then
                    SL:DrainMana(tid, CONST.DRAIN_TICK)
                    SL:ActorHurt(tid, CONST.DRAIN_DMG)
                    SL:TipAbove(tid, "蓝-" .. CONST.DRAIN_TICK)
                end
            end
            local tp = tid and GetActorPos(tid)
            if _drainFx and tp then
                GUI:setPosition(_drainFx, tp.x, tp.y - 70)
            end
            if _drainT <= 0 then
                SafeRemove(_drainFx)
                ShowTip("蚀纹收了——看它还念不念得动")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("蚀纹", function()
        ManaDrain.Cast()
    end)
    ShowTip("技能已加载: 蚀蓝纹 (调试按钮触发)")
end, 1.0)

function ManaDrain.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_CAST_CHECK, "MDN_Gate")
    SafeRemove(_drainFx)
    _drainT = 0
end

return ManaDrain