【性能调优】传送热点排队：祖玛七层跳转点的批量放行

local q = {}
function beginteleport(actor)
    local player = class(actor)
    if #q >= 200 then
        sendmsg(actor, 0, "祖玛七层人满为患，请稍后再试")
        return
    end
    q[#q + 1] = player:GetName()
    sendmsg(actor, 0, "排队中，前方" .. #q - 1 .. "人")
end
setontimerex(75, 2)
function ontimer75()
    for i = 1, 5 do
        local name = table.remove(q, 1)
        if name == nil then break end
        local a = getplayerbyname(name)
        if a ~= nil and isplayer(a) then
            mapmove(a, "zuma7", 0, 0)
        end
    end
end

function ontimer75()
    for i = 1, 5 do
        local name = table.remove(q, 1)
        if name == nil then break end
        local a = getplayerbyname(name)
        if a ~= nil and isplayer(a) then
            mapmove(a, "zuma7", 20 + i, 25)
        end
    end
end