烙地炎纹：地上烙一圈，踩着就烧

flowchart TD
A[点烙地] --> B{地气缓过来了}
B -- 没有 --> C[拦下等CD]
B -- 好了 --> D[火纹落道 烧六秒]
D --> E{怪在圈里吗}
E -- 是 --> F[半秒烧八点]
E -- 否 --> E
F --> G{烧尽了吗}
G -- 没有 --> E
G -- 烧尽 --> H[圈消账清]
I[挪烙] --> J[火圈挪到怪脚下]

 fx-crest-burnzone

-- @file CrestBurnzone.lua
-- 烙地炎纹 —— 地上烙一圈 踩着就烧

local CrestBurnzone = {}

local CONST = {
    DURATION      = 6,
    BURN_PER      = 8,
    TICK          = 0.5,
    GROUND_CD     = 8,
    ZONE_HALF     = 48,

    AUTOINC_BASE  = 1201100,
}

local _x        = 440
local _left     = 0
local _tick     = 0
local _cd       = 0
local _autoInc  = 0

local function ShowTip(msg)
    if msg and msg ~= "" then SL:ShowSystemTips(msg) end
end

local function GenID()
    _autoInc = _autoInc + 1
    return CONST.AUTOINC_BASE + _autoInc
end

function CrestBurnzone.Left() return _left end
function CrestBurnzone.Pos() return _x end

-- 落烙: 圈账一起立
function CrestBurnzone.Place()
    if _cd > 0 then
        ShowTip("地气还烫着——再等" .. math.ceil(_cd) .. "秒")
        return
    end
    _cd = CONST.GROUND_CD
    _left = CONST.DURATION
    _tick = 0
    ShowTip("烙下了——烧" .. CONST.DURATION .. "秒")
end

-- 挪烙: 圈挪账不熄
function CrestBurnzone.MoveTo(nx)
    if _left <= 0 then
        ShowTip("先烙一处再挪")
        return
    end
    _x = nx
    ShowTip("火纹挪到它脚底下——烧它个正着")
end

-- 每拍推进: 圈内就烧 圈消账清
function CrestBurnzone.Tick(dt, mobX)
    if _cd > 0 then _cd = _cd - dt end
    if _left <= 0 then return 0 end
    _left = _left - dt
    _tick = _tick - dt
    local hit = 0
    if _tick <= 0 and math.abs(mobX - _x) < CONST.ZONE_HALF then
        _tick = CONST.TICK
        hit = CONST.BURN_PER
    end
    if _left <= 0 then
        ShowTip("火纹烧尽了——圈消账清")
    end
    return hit
end

if not _ticker then
    _ticker = SL:Schedule(function(dt)
        CrestBurnzone.Tick(dt, SL:GetValue("mobX") or 0)
    end, 0.05)
end

SL:ScheduleOnce(function()
    SL:BindDebugButton("烙地!", function()
        CrestBurnzone.Place()
    end)
    SL:BindDebugButton("挪烙", function()
        CrestBurnzone.MoveTo(SL:GetValue("mobX") or 440)
    end)
    ShowTip("技能已加载: 烙地炎纹")
end, 1.0)

function CrestBurnzone.Unload()
    if _ticker then SL:Unschedule(_ticker) end
    _left = 0
end

return CrestBurnzone