顺劈余纹：杀过头的刀，落到下一只头上

 fx-overcarry

-- @file OverCarry.lua
-- 顺劈纹 —— 杀过头的刀，落到下一只头上

local OverCarry = {}

local CONST = {
    CREST_LIFE    = 12.0,
    CREST_CD      = 4.0,
    SEARCH_RANGE  = 300,

    COLOR_CARRY   = "#a88048",
    COLOR_DEEP    = "#483418",
    COLOR_GHOST   = "#e8d8b0",

    ZORDER_CARRY  = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1093000,
}

local _crestT    = 0
local _cdLeft    = 0
local _crestFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "OVC",
        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 OverCarry.FindNext(tid)
    if not tid then return nil end
    return SL:FindNearMonster(tid, CONST.SEARCH_RANGE)
end

-- 冒刀侦测：刀额减去落刀前的血，正数是余劲
SL:RegisterLUAEvent(LUA_EVENT_OVERKILL, "OVC_Carry",
function(deadID, over)
    if _crestT <= 0 or over <= 0 then return end
    local next = OverCarry.FindNext(deadID)
    if not next then
        ShowTip("旁边没有下一只——刀劲散了")
        return
    end
    SL:ActorHurt(next, over)
    SL:TipAbove(next, "余-" .. over)
    SL:PlayCarryFlyFx(deadID, next)
    ShowTip("刀劲飞过去了——余劲" .. over .. "点")
end)

function OverCarry.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Crest"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_CARRY)
    SL:PlaySharpenFx(myID)
    ShowTip("刀开锋了——杀过头的刀劲会飞向同伴")
end

-- 定时器：开锋倒计时与纹环跟脚
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _crestT > 0 then
            _crestT = _crestT - dt
            local myID = SL:GetValue("USER_ID")
            local mp = GetActorPos(myID)
            if _crestFx and mp then
                GUI:setPosition(_crestFx, mp.x, mp.y - 62)
            end
            if _crestT <= 0 then
                SafeRemove(_crestFx)
                ShowTip("锋钝了——杀过头也不飞了")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("开锋", function()
        OverCarry.Cast()
    end)
    ShowTip("技能已加载: 顺劈纹 (调试按钮触发)")
end, 1.0)

function OverCarry.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_OVERKILL, "OVC_Carry")
    SafeRemove(_crestFx)
    _crestT = 0
end

return OverCarry