local items,    lastUnspawn =
         {},              0;

local function unspawn()
  local i = #items;
  local item = items[i];
  if (item) then
    tfm.exec.removeObject(item);
    items[i] = nil;
  end
end

function eventLoop(curTime)
  if (curTime >= (lastUnspawn + 6e+4)) then
    unspawn();
    lastUnspawn = curTime;
  end
end

for i = 1, 4 do
  items[#items + 1] = tfm.exec.addShamanObject(3, 300, 3);
end

OBJETOS = {}

function setObjectRespawn(obj, timer)
	-- Adiciona um objeto e um tempo de remoção na tabela objetos
	-- O id do objeto se torna o índice na tabela
	-- O valor adicionado é a hora atual + o tempo do timer
	-- -- Int obj = identificação do objeto na tabela tfm.get.room.objectList
	-- -- Int timer = tempo de duração do objeto
	OBJETOS[obj] = os.time() + timer
end

function addObjetoRespawn(id, x, y, vx, vy, ghost, timer)
	-- Invoca um objeto já preparado para dar respawn
	-- -- Int id = tipo de objeto
	-- -- Int x = posição x
	-- -- Int y = posição y
	-- -- Int vx = velocidade x
	-- -- Int vy = velocidade y
	-- -- Boolean ghost = objeto fantasma
	-- -- Int timer = tempo de duração do objeto
	local obj = tfm.exec.addShamanObject(id, x, y, vx, vy, ghost)
	setObjectRespawn(obj, timer)
	return obj
end

function removeObjetoRespawn()
	-- Varre a tabela OBJETOS a procura de objetos para remover
	-- Deve ser adicionado ao eventLoop
	local aux = {}
	for i, v in pairs(OBJETOS) do
		if v > os.time() then
			table.insert(aux, i)
		end
	end
	for i, v in pairs(aux) do
		tfm.exec.removeObject(i)
		objetos[i] = nil
	end
end

t = {2,4}
despawn = {}

function addObj()
for k,v in ipairs(t) do
local id = tfm.exec.addShamanObject(v, 200, 200, 0, 0, 0, false)
table.insert(despawn,{os.time(),id})
end
end
addObj()

function eventLoop(t,r)
for i,obj in ipairs(despawn) do
if obj[1] <= os.time()-60000 then
tfm.exec.removeObject(obj[2])
table.remove(despawn,i)
end
end
end

local pids = {};

function eventLoop(ct, rt)
    for i,v in pairs(tfm.get.room.playerList) do
        if not v.isDead then
            tfm.exec.moveObject(pids[i].id, v.x, v.y-15)
        end
    end
end

function eventNewGame()
    for i,v in pairs(tfm.get.room.playerList) do
        pids[i] = {["id"]=-1}
        pids[i].id = tfm.exec.addShamanObject(2, v.x, v.y, 0, 0, 0, true)
        for _,k in pairs{0, 1, 2, 3} do
            system.bindKeyboard(i, k, true, true)
        end
    end
end

eventNewGame()