PasteShr

New Paste Browse

wait(.2)
whitelist = {game.Players.LocalPlayer.Name,"Fren1","Fren2"} -- put admin names here
sklist = {"noob","noob2"} -- put noob names here
bl = {"wah8ufhaw8fuhawyf8uhawuf8ahguiwag","hgyuahwbagwufgawfuyawfwfawf"} -- put words you don't like here
deletepath = game.Players.LocalPlayer.Character:FindFirstChild("Delete")
deletepath2 = game.Players.LocalPlayer.Backpack:FindFirstChild("Delete")
slock = false

function newtag(plr)
admintag = Instance.new("BoolValue")
    admintag.Parent = game.Players[plr]
    admintag.Value = true
    admintag.Name = "admin"
    print("created admin tag for " .. plr)
end

function SaySetup(plr)
admintag = Instance.new("IntValue")
    admintag.Parent = game.Players[plr]
    admintag.Value = true
    admintag.Name = "num"
end

function newsuc(plr)
admintag = Instance.new("BoolValue")
    admintag.Parent = game.Players[plr]
    admintag.Value = true
    admintag.Name = "suc"
    print("lking " .. plr)
end

local function lock(instance) 
        for i,v in pairs(instance:GetChildren()) do
            if v:IsA("BasePart") then
                v.Locked = true
            end
            lock(v)
        end
    end
    
local function ul(instance) 
        for i,v in pairs(instance:GetChildren()) do
            if v:IsA("BasePart") then
                v.Locked = false
            end
            ul(v)
        end
    end

newtag(game.Players.LocalPlayer.Name)
SaySetup(game.Players.LocalPlayer.Name)

game.Players.LocalPlayer.ChildRemoved:connect(function(obj)
    if obj.Name == "admin" then
        newtag(game.Players.LocalPlayer.Name)
    end
end)    
    
            function adminexe(plr,msg)
		if game.Workspace:FindFirstChild("Delete") then
                if plr:FindFirstChild("admin") then
                
            local lower = string.lower(msg)
            local len = string.len(lower)
            
            if string.find(lower,":begone ") then
                local name = string.gsub(lower,":begone ","")
                local player = nil
                
                if name == "others" then
                        for i,v in pairs(game.Players:GetChildren()) do
                            if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then
                                game.Workspace.Delete.delete:FireServer(v)
                            end
                        end
                else
                    
                    names = game.Players:GetChildren()
                                
                            for i,v in pairs(names) do
                                strlower = string.lower(v.Name)
                                sub = string.sub(strlower,1,#name)                      
                                
                                if name == sub then 
                                    player = v
                                    if player.Name ~= game.Players.LocalPlayer.Name then
                                    game.Workspace.Delete.delete:FireServer(player) 
                                    end
                                end
                            end
                end
                end

if string.find(lower,"/e :begone ") then
                local name = string.gsub(lower,"/e :begone ","")
                local player = nil
                
                if name == "others" then
                        for i,v in pairs(game.Players:GetChildren()) do
                            if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then
                                game.Workspace.Delete.delete:FireServer(v)
                            end
                        end
                else
                    
                    names = game.Players:GetChildren()
                                
                            for i,v in pairs(names) do
                                strlower = string.lower(v.Name)
                                sub = string.sub(strlower,1,#name)                      
                                
                                if name == sub then 
                                    player = v
                                    if player.Name ~= game.Players.LocalPlayer.Name then
                                    game.Workspace.Delete.delete:FireServer(player) 
                                    end
                                end
                            end
                end
                end

if string.find(lower,"/e begone ") then
                local name = string.gsub(lower,"/e begone ","")
                local player = nil
                
                if name == "others" then
                        for i,v in pairs(game.Players:GetChildren()) do
                            if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then
                                game.Workspace.Delete.delete:FireServer(v)
                            end
                        end
                else
                    
                    names = game.Players:GetChildren()
                                
                            for i,v in pairs(names) do
                                strlower = string.lower(v.Name)
                                sub = string.sub(strlower,1,#name)                      
                                
                                if name == sub then 
                                    player = v
                                    if player.Name ~= game.Players.LocalPlayer.Name then
                                    game.Workspace.Delete.delete:FireServer(player) 
                                    end
                                end
                            end
                end
                end

if string.find(lower,":lk ") then
                local name = string.gsub(lower,":lk ","")
                local player = nil
                
                if name == "others" then
                        for i,v in pairs(game.Players:GetChildren()) do
                            if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then