tfm.exec.disableAutoShaman()

local copy = function(list)
	local out = { }
	for k, v in next, list do
		out[k] = v
	end
	return out
end

local players = {
	room  = { },
	alive = { },
	dead  = { },
	_count = {
		room = 0,
		alive = 0,
		dead = 0
	}
}

local players_insert = function(where, playerName)
	if not players[where][playerName] then
		players._count[where] = players._count[where] + 1
		players[where][playerName] = playerName
	end
end

local players_remove = function(where, playerName)
	if players[where][playerName] then
		players._count[where] = players._count[where] - 1
		players[where][playerName] = nil
	end
end

eventNewPlayer = function(playerName)
	players_insert("room", playerName)
	players_insert("dead", playerName)
end
for playerName in next, tfm.get.room.playerList do
	eventNewPlayer(playerName)
end

eventPlayerLeft = function(playerName)
	players_remove("room", playerName)
end

eventPlayerDied = function(playerName)
	players_remove("alive", playerName)
	players_insert("dead", playerName)
end

eventPlayerRespawn = function(playerName)
	players_remove("dead", playerName)
	players_insert("alive", playerName)
end

local hasRoundEnded = false
eventNewGame = function()
	hasRoundEnded = false

	players.dead = { }
	players.alive = copy(players.room)

	players._count.alive = players._count.room
	players._count.dead = 0
end

eventLoop = function(_, remainingTime)
	if not hasRoundEnded and (remainingTime < 500 or players._count.alive == 1) then
		local win, i = { }, 0
		for playerName in next, players.alive do
			i = i + 1
			win[i] = playerName
			tfm.exec.playerVictory(playerName)
		end

		if i == 0 then
			print("Ninguém ganhou")
		elseif i == 1 then
			print(win[1] .. " ganhou")
		else
			print(table.concat(win, ", ") .. " ganharam")
		end
	end
end

local _, adm= pcall(nil)
adm= adm:match("(.-#%d+)")
local mensagem=""
eventNewPlayer= function(player)
		ui.addTextArea(0, "<p align='center'><font size='12' color='#DDDDDD'><b>O administrador ("..adm..") tem uma mensagem para você!</b></font></p><br/><p align='center'>"..mensagem.."</p>", player, 250, 100, 300, 200, 0x6666FF, 0xFF6666, 1, true)
		ui.addTextArea(1, "<font size='12' color='#000000'><a href='event:close'>X</a></font>", player, 240, 90, nil, nil, 0xFF6666, 0xFF6666, 1, true)
end
eventTextAreaCallback= function(_, player, _)
		ui.removeTextArea(0, player)
		ui.removeTextArea(1, player)
end