【高级技巧】协程可视化：活跃协程的实时面板

local panel = {}
local function coRegister(name, fn)
    local co = coroutine.create(fn)
    panel[name] = { co = co, born = os.time() }
    return coroutine.create(function(...)
        fn(...)
        panel[name] = nil
    end
    )
end
local function coSnapshot()
    local rows = {}
    for name, e in pairs(panel) do
        rows[#rows + 1] = {
            name = name,
            status = coroutine.status(e.co),
            aliveSec = os.time() - e.born,
        }
    end
    return rows
end
local function printPanel()
    for _, r in ipairs(coSnapshot()) do
        print("协程 " .. r.name .. " 状态 " .. r.status ..
            " 已运行 " .. r.aliveSec .. " 秒")
    end
end

coRegister("战报归档", function()
    for i = 1, 5000 do
        archiveOne(i)
        coroutine.yield()
    end
end
)
printPanel()