-- SRB2 2.2.15
-- Sistema !viewpoint por nome do jogador câmera

local CAMERA_NAME = "cu"

local targetplayer = nil
local searching = false


-- Procura o jogador da câmera pelo nome
local function GetCameraPlayer()

	for p in players.iterate do
		if p and p.valid and p.name then

			if string.lower(p.name) == string.lower(CAMERA_NAME) then
				return p
			end

		end
	end

	return nil
end



-- Comando:
-- viewpoint NomeDoJogador
COM_AddCommand("viewpoint", function(player, name)

	if not name then
		CONS_Printf(player, "Use: viewpoint nome")
		return
	end


	targetplayer = name
	searching = true


	CONS_Printf(
		player,
		"Procurando viewpoint: "..name
	)

end)



-- Faz a câmera procurar o jogador
addHook("ThinkFrame", function()

	if not searching then
		return
	end


	local camera = GetCameraPlayer()


	if not camera then
		return
	end



	-- passa pelos jogadores
	COM_BufInsertText(
		camera,
		"viewnext"
	)

end)



-- Detecta quando mudou a câmera
addHook("ViewpointSwitch", function(player, newview)

	if not searching then
		return
	end


	local camera = GetCameraPlayer()


	if player ~= camera then
		return
	end


	if newview and newview.name then

		if string.lower(newview.name)
		==
		string.lower(targetplayer)
		then

			searching = false


			CONS_Printf(
				camera,
				"Viewpoint encontrado: "
				..newview.name
			)

		end

	end

end)