Advertisement
Guest User

Untitled

a guest
Apr 29th, 2016
56
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.25 KB | None | 0 0
  1. local achieve_menu = vgui.Create("DFrame")
  2.  
  3. achieve_menu:SetSize(995, 594)
  4. achieve_menu:Center()
  5. achieve_menu:SetDraggable(false)
  6. achieve_menu:ShowCloseButton(true)
  7. achieve_menu:SetTitle("")
  8. achieve_menu:MakePopup()
  9. achieve_menu.Paint = function(self, w, h)
  10.  
  11. draw.RoundedBox( 8, 0, 0, w, h, Color( 66, 66, 66, 255 ) )
  12. draw.RoundedBox( 0, 0, 20, w, h-485, Color( 0, 161, 0, 255 ) )
  13. draw.RoundedBox( 8, 0, 0, w, h-474, Color( 0, 161, 0, 255 ) )
  14. draw.SimpleText("Zarp Minigames","ZarpFontTitle",140, 20,Color(255,255,255,255))
  15. draw.SimpleText("The Zarp Minigames achievement system!","ZarpFontSubtitle",140, 70,Color(255,255,255,255))
  16.  
  17. end
  18.  
  19. local achieve_menu_zarplogo = vgui.Create( "DImage", achieve_menu )
  20. achieve_menu_zarplogo:SetPos( 10, 10 )
  21. achieve_menu_zarplogo:SetSize( 115, 110 )
  22. achieve_menu_zarplogo:SetImage( "materials/zarp/logos.png" )
  23.  
  24. local achieve_menu_scroll = vgui.Create( "DVScrollBar", achieve_menu_panel)
  25. achieve_menu_scroll:SetSize( 16, 440 )
  26. achieve_menu_scroll:SetPos( 1, 1 )
  27. achieve_menu_scroll:SetUp(1,1)
  28. achieve_menu_scroll:SetEnabled(true)
  29.  
  30. local achieve_menu_panel = vgui.Create( "DScrollPanel", achieve_menu )
  31.  
  32. achieve_menu_panel:SetSize(1000,560)
  33. achieve_menu_panel:SetPos(30,150)
  34.  
  35. local test = vgui.Create("DImage", achieve_menu_scroll)
  36. test:SetPos( 32, 21 )
  37. test:SetSize( 500, 700 )
  38. test:SetImage( "materials/zarp/logos.png" )
  39.  
  40. local DLabel = vgui.Create( "DLabel", achieve_menu_panel )
  41. DLabel:SetText( "DLabel" )
  42. DLabel:SetPos( 0, 1000 )
  43. DLabel:SizeToContents()
  44.  
  45. surface.CreateFont( "ZarpFontTitle", {
  46. font = "Default",
  47. extended = false,
  48. size = 40,
  49. weight = 5000,
  50. blursize = 0,
  51. scanlines = 0,
  52. antialias = true,
  53. underline = false,
  54. italic = false,
  55. strikeout = false,
  56. symbol = false,
  57. rotary = false,
  58. shadow = false,
  59. additive = false,
  60. outline = false,
  61. } )
  62.  
  63. surface.CreateFont( "ZarpFontSubtitle", {
  64. font = "Default",
  65. extended = false,
  66. size = 20,
  67. weight = 500,
  68. blursize = 0,
  69. scanlines = 0,
  70. antialias = true,
  71. underline = false,
  72. italic = false,
  73. strikeout = false,
  74. symbol = false,
  75. rotary = false,
  76. shadow = false,
  77. additive = false,
  78. outline = false,
  79. } )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement