Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- AddCSLuaFile()
- if CLIENT then
- surface.CreateFont("TEST", {
- font = "Roboto",
- size = 30,
- weight = 5000,
- blursize = 0,
- scanlines = 0,
- antialias = true,
- })
- if IsValid(Cool) then
- Cool:Remove()
- end
- local DPanel = vgui.Create( "DPanel" )
- Cool = DPanel
- DPanel:SetPos( ScrW() /2 -250 , ScrH() /2 -300 )
- DPanel:SetSize( 500, 500 )
- DPanel:SetBackgroundColor(Color(187, 210, 225))
- local DBar = vgui.Create( "DPanel" , DPanel )
- DBar:SetPos( 0 , 0 )
- DBar:SetSize( 500, 40 )
- DBar:SetBackgroundColor(Color(20, 50, 118))
- local DLabel = vgui.Create( "DLabel", DBar )
- DLabel:SetPos( 210, 10 )
- DLabel:SetText( "Close" )
- DLabel:SetTextColor( Color( 255, 0, 0, 255 ) )
- DLabel:SetFont( "TEST" )
- local DButton = vgui.Create( "DButton" , DBar)
- DButton:SetPos( 0 , 0 )
- function DButton:Paint( w, h )
- draw.RoundedBox( 8, 0, 0, w, h, Color( 31, 40, 175, 0) ) end
- DButton:SetText( "" )
- DButton:SetTextColor( Color( 255, 0, 0, 175 ) )
- DButton:SetSize( 500, 40 )
- DButton.DoClick = function() DPanel:Remove() end
- local DMain = vgui.Create( "DScrollPanel" , DPanel )
- DMain:SetPos( 0 , 40 )
- DMain:SetSize( 500, 460 )
- DMain:SetBackgroundColor(Color(245, 245, 220))
- DMain:Dock(TOP)
- DMain:DockMargin(0, 40, 0,0)
- for i = 0, 5 do
- local DPanl = vgui.Create( "DPanel" , DMain)
- DPanl:Dock(TOP)
- DPanl:SetPos( 10, 30 ) -- Set the position of the panel
- DPanl:SetSize( 500, 40 ) -- Set the size of the panel
- DPanl:SetBackgroundColor(Color(24, 62, 147))
- local Dlabel = vgui.Create("DLabel", DPanl)
- Dlabel:Dock(FILL)
- Dlabel:SetText("Test")
- Dlabel:SetTextColor(Color(0,10,42))
- Dlabel:SetFont("TEST")
- local DButto = vgui.Create( "DButton" , DPanl)
- DButto:SetPos( 400 , 0 )
- function DButto:Paint( w, h )
- draw.RoundedBox( 8, 0, 0, w, h, Color( 200, 0, 0) ) end
- DButto:SetText( "BUY" )
- DButto:SetTextColor( Color( 255, 255, 255 ) )
- DButto:SetSize( 50, 30 )
- DButto.DoClick = function() ply:ConCommand( '"gm_spawnsent" "spawned models"' )end
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement