兑票当纹：挨的刀换成票，票票能兑现

 fx-ticketpay

-- @file TicketPay.lua
-- 兑票当纹 —— 挨的刀换成票，票票能兑现

local TicketPay = {}

local CONST = {
    CREST_LIFE    = 14.0,
    CREST_CD      = 4.0,
    TICKET_CAP    = 3,
    HEAL_PER      = 6,
    STRIKE_PER    = 8,

    COLOR_TICKET  = "#c09868",
    COLOR_DEEP    = "#483018",
    COLOR_GHOST   = "#f0e0c0",

    ZORDER_TICKET = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1129000,
}

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

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "TKP",
        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 TicketPay.Tickets()
    return _tickets
end

-- 收票结算：它打你的每一爪出一张票
SL:RegisterLUAEvent(LUA_EVENT_HURT_TAKEN, "TKP_Print", function(dmg)
    if _crestT <= 0 or dmg <= 0 then return dmg end
    if _tickets < CONST.TICKET_CAP then
        _tickets = _tickets + 1
        SL:TipAboveMe("票+1")
    end
    return dmg
end)

-- 兑奶：一票六点，兑完清夹
function TicketPay.RedeemHeal()
    if _tickets <= 0 then
        ShowTip("兜里没票——先挨两爪")
        return
    end
    local heal = _tickets * CONST.HEAL_PER
    local myID = SL:GetValue("USER_ID")
    SL:HealActor(myID, heal)
    SL:TipAboveMe("+" .. heal)
    _tickets = 0
    ShowTip("兑了奶——" .. heal .. "点入账")
end

-- 兑刀：一票八点，劈头清夹
function TicketPay.RedeemStrike(tid)
    if _tickets <= 0 then
        ShowTip("兜里没票——先挨两爪")
        return
    end
    local strike = _tickets * CONST.STRIKE_PER
    SL:ActorHurt(tid, strike)
    SL:TipAbove(tid, "兑刀-" .. strike)
    _tickets = 0
    ShowTip("兑了刀——" .. strike .. "点劈它脸上")
end

function TicketPay.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _tickets = 0
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Book"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_TICKET)
    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
            if _crestT <= 0 then
                SafeRemove(_crestFx)
                ShowTip("纹收了——手里的票作废了")
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("兑奶", function()
        TicketPay.RedeemHeal()
    end)
    SL:BindDebugButton("兑刀", function(tid)
        TicketPay.RedeemStrike(
            SL:GetValue("MARK_TARGET_ID"))
    end)
    ShowTip("技能已加载: 兑票纹 (调试按钮触发)")
end, 1.0)

function TicketPay.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SafeRemove(_crestFx)
    _crestT = 0
    _tickets = 0
end

return TicketPay