--Editáveis
p1="jogador1"--Primeiro jogador
p2="jogador2"--Segundo jogador
max=5--Limite de pontuação(vencer o jogo)
-------------------------------
maps,score,winner={},{},""
score[p1]=0
score[p2]=0
scorebar_text,won="<p align='Center'>%s - %d X %d - %s\n","<p align='Center'>%s ganhou!\n"

function eventLoop(a,b)
	local alive,UI=0,ui.setMapName
	local txt1,txt2=scorebar_text:format(p1,score[p1],score[p2],p2),won:format(winner)
	local txt=winner=="" and UI(txt1) or winner~="" and UI(txt2)
	table.foreach(tfm.get.room.playerList, function(i,v) alive=not v.isDead and alive+1 or alive end)
	alive=(alive==0 or b<=0) and tfm.exec.newGame(maps[math.random(#maps)])
end

function eventPlayerWon(p)
	if p==p1 or p==p2 then
		score[p]=score[p]+1
		if score[p]==max then
			winner=p
		end
		eventLoop(0,0)
	end
end

for i=1,140 do
	maps[i]=i
end
 
tfm.exec.disableAutoNewGame()
tfm.exec.disableAutoShaman()
eventLoop(0,0)

local pool = {}
local objs = {}

function eventChatCommand(name, cmd)
	if cmd == 'baiacu' then
		objs[name] = tfm.enum.shamanObject.balloonFish
	elseif cmd == 'flecha' then
		objs[name] = tfm.enum.shamanObject.cupidonArrow
	elseif cmd == 'galinha' then
		objs[name] = tfm.enum.shamanObject.chicken
	end
end

function eventKeyboard(name, key, down, x, y)
	if key == 69 and objs[name] then
		local facingRight = tfm.get.room.playerList[name].isFacingRight
		table.insert(pool, {tfm.exec.addShamanObject(objs[name], facingRight and x + 8 or x - 8, y - 7, 0, facingRight and 20 or -20), os.time()})
	end
end

function eventLoop(el, rm)
	for i,v in ipairs(pool) do
		if v[2] < os.time() - 3000 then
			tfm.exec.removeObject(v[1])
			table.remove(pool, i)
		end
	end
end

function eventNewPlayer(name)
	system.bindKeyboard(name, 69, false)
end

for name in pairs(tfm.get.room.playerList) do
	eventNewPlayer(name)
end

local pool = {}
local obj = -1

function eventChatCommand(name, cmd)
	if cmd == 'baiacu' then
		obj = tfm.enum.shamanObject.balloonFish
	elseif cmd == 'flecha' then
		obj = tfm.enum.shamanObject.cupidonArrow
	elseif cmd == 'galinha' then
		obj = tfm.enum.shamanObject.chicken
	end
end

function eventKeyboard(name, key, down, x, y)
	if key == 69 and obj ~= -1 then
		local facingRight = tfm.get.room.playerList[name].isFacingRight
		table.insert(pool, {tfm.exec.addShamanObject(obj, facingRight and x + 8 or x - 8, y - 7, 0, facingRight and 20 or -20), os.time()})
	end
end

function eventLoop(el, rm)
	for i,v in ipairs(pool) do
		if v[2] < os.time() - 3000 then
			tfm.exec.removeObject(v[1])
			table.remove(pool, i)
		end
	end
end

function eventNewPlayer(name)
	system.bindKeyboard(name, 69, false)
end

for name in pairs(tfm.get.room.playerList) do
	eventNewPlayer(name)
end

function eventChatCommand(name, cmd)
	local args = {}
	for arg in cmd:gmatch('[^%s]+') do
		table.insert(args, arg)
	end

	if args[1] == 'tp' then
		local x, y = tonumber(args[2]), tonumber(args[3])
		if x and y then
			tfm.exec.movePlayer(name, x, y)
		end
	end
end