Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local PANEL = {
- Init = function(self)
- self:SetSize(1000,720)
- self:Center()
- self:SetVisible(true)
- local x,y = self:GetSize()
- surface.SetFont("DermaLarge")
- local titleX,titleY = surface.GetTextSize("IsRP")
- local title = vgui.Create("DLabel", self)
- title:SetText("IsRP")
- title:SetSize(titleX,titleY)
- title:SetPos(6,6)
- title:SetFont("DermaLarge")
- title:SetTextColor(Color(255,255,255,255))
- title:SetExpensiveShadow(2,Color(75,75,75,200))
- local closebutton = vgui.Create("DButton",self)
- closebutton:SetSize(75,25)
- closebutton:SetText(" ")
- closebutton:SetPos(x-81,6)
- closebutton.Paint = function (self,w,h)
- surface.SetDrawColor(252,86,82,255)
- surface.DrawRect(0,0,w,h)
- surface.SetDrawColor(223,68,65,255)
- surface.DrawOutlinedRect(0,0,w,h)
- end
- closebutton.DoClick = function()
- CSF4Menu:SetVisible(false)
- gui.EnableScreenClicker(false)
- end
- local reloadbutton = vgui.Create("DButton",self)
- reloadbutton:SetSize(75,25)
- reloadbutton:SetText(" ")
- reloadbutton:SetPos(x-162,6)
- reloadbutton.Paint = function (self,w,h)
- surface.SetDrawColor(253,189,62,255)
- surface.DrawRect(0,0,w,h)
- surface.SetDrawColor(224,161,50,255)
- surface.DrawOutlinedRect(0,0,w,h)
- end
- reloadbutton.DoClick = function()
- CSF4Menu:Remove();
- CSF4Menu = vgui.Create("cs_f4_menu")
- end
- local leftpan = vgui.Create("DPanel",self)
- leftpan:SetPos(6,37)
- leftpan:SetSize(x-12,y-43)
- leftpan.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- local page = vgui.Create("CSDColumnSheet",leftpan)
- page:Dock(FILL)
- local mainpage = vgui.Create("DPanel", page)
- mainpage:Dock(FILL)
- mainpage.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- page:AddSheet("Main", mainpage, "icon16/user.png")
- --Jobs
- local jobpage = vgui.Create("DScrollPanel", page)
- jobpage:Dock(FILL)
- jobpage.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- page:AddSheet("Job", jobpage, "icon16/application_xp_terminal.png")
- for k,v in pairs(RPExtraTeams) do
- local jobsspace = vgui.Create("DPanel", jobpage)
- jobsspace:Dock(TOP)
- jobsspace:SetSize(0,200)
- jobsspace:DockMargin(5,5,5,5)
- jobsspace.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- local names = vgui.Create("DLabel",jobsspace)
- names:SetText(v.name)
- names:Dock(TOP)
- names:DockMargin(5,5,0,0)
- names:SetSize(0,20)
- names:SetFont("Trebuchet24")
- names:SetTextColor(Color(255,255,255))
- names:SetExpensiveShadow(2,Color(75,75,75,200))
- if util.IsValidModel(v.model[1]) then
- local MAvatar = vgui.Create("SpawnIcon",jobsspace)
- MAvatar:Dock(LEFT)
- MAvatar:SetSize(150,50)
- MAvatar:DockMargin(5,5,5,5)
- MAvatar:SetModel(v.model[1])
- else
- local MAvatar = vgui.Create("SpawnIcon",jobsspace)
- MAvatar:Dock(LEFT)
- MAvatar:SetSize(150,50)
- MAvatar:DockMargin(5,5,5,5)
- MAvatar:SetModel(v.model)
- end
- local InfPanel = vgui.Create("DPanel",jobsspace)
- InfPanel:Dock(FILL)
- InfPanel:SetSize(0,150)
- InfPanel:DockMargin(5,5,5,5)
- InfPanel.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- surface.SetFont("Trebuchet18")
- local desX,desY = surface.GetTextSize(v.description)
- local description = vgui.Create("DLabel",InfPanel)
- description:SetText(v.description)
- description:Dock(TOP)
- description:DockMargin(5,5,5,5)
- description:SetSize(desX,desY)
- description:SetFont("Trebuchet18")
- description:SetTextColor(Color(255,255,255))
- description:SetExpensiveShadow(2,Color(75,75,75,200))
- local chbutton = vgui.Create("DButton",jobsspace)
- chbutton:SetText("Become Job")
- chbutton:SetSize(75,25)
- chbutton:Dock(BOTTOM )
- chbutton:DockMargin(5,5,5,5)
- chbutton.Paint = function (self,w,h)
- surface.SetDrawColor(252,86,82,255)
- surface.DrawRect(0,0,w,h)
- surface.SetDrawColor(223,68,65,255)
- surface.DrawOutlinedRect(0,0,w,h)
- end
- chbutton.DoClick = function()
- RunConsoleCommand( "say", "/" .. v.command )
- gui.EnableScreenClicker( false )
- CSF4Menu:Remove()
- CSF4Menu = vgui.Create( "cs_f4_menu" )
- CSF4Menu:SetVisible( false )
- end
- end
- --OtherItems
- local otherpagearea = vgui.Create("DScrollPanel", page)
- otherpagearea:Dock(FILL)
- otherpagearea.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- page:AddSheet("Other", otherpagearea, "icon16/application_xp_terminal.png")
- for k,v in pairs(DarkRPEntities) do
- local shspace = vgui.Create("DPanel", otherpagearea)
- shspace:Dock(TOP)
- shspace:SetSize(0,200)
- shspace:DockMargin(5,5,5,5)
- shspace.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- surface.SetFont("Trebuchet24")
- local onameX, onameY = surface.GetTextSize(v.name)
- local othernames = vgui.Create("DLabel",shspace)
- othernames:SetText(v.name)
- othernames:Dock(TOP)
- othernames:DockMargin(5,5,0,0)
- othernames:SetSize(onameX,onameY)
- othernames:SetFont("Trebuchet24")
- othernames:SetTextColor(Color(255,255,255))
- othernames:SetExpensiveShadow(2,Color(75,75,75,200))
- local OAvatar = vgui.Create("SpawnIcon",shspace)
- OAvatar:Dock(LEFT)
- OAvatar:SetSize(150,50)
- OAvatar:DockMargin(5,5,5,5)
- OAvatar:SetModel(v.model)
- surface.SetFont("Trebuchet24")
- local opriceX, opriceY = surface.GetTextSize(v.name)
- local otherprice = vgui.Create("DLabel",shspace)
- otherprice:SetText("Price: " .. DarkRP.formatMoney(v.price))
- otherprice:Dock(TOP)
- otherprice:DockMargin(5,5,0,0)
- otherprice:SetSize(opriceX,opriceY)
- otherprice:SetFont("Trebuchet24")
- otherprice:SetTextColor(Color(255,255,255))
- otherprice:SetExpensiveShadow(2,Color(75,75,75,200))
- local opbutton = vgui.Create("DButton",shspace)
- opbutton:SetText("Become Job")
- opbutton:SetSize(75,25)
- opbutton:Dock(BOTTOM )
- opbutton:DockMargin(5,5,5,5)
- opbutton.Paint = function (self,w,h)
- surface.SetDrawColor(252,86,82,255)
- surface.DrawRect(0,0,w,h)
- surface.SetDrawColor(223,68,65,255)
- surface.DrawOutlinedRect(0,0,w,h)
- end
- opbutton.DoClick = function()
- RunConsoleCommand("say","/" .. v.cmd)
- end
- end
- --Item/Shipment
- local shipmentarea = vgui.Create("DScrollPanel", page)
- shipmentarea:Dock(FILL)
- shipmentarea.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- page:AddSheet("Shipments", shipmentarea, "icon16/application_xp_terminal.png")
- local ply = LocalPlayer()
- if ply:Team() == TEAM_GUN then
- local shspace = vgui.Create("DPanel", shipmentarea)
- shspace:Dock(TOP)
- shspace:SetSize(0,200)
- shspace:DockMargin(5,5,5,5)
- shspace.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- local shprice = vgui.Create("DLabel",shspace)
- shprice:SetText("Shipments")
- shprice:Dock(FILL)
- shprice:DockMargin(5,0,0,0)
- shprice:SetFont("DermaLarge")
- shprice:SetTextColor(Color(255,255,255))
- shprice:SetExpensiveShadow(2,Color(75,75,75,200))
- for k,v in pairs(CustomShipments) do
- if(v.noship == false) then
- local shipspace = vgui.Create("DPanel", shipmentarea)
- shipspace:Dock(TOP)
- shipspace:SetSize(0,160)
- shipspace:DockMargin(5,5,5,5)
- shipspace.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,120)
- surface.DrawRect(0,0,w,h)
- end
- surface.SetFont("Trebuchet24")
- local shnameX, shnameY = surface.GetTextSize(v.name)
- local shipnames = vgui.Create("DLabel",shipspace)
- shipnames:SetText(v.name)
- shipnames:Dock(TOP)
- shipnames:DockMargin(5,5,0,0)
- shipnames:SetSize(shnameX,shnameY)
- shipnames:SetFont("Trebuchet24")
- shipnames:SetTextColor(Color(255,255,255))
- shipnames:SetExpensiveShadow(2,Color(75,75,75,200))
- local ShAvatar = vgui.Create("SpawnIcon",shipspace)
- ShAvatar:Dock(LEFT)
- ShAvatar:SetSize(150,150)
- ShAvatar:DockMargin(5,5,5,5)
- ShAvatar:SetModel(v.model)
- surface.SetFont("Trebuchet24")
- local shmaxriceX, shmaxriceY = surface.GetTextSize("Amount: ".. v.amount)
- local Shippprice = vgui.Create("DLabel",shipspace)
- Shippprice:SetText("Amount: " .. DarkRP.formatMoney(v.amount))
- Shippprice:Dock(TOP)
- Shippprice:DockMargin(5,5,0,0)
- Shippprice:SetSize(shmaxriceX,shmaxriceY)
- Shippprice:SetFont("Trebuchet24")
- Shippprice:SetTextColor(Color(255,255,255))
- Shippprice:SetExpensiveShadow(2,Color(75,75,75,200))
- local shbutton = vgui.Create("DButton",shipspace)
- shbutton:SetText("Become Job")
- shbutton:SetSize(75,25)
- shbutton:Dock(BOTTOM )
- shbutton:DockMargin(5,5,5,5)
- shbutton.Paint = function (self,w,h)
- surface.SetDrawColor(252,86,82,255)
- surface.DrawRect(0,0,w,h)
- surface.SetDrawColor(223,68,65,255)
- surface.DrawOutlinedRect(0,0,w,h)
- end
- shbutton.DoClick = function()
- RunConsoleCommand("say","/buyshipment " .. v.name)
- end
- end
- end
- end
- --AmmoItems
- local otherpagearea = vgui.Create("DScrollPanel", page)
- otherpagearea:Dock(FILL)
- otherpagearea.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- page:AddSheet("Ammo", otherpagearea, "icon16/application_xp_terminal.png")
- for k,v in pairs(GAMEMODE.AmmoTypes) do
- local ammospace = vgui.Create("DPanel", otherpagearea)
- ammospace:Dock(TOP)
- ammospace:SetSize(0,200)
- ammospace:DockMargin(5,5,5,5)
- ammospace.Paint = function (self,w,h)
- surface.SetDrawColor(75,75,75,50)
- surface.DrawRect(0,0,w,h)
- end
- surface.SetFont("Trebuchet24")
- local onameX, onameY = surface.GetTextSize(v.name)
- local ammonames = vgui.Create("DLabel",ammospace)
- ammonames:SetText(v.name)
- ammonames:Dock(TOP)
- ammonames:DockMargin(5,5,0,0)
- ammonames:SetSize(onameX,onameY)
- ammonames:SetFont("Trebuchet24")
- ammonames:SetTextColor(Color(255,255,255))
- ammonames:SetExpensiveShadow(2,Color(75,75,75,200))
- local AOAvatar = vgui.Create("SpawnIcon",ammospace)
- AOAvatar:Dock(LEFT)
- AOAvatar:SetSize(150,50)
- AOAvatar:DockMargin(5,5,5,5)
- AOAvatar:SetModel(v.model)
- surface.SetFont("Trebuchet24")
- local opriceX, opriceY = surface.GetTextSize(v.name)
- local ammoprice = vgui.Create("DLabel",ammospace)
- ammoprice:SetText("Price: " .. DarkRP.formatMoney(v.price))
- ammoprice:Dock(TOP)
- ammoprice:DockMargin(5,5,0,0)
- ammoprice:SetSize(opriceX,opriceY)
- ammoprice:SetFont("Trebuchet24")
- ammoprice:SetTextColor(Color(255,255,255))
- ammoprice:SetExpensiveShadow(2,Color(75,75,75,200))
- local ammobutton = vgui.Create("DButton",ammospace)
- ammobutton:SetText("Become Job")
- ammobutton:SetSize(75,25)
- ammobutton:Dock(BOTTOM )
- ammobutton:DockMargin(5,5,5,5)
- ammobutton.Paint = function (self,w,h)
- surface.SetDrawColor(252,86,82,255)
- surface.DrawRect(0,0,w,h)
- surface.SetDrawColor(223,68,65,255)
- surface.DrawOutlinedRect(0,0,w,h)
- end
- ammobutton.DoClick = function()
- RunConsoleCommand("say","/buyammo " .. k)
- end
- end
- end,
- Paint = function(self, w, h)
- surface.SetDrawColor(255,255,255,150)
- surface.DrawRect(0,0,w,h)
- surface.DrawOutlinedRect(2,2,w-4,h-4)
- end
- }
- vgui.Register("cs_f4_menu", PANEL)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement