Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local PANEL = {
- Init = function( self )
- self:SetSize(1000,500 )
- self:Center()
- self:SetVisible( true )
- local x, y = self:GetSize()
- surface.SetFont( "DermaLarge" )
- local titleX, titleY = surface.GetTextSize( "DarkRP F4Menu" )
- local title = vgui.Create( "DLabel", self)
- title:SetText( "DarkRPF4Menu" )
- title:SetSize(titleX, titleY)
- title:SetPos( 20, 6 )
- title:SetFont( "DermaLarge" )
- title:SetTextColor( Color(255,255,255,255) )
- local closebutton = vgui.Create( "DButton", self)
- closebutton:SetText( "Close" )
- closebutton:SetSize(75, 25)
- closebutton:SetPos( x-81, 6)
- closebutton.Paint = function(self, w, h)
- surface.SetDrawColor( 30,30,30, 50)
- surface.DrawRect( 0, 0, w, h )
- surface.SetDrawColor( 20,20,20, 150)
- surface.DrawOutlinedRect( 0, 0, w, h )
- end
- closebutton.DoClick = function()
- CSF4Menu:SetVisible( false )
- gui.EnableScreenClicker( false )
- end
- local removebutton = vgui.Create( "DButton", self)
- removebutton:SetText( "Remove" )
- removebutton:SetSize(75, 25)
- removebutton:SetPos( x-162, 6)
- removebutton.Paint = function(self, w, h)
- surface.SetDrawColor( 30,30,30, 50)
- surface.DrawRect( 0, 0, w, h )
- surface.SetDrawColor( 20,20,20, 150)
- surface.DrawOutlinedRect( 0, 0, w, h )
- end
- removebutton.DoClick = function()
- gui.EnableScreenClicker( false )
- CSF4Menu:Remove()
- CSF4Menu = vgui.Create( "cs_f4_menu" )
- CSF4Menu:SetVisible( false )
- end
- local pagesback = vgui.Create( "DPanel" , self )
- pagesback:SetPos( 6, 37 )
- pagesback:SetSize( x - 12, y - 43 )
- pagesback.Paint = function( self, w, h )
- surface.SetDrawColor( 30, 30, 30, 150 )
- surface.DrawRect( 0, 0, w, h )
- end
- local pages = vgui.Create( "DColumnSheet", pagesback )
- pages:Dock ( FILL )
- local jobs = vgui.Create( "DPanel" , pages )
- jobs:Dock( FILL )
- jobs.Paint = function(self, w, h )
- surface.SetDrawColor( 30, 30, 30, 150 )
- surface.DrawRect( 0, 0, w, h )
- end
- pages:AddSheet( "Jobs", jobs, "icon16/user.png" )
- local shop = vgui.Create( "DPanel" , pages )
- shop:Dock( FILL )
- shop.Paint = function(self, w, h )
- surface.SetDrawColor( 30, 30, 30, 150 )
- surface.DrawRect( 0, 0, w, h )
- end
- pages:AddSheet( "Shop", shop, "icon16/basket.png" )
- local commands = vgui.Create( "DPanel" , pages )
- commands:Dock( FILL )
- commands.Paint = function(self, w, h )
- surface.SetDrawColor( 30, 30, 30, 150 )
- surface.DrawRect( 0, 0, w, h )
- end
- pages:AddSheet( "Commands", commands, "icon16/application_xp_terminal.png" )
- end,
- Paint = function( self, w, h )
- surface.SetDrawColor( 50,50,50, 150)
- surface.DrawRect( 0, 0, w, h )
- surface.DrawOutlinedRect( 2, 2, w - 4, h - 4 )
- end
- }
- vgui.Register( "cs_f4_menu", PANEL)
- timer.Simple( 2, function()
- GAMEMODE.ShowSpare2 = openF4
- end )
- concommand.Add("open_f4", function()
- openF4()
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement