对账双纹：两本账对平了，下一刀翻倍

 fx-ledgermatch

-- @file LedgerMatch.lua
-- 对账纹 —— 两本账对平了，下一刀翻倍

local LedgerMatch = {}

local CONST = {
    CREST_LIFE    = 14.0,
    CREST_CD      = 4.0,
    BASE_HIT      = 12,
    DOUBLE_HIT    = 24,

    COLOR_MATCH   = "#c8b060",
    COLOR_DEEP    = "#584820",
    COLOR_GHOST   = "#f8ecc0",

    ZORDER_MATCH  = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1120000,
}

local _crestT    = 0
local _cdLeft    = 0
local _tallyT    = 0
local _tallyG    = 0
local _doubled   = false
local _crestFx   = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "LDM",
        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 CheckBalance()
    if _tallyT > 0 and _tallyT == _tallyG then
        _doubled = true
        SL:TipAboveMe("账平!")
        ShowTip("两本账对平了——下一刀翻倍")
    end
end

-- 头账：你的每一刀记一笔，记完即查
SL:RegisterLUAEvent(LUA_EVENT_MELEE_HIT, "LDM_T", function()
    if _crestT <= 0 then return 0 end
    _tallyT = _tallyT + 1
    SL:TipAbove(SL:GetValue("MARK_TARGET_ID"),
        "头" .. _tallyT)
    CheckBalance()
    return 0
end)

-- 地账：它的每一爪记一笔，记完同样查
SL:RegisterLUAEvent(LUA_EVENT_HURT_TAKEN, "LDM_G", function(dmg)
    if _crestT <= 0 then return dmg end
    _tallyG = _tallyG + 1
    CheckBalance()
    return dmg
end)

-- 翻倍结算：对平许可挂在下一刀上，兑现即清账
SL:RegisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "LDM_Pay", function()
    if not _doubled then return 0 end
    _doubled = false
    _tallyT = 0
    _tallyG = 0
    SL:TipAboveMe("对平!")
    return CONST.DOUBLE_HIT - CONST.BASE_HIT
end)

function LedgerMatch.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _tallyT = 0
    _tallyG = 0
    _doubled = false
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Match"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_MATCH)
    SL:PlayMatchUpFx(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
            if _crestT <= 0 then
                SafeRemove(_crestFx)
                ShowTip("账收了——没对平的账各回各家")
            end
        end
    end, 0.02)
end

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

function LedgerMatch.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_HIT, "LDM_T")
    SL:UnregisterLUAEvent(LUA_EVENT_HURT_TAKEN, "LDM_G")
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "LDM_Pay")
    SafeRemove(_crestFx)
    _crestT = 0
    _doubled = false
end

return LedgerMatch