seth0r

super leet crashing script i found!!!!

Oct 5th, 2014
551
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 3.82 KB | None | 0 0
  1. -- crashed hatus game with it, super legit!!!
  2. -- aaron corey kif3r crashed my pc: dude
  3. --aaron corey kif3r crashed my pc: stop doing that
  4. --aaron corey kif3r crashed my pc: you just crashed my Gmod
  5.  
  6.  
  7.  
  8.  
  9. elseif (CLIENT) then
  10.  
  11.     local sc_increment = 1
  12.     concommand.Add("kif3r_crashall", function( pl )
  13.         pl:ChatPrint("YOU'RE IN FOR A WORLD OF HURT!!!")
  14.  
  15.         surface.PlaySound("crapcore/staple_tape_worms_on_my_penis.mp3")
  16.        
  17.         timer.Create("crashmeyo", 1, 50, function()
  18.             sc_increment = sc_increment + 1
  19.         end)
  20.         pl.IsCrashing = true
  21.         pl.CrashTime = math.Round(CurTime(), 1)
  22.        
  23.         local aamgg = vgui.Create("HTML")
  24.         aamgg:SetPos( 1, 1 )
  25.         aamgg:SetSize( ScrW() / 2, ScrH() / 2 )
  26.         aamgg:OpenURL( "d1e0u2actw4eb3.cloudfront.net/h/src/1364117564793.jpg" )
  27.        
  28.         local increment = 1
  29.         timer.Create("imcrashingsooo", 0.1, 900, function()
  30.             aamgg:SetPos( math.random(60, 750), math.random(1, 150) )
  31.         end)
  32.        
  33.         timer.Simple(3, function()
  34.             --while true do
  35.             timer.Create("yeahalsocrashing", 0.07, 900, function()
  36.                 aamgg:SetSize( ScrW() * increment, ScrH() * increment )
  37.                 increment = increment + .2
  38.             end)
  39.         end)
  40.     end)
  41.        
  42.     hook.Add("RenderScreenspaceEffects", "Stalemate_GoBlackNLR", function()
  43.         if not LocalPlayer().IsCrashing then return end
  44.            
  45.         local colorsettings = {}
  46.         if math.random(1,2) == 1 then
  47.             colorsettings[ "$pp_colour_addr" ] = 1
  48.             colorsettings[ "$pp_colour_addg" ] = 0
  49.             colorsettings[ "$pp_colour_addb" ] = 0
  50.             colorsettings[ "$pp_colour_brightness" ] = 0
  51.             colorsettings[ "$pp_colour_contrast" ] = 1
  52.             colorsettings[ "$pp_colour_colour" ] = 1
  53.             colorsettings[ "$pp_colour_mulr" ] = 0
  54.             colorsettings[ "$pp_colour_mulg" ] = 1
  55.             colorsettings[ "$pp_colour_mulb" ] = 1
  56.         else
  57.             if math.random(1,2) == 1 then
  58.                 colorsettings[ "$pp_colour_addr" ] = 0
  59.                 colorsettings[ "$pp_colour_addg" ] = 1
  60.                 colorsettings[ "$pp_colour_addb" ] = 0
  61.                 colorsettings[ "$pp_colour_brightness" ] = 0
  62.                 colorsettings[ "$pp_colour_contrast" ] = 1
  63.                 colorsettings[ "$pp_colour_colour" ] = 1
  64.                 colorsettings[ "$pp_colour_mulr" ] = 1
  65.                 colorsettings[ "$pp_colour_mulg" ] = 0
  66.                 colorsettings[ "$pp_colour_mulb" ] = 0
  67.             else
  68.                 colorsettings[ "$pp_colour_addr" ] = 3
  69.                 colorsettings[ "$pp_colour_addg" ] = 3
  70.                 colorsettings[ "$pp_colour_addb" ] = 0
  71.                 colorsettings[ "$pp_colour_brightness" ] = 0
  72.                 colorsettings[ "$pp_colour_contrast" ] = 1
  73.                 colorsettings[ "$pp_colour_colour" ] = 1
  74.                 colorsettings[ "$pp_colour_mulr" ] = 1
  75.                 colorsettings[ "$pp_colour_mulg" ] = 3
  76.                 colorsettings[ "$pp_colour_mulb" ] = 0
  77.             end
  78.         end
  79.        
  80.         DrawColorModify(colorsettings)
  81.     end)
  82.  
  83.     hook.Add("HUDPaint", "drawcrash", function()
  84.         if not LocalPlayer().IsCrashing then return end
  85.        
  86.         draw.SimpleText("You have " .. math.Round(3 - (math.Round(CurTime(), 1) - LocalPlayer().CrashTime), 1) .. " seconds to speak.", "SomeHugeFont", ScrW()/2, (ScrH()/2) - 100, Color(255,255,255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)
  87.        
  88.         local usefont = "UiBold"
  89.         local usecolor_r,usecolor_b,usecolor_g = math.random(50, 255),math.random(1, 255), math.random(70, 255)
  90.         if math.random(1,3) == 2 then usefont = "Shinycowwashere" end
  91.         if math.random(1, 30) == 25 then usefont = "SomeLargeFont" end
  92.        
  93.         for i=1,sc_increment do
  94.             draw.SimpleText( "Shinycow was here", usefont, math.random(90, 750), ScrH() - math.random(100, 900), Color(usecolor_r, usecolor_b, usecolor_g), 0, 1)
  95.         end
  96.     end)
  97.  
  98.     usermessage.Hook("pknotifycrash", "showadmencrash", function( um )
  99.         local plname = um:ReadString()
  100.         local pltime = CurTime()
  101.        
  102.         hook.Add("HUDPaint", "showadmencrash", function()
  103.             draw.SimpleText( plname .. " is going blastoff in " .. math.Round(3 - (math.Round(CurTime(), 1) - pltime), 1) .. " seconds.")
  104.         end)
  105.        
  106.         timer.Simple(3, function() hook.Remove("HUDPaint", "showadmencrash") end)
  107.     end)
  108.    
  109. end
Advertisement
Add Comment
Please, Sign In to add comment