local cl_showhints = CreateClientConVar( "cl_showhints", "1", true, false, "Whether to display popup hints." )

-- A list of hints we've already done so we don't repeat ourselves
local ProcessedHints = {}

--
-- Handles looking up bindings
--
local function LookupBinding( group )

	local key = input.LookupBinding( group )

	if ( !key ) then
		return "'" ..  string.lower( group ) .. " not bound'"
	end

	return "'" ..  string.upper( key ) .. "'"

end

--
-- Throws a Hint to the screen
--
local function ThrowHint( name )
	if ( !cl_showhints:GetBool() || engine.IsPlayingDemo() ) then return end

	local text = language.GetPhrase( "Hint_" .. name )
	text = string.gsub( text, "%%([^%%]+)%%", LookupBinding )

	GAMEMODE:AddNotify( text, NOTIFY_HINT, 20 )

	surface.PlaySound( "ambient/water/drip" .. math.random( 1, 4 ) .. ".wav" )

end


--
-- Adds a hint to the queue
--
function GM:AddHint( name, delay )

	if ( ProcessedHints[ name ] ) then return end

	timer.Create( "HintSystem_" .. name, delay, 1, function() ThrowHint( name ) end )
	ProcessedHints[ name ] = true

end

--
-- Removes a hint from the queue
--
function GM:SuppressHint( name )

	timer.Remove( "HintSystem_" .. name )

end

-- Show opening menu hint if they haven't opened the menu within 30 seconds
GM:AddHint( "OpeningMenu", 30 )

-- Tell them how to turn the hints off after 1 minute
GM:AddHint( "Annoy1", 5 )
GM:AddHint( "Annoy2", 7 )