Custom SWEP Help Menu

[ZerK]

How would I create a help menu like the toolgun help menu in the top left?

I tried a cl_init.lua with this in it, but it didn't work.

[lua]
local gmod_drawhelp = CreateClientConVar( "gmod_drawhelp", "1", true, false )

include('shared.lua')

surface.CreateFont( "GModToolName",
{
font = "Roboto Bk",
size = 80,
weight = 1000
})

surface.CreateFont( "GModToolSubtitle",
{
font = "Roboto Bk",
size = 24,
weight = 1000
})

surface.CreateFont( "GModToolHelp",
{
font = "Roboto Bk",
size = 17,
weight = 1000
})

--[[---------------------------------------------------------
Draws the help on the HUD (disabled if gmod_drawhelp is 0)
-----------------------------------------------------------]]
function SWEP:DrawHUD()

if ( !gmod_drawhelp:GetBool() ) then return end

local mode = gmod_toolmode:GetString()

-- Don't draw help for a nonexistant tool!
if ( !self:GetToolObject() ) then return end

self:GetToolObject():DrawHUD()

-- This could probably all suck less than it already does

local x, y = 50, 40
local w, h = 0, 0

local TextTable = {}
local QuadTable = {}

QuadTable.texture = self.Gradient
QuadTable.color = Color( 10, 10, 10, 180 )

QuadTable.x = 0
QuadTable.y = y-8
QuadTable.w = 600
QuadTable.h = self.ToolNameHeight - (y-8)
draw.TexturedQuad( QuadTable )

TextTable.font = "GModToolName"
TextTable.color = Color( 240, 240, 240, 255 )
TextTable.pos = { x, y }
TextTable.text = "Vehicle HP Checker"

w, h = draw.TextShadow( TextTable, 2 )
y = y + h

TextTable.font = "GModToolSubtitle"
TextTable.pos = { x, y }
TextTable.text = "Check a vehicles health/the estimated price to repair it."
w, h = draw.TextShadow( TextTable, 1 )
y = y + h + 8

self.ToolNameHeight = y

--y = y + 4

QuadTable.x = 0
QuadTable.y = y
QuadTable.w = 600
QuadTable.h = self.InfoBoxHeight
local alpha = math.Clamp( 255 + (self:GetToolObject().LastMessage - CurTime())*800, 10, 255 )
QuadTable.color = Color( alpha, alpha, alpha, 230 )
draw.TexturedQuad( QuadTable )

y = y + 4

TextTable.font = "GModToolHelp"
TextTable.pos = { x + self.InfoBoxHeight, y }
TextTable.text = "Left click a car to get it's HP. Right click a car to get the cost range for repairing it to full HP."
w, h = draw.TextShadow( TextTable, 1 )

surface.SetDrawColor( 255, 255, 255, 255 )
surface.SetTexture( self.InfoIcon )
surface.DrawTexturedRect( x+1, y+1, h-3, h-3 )

self.InfoBoxHeight = h + 8

end

function SWEP:SetStage( ... )

if ( !self:GetToolObject() ) then return end
return self:GetToolObject():SetStage( ... )

end

function SWEP:GetStage( ... )

if ( !self:GetToolObject() ) then return end
return self:GetToolObject():GetStage( ... )

end

function SWEP:ClearObjects( ... )

if ( !self:GetToolObject() ) then return end
self:GetToolObject():ClearObjects( ... )

end

function SWEP:StartGhostEntities( ... )

if ( !self:GetToolObject() ) then return end
self:GetToolObject():StartGhostEntities( ... )

end

function SWEP:PrintWeaponInfo( x, y, alpha )
end

function SWEP:FreezeMovement()

local mode = self:GetMode()

if ( !self:GetToolObject() ) then return false end

return self:GetToolObject():FreezeMovement()

end

function SWEP:OnReloaded()

-- TODO: Reload the tool control panels
-- controlpanel.Clear()

end
[/lua]