Initial commitHEADmaster

1 files changed, 76 insertions, 0 deletions

diff --git a/gamemode/cl_hud/vgui/mbuserbrowser.lua b/gamemode/cl_hud/vgui/mbuserbrowser.lua
new file mode 100644
index 0000000..8249662
--- /dev/null
+++ b/gamemode/cl_hud/vgui/mbuserbrowser.lua
@@ -0,0 +1,76 @@
+local PANEL = {}
+
+function PANEL:Init()
+	self.bgcol		= MAIN_COLOR
+	self.fgcol		= MAIN_COLOR2
+
+	self:SetTitle( "UserBrowser" )
+	
+	self.HTML = vgui.Create( "HTML" , self )
+	self.HTML:OpenURL( "www.google.com" )
+	
+	self.HTML.StatusChanged 		= function( s , str ) self.Status = str end
+	self.HTML.PageTitleChanged 		= function( s , title ) self:SetTitle(title) end
+	self.HTML.FinishedURL			= function( s , url ) self.URLBar:SetText(url) end
+	
+	self.Status = "Ready."
+	
+	self.BackB = vgui.Create( "MBButton" , self )
+	self.BackB:SetText("<")
+	self.BackB:EnableHoverSound(false)
+	self.BackB.DoClick = function() self.HTML:HTMLBack() end
+	
+	self.RefreshB = vgui.Create( "MBButton" , self )
+	self.RefreshB:SetText("Refresh")
+	self.RefreshB:EnableHoverSound(false)
+	self.RefreshB.DoClick = function() self.HTML:Refresh() end
+	
+	self.ForwardB = vgui.Create( "MBButton" , self )
+	self.ForwardB:SetText(">")
+	self.ForwardB:EnableHoverSound(false)
+	self.ForwardB.DoClick = function() self.HTML:HTMLForward() end
+	
+	self.URLBar = vgui.Create( "DTextEntry" , self )
+	self.URLBar:SetText("www.google.com")
+	self.URLBar.OnEnter = function(s) self.HTML:OpenURL(s:GetValue()) end
+end
+
+function PANEL:OpenURL(url)
+	self.HTML:OpenURL(url)
+end
+
+function PANEL:SetFGColor( col )
+	self.fgcol = col
+end
+
+function PANEL:SetBGColor( col )
+	self.bgcol = col
+end
+
+function PANEL:Paint(w,h)
+	DrawBoxy( 0 , 0 , w , h , self.bgcol )
+	DrawLine( 0 , 20 , w , 20 , self.fgcol )
+	
+	DrawText( self.Status , "Trebuchet18" , 5 , h-20 , MAIN_WHITECOLOR )
+	
+	return true
+end
+	
+function PANEL:PerformLayout()
+	self.HTML:SetPos(1,42)
+	self.HTML:SetSize(self:GetWide()-2,self:GetTall()-64)
+	
+	self.BackB:SetPos(10,22)
+	self.BackB:SetSize(20,20)
+	
+	self.RefreshB:SetPos(60,22)
+	self.RefreshB:SetSize(80,20)
+	
+	self.ForwardB:SetPos(35,22)
+	self.ForwardB:SetSize(20,20)
+	
+	self.URLBar:SetPos(145,22)
+	self.URLBar:SetSize(self:GetWide()-150,20)
+end
+ 
+vgui.Register( "MBUserBrowser", PANEL , "MBFrame" )
\ No newline at end of file