蜂王：喂小怪蜂王进化，三阶蜂王蜇翻全场

 fx-beequeen

-- @file BeeQueen.lua
-- 蜂王 —— 喂小怪蜂王进化，三阶蜂王蜇翻全场

local BeeQueen = {}

local CONST = {
    BEE_LIFE      = 15.0,
    BEE_CD        = 5.0,
    FEED_PER_LVL  = 3,
    MAX_LVL       = 3,
    L1_GAP        = 1.2,
    L2_GAP        = 0.9,
    L3_GAP        = 0.6,
    L1_DMG        = 8,
    L2_DMG        = 12,
    L3_DMG        = 16,

    COLOR_BEE     = "#e8c84a",
    COLOR_DEEP    = "#6b5210",
    COLOR_GHOST   = "#fff8d0",

    ZORDER_BEE    = 131,
    ZORDER_FX     = 135,
    AUTOINC_BASE  = 978000,
}

local _bee       = nil
local _feedCount = 0
local _cdLeft    = 0
local _scheduler = nil
local _autoInc   = 0

local function GenID(prefix)
    _autoInc = _autoInc + 1
    return string.format("%s_%d", prefix or "BQN",
        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 GetGap(lvl)
    if lvl >= 3 then return CONST.L3_GAP end
    if lvl == 2 then return CONST.L2_GAP end
    return CONST.L1_GAP
end

local function GetDmg(lvl)
    if lvl >= 3 then return CONST.L3_DMG end
    if lvl == 2 then return CONST.L2_DMG end
    return CONST.L1_DMG
end

-- 放蜂入口
function BeeQueen.Cast()
    if _cdLeft > 0 or _bee then return end
    _cdLeft = CONST.BEE_CD
    _bee = { lvl = 1, t = CONST.BEE_LIFE, fireT = GetGap(1) }
    CreateBeeNode()
    ShowTip("蜂王出了——一阶，杀小怪喂它升阶
蜂王出了——一阶，杀小怪喂它升阶。蜂王的光球大小也随等级变——一阶掌心大、三阶脑袋大，球的大小就是蜂王的品级展示。蜂王升阶的那一帧也要有仪式——金光从蜂王身上炸开、光球当场涨一圈，仪式感越足玩家越愿意去喂。")
end

-- 喂食
SL:RegisterLUAEvent(LUA_EVENT_MONSTER_DEAD, "BQN_Feed", function()
    if not _bee then return end
    _feedCount = _feedCount + 1
    if _feedCount >= CONST.FEED_PER_LVL and _bee.lvl < CONST.MAX_LVL then
        _feedCount = 0
        _bee.lvl = _bee.lvl + 1
        SL:TipAboveMe("蜂王升" .. _bee.lvl .. "阶")
    end
end)

-- 定时器：出手与寿命
if not _scheduler then
    _scheduler = SL:Schedule(function(dt)
        _cdLeft = math.max(0, _cdLeft - dt)
        if not _bee then return end
        _bee.t = _bee.t - dt
        if _bee.t <= 0 then
            SafeRemove(_bee.node)
            _bee = nil
            ShowTip("蜂王走了——下一只接着孵")
            return
        end
        _bee.fireT = _bee.fireT - dt
        if _bee.fireT <= 0 then
            _bee.fireT = GetGap(_bee.lvl)
            local tid = SL:GetValue("MARK_TARGET_ID")
            if tid then
                SL:ActorHurt(tid, GetDmg(_bee.lvl))
                SL:TipAbove(tid, "-" .. GetDmg(_bee.lvl))
            end
        end
    end, 0.02)
end

SL:ScheduleOnce(function()
    ShowTip("技能已加载: 蜂王 (调试按钮触发)")
end, 1.0)

return BeeQueen