悔刀仙纹：砍出去的刀能收回，重砍更重

 fx-regretcut

-- @file RegretCut.lua
-- 悔刀纹 —— 这一刀悔了，重砍更重

local RegretCut = {}

local CONST = {
    CREST_LIFE    = 14.0,
    CREST_CD      = 3.0,
    REGRET_CD     = 6.0,
    REDO_MUL      = 1.5,
    REDO_DELAY    = 0.35,

    COLOR_REGRET  = "#8878b8",
    COLOR_DEEP    = "#342850",
    COLOR_GHOST   = "#d0c8f0",

    ZORDER_REGRET = 133,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1098000,
}

local _crestT     = 0
local _regretCd   = 0
local _lastDmg    = 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 "RGC",
        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 RegretCut.LastDmg()
    return _lastDmg
end

-- 记刀：纹成期里每一刀都留底，供悔刀翻账
SL:RegisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "RGC_Keep", function(dmg)
    if _crestT <= 0 then return 0 end
    _lastDmg = dmg
    return 0
end)

function RegretCut.Regret()
    if _regretCd > 0 then
        ShowTip("刀还没稳——" ..
            string.format("%.1f", _regretCd) .. "秒")
        return
    end
    if _lastDmg <= 0 then
        ShowTip("还没有刀可悔——先砍一刀")
        return
    end
    local tid = SL:GetValue("MARK_TARGET_ID")
    if not tid then return end
    local hp = SL:GetValue("ACTOR_HP", tid) or 0
    local hpM = SL:GetValue("ACTOR_HP_MAX", tid) or 0
    SL:SetValue("ACTOR_HP", tid,
        math.min(hpM, hp + _lastDmg))
    SL:TipAbove(tid, "+" .. _lastDmg .. " 撤")
    _regretCd = CONST.REGRET_CD
    local redo = math.floor(_lastDmg * CONST.REDO_MUL)
    SL:ScheduleOnce(function()
        local hp2 = SL:GetValue("ACTOR_HP", tid) or 0
        SL:SetValue("ACTOR_HP", tid, math.max(0, hp2 - redo))
        SL:TipAbove(tid, "悔-" .. redo)
        SL:PlayRegretFx(tid)
        ShowTip("悔刀重砍——" .. redo .. "点入账")
    end, CONST.REDO_DELAY)
end

function RegretCut.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _lastDmg = 0
    SafeRemove(_crestFx)
    _crestFx = GUI:Layout_Create(GUI:Attach_SceneF(),
        GenID("Crest"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_crestFx, CONST.ZORDER_REGRET)
    SL:PlayRegretUpFx(myID)
    ShowTip("悔刀纹开了——最后一刀可撤回，重砍一点五倍")
end

-- 定时器：双冷却与纹环跟画
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        _regretCd = math.max(0, _regretCd - 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()
        RegretCut.Regret()
    end)
    ShowTip("技能已加载: 悔刀纹 (调试按钮触发)")
end, 1.0)

function RegretCut.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_DAMAGE, "RGC_Keep")
    SafeRemove(_crestFx)
    _crestT = 0
    _lastDmg = 0
end

return RegretCut