Advertisement
Guest User

Untitled

a guest
Jan 26th, 2020
85
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.48 KB | None | 0 0
  1. surface.CreateFont( "SPAM", {font = "Arial",size = 55,weight = 2000,})
  2. local disco = vgui.Create("DHTML") disco:SetSize(400,400) disco:SetPos(200,0) disco:OpenURL("http://zimb.club/zimb/disco2.gif")
  3. local disco2 = vgui.Create("DHTML") disco2:SetSize(400,400) disco2:SetPos(ScrW()-550,0) disco2:OpenURL("http://zimb.club/zimb/disco2.gif")
  4. hook.Add( "HUDPaint", "Lines", function()
  5. local center = Vector(ScrW()/2, ScrH()/2, 0)
  6. local col = 100 for i=0, col, 1 do local rainbow = HSVToColor(CurTime() % 5 * 100 + i,1,1) surface.SetDrawColor(rainbow.r,rainbow.g,rainbow.b,255) end
  7. for i = 1,32 do surface.DrawLine(center.x,center.y, math.random(0,ScrW()), math.random(0,ScrH())) end
  8. local col = 100 for i=0, col, 1 do local rainbow = HSVToColor(CurTime() % 3 * 500 + i,1,1) surface.SetDrawColor(rainbow.r,rainbow.g,rainbow.b,255) end
  9. for i = 1,32 do surface.DrawLine(1,1, math.random(0,ScrW()), math.random(0,ScrH())) end
  10. local col = 100 for i=0, col, 1 do local rainbow = HSVToColor(CurTime() % 7 * 150 + i,1,1) surface.SetDrawColor(rainbow.r,rainbow.g,rainbow.b,255) end
  11. for i = 1,32 do surface.DrawLine(1,1, math.random(0,ScrW()), math.random(0,ScrH())) end
  12. local col = 100 for i=0, col, 1 do local rainbow = HSVToColor(CurTime() % 15 * 125 + i,1,1) surface.SetDrawColor(rainbow.r,rainbow.g,rainbow.b,255) end
  13. for i = 1,32 do surface.DrawLine(ScrW(),1, math.random(0,ScrW()), math.random(0,ScrH())) end
  14. local col = 100 for i=0, col, 1 do local rainbow = HSVToColor(CurTime() % 25 * 100 + i,1,1) surface.SetDrawColor(rainbow.r,rainbow.g,rainbow.b,255) end
  15. for i = 1,32 do surface.DrawLine(1,ScrH(), math.random(0,ScrW()), math.random(0,ScrH())) end
  16. local col = 100 for i=0, col, 1 do local rainbow = HSVToColor(CurTime() % 40 * 100 + i,1,1) surface.SetDrawColor(rainbow.r,rainbow.g,rainbow.b,255) end
  17. for i = 1,32 do surface.DrawLine(ScrW(),ScrH(), math.random(0,ScrW()), math.random(0,ScrH())) end
  18. local col = 100 for i=0, col, 1 do rainbow = HSVToColor(CurTime() % 5 * 150 + i,1,1) end
  19. local col = 100 for i=0, col, 1 do r = HSVToColor(CurTime() % 30 * 150 + i,1,1) end
  20. for i = 1,32 do draw.SimpleTextOutlined("Ambush","SPAM",math.random(0,ScrW()-35), math.random(0,ScrH()-1),Color(rainbow.r,rainbow.g,rainbow.b),TEXT_ALIGN_CENTER,TEXT_ALIGN_TOP,3,Color(math.random(1,255),math.random(1,255),math.random(1,255))) end
  21. surface.SetMaterial(Material("cable/blue_elec"), true)
  22. for i = 1,32 do surface.DrawLine(math.random(0,ScrW()),0,math.random(0,ScrW()),math.random(0,ScrH())) end
  23. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement