抽税金纹：它在你地界出手，一爪交一次税

 fx-levyzone

-- @file LevyZone.lua
-- 抽税纹 —— 它在你地界出手，一爪交一次税

local LevyZone = {}

local CONST = {
    CREST_LIFE    = 12.0,
    CREST_CD      = 4.0,
    ZONE_NEAR     = 30,
    ZONE_FAR      = 180,
    TAX_PER       = 3,

    COLOR_LEVY    = "#b0a048",
    COLOR_DEEP    = "#484018",
    COLOR_GHOST   = "#f0e8b0",

    ZORDER_LEVY   = 90,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 1113000,
}

local _crestT    = 0
local _cdLeft    = 0
local _zoneL     = 0
local _zoneR     = 0
local _taxN      = 0
local _levyFx    = nil
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "LVZ",
        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 LevyZone.InZone()
    local tid = SL:GetValue("MARK_TARGET_ID")
    local tp = tid and GetActorPos(tid)
    if not tp then return false end
    return tp.x - 26 >= _zoneL and tp.x + 26 <= _zoneR
end

-- 出手计税：界内出爪的三点血税当场入账
SL:RegisterLUAEvent(LUA_EVENT_AFTER_ACTION, "LVZ_Tax", function(tid)
    if _crestT <= 0 or tid ~= SL:GetValue("MARK_TARGET_ID")
        then return end
    if not LevyZone.InZone() then return end
    _taxN = _taxN + 1
    local myID = SL:GetValue("USER_ID")
    local hp = SL:GetValue("ACTOR_HP", myID) or 0
    SL:SetValue("ACTOR_HP", myID,
        math.min(SL:GetValue("ACTOR_HP_MAX", myID),
            hp + CONST.TAX_PER))
    SL:TipAboveMe("+" .. CONST.TAX_PER .. " 税")
end)

function LevyZone.Cast()
    if _cdLeft > 0 or _crestT > 0 then return end
    local myID = SL:GetValue("USER_ID")
    local mp = GetActorPos(myID)
    if not mp then return end
    _cdLeft = CONST.CREST_CD
    _crestT = CONST.CREST_LIFE
    _taxN = 0
    _zoneL = mp.x + CONST.ZONE_NEAR
    _zoneR = mp.x + CONST.ZONE_FAR
    SafeRemove(_levyFx)
    _levyFx = GUI:Layout_Create(GUI:Attach_Scene(),
        GenID("Zone"), 0, 0, 0, 0, false)
    GUI:setLocalZOrder(_levyFx, CONST.ZORDER_LEVY)
    SL:PlayLevyUpFx(_zoneL, _zoneR)
    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(_levyFx)
                ShowTip("税圈收了——它的爪不再交税")
            end
        end
    end, 0.02)
end

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

function LevyZone.Unload()
    if _scheduler then SL:Unschedule(_scheduler) end
    SL:UnregisterLUAEvent(LUA_EVENT_AFTER_ACTION, "LVZ_Tax")
    SafeRemove(_levyFx)
    _crestT = 0
    _taxN = 0
end

return LevyZone