秋后账纹：笔笔记着，收摊一笔清算

 fx-reckon

-- @file Reckon.lua
-- 秋后纹 —— 笔笔记着，收摊一笔清算

local Reckon = {}

local CONST = {
    CREST_LIFE    = 12.0,
    CREST_CD      = 5.0,
    PRICE_PER     = 4,

    COLOR_RECKON  = "#a86848",
    COLOR_DEEP    = "#482418",
    COLOR_GHOST   = "#f0c8a8",

    ZORDER_RECKON = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1099000,
}

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

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

-- 入账：纹成期的每一刀多记一笔
SL:RegisterLUAEvent(LUA_EVENT_MELEE_HIT, "RCN_Log", function(tid)
    if _crestT <= 0 or not tid then return 0 end
    _ticks = _ticks + 1
    SL:TipAbove(tid, "记一笔")
    return 0
end)

-- 收摊清算：笔数乘单价一次付清，付完当场撕账
local function Settle()
    local fin = _ticks * CONST.PRICE_PER
    local tid = SL:GetValue("MARK_TARGET_ID")
    if fin > 0 and tid then
        SL:ActorHurt(tid, fin)
        SL:TipAbove(tid, "清算-" .. fin)
        SL:PlaySettleFx(tid)
    end
    _ticks = 0
    SafeRemove(_crestFx)
    _crestFx = nil
    if fin > 0 then
        ShowTip("收摊了——账并成一笔清算")
    else
        ShowTip("账本空着收摊了")
    end
    return fin
end

function Reckon.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _ticks = 0
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Book"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_RECKON)
    SL:PlayBookUpFx(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
                _crestT = 0
                Settle()
            end
        end
    end, 0.02)
end

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

function Reckon.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_HIT, "RCN_Log")
    SafeRemove(_crestFx)
    _crestT = 0
    _ticks = 0
end

return Reckon