Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // Clientside only stuff goes here
- function ShowTeamMenu()
- local DermaPanel = vgui.Create( "DFrame" ) -- Creates the frame itself
- DermaPanel:SetPos( 80,80 ) -- Position on the players screen
- DermaPanel:SetSize( 600, 500 ) -- Size of the frame
- DermaPanel:SetTitle( "Main Menu" ) -- Title of the frame
- DermaPanel:SetVisible( true )
- DermaPanel:SetDraggable( false ) -- Draggable by mouse?
- DermaPanel:ShowCloseButton( true ) -- Show the close button?
- DermaPanel:MakePopup() -- Show the frame
- local TestingPanel = vgui.Create( "DPanel", DermaPanel )
- TestingPanel:SetPos( 25, 50 )
- TestingPanel:SetSize( 550, 50 )
- TestingPanel.Paint = function() -- Paint function
- surface.SetDrawColor( 50, 50, 50, 255 ) -- Set our rect color below us; we do this so you can see items added to this panel
- surface.DrawRect( 0, 0, TestingPanel:GetWide(), TestingPanel:GetTall() ) -- Draw the rect
- surface.DrawText( "Message of the Day: Zyler Rocks!" )
- end
- local PropertySheet = vgui.Create( "DPropertySheet" )
- PropertySheet:SetParent( DermaPanel )
- PropertySheet:SetPos( 25, 110 )
- PropertySheet:SetSize( 550, 315 )
- local Welcome = vgui.Create( "DLabel" )
- Welcome:SetText( "A" )
- Welcome:SetColor(Color(191,255,0,255))
- Welcome:SizeToContents()
- local Character = vgui.Create( "DPanel" )
- Character:SetSize( 305, 305 )
- Character.paint = function()
- surface.SetDrawColor(Color(191,255,0,255))
- surface.DrawRect( 0, 0, TestingPanel:GetWide(), TestingPanel:GetTall() )
- surface.DrawText( "Characters" )
- end
- local Props = vgui.Create( "DPanel" )
- Props:SetSize( 305, 305 )
- Props.paint = function()
- surface.SetDrawColor(Color(191,255,0,255))
- surface.DrawRect( 0, 0, TestingPanel:GetWide(), TestingPanel:GetTall() )
- surface.DrawText( "Pick props to spawn" )
- end
- local food = {}
- food[1] = "models/props_junk/garbage_milkcarton002a.mdl"
- food[2] = "models/props_junk/PopCan01a.mdl"
- food[3] = "models/props_junk/garbage_takeoutcarton001a.mdl"
- food[4] = "models/props_junk/watermelon01.mdl"
- food[5] = "models/props_junk/garbage_metalcan001a.mdl"
- food[6] = "models/props_lab/box01a.mdl"
- food[7] = "models/props_lab/box01b.mdl"
- local Proplist1 = vgui.Create("DCollapsibleCategory", Props)
- Proplist1:SetPos(25, 50)
- Proplist1:SetSize( 450, 50 ) -- Keep the second number at 50
- Proplist1:SetLabel( "Proplist1" )
- Proplist1menu = vgui.Create("DModelSelect", Proplist1 )
- Proplist1menu:SetSize( 300, 300 )
- Proplist1menu:SetSpacing( 5 )
- Proplist1menu:EnableHorizontal( true )
- Proplist1menu:EnableVerticalScrollbar( false )
- Proplist1menu:SetPadding( 4 )
- for k,v in pairs(food) do
- local icon = vgui.Create( "SpawnIcon", Proplist1menu )
- icon:SetModel( v )
- Proplist1menu:AddItem( icon )
- icon.DoClick = function( icon ) surface.PlaySound( "ui/buttonclickrelease.wav" ) RunConsoleCommand("gm_spawn", v)
- end
- end
- Proplist1:SetContents(Proplist1menu)
- PropertySheet:AddSheet( "Welcome", Welcome, "gui/silkicons/user", false, false, "Rules and stuff" )
- PropertySheet:AddSheet( "Character/Groups", Character, "gui/silkicons/group", false, false, "Manage your character and groups" )
- PropertySheet:AddSheet( "Props/Tools", Props, "gui/silkicons/group", false, false, "Get Props and Tools" )
- local groupsnamesasdf = {}
- groupsnamesasdf[1] = "Civil Service"
- groupsnamesasdf[2] = "Government"
- groupsnamesasdf[3] = "Employable"
- local groupslist = vgui.Create("DCollapsibleCategory", Character)
- groupslist:SetPos(25, 50)
- groupslist:SetSize( 450, 45 ) -- Keep the second number at 50
- groupslist:SetLabel( "Groups" )
- local group1 = vgui.Create("DLabel", groupslist)
- group1:SetPos(20,20)
- group1:SetColor(Color(255,255,255,255))
- group1:SetFont("default")
- group1:SetText(groupsnamesasdf[1])
- group1:SizeToContents()
- group1menu = vgui.Create("DModelSelect", groupslist )
- group1menu:SetPos(40, 40)
- group1menu:SetSize( 300, 300 )
- group1menu:SetSpacing( 5 )
- group1menu:EnableHorizontal( true )
- group1menu:EnableVerticalScrollbar( false )
- group1menu:SetPadding( 4 )
- for _, pl in pairs( team.GetPlayers( 1 ) ) do -- loop through all the players on TEAM_WHATEVER
- local spawnicon = vgui.Create( "SpawnIcon", group1menu )
- spawnicon:SetModel( pl:GetModel() ) -- get their model, set the spawnicon to it
- spawnicon:SetTooltip( pl:Nick() ) -- "little yellow speech bubbles when you move your cursor over them"
- group1menu:AddItem( spawnicon )
- end
- groupslist:SetContents(group1menu)
- end
- usermessage.Hook( "call_vgui", ShowTeamMenu )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement