cmd_tps.lua

local TpsCache = {}
local GlobalTps = {}

local function GetAverageNum(Table)
	local Sum = 0
	for i,Num in ipairs(Table) do
		Sum = Sum + Num
	end
	return math.floor(Sum / #Table * 100) / 100
end

function OnWorldTick(World, TimeDelta)
	local WorldTps = TpsCache[World:GetName()]
	if (WorldTps == nil) then
		WorldTps = {}
		TpsCache[World:GetName()] = WorldTps
	end

	if (#WorldTps >= 10) then
		table.remove(WorldTps, 1)
	end

	table.insert(WorldTps, 1000 / TimeDelta)
end

function OnTick(TimeDelta)
	if (#GlobalTps >= 10) then
		table.remove(GlobalTps, 1)
	end

	table.insert(GlobalTps, 1000 / TimeDelta)
end

function HandleTpsCommand(Split, Player)
	local Response = {}

	table.insert(Response, "Global TPS: " .. GetAverageNum(GlobalTps))
	for WorldName, WorldTps in pairs(TpsCache) do
		table.insert(Response, "World \"" .. WorldName .. "\": " .. GetAverageNum(WorldTps) .. " TPS")
	end
	return true, SendMessage(Player, table.concat(Response, "\n"))
end

function HandleConsoleTps(Split)
	return HandleTpsCommand(Split)
end