Codinablack

local noLagSave = GlobalEvent("noLagSave")
local timeBetweenSaves = 1 * 60 * 60 * 1000 -- in milliseconds
local delayBetweenSaves = 100

function delayedSave(cid)
    local p = Player(cid)
    if p then
        p:save()
    end
end

Codinablack

local matrixFields = {
	area = {}
}

local Matrix = setmetatable(matrixFields,
	{
		__call = function(matrix, ...)
			return matrix.new(...)
		end
	}

Codinablack

local defaults = {
	name = "",
	words = "",
	mana = 0,
	manaPercent = 0,
	soul = 0,
	spellId = 0,
	range = -1,
	level = 0,
	magLevel = 0,

Codinablack

local Class = setmetatable ({ },
	{
		__call = function (class, ...)
			return class.new (...)
		end
	}
)

Class.__index = Class
Class.__call = function (self)

Codinablack

-- creates a full copy of a table
-- changing the value of copied table doesn't touch the original anymore
-- warning: using methods on "copied" userdata will still affect original object

local a = {
	["abc"] = {1, 2},
	[1] = {4, {2}}
}

function cloneTable(t)

Codinablack

-- usage: dumpTable(t)
-- to dump to file:
--[[
	local str = dumpTable(t)
	local f = io.open("dumped_table.txt", "w+")
	f:write(str)
	f:close()
]]

local function getTabulation(depth)

Codinablack

-- who is showing changes and who is watching
spectated = Player("player")
spectator = Player("Administrator")



-- animated text, otclient only (or old clients)
--------------------------------
msg = NetworkMessage()
msg:addByte(0x84)

Codinablack

--[[
dumps file directory to a console
example output:

linedefined     0
lastlinedefined 207
source  @F:\ot\data\scripts\filename.lua
what    main
short_src       ...ot\data\scripts\filename.lua
]]

Codinablack

project.exe test.txt
pause

Codinablack

-- async iterate area
-- for when you want to execute a script on a large area, but dont want lags on your server
local defaultChunkSize = 16
local defaultDelay = 200

Area = setmetatable ({ },
	{
		__call = function (area, ...)
			return area.new (...)
		end