Upload

gamemodes/sandbox/gamemode/cl_hints.lua

@@ -0,0 +1,72 @@
+--[[
+| This file was obtained through the combined efforts
+| of Madbluntz & Plymouth Antiquarian Society.
+|
+| Credits: lifestorm, Gregory Wayne Rossel JR.,
+| 	Maloy, DrPepper10 @ RIP, Atle!
+|
+| Visit for more: https://plymouth.thetwilightzone.ru/
+--]]
+
+
+
+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 = {}
+
+--
+-- Throw's a Hint to the screen
+--
+local function ThrowHint( name )
+
+	local show = GetConVarNumber( "cl_showhints" )
+	if ( show == 0 ) then return end
+
+	if ( engine.IsPlayingDemo() ) then return end
+
+	local text = language.GetPhrase( "Hint_" .. name )
+
+	local s, e, group = string.find( text, "%%([^%%]+)%%" )
+	while ( s ) do
+		local key = input.LookupBinding( group )
+		if ( !key ) then key = "<NOT BOUND>" end
+
+		text = string.gsub( text, "%%([^%%]+)%%", "'" .. key:upper() .. "'" )
+		s, e, group = string.find( text, "%%([^%%]+)%%" )
+	end
+
+	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 )