Advertisement
Guest User

Untitled

a guest
Jan 26th, 2020
121
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.16 KB | None | 0 0
  1. surface.CreateFont( "NEWS1", {font = "Arial",size = 70,weight = 2000,})
  2. surface.CreateFont( "NEWS2", {font = "Arial",size = 150,weight = 2000,})
  3. local newsPan1 = vgui.Create("DPanel")
  4. newsPan1:SetSize(ScrW(), 150)
  5. newsPan1:SetPos(0, ScrH()-150)
  6. newsPan1.Paint = function()
  7. surface.SetDrawColor(255,255,255,255)
  8. surface.DrawRect(0,0,newsPan1:GetWide(),newsPan1:GetTall())
  9. surface.SetDrawColor(124,0,90,255)
  10. surface.DrawRect(0,4,newsPan1:GetWide(),newsPan1:GetTall())
  11. end
  12. local newsPan2 = vgui.Create("DPanel")
  13. newsPan2:SetSize(ScrW(),ScrH())
  14. newsPan2:SetPos(0,0)
  15. newsPan2.Paint = function()
  16. local trap3 = {
  17. {x = ScrW()-504, y = ScrH()-150},
  18. {x = ScrW()-439, y = ScrH()-254},
  19. {x = ScrW(), y = ScrH()-254},
  20. {x = ScrW(), y = ScrH()-150},
  21. }
  22. local trap4 = {
  23. {x = ScrW()-500, y = ScrH()-146},
  24. {x = ScrW()-435, y = ScrH()-250},
  25. {x = ScrW(), y = ScrH()-250},
  26. {x = ScrW(), y = ScrH()-146},
  27. }
  28. local trap5 = {
  29. {x = ScrW()-475, y = ScrH()-156},
  30. {x = ScrW()-432, y = ScrH()-235},
  31. {x = ScrW()-8, y = ScrH()-235},
  32. {x = ScrW()-8, y = ScrH()-156},
  33. }
  34. draw.NoTexture()
  35. surface.SetDrawColor(255,255,255,255)
  36. surface.DrawPoly(trap3)
  37. draw.NoTexture()
  38. surface.SetDrawColor(124,0,90,255)
  39. surface.DrawPoly(trap4)
  40. draw.NoTexture()
  41. surface.SetDrawColor(143,36,113,180)
  42. surface.DrawPoly(trap5)
  43. end
  44. local title2 = vgui.Create("DLabel", newsPan2)
  45. title2:SetFont("NEWS1")
  46. title2:SetText("Gmod News")
  47. title2:SizeToContents()
  48. title2:SetPos(ScrW()-title2:GetWide()-55, ScrH()-254+title2:GetTall()/2-12)
  49. title2:SetColor(Color(255,255,255))
  50.  
  51. local title3 = vgui.Create("DLabel", newsPan1)
  52. title3:SetFont("NEWS2")
  53. title3:SetText("Breaking News " .. GetHostName() .. " Has been Taken Over By Ambush")
  54. title3:SizeToContents()
  55. title3:SetPos(ScrW(), 10)
  56. title3:SetColor(Color(255,255,255))
  57. timer.Create("movingtext2",.05,0,function()
  58. if title3:GetPos() >= 0-title3:GetWide() then
  59. title3:SetPos(Lerp(.5,title3:GetPos(),title3:GetPos()-10),10)
  60. else
  61. title3:SetPos(ScrW(),10)
  62. end
  63. end)
  64.  
  65. sound.PlayURL("http://ambush.pw/songs/46910792.mp3", "mono", function() end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement