挑灯：灯油就是你的弹匣，烧的是时间

 fx-lampoil

-- @file LampOil.lua
-- 挑灯 —— 灯油就是你的弹匣，烧的是时间

local LampOil = {}

local CONST = {
    OIL_MAX       = 10,
    BURN_GAP      = 2.0,
    LIT_GAP       = 1.0,
    LIT_LIFE      = 4.0,
    LIT_AMP       = 5,
    DIM_DMG       = 5,
    BASE_DMG      = 10,

    COLOR_OIL     = "#d0a848",
    COLOR_DEEP    = "#584812",
    COLOR_GHOST   = "#f4e0a8",

    ZORDER_LAMP   = 132,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1024000,
}

local _oil       = CONST.OIL_MAX
local _oilT      = 0
local _litT      = 0
local _cdLeft    = 0
local _lampFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "LPO",
        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 CurrentOut()
    if _oil <= 0 then return CONST.DIM_DMG end
    if _litT > 0 then return CONST.BASE_DMG + CONST.LIT_AMP end
    return CONST.BASE_DMG
end

function LampOil.Trim()
    if _cdLeft > 0 then
        ShowTip("灯在挑——" .. string.format("%.1f", _cdLeft) .. "秒")
        return
    end
    if _litT > 0 then
        ShowTip("灯已经亮了——还剩" .. string.format("%.1f", _litT) .. "秒")
        return
    end
    if _oil < 4 then
        ShowTip("油见底了——挑不动这四秒")
        return
    end
    _cdLeft = 4.0
    _litT = CONST.LIT_LIFE
    SL:PlayTrimFx(SL:GetValue("USER_ID"))
    SL:TipAboveMe("挑灯！")
    ShowTip("灯挑亮了——四秒刀十五，费油也快一倍")
end

-- 亮度结算：三档刀按油定
SL:RegisterLUAEvent(LUA_EVENT_MELEE_HIT, "LPO_Out", function(tid)
    local base = SL:GetValue("HIT_DAMAGE", tid) or CONST.BASE_DMG
    if _oil <= 0 then
        return CONST.DIM_DMG - base
    end
    if _litT > 0 then
        return CONST.BASE_DMG + CONST.LIT_AMP - base
    end
    return 0
end)

-- 定时器：烧油与灯芯
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if _oil <= 0 then return end
        _oilT = _oilT - dt
        if _oilT <= 0 then
            _oilT = _litT > 0 and CONST.LIT_GAP or CONST.BURN_GAP
            _oil = _oil - 1
            if _oil <= 0 then
                _oil = 0
                _litT = 0
                ShowTip("灯枯了——油一滴不剩，刀软成五点")
            end
        end
        if _litT > 0 then
            _litT = _litT - dt
            if _litT <= 0 then
                ShowTip("灯暗回去——正常亮度，省着点烧")
            end
        end
        local myID = SL:GetValue("USER_ID")
        local mp = GetActorPos(myID)
        if _lampFx and mp then
            GUI:setPosition(_lampFx, mp.x + 40, mp.y - 96)
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("挑灯", function()
        LampOil.Trim()
    end)
    ShowTip("技能已加载: 挑灯 (调试按钮触发)")
end, 1.0)

function LampOil.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_MELEE_HIT, "LPO_Out")
    SafeRemove(_lampFx)
    _oil = CONST.OIL_MAX
end

return LampOil