eventChatCommand = function(name, cmd)
	if cmd == "fly" then
		system.bindKeyboard(name, 32, true, true)
	elseif cmd == "speed" then
		for key = 0, 2, 2 do
			for h = 0, 1 do
				system.bindKeyboard(name, key, h == 1, true)
			end
		end
	elseif cmd == "teleport" then
		system.bindMouse(name, true)
	elseif cmd == "win" then
		tfm.exec.giveCheese(name)
		tfm.exec.playerVictory(name)
	elseif cmd:sub(1, 10) == "namecolor " then
		local color = tonumber("0x" .. cmd:sub( (cmd:sub(11, 11) == '#' and 12 or 11) ), 16)
		if not color then return end
		tfm.exec.setNameColor(name, color)
	end
end

eventKeyboard = function(name, key)
	if key == 32 then -- Fly
		tfm.exec.movePlayer(name, 0, 0, true, 0, -50)
	else -- Speed
		tfm.exec.movePlayer(name, 0, 0, true, (key == 0 and -1 or 1) * 50, 0, true)
	end
end

eventMouse = tfm.exec.movePlayer

for _, v in next, {'AutoShaman','AutoNewGame'} do
	tfm.exec['disable' .. v]()
end

table.foreach(tfm.get.room.playerList, function(k,v) for i=0,1 do system.bindKeyboard(k,17,(i == 0)) end end)

-- !np @xxxxxxx ou !map #7 para escolher uma categoria.

eventChatCommand = function(name,c)
	if c:find('np') or c:find('map') then
		tfm.exec.newGame(c:match('[@#]%d+'))
	end
end

eventEmotePlayed = tfm.exec.giveCheese

eventMouse = tfm.exec.movePlayer
eventKeyboard = function(name,_,p)
	system.bindMouse(name,p)
end

--[[
	Script : Pedido SKLAG#2552 
	Autor: Sla#3700
    Versão: Completa
    Informações Adicionas: Modificar textInfo com as informações Necessarias, sendo o X e Y da sua Textarea. Caso tenha erro adicionar 400 na sua Y. Z é a hitbox, aumentar/diminuir conforme gosto.
]]--

local textInfo = { evento1 = { x = 1069, y = 139, z = 70 }, evento2 = { x = 442, y = 638, z = 70 } }
    
eventTextAreaCallback = function(id, player, ref)
if tonumber(textInfo[ref].x) >= tonumber(tfm.get.room.playerList[player].x) - textInfo[ref].z and tonumber(textInfo[ref].x) <= tonumber(tfm.get.room.playerList[player].x) + textInfo[ref].z and tonumber(textInfo[ref].y) >= tonumber(tfm.get.room.playerList[player].y) - textInfo[ref].z and tonumber(textInfo[ref].y) <= tonumber(tfm.get.room.playerList[player].y) + textInfo[ref].z then
--- inserir o que deve acontecer no evento
end
end

ui.addTextArea(1,"<a href='event:evento1'>Testezin", i, 442, 238, 182, 21, 0xff0011, 0, 1, true)

--[[
	Script : Pedido SKLAG#2552 
	Autor: Sla#3700
    Versão: Port para Qualquer Script
    Informações Adicionas: Modificar textInfo com as informações Necessarias, sendo o X e Y da sua Textarea. Caso tenha erro adicionar 400 na sua Y. Z é a hitbox, aumentar/diminuir conforme gosto.
]]--


local textInfo = { evento1 = { x = 1069, y = 139, z = 70 }, evento2 = { x = 442, y = 638, z = 70 } } --- Inserir no Começo do Script

--- inserir o if abaixo abaixo da função eventTextAreaCallback  
if tonumber(textInfo[ref].x) >= tonumber(tfm.get.room.playerList[player].x) - textInfo[ref].z and tonumber(textInfo[ref].x) <= tonumber(tfm.get.room.playerList[player].x) + textInfo[ref].z and tonumber(textInfo[ref].y) >= tonumber(tfm.get.room.playerList[player].y) - textInfo[ref].z and tonumber(textInfo[ref].y) <= tonumber(tfm.get.room.playerList[player].y) + textInfo[ref].z then

--- inserir o end no final do eventTextAreaCallback
end

local nickname = select(2,pcall(nil)):match('(.-)%.')

for _, v in next, {'AutoShaman','AutoNewGame','AutoTimeLeft','AfkDeath','PhysicalConsumables'} do
	tfm.exec['disable'..v]()
end

system.disableChatCommandDisplay()

--[[
	Exemplos:
	!admin nickname para dar/retirar poder
	!ban nickname/all o mesmo para retirar
	!np @999999 ou !np #7
	!kill nickname/all
	!r nickname/all
	!fly nickname/all para ativar/desativar o mesmo para !s | !cheese | !meep
	!tp 400 200 nickname ou !tp 400 200 all
	!tp nickname ou !tp all e depois clicar
	!color #ff0000 nickname/all
	!random valorMin valorMax tempoNilissegundos nickname/all | !random 10 40 5000 all
]]

local admin = {[nickname] = true}
local ban = {}
local tp,meep,fly = {},{},{}
table.warning = {}
local random = {}

formatName = function(name)
	return name:sub(1,1):upper()..name:sub(2):lower()
end

checkAdmin = function(name)
	return (table.foreach(admin,function(i,n) if (i == name and n) then return true end end))
end

local action = {['np'] = function(_,c) tfm.exec.newGame(c:match('[@#]%d+')) end,
				['admin'] = function(n,c,name) if (n == nickname and nickname ~= name) then admin[name] = ((admin[name] or false) == false) ban[name] = false end end,
				['ban'] = function(_,c,name) if not checkAdmin(name) then ban[name] = ((ban[name] or false) == false) end end,
				['color'] = function(_,c,name) tfm.exec.setNameColor(name,'0x'..(c:match('%s+[#]?(%x+)') or 'd8d8e7')) end,
				['kill'] = function(_,c,name) tfm.exec.killPlayer(name) end,
				['fly'] = function(_,c,name) fly[name] = ((fly[name] or false) == false) system.bindKeyboard(name,32,true,fly[name]) end,
				['tp'] = function(_,c,name) local x,y = c:match('%s+(%d+)%s+(%d+)%s*') if x then tfm.exec.movePlayer(name,tonumber(x),tonumber(y)) else tp[name] = true end end,
				['s'] = function(_,c,name) tfm.exec.setShaman(name,(tfm.get.room.playerList[name].isShaman == false)) end,
				['r'] = function(_,c,name) tfm.exec.respawnPlayer(name) end,
				['cheese'] = function(_,c,name) tfm.exec[(tfm.get.room.playerList[name].hasCheese and 'remove' or 'give')..'Cheese'](name) end,
				['meep'] = function(_,c,name) meep[name] = ((meep[name] or false) == false) tfm.exec.giveMeep(name,meep[name]) end,
				['random'] = function(_,c,name) warning(random.value,tonumber(random.temp) or 5000,name) end,
}

warning = function(value,temp,name)
	table.warning[#table.warning + 1] = {_temp = (os.time() + temp),_name = name,_image = tfm.exec.addImage('16f7b2decb4.png',':1',275,185,name),_id = 10,ui.addTextArea(10,'<font color="#FFFFFF"><b>Número: '..value..'</b></font>',name,300,190,240,20,nil,nil,0,true)}
end

eventNewPlayer = function(name)
	table.foreach(tfm.get.room.playerList,function(k,v) system.bindMouse(k,true) end)
end
eventNewPlayer()

eventChatCommand = function(name,cmd)
	if checkAdmin(name) then
		local mode = cmd:match('^(%w+)%s*')
		random.min,random.max,random.temp = cmd:match('%s+(%d+)%s+(%d+)%s+(%d+)%s*')
		random.value = math.random(tonumber(random.min) or 0,tonumber(random.max) or 20)
		if action[mode] then table.foreach(cmd:find('%s+(all)%s*') and tfm.get.room.playerList or {[nickname] = true},function(k,v) action[mode](name,cmd,formatName(cmd:match('%s+(%w+#%d+)%s*') or k)) end) end
	end
end

eventLoop = function()
	table.foreach(ban,function(i,n) if n then ui.addTextArea(1,'',i,-400,-400,1600,1600,'0x1','0x1',1,true) tfm.exec.killPlayer(i) else ui.removeTextArea(1,i) end end)
	for k,v in next, table.warning do
		if os.time() > v._temp then
			tfm.exec.removeImage(v._image)
			ui.removeTextArea (v._id,v._name)
			table.warning[k] = nil
			break
		end
	end
end

eventMouse = function(name,x,y)
	if checkAdmin(name) then
		for n,v in next, tp do
			if v then
				tfm.exec.movePlayer(n,x,y)
				tp[n] = false
			end
		end
	end
end

eventKeyboard = function(name)
	tfm.exec.movePlayer(name,0,0,true,0,-50)
end