Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --//Anti Ban, Anti Kick\\--
- local getrawmetatable = getrawmetatable or debug.getmetatable
- local setreadonly = setreadonly or function(t, b) end
- local newcclosure = newcclosure or function(f) return f end
- local getnamecallmethod = getnamecallmethod or function() return "" end
- local checkcaller = checkcaller or function() return false end
- if not getrawmetatable then
- error("getrawmetatable não está disponível.")
- return
- end
- local mt = getrawmetatable(game)
- local ncallsa = mt and mt.__namecall
- if ncallsa then
- setreadonly(mt, false)
- mt.__namecall = newcclosure(function(...)
- local args = {...}
- if not checkcaller() and getnamecallmethod() == "Kick" then
- return nil
- end
- return ncallsa(...)
- end)
- setreadonly(mt, true)
- end
- local mmt = getrawmetatable(game)
- local oldnamecall = mmt and mmt.__namecall
- if oldnamecall then
- setreadonly(mmt, false)
- mmt.__namecall = newcclosure(function(self, ...)
- local method = tostring(getnamecallmethod())
- local args = {...}
- if not checkcaller() and method == "FireServer" and tostring(self) == "Banned" then
- return nil
- end
- return oldnamecall(self, ...)
- end)
- setreadonly(mmt, true)
- end
- local gmt = getrawmetatable(game)
- local old_index = gmt and gmt.__index
- if old_index then
- setreadonly(gmt, false)
- gmt.__index = function(a, b)
- if tostring(a) == "BannedA" or tostring(a) == "BannedB" or tostring(a) == "BannedC" or tostring(a) == "BannedD" then
- if tostring(b) == "Value" then
- return false
- end
- end
- return old_index(a, b)
- end
- setreadonly(gmt, true)
- end
- local bgmt = getrawmetatable(game)
- local bold_index = bgmt and bgmt.__index
- if bold_index then
- setreadonly(bgmt, false)
- bgmt.__index = function(a, b)
- if tostring(a) == "BCount" then
- if tostring(b) == "Value" then
- return 0
- end
- end
- return bold_index(a, b)
- end
- setreadonly(bgmt, true)
- end
- local function safeDestroy(obj)
- if obj and obj.Destroy then
- obj:Destroy()
- end
- end
- for _, BN in pairs(game:GetService("Workspace").FE.Settings:GetChildren()) do
- if BN.Name == "BName" then
- safeDestroy(BN)
- end
- end
- for _, b in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
- if b.Name == " " then
- safeDestroy(b)
- end
- end
- for _, lc2 in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
- if lc2:IsA("LocalScript") and (string.match(lc2.Name, "%d") or string.match(lc2.Name, " ")) then
- safeDestroy(lc2)
- end
- end
- for _, lc in pairs(game.Players.LocalPlayer.PlayerGui.Start:GetChildren()) do
- if lc:IsA("LocalScript") and (string.match(lc.Name, "%d") or string.match(lc.Name, " ")) then
- safeDestroy(lc)
- end
- end
- for _, c in pairs(game.Players.LocalPlayer.PlayerGui.Start:GetChildren()) do
- if c.Name == "CheckPlayerW" then
- safeDestroy(c)
- end
- end
- for _, z in pairs(game.StarterGui.Start:GetChildren()) do
- if z.Name == "CheckPlayerW" then
- safeDestroy(z)
- end
- end
- for _, v in pairs(game.StarterPlayer.StarterCharacterScripts:GetDescendants()) do
- if v.Name == " " then
- safeDestroy(v)
- end
- end
- game.Players.LocalPlayer.CharacterAdded:Connect(function()
- wait(0.5)
- for _, char in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
- if char.Name == " " then
- safeDestroy(char)
- end
- end
- end)
- for _, nolag in pairs(game.StarterGui.Start:GetChildren()) do
- if nolag.Name == "Gradient" then
- safeDestroy(nolag)
- end
- end
- for _, nolaglp in pairs(game.Players.LocalPlayer.PlayerGui.Start:GetChildren()) do
- if nolaglp.Name == "Gradient" then
- safeDestroy(nolaglp)
- end
- end
- --// FUNCTIONS, VARIABLES AND SCRIPTS //--
- function GetPlayer(String)
- local Foundplr = {}
- local strl = String:lower()
- if strl == "all" then
- for i,v in pairs(game:GetService("Players"):GetPlayers()) do
- table.insert(Foundplr,v)
- end
- elseif strl == "others" then
- for i,v in pairs(game:GetService("Players"):GetPlayers()) do
- if v.Name ~= game.Players.LocalPlayer.Name then
- table.insert(Foundplr,v)
- end
- end
- elseif strl == "me" then
- for i,v in pairs(game:GetService("Players"):GetPlayers()) do
- if v.Name == game.Players.LocalPlayer.Name then
- table.insert(Foundplr,v)
- end
- end
- else
- for i,v in pairs(game:GetService("Players"):GetPlayers()) do
- if v.DisplayName:lower():sub(1, #String) == String:lower() or v.Name:lower():sub(1, #String) == String:lower() then
- table.insert(Foundplr,v)
- end
- end
- end
- return Foundplr
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement