蛙跳痕纹：蛙印三秒一跳，跳到谁头上谁挨重刀

 fx-frogleap

-- @file FrogLeap.lua
-- 蛙跳痕纹 —— 蛙印三秒一跳，跳到谁头上谁挨重刀

local FrogLeap = {}

local CONST = {
    CREST_LIFE    = 12.0,
    CREST_CD      = 4.0,
    HOP_LIFE      = 3.0,
    MARK_HIT      = 15,
    BASE_HIT      = 12,

    COLOR_LEAP    = "#88b858",
    COLOR_DEEP    = "#384818",
    COLOR_GHOST   = "#d0f0b0",

    ZORDER_LEAP   = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1126000,
}

local _crestT    = 0
local _cdLeft    = 0
local _hopT      = 0
local _onFirst   = true
local _ledger    = {}
local _crestFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "FGL",
        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 FrogLeap.HopTarget()
    for _, tid in ipairs(FrogLeap.InFlock()) do
        if SL:GetValue("ACTOR_ALIVE", tid) then
            return tid
        end
    end
    return nil
end

-- 跳迁：三秒一班，青光荡过去印换主
local function DoHop()
    local next = FrogLeap.HopTarget()
    if not next then
        ShowTip("印没处跳——全趴下了")
        return
    end
    _onFirst = not _onFirst
    SL:PlayHopOutFx(next)
    SL:TipAbove(next, "蛙印")
    ShowTip("蛙印跳了——挪到另一只头上")
end

-- 加重通道：印在谁头上，谁的刀走重档
SL:RegisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "FGL_Amp", function(tid)
    if _crestT <= 0 or not tid then return 0 end
    local marked = (_onFirst and tid == _ledger.first)
        or (not _onFirst and tid == _ledger.second)
    if marked then
        return CONST.MARK_HIT - CONST.BASE_HIT
    end
    return 0
end)

function FrogLeap.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    local other = SL:FindNearMonster(tid, 300)
    if not other then
        ShowTip("就一只怪——印跳不起来")
        return
    end
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _hopT = CONST.HOP_LIFE
    _onFirst = true
    _ledger = { first = tid, second = other }
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_Scene(),
        GenID("Mark"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_LEAP)
    SL:PlayMarkUpFx(tid)
    ShowTip("蛙印落在左边头上了——三秒一跳，跳谁谁挨重刀")
end

-- 定时器：纹成倒计时与跳迁钟驱动
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _crestT > 0 then
            _crestT = _crestT - dt
            _hopT = _hopT - dt
            if _hopT <= 0 then
                _hopT = CONST.HOP_LIFE
                DoHop()
            end
            if _crestT <= 0 then
                SafeRemove(_crestFx)
                ShowTip("蛙印散了——谁也不挨了")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("蛙印", function()
        FrogLeap.Cast()
    end)
    ShowTip("技能已加载: 蛙跳纹 (调试按钮触发)")
end, 1.0)

function FrogLeap.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "FGL_Amp")
    SafeRemove(_crestFx)
    _crestT = 0
    _ledger = {}
end

return FrogLeap