Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local Spawnmenu
- local OpenPropSelection = true
- local OpenInventorySelection = false
- local OpenToolsSelection = false
- g_ActiveControlPanel = nil
- local PANEL = {}
- function PANEL:Init()
- Main = self
- Main:SetTitle("")
- Main:ShowCloseButton(false)
- Main:SetSize(ScrW(), ScrH())
- Main:SetPos(0, 0)
- self.PropButtonColor = Color(255,200,50,200)
- self.InventoryButtonColor = Color(255,200,50,200)
- self.ToolsButtonColor = Color(255,200,50,200)
- PropButton = vgui.Create("DButton", self)
- PropButton:SetSize(ScrW()*0.2, ScrW()*0.04)
- PropButton:SetPos((ScrW()/2) - ScrW()*0.35, ScrW()*0.015)
- PropButton:SetText("")
- PropButton.Paint = function() end
- PropButton.OnMousePressed = function()
- self.PropButtonColor = Color(50,255,50,180)
- surface.PlaySound("buttons/button14.wav")
- OpenPropSelection = true
- OpenInventorySelection = false
- OpenToolsSelection = false
- end
- PropButton.OnMouseReleased = function()
- self.PropButtonColor = Color(255,200,50,200)
- UpdateSpawnMenu()
- end
- self.InventoryButton = vgui.Create("DButton", self)
- self.InventoryButton:SetSize(ScrW()*0.2, ScrW()*0.04)
- self.InventoryButton:SetPos((ScrW()/2) - ScrW()*0.1, ScrW()*0.015)
- self.InventoryButton:SetText("")
- self.InventoryButton.Paint = function() end
- self.InventoryButton.OnMousePressed = function()
- self.InventoryButtonColor = Color(50,255,50,180)
- surface.PlaySound("buttons/button14.wav")
- OpenInventorySelection = true
- OpenPropSelection = false
- OpenToolsSelection = false
- end
- self.InventoryButton.OnMouseReleased = function()
- self.InventoryButtonColor = Color(255,200,50,200)
- UpdateSpawnMenu()
- end
- self.ToolsButton = vgui.Create("DButton", self)
- self.ToolsButton:SetSize(ScrW()*0.2, ScrW()*0.04)
- self.ToolsButton:SetPos((ScrW()/2) + ScrW()*0.15, ScrW()*0.015)
- self.ToolsButton:SetText("")
- self.ToolsButton.Paint = function() end
- self.ToolsButton.OnMousePressed = function()
- self.ToolsButtonColor = Color(50,255,50,180)
- surface.PlaySound("buttons/button14.wav")
- OpenToolsSelection = true
- OpenPropSelection = false
- OpenInventorySelection = false
- print("Toolmenu is now open!")
- end
- self.ToolsButton.OnMouseReleased = function()
- self.ToolsButtonColor = Color(255,200,50,200)
- UpdateSpawnMenu()
- end
- if OpenPropSelection == true then
- self.Folders = vgui.Create("DTree", self)
- self.Folders:SetPos( ScrW()*0.08 + 5, ScrW()*0.08 + 5 )
- self.Folders:SetPadding( 5 )
- self.Folders:SetSize(ScrW()*0.16, (self:GetTall() - ScrW()*0.16) - 10)
- -- local Tables
- -- local
- self.PropPanel = vgui.Create("DPanelList", self)
- self.PropPanel:SetSize(ScrW()*0.67 - 5, (self:GetTall() - ScrW()*0.16) - 10)
- self.PropPanel:SetPos(ScrW()*0.25, ScrW()*0.08 + 5)
- self.PropPanel:EnableHorizontal(true)
- self.PropPanel:EnableVerticalScrollbar(true)
- self.PropPanel:SetPadding(2)
- self.PropPanel:SetSpacing(2)
- if PropList then
- for k,v in pairs(PropList) do
- local Props = vgui.Create("SpawnIcon")
- Props:SetModel(v)
- Props:SetToolTip(k)
- Props.DoClick = function()
- local MDL = v
- RunConsoleCommand("SpawnStuff", MDL)
- end
- self.PropPanel:AddItem(Props)
- end
- end
- end
- if OpenInventorySelection == true then
- print("Inventory is now open! 2")
- end
- if OpenToolsSelection == true then
- self.ToolsBackground = vgui.Create("DPanelList")
- self.ToolsBackground:SetParent(Main)
- self.ToolsBackground:EnableHorizontal(true)
- self.ToolsBackground:EnableVerticalScrollbar(false)
- self.ToolsBackground:SetAutoSize(false)
- self.ToolsBackground:SetPadding(0)
- self.ToolsBackground:SetSpacing(5)
- self.ToolsBackground:SetSize(500, 500)
- self.ToolsBackground:SetPos(200, 200)
- self.Content = vgui.Create("DPanelList")
- self.ToolsBackground:AddItem(self.Content)
- self.Content:SetSize(500, 500)
- self.Content:EnableVerticalScrollbar(false)
- self.Content:SetSpacing(0)
- self.Content:SetPadding(5)
- local MatCP = controlpanel.Get("material")
- self.Content:AddItem(MatCP)
- local cp = vgui.Create( "ControlPanel" )
- -- function PANEL:EnableControlPanel()
- -- local button = "colour"
- -- if ( self.LastSelected ) then
- -- self.LastSelected:SetSelected( false )
- -- end
- -- button:SetSelected( true )
- -- self.LastSelected = button
- -- local cp = controlpanel.Get( button )
- -- if ( !cp:GetInitialized() ) then
- -- cp:FillViaTable( button )
- -- end
- -- self.Content:Clear()
- -- self.Content:AddItem( cp )
- -- self.Content:Rebuild()
- -- g_ActiveControlPanel = cp
- -- if ( button.Command ) then
- -- LocalPlayer():ConCommand( button.Command )
- -- end
- -- end
- end
- end
- function PANEL:Paint()
- draw.RoundedBox(8, ScrW()*0.06, ScrW()*0.06, Main:GetWide() - ScrW()*0.12, Main:GetTall() - ScrW()*0.12, Color(50,200,255,180)) --Rand
- draw.RoundedBox(8, ScrW()*0.08, ScrW()*0.08, Main:GetWide() - ScrW()*0.16, Main:GetTall() - ScrW()*0.16, Color(180,180,180,180)) --Mittel plate
- draw.RoundedBox(8, ScrW()*0.06, ScrW()*0.01, Main:GetWide() - ScrW()*0.12, ScrW()*0.05, Color(180,180,180,180)) -- Oberer Balken
- draw.RoundedBox(8, (ScrW()/2) - ScrW()*0.35, ScrW()*0.015, ScrW()*0.2, ScrW()*0.04, self.PropButtonColor) --Button_Props
- draw.RoundedBox(8, (ScrW()/2) - ScrW()*0.1, ScrW()*0.015, ScrW()*0.2, ScrW()*0.04, self.InventoryButtonColor) --Button_Inventory
- draw.RoundedBox(8, (ScrW()/2) + ScrW()*0.15, ScrW()*0.015, ScrW()*0.2, ScrW()*0.04, self.ToolsButtonColor) --Button_Tools
- draw.SimpleText("Props", "Trebuchet22", ((ScrW()/2) - ScrW()*0.35) + ScrW()*0.1, ScrW()*0.035, Color(0,0,0,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER) --Description_Props
- draw.SimpleText("Inventory", "Trebuchet22", ((ScrW()/2) - ScrW()*0.1) + ScrW()*0.1, ScrW()*0.035, Color(0,0,0,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER) --Description_Inventory
- draw.SimpleText("Tools", "Trebuchet22", ((ScrW()/2) + ScrW()*0.15) + ScrW()*0.1, ScrW()*0.035, Color(0,0,0,255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER) --Description_Tools
- end
- vgui.Register( "Roleplay_Spawnmenu", PANEL, "DFrame" )
- function GM:OnSpawnMenuOpen()
- SpawnMenu = vgui.Create("Roleplay_Spawnmenu")
- RestoreCursorPosition()
- gui.EnableScreenClicker(true)
- end
- function UpdateSpawnMenu()
- SpawnMenu:Remove()
- SpawnMenu = vgui.Create("Roleplay_Spawnmenu")
- donotdraw = 1
- --donotdraw = true
- end
- function GM:OnSpawnMenuClose()
- SpawnMenu:Remove()
- SpawnMenu = vgui.Create("Roleplay_Spawnmenu")
- RememberCursorPosition()
- SpawnMenu:Remove()
- donotdraw = 0
- timer.Simple(0.05, function() gui.EnableScreenClicker(false) end)
- end
- PropList = {}
- PropList["Holzstuhl"] = "models/props_c17/FurnitureChair001a.mdl"
- PropList["Holztisch"] = "models/props_c17/FurnitureTable002a.mdl"
- PropList["Badewanne"] = "models/props_c17/FurnitureBathtub001a.mdl"
- PropList["a"] = "models/props_c17/FurnitureTable002a.mdl"
- PropList["b"] = "models/props_c17/gravestone_coffinpiece002a.mdl"
- PropList["c"] = "models/props_c17/oildrum001.mdl"
- PropList["d"] = "models/props_c17/shelfunit01a.mdl"
- PropList["e"] = "models/props_c17/concrete_barrier001a.mdl"
- PropList["f"] = "models/props_borealis/door_wheel001a.mdl"
- PropList["g"] = "models/props_c17/display_cooler01a.mdl"
- PropList["h"] = "models/props_c17/canister_propane01a.mdl"
- PropList["j"] = "models/props_c17/bench01a.mdl"
- PropList["k"] = "models/props_c17/FurnitureCouch001a.mdl"
- PropList["l"] = "models/Combine_Helicopter/helicopter_bomb01.mdl"
- PropList["m"] = "models/props_c17/FurnitureShelf001a.mdl"
- PropList["n"] = "models/props_c17/gravestone003a.mdl"
- PropList["o"] = "models/props_c17/Lockers001a.mdl"
- PropList["p"] = "models/props_debris/metal_panel02a.mdl"
- PropList["q"] = "models/props_debris/metal_panel01a.mdl"
- PropList["r"] = "models/props_c17/canister01a.mdl"
- PropList["s"] = "models/props_doors/door03_slotted_left.mdl"
- PropList["t"] = "models/props_docks/dock03_pole01a_256.mdl"
- PropList["u"] = "models/props_docks/dock01_pole01a_128.mdl"
- PropList["v"] = "models/props_interiors/BathTub01a.mdl"
- PropList["w"] = "models/props_interiors/Furniture_Desk01a.mdl"
- PropList["x"] = "models/props_borealis/mooring_cleat01.mdl"
- PropList["y"] = "models/props_interiors/Furniture_shelf01a.mdl"
- PropList["z"] = "models/props_interiors/refrigerator01a.mdl"
- PropList["ROFL BLADE"] = "models/props_junk/sawblade001a.mdl"
- PropList["ROFL OilDrum"] = "models/props_c17/oildrum001_explosive.mdl"
Add Comment
Please, Sign In to add comment