迟箭：把它的箭慢放成蜗牛，箭雨里都能散步

 fx-slowbolt

-- @file SlowBolt.lua
-- 迟箭 —— 把它的箭慢放成蜗牛，箭雨里都能散步

local SlowBolt = {}

local CONST = {
    SLOW_LIFE     = 4.0,
    SLOW_CD       = 5.0,
    SPEED_MULT    = 0.2,
    BLOCK_DIST    = 16,

    COLOR_SLOW    = "#a8d060",
    COLOR_DEEP    = "#3e5218",
    COLOR_GHOST   = "#e0f4b8",

    ZORDER_MARK   = 132,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1013000,
}

local _slowT     = 0
local _slowID    = 0
local _cdLeft    = 0
local _saved     = 0
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "SLB",
        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 SlowBolt.Cast()
    if _cdLeft > 0 or _slowT > 0 then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    _cdLeft = CONST.SLOW_CD
    _slowT = CONST.SLOW_LIFE
    _slowID = tid
    SL:SetBoltSpeedRate(tid, CONST.SPEED_MULT)
    SL:PlaySlowUpFx(tid)
    SL:TipAbove(tid, "迟箭！")
    ShowTip("箭慢了——四秒里你的箭能把它的箭全撞下来")
end

-- 对撞拦截：双弹道销账
SL:RegisterLUAEvent(LUA_EVENT_BOLT_TICK, "SLB_Block", function(list)
    if _slowT <= 0 then return end
    for i = #list.enemy, 1, -1 do
        local eb = list.enemy[i]
        for j = #list.mine, 1, -1 do
            local mb = list.mine[j]
            if math.abs(mb.x - eb.x) <= CONST.BLOCK_DIST then
                SL:PlayBlockBurstFx(eb.x, eb.y)
                SL:TipAboveMe("拦")
                _saved = _saved + 1
                ShowTip("拦下一支——已经省了" .. _saved * 14 .. "点血")
                table.remove(list.enemy, i)
                table.remove(list.mine, j)
                break
            end
        end
    end
end)

-- 定时器：迟滞倒计时与弹速回收
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _slowT > 0 then
            _slowT = _slowT - dt
            if _slowT <= 0
                or SL:GetValue("ACTOR_DEAD", _slowID) then
                _slowT = 0
                SL:SetBoltSpeedRate(_slowID, 1.0)
                ShowTip("迟散了——它的箭恢复脚程，别硬接")
            end
        end
    end, 0.02)
end

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

function SlowBolt.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    if _slowT > 0 then SL:SetBoltSpeedRate(_slowID, 1.0) end
    _slowT = 0
end

return SlowBolt