Block report and more NO KEY Optimized

local _1 = game:GetService("Players")
local _2 = _1.LocalPlayer
local _3 = game:GetService("ScriptContext")

local function _D()
    task.spawn(function()
        local p = _2:WaitForChild("PlayerGui", 10)
        if p then
            local s = Instance.new("ScreenGui", p)
            s.Name = "SM"
            s.IgnoreGuiInset = true
            s.DisplayOrder = 999999
            local l = Instance.new("TextLabel", s)
            l.Size = UDim2.new(1, 0, 0.2, 0)
            l.Position = UDim2.new(0, 0, 0.4, 0)
            l.BackgroundTransparency = 1
            l.TextColor3 = Color3.new(1, 0, 0)
            l.TextSize = 50
            l.Font = Enum.Font.Code
            l.TextScaled = true
            l.Text = "\98\121\32\116\104\101\32\100\101\109\111\110"
            task.delay(3, function() s:Destroy() end)
        end
    end)
end

local function _B()
    local mt = getrawmetatable(game)
    local nc = mt.__namecall
    local idx = mt.__index
    setreadonly(mt, false)

    local b = {
        ["\82\101\112\111\114\116\65\98\117\115\101"] = true,
        ["\67\97\112\116\117\114\101\83\103\114\101\101\110\115\104\111\116"] = true,
        ["\75\105\99\107"] = true,
        ["\66\97\110"] = true,
        ["\83\116\97\116\115\82\101\112\111\114\116"] = true,
        ["\67\111\110\118\101\121\77\101\115\115\97\103\101\84\111\83\101\114\118\101\114"] = true,
        ["\76\111\103\83\101\114\118\105\99\101"] = true
    }

    mt.__namecall = newcclosure(function(self, ...)
        if b[getnamecallmethod()] then return nil end
        return nc(self, ...)
    end)

    mt.__index = newcclosure(function(t, k)
        if not checkcaller() then
            if k == "\87\97\108\107\83\112\101\101\100" or k == "\74\117\109\112\80\111\119\101\114" then return 16 end
            if k == "\72\101\97\108\116\104" or k == "\109\97\120\72\101\97\108\116\104" then return 100 end
        end
        return idx(t, k)
    end)
    setreadonly(mt, true)
end

local function _A()
    _2.ChildAdded:Connect(function(c)
        if c:IsA("LuaSourceContainer") and c.Name:find("\65\110\116\105") then
            c:Destroy()
        end
    end)
end

_D()
_B()
pcall(_A)
_3.Error:Connect(function() return end)