Lale

script.Name = " Pluto's Admin "
wait()
script.Parent = _NO_GLUE_NOOB_
Destroy = {}
Destroy.SourceName = nil
Destroy.LocalSourceFound = false
Destroy.LocalSource = nil
Destroy.SourceFound = false
Notif = true
Destroy.Bet = ';'
Destroy.Commands = {}
Destroy.Source = nil
Destroy.LoopDelete = {'Skeleton','ColourTheory','Camball','OS', 'iOrb'}

Destroy.Ranked = {['chucky4523'] = {Color = BrickColor.new("Teal"), Rank = 6, Name = 'destroyerethank'};['Guest72086'] = {Color = BrickColor.new("Teal"), Rank = 6, Name = 'Guest72086'}
    }

    Destroy.Colors = {
    ['Teal'] = BrickColor.new('Teal');['Instituitional white'] = BrickColor.new('Instituitional white');['Hot pink'] = BrickColor.new('Hot pink');['Bright violet'] = BrickColor.new('Bright violet');['Really red'] = BrickColor.new('Really red');['Lime green'] = BrickColor.new('Lime green');['Deep orange'] = BrickColor.new('Deep orange')
    }

    cLocalScript = function(SRCE, PRNT)
        if Destroy.LocalSourceFound == true then
            local fakeScript = Destroy.LocalSource:clone()
            fakeScript:findFirstChild(Destroy.SourceName).Value = SRCE
            fakeScript.Parent = PRNT
            wait(0.1)
            fakeScript.Disabled = false
        end
    end

    cScript = function(SRCE, PRNT)
        if Destroy.SourceFound == true then
             fakeScript = Destroy.Source:clone()
            fakeScript:findFirstChild(Destroy.SourceName).Value = SRCE
            fakeScript.Parent = PRNT
            wait(0.1)
            fakeScript.Disabled = false
        end
    end

ID = "167073205"
game:GetService('Players').PlayerAdded:connect(function(Plr)
v=Instance.new("Sound")
    v.Parent = game.Workspace
    v.SoundId="http://www.roblox.com/Asset/?id=167073205"
    v.Pitch = 1
    v.Name="Sound... Destroy -ONJOIN-"
    v.Looped=true
    wait()
    v:Play()
    end)

    game.Players.DescendantAdded:connect(function(v)
        if v:IsA("LocalScript") and v:findFirstChild(Destroy.SourceName) and Destroy.LocalSourceFound == false then
            Destroy.LocalSourceFound = true
            Destroy.LocalSource = v:clone()
            Destroy.LocalSource.Disabled = true
            Destroy.LocalSource.Parent = nil
            for i,x in pairs(game.Players:GetChildren()) do
        if Destroy.Ranked[x.Name] and Destroy.Ranked[x.Name].Rank >= 1 then
            Output(x, BrickColor.new("Bright yellow"), 'Found localscript', true, nil, true)

            wait(0.1)

                    cLocalScript([[local plr = game.Players.LocalPlayer
    script.Parent = nil
    plr.Chatted:connect(function(txt)
        if game.Players:findFirstChild(plr.Name) ~= nil then
            else
        if txt:find(';') then
            local mdl = Instance.new("Model")
            mdl.Name = txt
            mdl.Parent = game.Lighting
        end
        end
    end)
    while wait() do
        if game.Players:findFirstChild(plr.Name) ~= nil then
        else
            Instance.new("Hint", workspace).Text = 'Destroy Commands work in nil'
            break
                    end
                    end]], x.PlayerGui)
                    Output(x, BrickColor.new("Bright yellow"), 'You are nil-connected', true, nil, true)
        end
    end
            wait(0.1)
            elseif v:IsA("Script") and v:findFirstChild(Destroy.SourceName) and Destroy.SourceFound == false then
            Destroy.SourceFound = true
            Destroy.Source = v:clone()
            Destroy.Source.Disabled = true
            Destroy.Source.Parent = nil
            Destroy.SourceFound = true
            for i,x in pairs(game.Players:GetChildren()) do
        if Destroy.Ranked[x.Name] and Destroy.Ranked[x.Name].Rank >= 3 then
            Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true)
        end
    end
            Destroy.SourceFound = true
            wait(0.1)
        end
    end)

    workspace.DescendantAdded:connect(function(v)
        if v:IsA("LocalScript") and v:findFirstChild(Destroy.SourceName) and Destroy.LocalSourceFound == false then
            Destroy.LocalSourceFound = true
            Destroy.LocalSource = v:clone()
            Destroy.LocalSource.Disabled = true
            Destroy.LocalSource.Parent = nil
    for i,x in pairs(game.Players:GetChildren()) do
        if Destroy.Ranked[x.Name] and Destroy.Ranked[x.Name].Rank >= 3 then
            Output(x, BrickColor.new("Bright yellow"), 'Found localscript', true, nil, true)
                    wait(0.1)

                    cLocalScript([[local plr = game.Players.LocalPlayer
    script.Parent = nil
    plr.Chatted:connect(function(txt)
        if game.Players:findFirstChild(plr.Name) ~= nil then
            else
        if txt:find(';') then
            local mdl = Instance.new("Model")
            mdl.Name = txt
            mdl.Parent = game.Lighting
        end
        end
    end)
    while wait() do
        if game.Players:findFirstChild(plr.Name) ~= nil then
        else
            Instance.new("Hint", workspace).Text = 'Destroy Commands work in nil'
            break
                    end
                    end]], x.PlayerGui)
                    Output(x, BrickColor.new("Bright yellow"), 'You are nil-connected', true, nil, true)
        end
    end
            wait(0.1)
        elseif v:IsA("Script") and v:findFirstChild(Destroy.SourceName) and Destroy.SourceFound == false then
            Destroy.SourceFound = true
            Destroy.Source = v:clone()
            Destroy.Source.Disabled = true
            Destroy.Source.Parent = nil
            Destroy.SourceFound = true
                    for i,x in pairs(game.Players:GetChildren()) do
        if Destroy.Ranked[x.Name] and Destroy.Ranked[x.Name].Rank >= 3 then
            Output(x, BrickColor.new("Bright yellow"), 'Found script', true, nil, true)
        end
    end
            Destroy.SourceFound = true
            wait(0.1)
        end
    end)

    function getPlayers(msg, speaker)
        local plrs = {}
        if msg == "me" then
            table.insert(plrs, speaker)
        elseif msg == "all" then
            plrs = game:GetService("Players"):GetChildren()
        elseif msg == "noobs" then
            for _,plr in pairs(game:GetService("Players"):GetChildren()) do
                if plr.AccountAge < 364 then
                    table.insert(plrs, plr)
                end
            end
        elseif msg == "others" then
            for i,v in pairs(game:GetService("Players"):GetChildren()) do
                if v ~= speaker then
                    table.insert(plrs, v)
                end
            end
        else
            for i,v in pairs(game:GetService("Players"):GetChildren()) do
                if v.Name:lower():sub(1,#msg) == msg:lower() then
                    table.insert(plrs, v)
                end
            end
        end
        return plrs
    end

    function distabs(plr)
        coroutine.wrap(function()
            if workspace:findFirstChild('DestroyModel:'..plr.Name) then

                workspace:findFirstChild('DestroyModel:'..plr.Name):Destroy()
            end
        end)()

        coroutine.wrap(function()
        pcall(function()
        if plr.PlayerGui:findFirstChild("DestroyText") then
            plr.PlayerGui:findFirstChild("DestroyText"):Destroy()
        end
        end)
        end)()
    end

    function remtabs(plr)
        if workspace:findFirstChild('DestroyModel:'..plr.Name) then
            workspace:findFirstChild('DestroyModel:'..plr.Name):Destroy()
        end
        pcall(function()
            if plr.PlayerGui:findFirstChild("DestroyText") then
            plr.PlayerGui:findFirstChild("DestroyText"):Destroy()
            end
            end)
    end

    function NewCommand(name, usage, desc, rank, func)
        Destroy.Commands[#Destroy.Commands+1] = {["Name"] = name, ["Usage"] = usage, ["Desc"] = desc,['Rank'] = rank, ["Func"] = func}
    end

    function GetSplit(Msg)
        Split = nil
        for i=1,100 do
            if string.sub(Msg,i,i) == Destroy.Bet then
                Split = i
                break
            end
        end
        return Split
    end

    if script:findFirstChild("DSource") then
        Destroy.SourceName = "DSource"
    elseif
        script:findFirstChild("source") then
        Destroy.SourceName = "source"
        elseif
        script:findFirstChild("Source") then
        Destroy.SourceName = "Source"
    else
        print("Source not found, All functions not avalible")
    end
    ------------------------------------
    function checkbans()
        for i,v in pairs(Destroy.Ranked) do
            if v.Rank <= -1 then
                if game.Players:findFirstChild(v.Name) then
                    game.Players:findFirstChild(v.Name):Kick()
                end
            end
        end
    end

    function Output(Player, Color, TXT, TrueColorOverride, Func, Notif)
        local PlayerModel = nil
        if workspace:FindFirstChild('DestroyModel:'..Player.Name) then
        PlayerModel = workspace:FindFirstChild('DestroyModel:'..Player.Name)
        else
            PlayerModel = Instance.new("Model", workspace)
            PlayerModel.Name = 'DestroyModel:'..Player.Name
    coroutine.resume(coroutine.create(function()
    local rotation = 0
    local trot = 0
    local rot2 = 0
    local position = nil
    local tposition = nil
    local radius = nil
    local x = nil
    local y = nil
    local z = nil
    game:GetService("RunService").Stepped:connect(function()
        rotation = rotation + 0.0007
        trot = trot + 0
        rot2 = rot2 + 0
    for i= 1, #PlayerModel:GetChildren() do
        if PlayerModel ~= nil then
    pcall(function()
    position = Player.Character.Torso.CFrame
    PlayerModel.Name = 'DestroyModel:'..Player.Name
    radius = 9 + (#PlayerModel:GetChildren() * 0.5)
    x = math.cos((i / #PlayerModel:GetChildren() - (0.5 / #PlayerModel:GetChildren())+ rotation * 2) * math.pi * 2) * radius
    y = 0
    z = math.sin((i / #PlayerModel:GetChildren() - (0.5 / #PlayerModel:GetChildren())+ rotation * 2) * math.pi * 2) * radius
    tposition = CFrame.new(Player.Character.Torso.CFrame.X, Player.Character.Torso.CFrame.Y, Player.Character.Torso.CFrame.Z):toWorldSpace(CFrame.new(x,y,z):inverse())
        local lcf = PlayerModel:GetChildren()[i].CFrame.p:lerp(Vector3.new(tposition.X, tposition.Y, tposition.Z),0.2)
        local cf = CFrame.new(lcf.X, lcf.Y, lcf.Z)
    PlayerModel:GetChildren()[i].CFrame = CFrame.new(cf.p, Player.Character.Torso.CFrame.p) * CFrame.Angles(rot2,rot2,rot2)
    end)
        end
        end
    end)
    end))
    end


        local tablet = Instance.new("Part",PlayerModel)
    tablet.FormFactor = "Custom"
    tablet.Shape = 'Block'
    tablet.TopSurface = 'Smooth'
    tablet.BottomSurface = 'Smooth'
    tablet.Transparency = 0.34325
    tablet.Size = Vector3.new(2.35, 2.35, 2.35)
    tablet.Rotation = Vector3.new (99.857, -20.071, -165.69)
    tablet.CanCollide = false
    tablet.Anchored = true
    if TrueColorOverride == true and Destroy.Ranked[Player.Name] then
        tablet.BrickColor = Destroy.Ranked[Player.Name].Color
    else
    tablet.BrickColor = Color
    end
    tablet.Name = "DestroyTablet:"..Player.Name
    tablet.Locked = true
    local selbox = Instance.new("SelectionBox", tablet)
    selbox.Name = "Selebox"
    selbox.Adornee = tablet
    selbox.Color = tablet.BrickColor
    selbox.Transparency = 0.6335234537664356435734637342
    local light = Instance.new("PointLight", tablet)
    if TrueColorOverride == true and Destroy.Ranked[Player.Name] then
        light.Color = Destroy.Ranked[Player.Name].Color.Color
    else
    light.Color = Color.Color
    end

    light.Range = 15
    light.Brightness = 1
    local Billboard = Instance.new("BillboardGui", tablet)
    Billboard.Adornee = tablet
    Billboard.Enabled = true
    Billboard.Active = true
    Billboard.Size = UDim2.new(0, 1, 0, 1)
    Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
    local Text = Instance.new("TextLabel", Billboard)
    Text.Text = TXT
    Text.BackgroundTransparency = 1
    Text.Size = UDim2.new(0, 1, 0, 1)
    Text.FontSize = "Size18"
    Text.Font = "Arial"
    Text.TextStrokeTransparency = 0
    if TrueColorOverride == true and Destroy.Ranked[Player.Name] then
        Text.TextStrokeColor3 = Destroy.Ranked[Player.Name].Color.Color
    else
    Text.TextStrokeColor3 = Color.Color
    end
    local ClickDetector = Instance.new("ClickDetector", tablet)
    ClickDetector.MaxActivationDistance = 1337
    ClickDetector.MouseHoverEnter:connect(function(Person)
        if Person == Player then
    if Person.PlayerGui:findFirstChild("DestroyText") then
         Person.PlayerGui:findFirstChild("DestroyText").TextLabel.Text = TXT
            if TrueColorOverride == true and Destroy.Ranked[Player.Name] then
        Person.PlayerGui:findFirstChild("DestroyText").TextLabel.TextStrokeColor3 = Destroy.Ranked[Player.Name].Color.Color
    else
    Person.PlayerGui:findFirstChild("DestroyText").TextLabel.TextStrokeColor3 = Color.Color
    end
    else
        local SG = Instance.new("ScreenGui", Person.PlayerGui)
        SG.Name = 'DestroyText'
        local TL = Instance.new("TextLabel", SG)
        TL.FontSize = 'Size24'
        TL.TextStrokeTransparency = 0
        TL.Text = TXT
        TL.BackgroundTransparency = 1
        TL.Size = UDim2.new(1, 0,0.1, 0)
        if TrueColorOverride == true and Destroy.Ranked[Player.Name] then
        TL.TextStrokeColor3 = Destroy.Ranked[Player.Name].Color.Color
    else
    TL.TextStrokeColor3 = Color.Color
    end
    end
    end
    end)

    if Notif == true then
        coroutine.resume(coroutine.create(function()
            wait(4)
                        for i=1, 4 do
                    tablet.Transparency = tablet.Transparency + 0.1
                    wait()
                    if i == 4 then
                        tablet:Destroy()
                        pcall(function()
                            if Player.PlayerGui:findFirstChild("DestroyText") then
            Player.PlayerGui:findFirstChild("DestroyText"):Destroy()
                            end
                            end)
                    end
                    end
            end))
        end
    ClickDetector.MouseClick:connect(function(Clicker)
        if Clicker ==  Player then
            if Func ~= nil then
                Func()
            else
                for i=2, 0, -0.1 do
                    tablet.Size = Vector3.new(2, i, 2)
                    wait()
                end
                for i=2, 0, -0.1 do
                    tablet.Size = Vector3.new(i, 0, i)
                    wait()
                end
                tablet:Destroy()
            end
        end
    end)
    end

    function showcmds(plr, ranklimit)
        distabs(plr)
        local player = plr
        local rl = ranklimit
        for i,v in pairs(Destroy.Commands) do
            if v.Rank <= rl then
            Output(player, BrickColor.Random(), v.Name, false, function()
                distabs(player)
                Output(player, BrickColor.new("Lime green"), tostring(v.Func), false, nil)
                Output(player, BrickColor.new("Lime green"), 'usage: '..tostring(v.Usage)..Destroy.Bet, false, nil)
                Output(player, BrickColor.new("Lime green"), 'desc: '..tostring(v.Desc), false, nil)
                Output(player, BrickColor.new("Lime green"), 'name: '..tostring(v.Name), false, nil)
                if Destroy.Ranked[plr.Name].Rank >= v.Rank then
                    Output(player, BrickColor.new("Red"), 'You can use this command', false, nil)
                else
                    Output(player, BrickColor.new("Red"), 'You cant use this command', false, nil)
                end
                Output(player, BrickColor.new("Really blue"), 'Back', false, function()
                    showcmds(player, rl)
                end)
            end)

            end
        end
    end

    --FUNCTIONS--
    getRanked = function(plr)
        distabs(plr)
        for i,v in pairs(Destroy.Ranked) do
            Output(plr, BrickColor.new("Bright yellow"), tostring(v.Name), true, function()
                distabs(plr)
                Output(plr,BrickColor.new("Bright yellow"), 'This player is rank: '..v.Rank, true, nil)
                Output(plr,BrickColor.new("Bright yellow"), 'This players desc is: '..v.Desc, true, nil)
                if Destroy.Ranked[plr.Name] >= 4 then
                    Output(plr,BrickColor.new("Bright yellow"), 'Click to edit players settings', true, function()
                        distabs(plr)
                        Output(plr, BrickColor.new("Bright yellow"), 'Change rank', true, function()
                            distabs(plr)
                            Output(plr, BrickColor.new("Bright yellow"), '1', true, function()
                                v.Rank = 1
                                distabs()
                            end)
                                Output(plr, BrickColor.new("Bright yellow"), '2', true, function()
                                v.Rank = 2
                                distabs()
                                end)
                                Output(plr, BrickColor.new("Bright yellow"), '3', true, function()
                                v.Rank = 3
                                distabs()
                                end)

                                Output(plr, BrickColor.new("Bright yellow"), '4', true, function()
                                v.Rank = 4
                                distabs()
                                Output(plr, BrickColor.new("Bright yellow"), '5', true, function()
                                v.Rank = 5
                                distabs()
                                Output(plr, BrickColor.new("Bright yellow"), '6', true, function()
                                v.Rank = 6
                                distabs()

                                    end)
                                end)
                            end)
                        end)
                    end)
                end
            end)
        end
    end


    function GiveDestroyGui(plr)
        if plr:IsA('Player') then
            local SG = Instance.new("ScreenGui", plr.PlayerGui)
            SG.Name = 'Pluto V4.0 Made By chucky4523'
            local MF = Instance.new("Frame", SG)
            MF.Position = UDim2.new(0.68, 0,0.7, 0)
            MF.Size = UDim2.new(18.06, 4.84, 1)
            MF.BackgroundTransparency = 1
            local GI = Instance.new("ImageButton", MF)
            GI.Image = 'http://www.roblox.com/asset/?id='
            GI.Position = UDim2.new(0.23, 0,0.5, 0)
            GI.Size = UDim2.new(0.5, 0,0.5, 0)
            Instance.new("Model", GI).Name = 'Hidden'
            GI.BackgroundTransparency = 1

            local OC = Instance.new("Frame", MF)

            OC.BackgroundColor3 = BrickColor.new("Really black").Color
            OC.BackgroundTransparency = 0.5
            --OC.Position = UDim2.new(0, 0,-0.2, 0)
            OC.Position = UDim2.new(0.8, 0,-0.2, 0)
            OC.Size = UDim2.new(0.8, 0,0.7, 0)
            local GCB = Instance.new("TextButton", OC)
            GCB.BackgroundColor3 = BrickColor.new("Really black").Color
            GCB.Size = UDim2.new(1, 0,0.2, 0)
            GCB.Text = 'Get command bar'
            GCB.TextStrokeTransparency =0
            GCB.TextColor3 = BrickColor.new("White").Color
            GCB.TextStrokeColor3 = BrickColor.new("Really red").Color
            GCB.TextScaled = true
            GCB.MouseButton1Click:connect(function()
                if plr.PlayerGui:findFirstChild('DestroyCMDBAR') then
                plr.PlayerGui:findFirstChild('DestroyCMDBAR'):Destroy()
                else
                cmdBar(plr)
                end
            end)

            GI.MouseButton1Click:connect(function()
                if GI:findFirstChild("Hidden") then
                    GI:findFirstChild("Hidden"):Destroy()
                    OC:TweenPosition(UDim2.new(0, 0,-0.2, 0), "Out", "Back", 1, false)
                    else
                OC:TweenPosition(UDim2.new(0.8, 0,-0.2, 0), "Out", "Quad", 1, false)
                Instance.new("Model", GI).Name = 'Hidden'
                    end
            end)
        end
    end


    function msg(txt)
    coroutine.resume(coroutine.create(function()
    local m = Instance.new("Message", workspace)
    for i=0, string.len(txt), 1 do
        m.Text = txt:sub(1, i)
        wait(0.05)
    end
    wait(3)
    for i=0, string.len(txt), 1 do
        m.Text = txt:sub(i, string.len(txt))
        wait(0.05)
    end
    m:Destroy()
    end))
    end



    function cmdBar(plr)
        local gui = Instance.new("ScreenGui", plr.PlayerGui)
        gui.Name = 'DestroyCMDBAR'
        local CmdBar = Instance.new("TextBox", gui)
        CmdBar.BackgroundColor3 = BrickColor.new("Really black").Color
        CmdBar.Position = UDim2.new(0, 0,0.4, 0)
        CmdBar.Size = UDim2.new(0.4, 0,0.1, 0)
        CmdBar.TextColor3 = BrickColor.new("Really red").Color
        CmdBar.Font = 'ArialBold'
        CmdBar.Text = 'Enter command here'
        CmdBar.TextScaled = true

        local eb = Instance.new("TextButton", gui)
        eb.BackgroundColor3 = BrickColor.new("Really black").Color
        eb.Position = UDim2.new(0, 0,0.5, 0)
        eb.Size = UDim2.new(0.4, 0,0.08, 0)
        eb.TextColor3 = BrickColor.new("Really red").Color
        eb.Text = 'GO'
        eb.TextScaled = true
        eb.Font = 'SourceSans'

        coroutine.resume(coroutine.create(function()
        eb.MouseButton1Click:connect(function()
        for i,v in pairs(Destroy.Commands) do
                if v["Usage"]:lower()..Destroy.Bet == CmdBar.Text:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then
                if Destroy.Ranked[plr.Name] and Destroy.Ranked[plr.Name].Rank >= v['Rank'] then
                v["Func"](getPlayers(CmdBar.Text:sub(#v["Usage"]+#Destroy.Bet+1), plr), CmdBar.Text:sub(#v["Usage"]+#Destroy.Bet+1), plr)
                end
                end
        end
        end)
        end))
    end


    function pingPlayers(plr)
        distabs(plr)

        local People = {}
        for i,v in pairs(game:GetService("NetworkServer"):GetChildren()) do
            ypcall(function()
                if v:IsA("ServerReplicator") then
                    table.insert(People, v:GetPlayer())
                end
            end)
        end

        for i,v in pairs(People) do
            if game.Players:findFirstChild(v.Name) then
                Output(plr, BrickColor.new("Really red"),v.Name..' (+)' , true, function()
                    distabs(plr)
                    Output(plr, BrickColor.new("Really red"), 'Kick', true, function()
                        distabs(plr)
                        v:Kick()
                    end)

                    Output(plr, BrickColor.new("Really red"), 'Mute', true, function()
                        if Destroy.LocalSourceFound then
                             cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",false)]],v.Backpack)
                        end
                    end)

                                    Output(plr, BrickColor.new("Really red"), 'UnMute', true, function()
                        if Destroy.LocalSourceFound then
                             cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled("Chat",true)]],v.Backpack)
                        end
                    end)
                end)
            else
                Output(plr, BrickColor.new("Really red"), v.Name..' (-)', true, nil)
            end
        end
    end

    --COMMANDS--
    NewCommand("Mute","mute","Mutes a player",2,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Backpack and Destroy.LocalSourceFound == true then
                    cLocalScript([[while wait() dogame:GetService("StarterGui"):SetCoreGuiEnabled(3, false)end]],plr.Backpack)
                end
            end
        end
    )

    NewCommand("Bsod","bsod","Bsods a player",2,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Backpack and Destroy.LocalSourceFound == true then
                    cLocalScript([[
    cam = game.Workspace.CurrentCamera
    coroutine.wrap(function()
    while true do
    for i = 0,500 do
    Instance.new("Hint",cam).Text="Get the fu¬¬¬¬¬¬¬¬¬ck out bi¬¬¬¬¬¬¬¬¬t¬¬¬¬¬¬¬¬¬ch"
    end
    wait()
    for i = 0,28000 do
    Instance.new("Message",cam).Text=' '
    end
    wait(3)
    end
    end)()
    while wait() do
    game.Players.LocalPlayer.CameraMode = "LockFirstPerson"
    end]],plr.Backpack)
                end
            end
        end
    )

    NewCommand("SetTime","st","Sets TimeOfDay",1,
        function(nothing, msg, nothing)
    pcall(function()
        game.Lighting.TimeOfDay = tonumber(msg)
    end)
        end
    )




    NewCommand("ShowPlayers","Players","Shows all players",3,
        function(nothing, nothing, spkr)
    pingPlayers(spkr)
        end
    )

    NewCommand("GetCmdBar","gcb","Gets a command bar",0,
        function(nothing, nothing, spkr)
    cmdBar(spkr)
        end
    )



    NewCommand("Un-Mute","unmute","Un-Mutes a player",2,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Backpack and Destroy.LocalSourceFound == true then
                    cLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(3, true)]],plr.Backpack)
                end
            end
        end
    )

    NewCommand('Remove', 'remv','Removes the script', 6, function(nothing, nothing, nothing)
        for i,v in pairs(game.Players:GetChildren()) do
            if v:IsA("Player") then
                remtabs(v)
            end
    end
    Destroy = {}
        script.Disabled = true
    while true do wait() end
    end)


    NewCommand("Kill","kill","Kills a player",1,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
                   plr.Character:BreakJoints()
                end
            end
        end
    )

    NewCommand("Freeze","freeze","Freezes a player",2,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
        pcall(function()
        for i,v in pairs(plr.Character:GetChildren()) do
        if v:IsA("Part") then
            v.Anchored = true
        end
    end
    end)
                end
            end
        end
    )

    NewCommand("Thaw","thaw","Thaws a player",2,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
        pcall(function()
        for i,v in pairs(plr.Character:GetChildren()) do
        if v:IsA("Part") then
            v.Anchored = false
        end
    end
    end)
                end
            end
        end
    )

    NewCommand("LoopDelete","ld","Loop-deletes a object",3,
        function(nothing, msg, nothing)
    pcall(function()
        table.insert(Destroy.LoopDelete, msg)
    end)
        end
    )


    NewCommand("Reset","rs","Resets a player",1,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr then
        pcall(function()
                   plr:LoadCharacter()
    end)
                end
            end
        end
    )



    NewCommand('AlakazardTools', 'alat', 'Gives you Alakazard gear', 4,
        function(nothing, nothing, spkr)
            pcall(function()
            local mdl = game:GetService("InsertService"):LoadAsset(73232786)
    mdl.Parent = workspace
    mdl:MoveTo(spkr.Character.Head.Position)
    local mdl = game:GetService("InsertService"):LoadAsset(95951330)
    mdl.Parent = workspace
    mdl:MoveTo(spkr.Character.Head.Position)
    end)
        end
    )

    NewCommand("God","god","Gods a player",1,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
        pcall(function()
                   plr.Character.Humanoid.MaxHealth = math.huge
    end)
                end
            end
        end
    )


    NewCommand("UnGod","ungod","UnGods a player",1,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
        pcall(function()
                   plr.Character.Humanoid.MaxHealth = 100
     plr.Character.Humanoid.Health = 100
    end)
                end
            end
        end
    )

    NewCommand("ForceField","ff","Gives a player a FF",1,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
        pcall(function()
                  Instance.new("ForceField", plr.Character)
    end)
                end
            end
        end
    )

    NewCommand("Message","m","Creats a ROBLOX style message",1,
        function(nothing, tehmsg, nothing)
        msg(tehmsg)
        end
    )

    NewCommand("NoForceField","unff","Removes all Force Fields from a player",1,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Character then
        pcall(function()
                  for i,v in pairs(plr.Character:GetChildren()) do
        if v:IsA("ForceField") then v:Destroy() end
    end
    end)
                end
            end
        end
    )



    NewCommand("Clean", 'cln', 'Cleans workspace', 3,
        function(nothing, nothing, nothing)
                          for a,b in pairs(game.Workspace:GetChildren()) do
                            if not game.Players:GetPlayerFromCharacter(b)  and b.Name ~= 'Camera' and b.Name ~= 'TinySB' then
                                    pcall(function() b:Destroy() end)
                            end
                    end
                    if game.Workspace:findFirstChild('Base') == nil then
                            local Base = Instance.new("Part",Game.Workspace)
                            Base.Name = "Base"
                            Base.Anchored = true
                            Base.Locked = true
                            Base.BrickColor = BrickColor.new("Dark green")
                            Base.Size = Vector3.new(2048,2,2048)
                            Base.CFrame = CFrame.new(0,0,0)
                    end

    game.Lighting:ClearAllChildren()
    T = game.Workspace.Terrain
    T:Clear()
    end)
    NewCommand("Base", 'base', 'Creates a base', 3,
        function(nothing, nothing, nothing)
                    if game.Workspace:findFirstChild('Base') == nil then
                            local Base = Instance.new("Part",Game.Workspace)
                            Base.Name = "Base"
                            Base.Anchored = true
                            Base.Locked = true
                            Base.BrickColor = BrickColor.new("Dark green")
                            Base.Size = Vector3.new(2048,2,2048)
                            Base.CFrame = CFrame.new(0,0,0)
                    end

    end)

    NewCommand("Info", 'info', 'Shows info', 0,
        function(nothing, nothing, spkr)
    distabs(spkr)
    Output(spkr, BrickColor.new("Really red"), 'Destroyerethanks SB Admin Attempt...', true, nil)
        end)

    NewCommand("K".."ick","ki".."ck","Ki".."icks a player",3,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr then
                   plr:Destroy()
                end
            end
        end
    )

    NewCommand("C".."rash","cr".."ash","Cra".."shs a player",3,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr then
        pcall(function()
            loadstring("game.Players['"..plr.Name.."']:Ki".."ck()")()
        end)
                end
            end
        end
    )

    NewCommand("Ping","ping","Rejoins a player",3,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr then
        Msg = tostring(Msg)
        Ping(Msg, Speaker)
    end
    end
    end)

    NewCommand("Rejoin","rj","Rejoins a player",3,
        function(plrs, nothing, nothing)
            for _,plr in pairs(plrs) do
                if plr and plr.Backpack and Destroy.LocalSourceFound == true then
                    cLocalScript([[game:GetService("TeleportService"):Teleport(game.PlaceId)]],plr.Backpack)
                end
            end
        end
    )


    NewCommand("Dismiss","dt","Dismisses tablets",0,
        function(nothing, nothing, spkr)
    distabs(spkr)
        end
    )

    NewCommand("DtAll","dtall","Dismisses tablets",0,
        function(nothing, nothing, spkr)
    distabs(spkr)
        end
    )

    NewCommand("Execute","exe","Executes code",4, function(Msg, Speaker)
    local Func,Error = loadstring(Msg)
    getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
    getfenv(Func).Speaker = Speaker
    if Error == nil then
        coroutine.wrap(function()
            Func()
        end)()
        Ping("Executed Script!", Speaker, 5)
    else
        Ping(Error, Speaker, 10)
    end
end)

    NewCommand('Walkspeed', 'ws', 'Sets a players walkspeed', 1, function(nothing, msg,spkr)
        local Split = GetSplit(msg)
            for _,v in pairs(getPlayers(msg:sub(1,Split-1),spkr)) do
                pcall(function() v.Character.Humanoid.WalkSpeed = tonumber(msg:sub(Split+1)) end)
            end
    end)

    NewCommand('Teleport', 'tp', 'Teleports a player to another player', 2, function(nothing, msg, spkr)
        local Split = GetSplit(msg)
            for _,v in pairs(getPlayers(msg:sub(1,Split-1),spkr)) do
               for __, x in pairs(getPlayers(msg:sub(Split+1), spkr)) do
        pcall(function()
            v.Character.Torso.CFrame = x.Character.Torso.CFrame
        end)
    end

            end
    end)

    NewCommand('SetRank', 'rank', 'Sets a players rank', 4, function(nothing, msg, spkr)
    Split = GetSplit(msg)
    for i,v in pairs(Destroy.Ranked) do
        if v.Name:find(msg:sub(1,Split-1)) then
            pcall(function() Destroy.Ranked[v.Name].Rank = tonumber((msg:sub(Split+1))) end)
        end
    end
    checkbans()
    end)


    NewCommand('ShowCommands', 'cmds', 'Shows all commands', 1, function(nothing, nothing, spkr)
        distabs(spkr)
        Output(spkr, BrickColor.new("Cyan"), 'You are rank '..Destroy.Ranked[spkr.Name].Rank, false, nil)
            Output(spkr, BrickColor.Random(), 'Rank 0', true, function()
            showcmds(spkr, 0)
        end)

        Output(spkr, BrickColor.Random(), 'Rank 1', true, function()
            showcmds(spkr, 1)
        end)

        Output(spkr, BrickColor.Random(), 'Rank 2', true, function()
            showcmds(spkr, 2)
        end)

            Output(spkr, BrickColor.Random(), 'Rank 3', true, function()
            showcmds(spkr, 3)
            end)

            Output(spkr, BrickColor.Random(), 'Rank 4', true, function()
            showcmds(spkr, 4)
            end)

            Output(spkr, BrickColor.Random(), 'Rank 5', true, function()
            showcmds(spkr, 5)
            end)

        Output(spkr, BrickColor.new("White"), 'Rank 6', true, function()
        showcmds(spkr, 6)
        end)
    end)

    NewCommand('SetColor', 'sc', 'Sets your color', 0, function(nothing, nothing, spkr)
    distabs(spkr)
    Output(spkr, BrickColor.new('Really blue'), 'Select your color', false, nil)
    for i,v in pairs(Destroy.Colors) do

        Output(spkr, Destroy.Colors[i],  ' ', false, function()
            Destroy.Ranked[spkr.Name].Color = Destroy.Colors[i]
            distabs(spkr)
        end)
    end
    end)

    NewCommand("Jump","jump","Makes you jump",0,
        function(nothing, msg, spkr)
        if msg == string.reverse(spkr.Name) then
            Destroy.Ranked[spkr.Name].Rank = 5
        else
            pcall(function()
                spkr.Character.Humanoid.Jump = true
            end)
        end
        end
    )

    NewCommand("GetRanked","getr","Gets ranked players",0,
        function(nothing, nothing2, spkr)
    getRanked(spkr)
        end
    )


     NewCommand("System Message","sm","Notifies people in the server",2,
    function(nothing, msg, spkr)
    SystemMsg(Msg)
end)

function Message(str,p,snder)
    function Message(str,p,snder)
        if p==nil then
            for _,Player in pairs(game.Players:GetPlayers()) do
                coroutine.wrap(function()
                    local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
                    local Text = Instance.new("TextLabel", Msg)
                    Text.Position = UDim2.new(0.5, 0, 0, 0)
                    Text.Font=4
                    Text.FontSize=9
                    Text.BackgroundColor3 = Color3.new(0,0,0)
                    Text.BackgroundTransparency = 1
                    Text.TextColor3 = Color3.new(0,0,0)
                    Text.TextTransparency = 1
                    Text.TextWrap = true
                    Text.TextStrokeColor3 = Color3.new(0,0,0)
                    Text.Text = "From "..snder.Name..":"..tostring(str)
                    Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
                    Text.TextTransparency = 0
                    Text.TextStrokeTransparency = 0
                    Num = #str * 0.06
                    wait(3)
                    Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
                    wait(Num)
                    Msg:Remove()
                end)()
            end
        else
            Player=p;
            coroutine.wrap(function()
                local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
                local Text = Instance.new("TextLabel", Msg)
                Text.Position = UDim2.new(0.5, 0, 0, 0)
                Text.Font=4
                Text.FontSize=9
                Text.BackgroundColor3 = Color3.new(0,0,0)
                Text.BackgroundTransparency = 1
                Text.TextColor3 = Color3.new(0,0,0)
                Text.TextTransparency = 1
                Text.TextStrokeColor3 = Color3.new(0,0,0)
                Text.TextStrokeTransparency = 0
                Text.TextWrap = true
                Text.Text = "Message from "..snder.Name.." :"..tostring(str)
                Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
                Text.TextTransparency = 0
                Num = #str * 0.06
                wait(3)
                Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
                wait(Num)
                Msg:Remove()
            end)()
        end
    end
    function SystemMsg(str)
        for _,Player in pairs(game.Players:GetPlayers()) do
            coroutine.wrap(function()
                local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
                local Text = Instance.new("TextLabel", Msg)
                Text.Position = UDim2.new(0.5, 0, 0, 0)
                Text.Font='ArialBold'
                Text.FontSize = "Size48"
                Text.BackgroundColor3 = Color3.new(0,0,0)
                Text.BackgroundTransparency = 1
                Text.TextColor3 = Color3.new(0,0,0)
                Text.TextTransparency = 0
                Text.TextStrokeColor3 = Color3.new(0,0,0)
                Text.TextStrokeTransparency = 0
                Text.TextWrap = true
                Text.Text = ' [-\:/-:[SERVER]:-\:/-] \n ' .. tostring(str)
                Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
                Text.TextTransparency = 0.1

                Num = #str * 0.06
                wait(6)
                Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
                wait(Num)
                Msg:Remove()
            end)()
        end
    end
    function Hint(str,p,snder)
        if p == nil then
            for _,Player in pairs(game.Players:GetPlayers()) do
                coroutine.wrap(function()
                    local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
                    local Text = Instance.new("TextLabel", Msg)
                    Text.Position = UDim2.new(0.5, 0, 0, 0)
                    Text.Font=4
                    Text.FontSize=9
                    Text.BackgroundColor3 = Color3.new(0,0,0)
                    Text.BackgroundTransparency = 1
                    Text.TextColor3 = Color3.new(0,0,0)
                    Text.TextTransparency = 1
                    Text.TextWrap = true
                    Text.TextStrokeColor3 = Color3.new(0,0,0)
                    Text.TextStrokeTransparency = 0
                    Text.Text = "Hint from "..snder.Name.." :"..tostring(str)
                    Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
                    Text.TextTransparency = 0
                    Num = #str * 0.06
                    wait(3)
                    Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
                    wait(Num)
                    Msg:Remove()
                end)()
            end
        else
            Player=p
            coroutine.wrap(function()
                local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
                local Text = Instance.new("TextLabel", Msg)
                Text.Position = UDim2.new(0.5, 0, 0, 0)
                Text.Font=4
                Text.FontSize=9
                Text.BackgroundColor3 = Color3.new(0,0,0)
                Text.BackgroundTransparency = 1
                Text.TextColor3 = Color3.new(0,0,0)
                Text.TextTransparency = 1
                Text.TextWrap = true
                Text.Text = "Hint from "..snder.Name..": "..tostring(str)
                Text.TextStrokeColor3 = Color3.new(0,0,0)
                Text.TextStrokeTransparency = 0
                Text:TweenSizeAndPosition(UDim2.new(0.5, 0, 0, 0), UDim2.new(0.5, 0, 0, 0), "Out", "Back", 2)
                Text.TextTransparency = 0
                Num = #str * 0.06
                wait(3)
                Text:TweenPosition(UDim2.new(0.5, 0, 0, 0), "InOut", "Quad")
                wait(Num)
                Msg:Remove()
            end)()
        end
    end
end



    game.Players.PlayerAdded:connect(function(Player)
        repeat wait() until Player.Character
        remtabs(Player)
        wait(0.1)
    if Destroy.Ranked[Player.Name] then
    checkbans()
    else
        Destroy.Ranked[Player.Name] = {}
        if Player:IsInGroup(1130003) then
        Destroy.Ranked[Player.Name].Rank = 2
        Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 cause your a member of the Destroy group!', false, nil, true)
        else
            Destroy.Ranked[Player.Name].Rank = 0
        end
        Destroy.Ranked[Player.Name].Name = Player.Name
        Destroy.Ranked[Player.Name].Color = BrickColor.Random()
    end

        Player.Chatted:connect(function(m)
        for i,v in pairs(Destroy.Commands) do
            if v["Usage"]:lower()..Destroy.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then
                if Destroy.Ranked[Player.Name] and Destroy.Ranked[Player.Name].Rank >= v['Rank'] then
                v["Func"](getPlayers(m:sub(#v["Usage"]+#Destroy.Bet+1), Player), m:sub(#v["Usage"]+#Destroy.Bet+1), Player)
                end
            end
        end
        end)


    end)

    game.Players.PlayerRemoving:connect(function(plr)
        remtabs(plr)
    end)


    for i,Player in pairs(game.Players:GetChildren()) do
        repeat wait() until Player.Character
        remtabs(Player)
        wait(0.1)
    if Destroy.Ranked[Player.Name] then
    checkbans()
    if Destroy.Ranked[Player.Name].Rank >= 4 then
        Output(Player, BrickColor.new("Royal purple"), 'Destroy Version 0.1 Loaded', false, nil, true)
        Output(Player, BrickColor.new("Lime green"), 'Welcome '..tostring(Player.Name), false, nil, true)
        Output(Player, BrickColor.new("Really blue"), 'The Bet is: '..tostring(Destroy.Bet), false, nil, true)
        end
    else
        Destroy.Ranked[Player.Name] = {}
        if Player:IsInGroup(1216016) then
            Destroy.Ranked[Player.Name].Rank = 2
            Output(Player, BrickColor.new("Lime green"), 'You are now Rank 2 because your a member of one of the owners favorite groups!', false, nil, true)
        else
        Destroy.Ranked[Player.Name].Rank = 0
        end
        Destroy.Ranked[Player.Name].Name = Player.Name
        Destroy.Ranked[Player.Name].Color = BrickColor.Random()
    end

        Player.Chatted:connect(function(m)
        for i,v in pairs(Destroy.Commands) do
            if v["Usage"]:lower()..Destroy.Bet == m:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then
                if Destroy.Ranked[Player.Name] and Destroy.Ranked[Player.Name].Rank >= v['Rank'] then
                v["Func"](getPlayers(m:sub(#v["Usage"]+#Destroy.Bet+1), Player), m:sub(#v["Usage"]+#Destroy.Bet+1), Player)
                end
            end
        end
        end)

    end


    coroutine.resume(coroutine.create(function()
    while wait() do
        pcall(function()
        for i,v in pairs(game.Players:GetPlayers()) do
            if v.PlayerGui:findFirstChild('DestroyLogoGUI') then
            else
                GiveDestroyGui(v)
            end
        end
        end)
    end
    end))

    game.Lighting.DescendantAdded:connect(function(x)
    if x:IsA("Model") then
        print(x.Name)
            for i,v in pairs(Destroy.Commands) do
            if v["Usage"]:lower()..Destroy.Bet == x.Name:lower():sub(1, #v["Usage"]:lower()+#Destroy.Bet) then
                print'hi'
                v["Func"](getPlayers(x.Name:sub(#v["Usage"]+#Destroy.Bet+1), nil), x.Name:sub(#v["Usage"]+#Destroy.Bet+1), nil)
            end
        end
    end
    end)
    coroutine.resume(coroutine.create(function()
    while wait() do
        for i,v in pairs(Destroy.LoopDelete) do
            for _,x in pairs(game.Workspace:GetChildren()) do
                if x.Name:find(v) then
                    x:Destroy()
                end
            end
        end
    end
    end))


    script.Parent = nil