TestTabs2

--[[
© [ClockworkHorror Administration gen 1], Legal Copyright
All Rights Reserved
Editing, or claiming this script in any way would not change anything, but you will lose massive rep and your ROBLOX life.
Rules;
[]When updating this script, you must put what you have updated, below:
Example: [lololololol: Update; Anti-Ban, date; 9/22/2014]
[]While running this script, do not run it in oxcool1's Script Builder, everyone there can easily steal the stypi link.
Therefor, only run at oxcool1's Script Builder IF EMERGENCY!
Version: Skapt Administration generation 6
Last Updated: 9/23/2014
Date Started: 9/2/2014
Date Finished: NONE!
Creator:[ClockworkHorror]
Developers: [ClockworkHorror], [C9X], [P7N], [Z7M] and [optiplex123]
If this is Leaked, re-published, or completely broken, their will be a new version. Untill then,
The script will be updated, and fixed, until it is ready to be pubic.
[WARNING]: LEAKING THIS SCRIPT AND INVITING UNKNOWN PEOPLE WILL RESULT IN PERM BAN, AND WILL CAUSE YOU TO BE BANNED ON ANY NEWER VERSIONS, etc.
]]--
local Clo = script:clone()
Clo.Disabled = true
Clo.Parent = game:GetService('ServerScriptService')
Clo["DSource"].Value = [[
while true do
script.Parent = nil
for i,v in pairs(game:GetService('Players'):GetPlayers()) do
Find = v:FindFirstChild("PlayerGui")
if Find then
Find2 = Find:FindFirstChild("SkaptGui")
if not Find2 then
local ScreenGui = Instance.new("ScreenGui", Find)
ScreenGui.Name = "SkaptGui"
local ImageLabel = Instance.new("ImageLabel", ScreenGui)
ImageLabel.Image = "rbxassetid://162905731"
ImageLabel.BackgroundColor3 = Color3.new(1, 1, 1)
ImageLabel.BackgroundTransparency = 1
ImageLabel.BorderColor3 = Color3.new(1, 1, 1)
ImageLabel.Position = UDim2.new(1, -314, 1, -80)
ImageLabel.Size = UDim2.new(0, 305, 0, 70)
end
end
end
game:GetService('RunService').Heartbeat:wait()
end
]]
Clo.Disabled = false
Clo["DSource"].Value = ""
    function getNilRank(name)
      return playerSettings[name].Rank
    end
    function getPS(plr)
      return playerSettings[plr.Name]
      end

    function getRank(plr)
      if not plr then return 255 end
      if type(plr)=='string' then
        return getNilRank(plr)
      else return getPS(plr).Rank end
    end

    function setRank(plr,newRank)
      playerSettings[plr.Name].Rank=newRank
    end

    function parseRank(plr1,plr2,allowEqual)
      pcall(function() if type(plr1)~='number' then plr1=getRank(plr1) end end)
      pcall(function() if type(plr2)~='number' then plr2=getRank(plr2) end end)

      if plr1>plr2 then return true
      elseif allowEqual and plr1==plr2 then return true
      else return false end
    end

    function Name()
    local G = Instance.new("ScreenGui")
    G.Parent = game.StarterGui
    local b = Instance.new("TextLabel",G)
    b.BackgroundColor3 = Color3.new(0,0,0)
    b.BackgroundTransparency = 0.35
    b.Size = UDim2.new{1, 0, 1, 0}
    b.Position =  UDim2.new(0.8, 0, 0.9, 0)
    b.BorderSizePixel = 0
    b.FontSize = "Size36"
    b.Text = "[GFX]"
    b.Font = "SourceSans"
    b.TextColor3 = Color3.new(255,255,255)
    end

    -- [==[ ~ Skapt ~ ]==] ~~

    local _start = time()
    wait()
    MessageLimit = 10
    Skapt = {
        Ranked = {
            --[--Ranked--]--
            ["ClockworkHorror"] = {Rank = 8, Color = "Royal purple", Distance = 6, Description = "Creator/Scripter", SpinningRot = true, Rotation = true};
        };  ["C9X"] = {Rank = 7, Color = "Royal purple", Distance = 6, Description = "Lead Mod", SpinningRot = false, Rotation = true};
        ["wdwdd"] = {Rank = 6, Color = "Royal purple", Distance = 6, Description = "Lead Dev", SpinningRot = false, Rotation = true};
        ["wdwd"] = {Rank = 5, Color = "Royal purple", Distance = 6, Description = "Test dummie <3", SpinningRot = false, Rotation = true};
        ["wdwd"] = {Rank = 4, Color = "Royal purple", Distance = 6, Description = "nub", SpinningRot = false, Rotation = true};
        ["wdwdwd"] = {Rank = 3, Color = "Royal purple", Distance = 6, Description = "Skapters halpr", SpinningRot = false, Rotation = true};
        ["wdwdwd9"] = {Rank = 2, Color = "Royal purple", Distance = 6, Description = "ololol nubcaik", SpinningRot = false, Rotation = true};
        ["wdwdwdwd"] = {Rank = 1, Color = "Royal purple", Distance = 6, Description = "noob", SpinningRot = false, Rotation = true};
        ["wdwdwdwd"] = {Rank = -1, Color = "Royal purple", Distance = 6, Description = "banned fgt", SpinningRot = false, Rotation = true};


        key = ';';
        Ranks = { --Don't go over Rank 8 -iTov
            [-1] =": Banned";
            [0] = ": Guest";
            [1] = ": User";
            [2] = ": Moderator";
            [3] = ": Test dummie <3";
            [4] = ": Admin";
            [5] = ": Dev";
            [6] = ": Lead Dev";
            [7] = ": Co-Creator";
            [8] = ": Creator";
        };
        Services = setmetatable({Game = game;}, {
            __index = function(tab, key)
                if game:GetService(key) == nil then
                    return "No such service named "
                end
                return game:GetService(key)
            end
        });
        ChatFilter = {
            Phrases = {
                --[==[
                    0 = Kill
                    0.5 = Mute
                    1 = Kick
                    2 = Lag
                    3 = Banishment
                ]==]--
                {"TeleportService", 1};

            };
            Enabled = true;
        };
        PrivateServer = {
            Enabled = false;
            Waiting = {};
        };
        Removed = false;
        Aborted = false;
        ServerSidedScriptsLock = false;
        LocalSidedScriptsLock = false;
        AgeRestriction = true;
        ShowRanks = true;
        ShutdownTime = 45;
        Bet = "/";
        Commands = {};
        Tablets = {};
        ExplorerObjectClones = {};
        Scripts = {
            ServerSided = {};
            ClientSided = {};
        };
        Connections = {
            Loops = {};
            Killing = {};
            Chat = {};
        };
        Music={
            ["Popular"]={
                [1] = {Name = "Radioactive", ID = 131111368};
                [2] = {Name = "One less problem", ID = 155319906};
                [3] = {Name = "Dark horse", ID = 143204341};
                [4] = {Name = "Latch", ID = 155298039};
                [5] = {Name = "Fancy", ID = 151667588};
                [6] = {Name = "Demons", ID = 131261480};
                [7] = {Name = 'Me and my broken heart', ID = 157466103};
                [8] = {Name = 'Break free', ID = 164417255};
                [9] = {Name = 'Me and my broken heart', ID = 157466103};
                [10] = {Name = "Boom Clap", ID = 160594536};
                [11] = {Name = "Pompeii", ID = 144635805};
                [12] = {Name = "Roar", ID = 131065183};
                [13] = {Name = 'Rude', ID = 154764197};
                [14] = {Name = 'Monster', ID = 142562463};
                [15] = {Name = "Work", ID = 152250611};
                [16] = {Name = "Spooky Scary Skeletons", ID = 155313239};
            };
            ["Dance"]={
                [1] = {Name = "Destroid 11. - Get Stupid", ID = 146968276};
                [2] = {Name = "Turn down for what", ID = 143959455};
                [3] = {Name = "Beam", ID = 165065112};
                [4] = {Name = "Frag out", ID = 152451589};
                [5] = {Name = "The hallows", ID = 146824166};
                [6] = {Name = "Radiation", ID = 144249596};
                [7] = {Name = "The final countdown", ID = 145162750};
                [8] = {Name = "Need you", ID = 155415981};
                [9] = {Name = "Boom", ID = 150101784};
                [10] = {Name = 'Domination', ID = 150669700};
                [11] = {Name = "Disfigure - Blank", ID = 167337732};
                [12] = {Name = "Ahrix - Nova", ID = 167022806};
            };
            ["Alternative"]={
                [1] = {Name = "Do the harlem shake", ID = 131154740};
                [2] = {Name = "I like trains", ID = 142386784};
                [3] = {Name = "Saxaphone guy", ID = 130775431};
                [4] = {Name = "Selfie song", ID = 151029303};
            };
            ["R7B"]={
                [1] = {Name = "All of me", ID = 155057593};
            };
            ["Hiphop"]={
                [2] = {Name = "Gentleman", ID = 131326102};
                [3] = {Name = "Wake me up", ID = 130969284};
                [4] = {Name = "We are one", ID = 154782317};
                [5] = {Name = "La la la", ID = 161186230};
            };
            ["Rap"]={
                [1] = {Name = "I'm not afraid", ID = 143736517};
            };
            ["Mood"]={
                [1] = {Name = "Say something", ID = 143763527};
                [2] = {Name = 'Because I\'m happy', ID = 142435409};
            };
            ["Remix"]={
                [1] = {Name = "Idols", ID = 143311712};
                [2] = {Name = "Come and get it (remix)", ID = 131320359};
            };
        };
        MusicMenu = nil;
        Source = nil;
        SourceName = nil;
    }

    if script and game.PlaceId ~= 0 and game then
        script.Name = "Skapt Tablet Admin"
        for _,v in pairs(script:GetChildren()) do
            if v:IsA("StringValue") then
                Skapt.SourceName = v.Name
                Skapt.SourceValue = v.Value
                v.Value = [==[error("Attempted to call a nil value");]==]
            end
        end
        coroutine.yield()
        script:ClearAllChildren()
        script.Parent = Instance.new("Model") or __LOLNO__ or nil
    end

    -- SkaptScripting Functions --
    createLocalScript = function(source,parent,name)
        if newLocalScript then
            local nls = newLocalScript(source,parent)
            nls.Name = (name ~= nil and name) or "Source"
            return nls
        else
            if Skapt.Source ~= nil then
                local x = Skapt.Source:clone()
                x.Disabled = true
                x.Name = (name ~= nil and name) or "Source"
                x:ClearAllChildren()
                for _,v in pairs({"DSource", "Source", "source"}) do
                    local newSource = Instance.new("StringValue", x)
                    newSource.Name = v
                    newSource.Value = source
                end
                x.Parent = parent
                x.Disabled = false
            else
                -- Output("Admins", "No Source Source!", "Really red", nil, 5)
            end
        end
    end
    createScript = function(source, parent, name)
        if newScript then
            local ns = newScript(source,parent)
            ns.Name = (name ~= nil and name) or "Source"
            return ns
        else
            local x = script:Clone()
            x.Disabled = true
            x.Name = (name ~= nil and name) or "Source"
            x:ClearAllChildren()
            for _,v in pairs({"DSource", "Source", "source"}) do
                local newSource = Instance.new("StringValue", x)
                newSource.Name = v
                newSource.Value = source
            end
            x.Parent = parent
            x.Disabled = false
        end
    end

    -- getALLPlayers --
    getALLPlayers = function()
        local ALLPlayers = {}
        for i,v in pairs(Skapt.Services.NetworkServer:GetChildren()) do
            ypcall(function()
                if v:IsA("ServerReplicator") then
                    table.insert(ALLPlayers, v:GetPlayer())
                end
            end)
        end
        return ALLPlayers
    end

    -- Garbage --
    function GetGarbage()
        return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
    end
    -- Sources --
    RemovePlayer = [[
        local plrs = game:GetService('Players')
        if pcall(function() plrs["LocalPlayer"].Character:GetChildren() end) then
            plrs["LocalPlayer"].Parent=nil
            plrs["LocalPlayer"].Parent=plrs
        else
            for i=1, 1000 do
                Instance.new('ManualSurfaceJointInstance')
            end
        end
        pcall(function()
            game:GetService('Workspace'):ClearAllChildren()
        end)
    ]]

    coroutine.wrap(function()
    while wait() do
    if LSource ~= nil then break end
    if SorN == "source" then break end
    for _,v in pairs(game.Players:players()) do
    if LSource ~= nil then break end
    pcall(function()
    for j,k in pairs(v.Backpack:children()) do
    if LSource ~= nil then break end
    if k.ClassName == 'LocalScript' then
    if k:findFirstChild(SorN) ~= nil then
    k.Archivable = true
    LSource = k:Clone()
    LSource.Disabled = true
    PingAdmins("Source found")
    break
    end
    end
    wait()
    end
    for ab,cd in pairs(v.Character:children()) do
    if LSource ~= nil then break end
    if cd.ClassName == 'LocalScript' then
    if cd:findFirstChild(SorN) ~= nil then
    cd.Archivable = true
    LSource = cd:Clone()
    LSource.Disabled = true
    PingAdmins("Source found")
    break
    end
    end
    wait()
    end
    end)
    end
    end
    end)()

    function NewS(sourcev, parent)
        if SorN == 'source' then
            NS(source,parent)
        else
            local s = SSource:Clone()
            s.Parent = parent
            if s:findFirstChild(SorN) ~= nil then
                source = s:findFirstChild(SorN)
            else
                source = Instance.new("StringValue", s)
                source.Name = SorN
            end
            if source then
                source.Value = sourcev
            else
                PingAdmins("Something went wrong")
            end
            wait()
            s.Disabled = false
        end
    end
    function NewLS(sourcev,parent, lock)
        if SorN == 'source' then
            NLS(sourcev,parent)
        elseif LSource then
            local s = LSource:Clone()
            s.Parent = parent
            if s:findFirstChild(SorN) ~= nil then
                source = s:findFirstChild(SorN)
            else
                source = Instance.new("StringValue", s)
                source.Name = SorN
            end
            if source then
                source.Value = sourcev
            else
                PingAdmins("Something went wrong")
                return
            end
            wait()
            if lock == true then
                for i = 0,5 do
                    s.Disabled = false
                    wait(0.5)
                    s.Disabled = true
                    wait(0.5)
                    s.Disabled = false
                end
            else
                s.Disabled = false
            end
            return s
        else
            PingAdmins("No source","Really red")
        end
    end
    --ON JOIN SOUND MUSIC CREDIT TO DANGCOOLLSREAL--
ID = "174584892"
game:GetService('Players').PlayerAdded:connect(function(Plr)
v=Instance.new("Sound")
    v.Parent = game.Workspace
    v.SoundId="http://www.roblox.com/Asset/?id="
    v.Pitch = 1
    v.Name="Sound... Skapt"
    v.Looped=true
    wait()
    v:Play()
    end)

    function Name()
    local G = Instance.new("ScreenGui")
        G.Parent = game.StarterGui
    local b = Instance.new("TextLabel",G)
    b.BackgroundColor3 = Color3.new(0,0,0)
    b.BackgroundTransparency = 0.35
    b.Size = UDim2.new{1, 0, 1, 0}
    b.Position =  UDim2.new(0.8, 0, 0.9, 0)
    b.BorderSizePixel = 0
    b.FontSize = "Size36"
    b.Text = "[Skapt]"
    b.Font = "SourceSans"
    b.TextColor3 = Color3.new(255,255,255)
    end

    InjectionCrash = [[
        wait()
        script.Parent = nil
        script:ClearAllChildren()
        local Services = setmetatable({Game = game;}, {
            __index = function(index, table)
                return game:GetService(table)
            end
        })
        local LocalPlayer = Services.Players.LocalPlayer
        local Stop = Instance.new("StringValue", LocalPlayer)
        Stop.Name = "STAP CONNECTIONS UMG"
        Stop.Value = "Skapt"
        wait(0.1)
        Stop:remove()
        local ChatConnection = LocalPlayer.Chatted:connect(function(Message)
            if LocalPlayer.Parent ~= Services.Players then
                local x = Instance.new('StringValue', Services.ReplicatedStorage)
                x.Name = "Skapt"
                x.Value = LocalPlayer.Name..":"..Message
                Services.Debris:AddItem(x, 2)
            end
        end)
        local StringConnection = Services.Lighting.DescendantAdded:connect(function(Object)
            if Object:IsA("StringValue") then
                if Object.Name == "Disconnect: All Players" then
                    Object.Name = "Disconnected: All Players"
                    ]]..RemovePlayer..[[
                elseif Object.Name == "Disconnect: "..LocalPlayer.Name then
                    Object.Name = "Disconnected: "..LocalPlayer.Name
                    ]]..RemovePlayer..[[
                elseif Object.Name == "Disconnect: Nil Players" then
                    if LocalPlayer.Parent ~= game:GetService("Players") then
                        Object.Name = "Disconnected: Nil Players"
                        ]]..RemovePlayer..[[
                    end
                end
            end
        end)
        local StopConnection = LocalPlayer.DescendantAdded:connect(function(Object)
            if Object:IsA("StringValue") then
                if Object.Name == "STAP CONNECTIONS UMG" and Object.Value == "Skapt" then
                    StringConnection:disconnect()
                    StringConnection = nil
                    StopConnection:disconnect()
                    StopConnection = nil
                    ChatConnection:disconnect()
                    ChatConnection = nil
                end
            end
        end)
    ]]

    BSoDSource = [[
        wait()
        script.Parent = game:service'TeleportService'
        CC = game.Workspace.CurrentCamera
        RS = game:service("RunService")
        PG = game.Players.LocalPlayer.PlayerGui
        C = game.Players.LocalPlayer.Character
        function Lag()
            coroutine.resume(coroutine.create(function()
                while wait() do
                    M = Instance.new("Message",CC)
                    M.Text = tick()*math.floor(5%4*21)
                    H = Instance.new("Hint",CC)
                    H.Text = 'Get out from this place!'
                    SG=Instance.new("ScreenGui",PG)
                    FR=Instance.new("Frame",SG)
                    FR.Size = UDim2.new(500,500,500,500)
                    while wait() do
                        FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
                    end
                    P=Instance.new("Part",CC)
                    E=Instance.new("Explosion",P)
                    E.BlastRadius=math.huge
                    E.Position=P.Position
                    F=Instance.new("Fire",P)
                    S=Instance.new("Smoke",P)
                    P.CFrame = CC.Focus
                    P.Anchored = true
                    P.CanCollide = false
                    P.AncestryChanged:connect(function()Lag()end)
                    for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
                end
            end))
        end
        RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
    ]]

    LagSource = [[
        wait()
        script.Parent = game:service'TeleportService'
        CC = workspace.CurrentCamera
        RS = game:service("RunService")
        PG = game.Players.LocalPlayer.PlayerGui
        C = game.Players.LocalPlayer.Character
        function Lag()
            coroutine.resume(coroutine.create(function()
                while wait() do
                    M = Instance.new("Message",CC)
                    M.Text = "u shouldn't have fked around"
                    H = Instance.new("Hint",CC)
                    H.Text = string.reverse("dikS")
                    SG=Instance.new("ScreenGui",PG)
                    FR=Instance.new("Frame",SG)
                    FR.Size = UDim2.new(500,500,500,500)
                    while wait() do
                        FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
                    end
                    P=Instance.new("Part",CC)
                    E=Instance.new("Explosion",P)
                    E.BlastRadius=math.huge
                    E.Position=P.Position
                    Output=Instance.new("Fire",P)
                    S=Instance.new("Smoke",P)
                    P.CFrame = CC.Focus
                    P.Anchored = true
                    P.CanCollide = false
                    P.AncestryChanged:connect(function()Lag()end)
                    for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
                end
            end))
        end
        RS.Stepped:connect(function()for i = 1, 140000 do Lag() Lag() Lag() Lag() Lag() end end)
    ]]

    -- Get Rankings Functions --
    GetRanking = function(Player)
        if type(Player) == "userdata" then
            Player = Player.Name
        end
        if Skapt.Ranked[Player] ~= nil then
            return Skapt.Ranked[Player]
        else
            local Table = {}
            Table[Player] = {Rank = 0, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false};
            return Table[Player]
        end
    end
    FindRank = function(Player)
        if type(Player) == "userdata" then
            Player = Player.Name
        end
        return GetRanking(Player).Rank
    end
    CheckRank = function(Player1, Player2)
        if Player1 == Player2 then
            return false
        end
        if type(Player1) == "userdata" then
            Player1 = Player1.Name
        end
        if type(Player2) == "userdata" then
            Player2 = Player2.Name
        end
        if FindRank(Player1) >= FindRank(Player2) then
            return true
        else
            return false
        end
    end
    ChangeRank = function(Player, Rank)
        if type(Player) == "userdata" then
            Player = Player.Name
        end
        if Skapt.Ranked[Player] ~= nil then
            Skapt.Ranked[Player].Rank = Rank
        else
            Skapt.Ranked[Player] = {Rank = Rank, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false, Rotation = true}
        end
    end
    GetRankedInterface = function(Speaker, Player) -- "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name
        Dismiss(Speaker)
        if type(Player) == "userdata" then
            Player = Player.Name
        end
        local GetRankedPlayer = function(i)
            if type(i) == "userdata" then
                i = i.Name
            end
            Dismiss(Speaker)
            Output(Speaker, "Name: "..i, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..i)
            ypcall(function()
                Output(Speaker, "Age: "..Skapt.Services.Players[i].AccountAge)
                Output(Speaker, "Id: "..Skapt.Services.Players[i].userId)
                Output(Speaker, "Crash(Remote)", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kick2.Function(Speaker, i.."-c")
                end)
                Output(Speaker, "Crash(Insert)", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kick2.Function(Speaker, i.."-c")
                end)
                Output(Speaker, "Crash Lag", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kick2.Function(Speaker, i.."-cl")
                end)
                Output(Speaker, "Lag", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Lag.Function(Speaker, i.."-l")
                end)
                Output(Speaker, "Go Nil", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kick2.Function(Speaker, i.."-n")
                end)
                Output(Speaker, "Kill", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kill.Function(Speaker, i)
                end)
                Output(Speaker, "Explode", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kill.Function(Speaker, i.."-e")
                end)
                Output(Speaker, "Reset", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kill.Function(Speaker, i.."-r")
                end)
                Output(Speaker, "Ban", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kick2.Function(Speaker, i.."-b")
                end)
                Output(Speaker, "Rejoin", nil, function()
                    Dismiss(Speaker)
                    Skapt.Commands.Kick2.Function(Speaker, i.."-r")
                end)
            end)
            if FindRank(Speaker) > FindRank(i) then
                Output(Speaker, "Set Rank", "Royal purple", function()
                    Dismiss(Speaker)
                    for __,v in pairs(Skapt.Ranks) do
                        if __ < FindRank(Speaker) then
                            Output(Speaker, '['..tostring(__)..'] '..v, nil, function()
                                ChangeRank(i, __)
                            end)
                        end
                    end
                end)
            end
            Output(Speaker, "Dismiss")
        end
        if Player ~= nil then
            GetRankedPlayer(Player)
        else
            for i,v in pairs(Skapt.Ranked) do
                Output(Speaker, i, Skapt.Ranked[i].Color, function()
                    GetRankedPlayer(i)
                end)
            end
        end
    end
    -- Output Functions --
    OutputSingular = function(Player, Msg, Color, Function, Time, Image)
        if Skapt.Removed == true then return end
        --wait()
        if Msg == nil then
            Msg = " "
        elseif Msg == "Dismiss" then
            Color = "Really red"
        end
        if Color == nil then
            Color = Skapt.Ranked[Player.Name].Color ~= nil and Skapt.Ranked[Player.Name].Color or "White"
        end

        local a = Instance.new("Part", workspace)
        a.Name = "Looped Baseplate"

        if Color == "Random" then
            a.BrickColor = BrickColor.Random()
        else
            a.BrickColor = BrickColor.new(Color)
        end

        a.TopSurface = 0.34325
        a.BottomSurface = 0.34325
        a.FormFactor = "Custom"
        a.Size = Vector3.new(4,3,0)
        a.Anchored = true
        a.Locked = true
        a.Transparency = 0.34325
        --Tab.Reflectance=0.5
        a.CanCollide = false
        pcall(function() a.CFrame = Player.Character.Torso.CFrame --[[* CFrame.new(10,0,10)]] end)

        -- local p = Instance.new("PointLight", a)
        -- p.Color = a.BrickColor.Color
        -- p.Range = 3
        -- p.Brightness = 1/0

        local s = Instance.new("SelectionBox", a)
        s.Adornee = a
        s.Color = BrickColor.new("Really black")
        s.Transparency = 0.6335234537664356435734637342

        local b = Instance.new("BillboardGui", a)
        b.Name = 'BG'
        b.StudsOffset = Vector3.new(0,1.5,0)
        b.Size = UDim2.new(9,0,8,0)
        b.Adornee = a

        local cd = Instance.new('ClickDetector',a)
        cd.MaxActivationDistance = 1/0

        local t = Instance.new("TextLabel", b)
        t.Name = "TL"
        t.Font = "SourceSans"
        t.FontSize = "Size24"
        t.Size = UDim2.new(1,0,0.6,0)
        t.TextColor = a.BrickColor
        t.TextStrokeTransparency = 0.5
        t.BackgroundTransparency = 1
        t.Text = string.gsub(Msg,"","\5")

        if Image ~= nil then
            local BBBG = Instance.new("BillboardGui")
            BBBG.Size = UDim2.new(5, 0, 6, 0)
            BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
            BBBG.AlwaysOnTop = true
            BBBG.Adornee = a
            BBBG.Parent = a

            Delay(0, function()
                while BBBG.Parent ~= nil do wait()
                    ypcall(function()
                        BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
                    end)
                end
            end)

            local NewImg = Instance.new("ImageLabel")
            NewImg.Size = UDim2.new(1, 0, 1, 0)
            NewImg.BackgroundTransparency = 0
            NewImg.Image = Image
            NewImg.Parent = BBBG
        end

        if Time ~= nil then
            Skapt.Services.Debris:AddItem(a, Time)
        end

        cd.MouseClick:connect(function(pl)
            if pl==Player or Skapt.Ranked[pl.Name].Rank > Skapt.Ranked[Player.Name].Rank then
                coroutine.wrap(function()
                    for i = 0, 1, 0.1 do
                        pcall(function()
                            a.Transparency = i
                            s.Transparency = i
                            t.TextStrokeTransparency = i
                            wait()
                        end)
                    end
                    a:Destroy()
                end)()
                for _,v in pairs(Skapt.Tablets) do
                    if v.Tab == a then
                        table.remove(Skapt.Tablets, _)
                    end
                end
                if Msg == "Dismiss" then
                    Dismiss(Player)
                else
                    if Function ~= nil then
                        local Ran, Error = pcall(function()
                            Function(a)
                        end) if not Ran then print(Error) end
                    end
                end
            end
        end)

        table.insert(Skapt.Tablets,{Tab = a, Plr = Player.Name})
    end

    Output = function(Player, Msg, Color, Function, Time, Image)
        if type(Player) == "userdata" then
            local thread = coroutine.create(function()
                OutputSingular(Player, Msg, Color, Function, Time, Image)
            end)
            coroutine.resume(thread)
        elseif type(Player) == "table" then
            for _,v in pairs(Player) do
                local thread = coroutine.create(function()
                    OutputSingular(v, Msg, Color, Function, Time, Image)
                end)
                coroutine.resume(thread)
            end
        elseif type(Player) == "string" then
            if Player:lower() == "all" then
                for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                    local thread = coroutine.create(function()
                        OutputSingular(v, Msg, Color, Function, Time, Image)
                    end)
                    coroutine.resume(thread)
                end
            elseif Player:lower() == "admins" then
                for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                    if FindRank(v) >= 1 then
                        local thread = coroutine.create(function()
                            OutputSingular(v, Msg, Color, Function, Time, Image)
                        end)
                        coroutine.resume(thread)
                    end
                end
            end
        end
    end

    Dismiss = function(plr)
        pcall(function()
            if type(plr) == "userdata" then
                plr = plr.Name
            end
            for i,v in pairs(Skapt.Tablets) do
                if v.Plr == plr then
                    coroutine.wrap(function()
                        for i = 0, 1, 0.1 do
                            pcall(function()
                                v.Tab.Transparency = i
                                v.Tab.SelectionBox.Transparency = i
                                v.Tab.BG.TL.TextStrokeTransparency = i
                                wait()
                            end)
                        end
                        v.Tab:Destroy()
                    end)()
                    Skapt.Tablets[i]=nil
                end
            end
        end)
    end

    function GetSplit(Message)
        local a = nil
        for i = 1, #Message do
            if Message:sub(i,i) == "-" then
                a = i + 1
                break
            end
        end
        if a ~= nil then
            return Message:sub(a)
        else
            return nil
        end
    end
    --NilSupport--
    NilSupport = [[
        wait(0.001)
        if script:findFirstChild'source' ~= nil then
            loadstring("\105\102\40\103\97\109\101\46\80\108\97\99\101\73\100\126\61\50\48\50\55\57\55\55\55\41\116\104\101\110\10\9\108\111\99\97\108\32\101\110\118\61\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\97\109\101\46\71\101\116\74\111\98\115\73\110\102\111\41\46\115\101\116\102\101\110\118\41\46\120\112\99\97\108\108\41\46\115\101\116\102\101\110\118\41\46\120\112\99\97\108\108\41\46\115\101\116\102\101\110\118\41\59\10\9\108\111\99\97\108\32\108\111\99\97\108\101\110\118\61\123\10\9\9\119\111\114\107\115\112\97\99\101\61\101\110\118\46\87\111\114\107\115\112\97\99\101\59\10\9\9\87\111\114\107\115\112\97\99\101\61\101\110\118\46\87\111\114\107\115\112\97\99\101\59\10\9\9\115\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\9\83\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\9\103\97\109\101\61\101\110\118\46\103\97\109\101\59\10\9\9\71\97\109\101\61\101\110\118\46\103\97\109\101\59\10\9\9\105\110\115\116\97\110\99\101\61\101\110\118\46\73\110\115\116\97\110\99\101\59\10\9\9\73\110\115\116\97\110\99\101\61\101\110\118\46\73\110\115\116\97\110\99\101\59\10\9\9\116\97\98\108\101\61\101\110\118\46\116\97\98\108\101\59\10\9\9\109\97\116\104\61\101\110\118\46\109\97\116\104\59\10\9\9\103\101\116\102\101\110\118\61\101\110\118\46\103\101\116\102\101\110\118\59\10\9\9\115\101\116\102\101\110\118\61\101\110\118\46\115\101\116\102\101\110\118\59\10\9\9\108\111\97\100\115\116\114\105\110\103\61\101\110\118\46\108\111\97\100\115\116\114\105\110\103\59\10\9\9\117\110\112\97\99\107\61\101\110\118\46\117\110\112\97\99\107\59\10\9\9\112\99\97\108\108\61\101\110\118\46\112\99\97\108\108\59\10\9\9\99\111\108\108\101\99\116\103\97\114\98\97\103\101\61\101\110\118\46\99\111\108\108\101\99\116\103\97\114\98\97\103\101\59\10\9\9\100\111\102\105\108\101\61\101\110\118\46\100\111\102\105\108\101\59\10\9\9\101\114\114\111\114\61\101\110\118\46\101\114\114\111\114\59\10\9\9\103\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\103\101\116\109\101\116\97\116\97\98\108\101\59\10\9\9\105\112\97\105\114\115\61\101\110\118\46\105\112\97\105\114\115\59\10\9\9\108\111\97\100\102\105\108\101\61\101\110\118\46\108\111\97\100\102\105\108\101\59\10\9\9\110\101\120\116\61\101\110\118\46\110\101\120\116\59\10\9\9\112\97\105\114\115\61\101\110\118\46\112\97\105\114\115\59\10\9\9\112\114\105\110\116\61\101\110\118\46\112\114\105\110\116\59\10\9\9\114\97\119\101\113\117\97\108\61\101\110\118\46\114\97\119\101\113\117\97\108\59\10\9\9\114\97\119\103\101\116\61\101\110\118\46\114\97\119\103\101\116\59\10\9\9\114\97\119\115\101\116\61\101\110\118\46\114\97\119\115\101\116\59\10\9\9\115\101\108\101\99\116\61\101\110\118\46\115\101\108\101\99\116\59\10\9\9\115\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\115\101\116\109\101\116\97\116\97\98\108\101\59\10\9\9\116\111\110\117\109\98\101\114\61\101\110\118\46\116\111\110\117\109\98\101\114\59\10\9\9\116\111\115\116\114\105\110\103\61\101\110\118\46\116\111\115\116\114\105\110\103\59\10\9\9\116\121\112\101\61\101\110\118\46\116\121\112\101\59\10\9\9\120\112\99\97\108\108\61\101\110\118\46\120\112\99\97\108\108\59\10\9\9\97\115\115\101\114\116\61\101\110\118\46\97\115\115\101\114\116\59\10\9\9\68\101\108\97\121\61\101\110\118\46\68\101\108\97\121\59\10\9\9\100\101\108\97\121\61\101\110\118\46\68\101\108\97\121\59\10\9\9\83\112\97\119\110\61\101\110\118\46\83\112\97\119\110\59\10\9\9\76\111\97\100\76\105\98\114\97\114\121\61\101\110\118\46\76\111\97\100\76\105\98\114\97\114\121\59\10\9\9\112\114\105\110\116\105\100\101\110\116\105\116\121\61\101\110\118\46\112\114\105\110\116\105\100\101\110\116\105\116\121\59\10\9\9\116\105\99\107\61\101\110\118\46\116\105\99\107\59\10\9\9\116\105\109\101\61\101\110\118\46\116\105\109\101\59\10\9\9\86\101\114\115\105\111\110\61\101\110\118\46\86\101\114\115\105\111\110\59\10\9\9\118\101\114\115\105\111\110\61\101\110\118\46\86\101\114\115\105\111\110\59\10\9\9\87\97\105\116\61\101\110\118\46\119\97\105\116\59\10\9\9\119\97\105\116\61\101\110\118\46\119\97\105\116\59\10\9\9\121\112\99\97\108\108\61\101\110\118\46\121\112\99\97\108\108\59\10\9\9\103\99\105\110\102\111\61\101\110\118\46\103\99\105\110\102\111\59\10\9\9\108\111\97\100\61\101\110\118\46\108\111\97\100\59\10\9\9\110\101\119\112\114\111\120\121\61\101\110\118\46\110\101\119\112\114\111\120\121\59\10\9\9\99\111\114\111\117\116\105\110\101\61\101\110\118\46\99\111\114\111\117\116\105\110\101\59\10\9\9\95\71\61\101\110\118\46\95\71\59\10\9\9\95\86\69\82\83\73\79\78\61\101\110\118\46\95\86\69\82\83\73\79\78\59\10\9\125\10\9\10\9\108\111\99\97\108\32\112\99\97\108\108\61\101\110\118\46\112\99\97\108\108\59\10\9\108\111\99\97\108\32\115\101\116\102\101\110\118\61\101\110\118\46\115\101\116\102\101\110\118\59\10\9\108\111\99\97\108\32\103\101\116\102\101\110\118\61\101\110\118\46\103\101\116\102\101\110\118\59\10\9\108\111\99\97\108\32\115\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\115\101\116\109\101\116\97\116\97\98\108\101\59\10\9\108\111\99\97\108\32\103\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\103\101\116\109\101\116\97\116\97\98\108\101\59\10\9\108\111\99\97\108\32\114\97\119\103\101\116\61\101\110\118\46\114\97\119\103\101\116\59\10\9\108\111\99\97\108\32\114\97\119\115\101\116\61\101\110\118\46\114\97\119\115\101\116\59\10\9\108\111\99\97\108\32\101\114\114\111\114\61\101\110\118\46\101\114\114\111\114\59\10\9\108\111\99\97\108\32\115\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\115\101\116\102\101\110\118\40\48\44\115\101\116\109\101\116\97\116\97\98\108\101\40\108\111\99\97\108\101\110\118\44\123\10\9\9\95\95\109\101\116\97\116\97\98\108\101\61\34\84\104\105\115\32\109\101\116\97\116\97\98\108\101\32\105\115\32\108\111\99\107\101\100\34\59\10\9\9\95\95\105\110\100\101\120\61\102\117\110\99\116\105\111\110\40\115\44\105\110\100\41\10\9\9\9\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\61\102\97\108\115\101\10\9\9\9\108\111\99\97\108\32\115\117\99\44\114\101\115\61\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\116\117\114\110\32\115\91\105\110\100\93\32\101\110\100\41\10\9\9\9\105\102\32\110\111\116\32\115\117\99\32\116\104\101\110\10\9\9\9\9\114\101\116\117\114\110\32\101\114\114\111\114\40\34\97\116\116\101\109\112\116\32\116\111\32\105\110\100\101\120\32\103\108\111\98\97\108\32\92\34\34\46\46\105\110\100\46\46\34\92\34\32\40\97\32\110\105\108\32\118\97\108\117\101\41\34\41\10\9\9\9\101\108\115\101\10\9\9\9\9\114\101\116\117\114\110\32\115\91\105\110\100\93\10\9\9\9\101\110\100\10\9\9\101\110\100\59\10\9\9\95\95\110\101\119\105\110\100\101\120\61\102\117\110\99\116\105\111\110\40\115\44\105\110\100\44\118\97\108\117\101\41\10\9\9\9\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\61\102\97\108\115\101\10\9\9\9\114\97\119\115\101\116\40\115\44\105\110\100\44\118\97\108\117\101\41\10\9\9\101\110\100\59\10\9\125\41\41\59\10\9\119\97\105\116\40\41\59\10\9\115\99\114\105\112\116\58\68\101\115\116\114\111\121\40\41\10\9\115\99\114\105\112\116\46\67\104\97\110\103\101\100\58\99\111\110\110\101\99\116\40\102\117\110\99\116\105\111\110\40\112\114\111\112\41\10\9\9\105\102\32\112\114\111\112\32\61\61\32\34\68\105\115\97\98\108\101\100\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\32\61\32\102\97\108\115\101\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\32\61\61\32\102\97\108\115\101\32\101\110\100\41\10\9\9\101\108\115\101\105\102\32\112\114\111\112\32\61\61\32\34\80\97\114\101\110\116\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\80\97\114\101\110\116\32\61\32\110\105\108\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\80\97\114\101\110\116\32\61\61\32\110\105\108\32\101\110\100\41\10\9\9\101\108\115\101\105\102\32\112\114\111\112\32\61\61\32\34\78\97\109\101\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\78\97\109\101\32\61\32\34\108\111\108\34\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\78\97\109\101\32\61\61\32\34\108\111\108\34\32\101\110\100\41\10\9\9\101\110\100\10\32\32\32\32\101\110\100\41\10\101\110\100\59")()
            script:ClearAllChildren()
        else
            script:ClearAllChildren()
            script.Parent=nil
        end
        wait(1)
        LocalPlayer = game:service'Players'.LocalPlayer
        ProbeMode = false
        char = nil
        probe = nil
        local x = Instance.new("Message",workspace)
        x.Text = 'You are connected to solar admin gen 2'
        game:service'Debris':AddItem(x,3)
        if LocalPlayer.Character then
            LocalPlayer.Character.Archivable = true
            char = LocalPlayer.Character:Clone()
            char.Torso.Anchored = true
        else
            local con = LocalPlayer.CharacterAdded:connect(function()
                wait(0.5)
                LocalPlayer.Character.Archivable = true
                char = LocalPlayer.Character:Clone()
                char.Torso.Anchored = true
            end)
        end
        xcon = LocalPlayer.Changed:connect(function(asd)
            if asd == 'Parent' then
                local a = Instance.new("Hint",workspace)
                a.Text = 'You are connected, say char/ to go as a nil character, or probe/ for probe or rejme/ to rejoin'
                game:service'Debris':AddItem(a,3)
            end
        end)
        asdcon = LocalPlayer.Chatted:connect(function(msg)
            pcall(function()
                if LocalPlayer.Parent ~= game:service'Players' then
                    if msg == 'char/' then
                        ProbeMode = false
                    elseif msg == 'probe/' then
                        ProbeMode = true
                    elseif msg == 'Friend' then
                        game:service'StarterGui':SetCoreGuiEnabled("All",true)
                    elseif msg == 'rejme/' then
                        coroutine.wrap(function()
                            if ProbeMode == true then
                                probe:remove()
                            else
                                LocalPlayer.Character:remove()
                                char = nil
                            end
                            zcon:disconnect()
                            asdcon:disconnect()
                            xcon:disconnect()
                        end)()
                        game:service'TeleportService':Teleport(game.PlaceId)
                    elseif msg == 'fixcam/' then
                        game:service'Workspace'.CurrentCamera.CameraType = 'Custom'
                        pcall(function()
                            game:service'Workspace'.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
                        end)
                        game:service'Workspace'.CurrentCamera:ClearAllChildren()
                    end
                end
            end)
        end)
        zcon = game:service'RunService'.RenderStepped:connect(function()
            if LocalPlayer.Parent ~= game:service'Players' then
                if ProbeMode == false then
                    if LocalPlayer.Character == nil or LocalPlayer.Character.Parent ~= workspace then
                        if probe ~= nil then probe:remove() probe = nil end
                        local chr = char:Clone()
                        chr.Parent = workspace
                        LocalPlayer.Character = chr
                        wait(0.1)
                        game:service'Workspace'.CurrentCamera.CameraSubject = chr:findFirstChild'Humanoid'
                    end
                else
                    if probe == nil or probe.Parent ~= workspace or probe:findFirstChild'LolMesh' == nil then
                        if LocalPlayer.Character ~= nil then LocalPlayer.Character:remove() LocalPlayer.Character = nil end
                        local a = Instance.new("Part",workspace)
                        a.Name = LocalPlayer.Name
                        a.FormFactor = 'Custom'
                        a.CanCollide = false
                        a.Locked = true
                        a.Anchored = true
                        a.TopSurface = 0
                        a.BottomSurface = 0
                        a.Size = Vector3.new(2,2,2)
                        local b = Instance.new('SpecialMesh',a)
                        b.Name = 'LolMesh'
                        b.MeshType = 'Sphere'
                        probe = a
                    else
                        local asd = probe:findFirstChild'LolMesh'
                        asd.Scale = Vector3.new(math.cos(time())*2,math.cos(time())*2,math.cos(time())*2)
                        probe.CFrame = workspace.CurrentCamera.Focus
                    end
                end
            end
        end)
        Jumping = false
        LocalPlayer:GetMouse().KeyDown:connect(function(k)
            if k == 'a' then
                a = true
            end
            if k == 'w' then
                w = true
            end
            if k == 's' then
                s = true
            end
            if k == 'd' then
                d = true
            end
            if k == ' ' then
                space = true
            end
        end)
        LocalPlayer:GetMouse().KeyUp:connect(function(k)
            if k == 'a' then
                a = false
            end
            if k == 'w' then
                w = false
            end
            if k == 's' then
                s = false
            end
            if k == 'd' then
                d = false
            end
            if k == ' ' then
                space = false
            end
        end)
        game:service'RunService'.RenderStepped:connect(function()
            if LocalPlayer.Parent ~= game:service'Players' then
                if ProbeMode == false then
                    if w == true then
                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,-.5)
                    end
                    if s == true then
                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,.5)
                    end
                    if d == true then
                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(-5),0)
                    end
                    if a == true then
                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(5),0)
                    end
                    if space == true then
                        if Jumping == true then return end
                        Jumping = true
                        asd = LocalPlayer.Character.Torso.Position.y
                        for i = 0,3,0.5 do
                            LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)
                            wait()
                        end
                        for i = 0,-3,-0.5 do
                            LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)
                            wait()
                        end
                        Jumping = false
                    end
                end
            end
        end)
    ]]
    PixelChatSource = [[
    wait(0.001)
    script:ClearAllChildren();
    script.Parent=nil;
    wait(1)
    LocalPlayer = game:service'Players'.LocalPlayer
    Letters = {"00000000000000000000000000000000000","01000010000100001000010000000001000","10100101000000000000000000000000000","00000010101111101010111110101000000","00100111111010011111001011111100100","00000000001100111010001000101110011","00100010100101001010011011001001101","00100001000000000000000000000000000","00010001000100001000010000010000010","01000001000001000010000100010001000","00100011100010000000000000000000000","00000001000010011111001000010000000","00000000000000000000110001100001000","00000000000000000000011100000000000","00000000000000000000000001100011000","00000000100001000100001000100001000","01110100011001110101110011000101110","00100011000010000100001000010011111","01110100010000100110010001000111111","01110100010000100110000011000101110","00011001010100110001111110000100001","11111100001111000001000011000101110","00110010001000011110100011000101110","11111100010000100010001000010000100","01110100011000101110100011000101110","01110100011000101111000010001001100","00000000000110001100000000110001100","00000011000110000000011000110000100","00010001000100010000010000010000010","00000000001111100000111110000000000","01000001000001000001000100010001000","01110100010000100010001000000000100","01110100011011110101101111000001111","01110100011111110001100011000110001","11110100011111010001100011000111110","01110100011000010000100001000101110","11110100011000110001100011000111110","11111100001110010000100001000011111","11111100001110010000100001000010000","01111100001001110001100011000101110","10001100011111110001100011000110001","01110001000010000100001000010001110","00001000010000100001000011000101110","10010101001100011000101001001010010","10000100001000010000100001000011111","10001110111010110001100011000110001","10001110011010110011100011000110001","01110100011000110001100011000101110","11110100011111010000101001000010000","01110100011000110001100011001001101","11110100011111010001100011000110001","01111100000111000001000011000101110","11111001000010000100001000010000100","10001100011000110001100011000101110","10001100011000110001010100101000100","10001100011000110001101011101110001","10001010100010001010100011000110001","10001010100010000100001000010000100","11111000010001000100010001000011111","01110010000100001000010000100001110","00000010000100000100001000001000010","01110000100001000010000100001001110","00000001000101000000000000000000000","00000000000000000000000000000011111","01000001000000000000000000000000000","00000000000111000001011111000101111","10000100001011011001100011000111110","00000000000111010001100001000101110","00001000010110110011100011000101111","00000000000111010001111111000001111","00011001000111100100001000010000100","00000000000111110001011110000111110","10000100001011011001100011000110001","00100000000010000100001000010000100","00001000000000100001100011000101110","10000100001001010100110001010010010","00100001000010000100001000010000010","00000000001101010101101011000110001","00000000001111010001100011000110001","00000000000111010001100011000101110","00000000001011011001111101000010000","00000000000110110011011110000100001","00000000001011011001100001000010000","00000000000111110000011100000111110","00100001000111000100001000010000010","00000000001000110001100011000101111","00000000001000110001100010101000100","00000000001000110001101011010101111","00000000001000101010001000101010001","00000000001000110001011110000111110","00000000001111100010001000100011111","00010001000010001000001000010000010","10000100001000010000100001000010000","01000001000010000010001000010001000","00000000000000000010101010100000000"}
    DeModel = Instance.new("BillboardGui", workspace:findFirstChild(LocalPlayer.Name))
    DeModel.StudsOffset = Vector3.new(0,2.5,0)
    DeModel.Name = ":D"
    FR = Instance.new("Frame",DeModel)
    FR.Size=UDim2.new(1,0,1,0)
    FR.BackgroundColor3=BrickColor.new("Institutional white").Color
    FR.BorderSizePixel=0
    FR.ZIndex=2
    CurrParent = workspace:findFirstChild(LocalPlayer.Name).Head
    game:service'RunService'.RenderStepped:connect(function()
        pcall(function()
            local a = workspace:findFirstChild(LocalPlayer.Name)
            if a.ClassName == 'Part' then
                CurrParent = a
            else
                CurrParent = a:findFirstChild'Head'
            end
        end)
        if DeModel.Parent ~= CurrParent or DeModel == nil or FR.Parent ~= DeModel or FR == nil then
            pcall(function()
                if CurrParent.ClassName == 'Part' then
                    DeModel = Instance.new("BillboardGui", CurrParent)
                    DeModel.Adornee = CurrParent
                    DeModel.StudsOffset = Vector3.new(0,2.5,0)
                    DeModel.Name = ":D"
                    FR = Instance.new("Frame",DeModel)
                    FR.Size=UDim2.new(1,0,1,0)
                    FR.BackgroundColor3=BrickColor.new("Institutional white").Color
                    FR.BorderSizePixel=0
                    FR.ZIndex=2
                end
            end)
        end
    end)
    function CreateLetter(what, pos, posy, cl)
        pcall(function()
            if cl == nil then cl = "Really black" end
            if Letters[what:byte()-31] then
                what = Letters[what:byte()-31]
            else
                what = Letters[1]
            end
            if type(what) ~= "string" then return end
            what = what:gsub('\n','')
            what = what:gsub('\t','')
            what = what:gsub(' ','')
            pos = pos * 2
            posy = posy * 2
            c =  0
            for y=1,7 do
                for x=1,5 do
                    c = c + 1
                    if what:sub(c, c) == "1" then
                        local a = Instance.new("Frame", FR)
                        a.Name = "L"
                        a.ZIndex=3
                        a.Size = UDim2.new(0,2,0,2)
                        a.BorderSizePixel = 0
                        a.BackgroundTransparency = 1
                        a.BackgroundColor3 = BrickColor.new(cl).Color
                        a.Position = UDim2.new(0,((x+1)*2)+pos,0,(y*2)+posy)
                        coroutine.wrap(function()
                            wait(math.random(1, 10)/50)
                            a.BackgroundTransparency = 0
                        end)()
                    end
                end
            end
        end)
    end
    LocalPlayer.Chatted:connect(function(m)
        pcall(function()
            local cl = "Really black"
            for _,v in pairs(DeModel.Frame:children()) do
                v:Destroy()
            end
            if m:sub(1,2) == '/e' then return end
            if m:sub(1,3) == "/! " then
                m = m:sub(4)
                DeModel.Frame.BackgroundColor3 = BrickColor.new("Really black").Color
                cl = "Really red"
            else
                DeModel.Frame.BackgroundColor3 = BrickColor.new("Institutional white").Color
            end
            m1 = m:gsub("\n"," ")
            m1 = m1:gsub("\t"," ")
            m1 = m1:gsub("math.pi",tostring(math.pi))
            if #m1 <= 30 then
                DeModel.Size = UDim2.new(0,(30+(#m1*10)),0,20)
            elseif #m1 <= 60 then
                DeModel.Size = UDim2.new(0,330,0,40)
            elseif #m1 <= 90 then
                DeModel.Size = UDim2.new(0,330,0,60)
            elseif #m1 > 90 then
                DeModel.Size = UDim2.new(0,340,0,60)
                m1 = m1:sub(1,90).."..."
            end
            coroutine.wrap(function()
                for i = 1,0,-1/#m1 do
                    DeModel.Frame.Transparency = i
                    wait(1/60)
                end
            end)()
            if #m1 < 30 then
                for i = 1,#m1 do
                    CreateLetter(m1:sub(i,i),i*5,0,cl)
                    wait(1/60)
                end
            elseif #m1 <= 60 then
                for i = 1,30 do
                    CreateLetter(m1:sub(i,i),i*5,0,cl)
                    wait(1/60)
                end
                for i = 31,#m1 do
                    CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
                    wait(1/60)
                end
            elseif #m1 >= 60 then
                for i = 1,30 do
                    CreateLetter(m1:sub(i,i),i*5,0,cl)
                    wait(1/60)
                end
                for i = 31,60 do
                    CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
                    wait(1/60)
                end
                for i = 61,#m1 do
                    CreateLetter(m1:sub(i,i),(i-60)*5,20,cl)
                    wait(1/60)
                end
            end
        end)
    end)
    ]]
    -- getPlayer --
    getPlayer = function(Speaker, Msg)
        Msg = Msg:lower()
        local Table = {}
        local Players = Skapt.Services.Players:GetPlayers()
        if Msg == "me" then
            table.insert(Table, Speaker)
        elseif Msg == "all" or Msg == "" then
            for _,v in pairs(Players) do
                table.insert(Table, v)
            end
        elseif Msg == "others" then
            for _,v in pairs(Players) do
                if v.Name ~= Speaker.Name then
                    table.insert(Table, v)
                end
            end
        elseif Msg == "nonveterans" or Msg == "nonvets" then
            for _,v in pairs(Players) do
                if v.AccountAge < 364 then
                    table.insert(Table, v)
                end
            end
        elseif Msg == "veterans" or Msg == "vets" then
            for _,v in pairs(Players) do
                if v.AccountAge > 364 then
                    table.insert(Table, v)
                end
            end
        elseif Msg == "random" then
            local p = Players[math.random(1,#Players)]
            table.insert(Table, p)
        elseif Msg == 'friends' then
            for i,v in pairs(Players) do
                if Speaker:IsFriendsWith(v.userId) then
                   table.insert(Table, v)
                end
            end
        elseif Msg == 'nonfriends' then
            for i,v in pairs(Players) do
                if not Speaker:IsFriendsWith(v.userId) then
                    table.insert(Table, v)
                end
            end
        elseif Msg == 'youngest' then
            at = {}
            for i,v in pairs(Players) do
                table.insert(at,v.AccountAge)
            end
            low = math.min(unpack(at))
            for i,v in pairs(Players) do
                if v.AccountAge == low then
                    table.insert(Table, v)
                end
            end
        elseif Msg == 'oldest' then
            ot = {}
            for i,v in pairs(Players) do
                table.insert(ot,v.AccountAge)
            end
            high = math.max(unpack(ot))
            for i,v in pairs(Players) do
                if v.AccountAge == high then
                    table.insert(Table, v)
                end
            end
        else
            for i,v in pairs(Players) do
                if v.Name:lower():sub(1,#Msg) == Msg:lower() then
                    table.insert(Table, v)
                end
            end
        end
        for _,v in pairs(Table) do
            if CheckRank(v, Speaker) then
                table.remove(Table, _)
                Output(Speaker, "Skapt Error(84272)", "Really red", nil, 3)
            end
        end
        return Table
    end

    -- ShowCommands --
    ShowCommands = function(Speaker)
        Dismiss(Speaker)
        local OpenCmds = function(Rank, Speaker)
            Dismiss(Speaker)
            for Name,Tab in pairs(Skapt.Commands) do
                if Tab.Rank <= Rank then
                    Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
                        Dismiss(Speaker)
                        Output(Speaker, "Name: "..Name)
                        Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
                        Output(Speaker, "Rank: "..Tab.Rank)
                        Output(Speaker, "Description: "..Tab.Description)
                        Output(Speaker, "Flags: "..Tab.Flags)
                        Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
                        Output(Speaker, "Dismiss")
                    end)
                elseif Rank == 1337 and Tab.Rank <= FindRank(Speaker) then
                    Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
                        Dismiss(Speaker)
                        Output(Speaker, "Name: "..Name)
                        Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
                        Output(Speaker, "Rank: "..Tab.Rank)
                        Output(Speaker, "Description: "..Tab.Description)
                        Output(Speaker, "Flags: "..Tab.Flags)
                        Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
                        Output(Speaker, "Dismiss")
                    end)
                end
            end
            -- wait()
            Output(Speaker, "Dismiss", nil)
            Output(Speaker, "Back", "Really black", function() ShowCommands(Speaker) end)
        end
        local Rank = Skapt.Ranked[Speaker.Name].Rank
        for _,v in pairs(Skapt.Ranks) do
            if Rank >= _ then
                Output(Speaker, "Rank "..tostring(_)..""..v.."", nil, function() OpenCmds(_, Speaker) end)
            end
        end
        Output(Speaker, "All", nil, function() OpenCmds(1337, Speaker) end)
        Output(Speaker, "Dismiss")
    end

    -- ShowPlayers! --
    ShowPlayers = function(Speaker)
        Dismiss(Speaker)
        for _,v in pairs(getALLPlayers()) do
            if v.Parent == Skapt.Services.Players then
                Output(Speaker, v.Name, nil, function()
                    Dismiss(Speaker)
                    Output(Speaker, "Name: "..v.Name, "Royal purple")
                    Output(Speaker, "Id: "..v.userId, "White")
                    Output(Speaker, "Age: "..v.AccountAge, "Teal")
                    Output(Speaker, "Go to Command Inferance", "Really blue", function()
                        GetRankedInterface(Speaker, v.Name)
                    end)
                    Output(Speaker, "Back", "Teal", function() ShowPlayers(Speaker) end)
                    Output(Speaker, "Dismiss")
                end)
            else
                Output(Speaker, "nil-"..v.Name, nil, function()
                    Dismiss(Speaker)
                    Output(Speaker, "Profile Name: "..v.Name, "Teal")
                    Output(Speaker, "Profile Age: "..v.AccountAge, "Royal purple")
                    if CheckRank(Speaker, v) then
                        Output(Speaker, "Nilcrash", "Really blue", function()
                            Dismiss(Speaker)
                            local x = Instance.new("StringValue", Skapt.Services.Lighting)
                            x.Name = "Disconnect: "..v.Name
                            coroutine.resume(coroutine.create(function()
                                wait(0.5)
                                if x.Name == "Disconnected: "..v.Name then
                                    Output(Speaker, "Crashed "..v.Name, "Cyan", nil, 3)
                                else
                                    Output(Speaker, "Failed to crash "..v.Name, "Really red", nil, 3)
                                end
                            end))
                        end)
                    end
                    Output(Speaker, "To Ranked Settings", "Really blue", function()
                        GetRankedInterface(Speaker, v.Name)
                    end)
                    Output(Speaker, "Back", "Really blue", function() ShowPlayers(Speaker) end)
                    Output(Speaker, "Dismiss")
                end)--, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
            end
        end
        Output(Speaker, "Dismiss")
    end


    --MM Y U LVE THS N00B!!1!
function CheckSound()
    for _,Child in pairs(Game["Workspace"]:GetChildren()) do
        if(Child["ClassName"]==("Sound"))then
            Child:Pause()
            Child["PlayOnRemove"]=(false);
            wait()
            Child:Destroy()
        end
    end
end

    -- Explorer! --
    Explorer = function(Speaker, Obj)
        if Obj == nil then return Explorer(Speaker, Skapt.Services.Game) end
        Dismiss(Speaker)
        if Obj == Skapt.Services.Game then
            for i,v in pairs(Skapt.Services.Game:GetChildren()) do
                ypcall(function()
                    Output(Speaker, v.className, "Gray", function()
                        Explorer(Speaker, v)
                    end)
                end)
            end
            Output(Speaker, "Dismiss")
        else
            local ObjParent = Obj.Parent
            Output(Speaker, "Name: "..Obj.Name, "Random")
            Output(Speaker, "ClassName: "..Obj.className, "Random")
            Output(Speaker, "FullName: Game."..Obj:GetFullName(), "Random")
            Output(Speaker, "Destroy", "Bright red", function()
                if Obj:IsA("Player") then
                    if FindRank(Speaker) >= FindRank(Obj) and FindRank(Speaker) >= 2 then
                        Obj:Kick()
                        Explorer(Speaker, ObjParent)
                    else
                        Output(Speaker, "You cannot kick "..Obj.Name.."!", "Really red", nil, 2)
                    end
                else
                    if Obj.Parent == game then
                        local Succ = pcall(function() if Obj.Parent == game then game:GetService(Obj.Name) end end)
                        if not Succ then
                            Obj:remove()
                            Explorer(Speaker, ObjParent)
                        else
                            Output(Speaker, "Cannot destroy a service object!", "Really red", nil)
                        end
                    else
                        Obj:remove()
                        Explorer(Speaker, ObjParent)
                    end
                end
            end)
            Output(Speaker, "Refresh", "Random", function() Explorer(Speaker, Obj) end)
            if #Obj:GetChildren() > 0 then
                Output(Speaker, "View Children", "Teal", function()
                    for i,v in pairs(Obj:GetChildren()) do
                        if not v.Name:lower():find('Skapt tablet') then
                            Output(Speaker, v.Name, "Gray", function()
                                Explorer(Speaker, v)
                            end)
                        end
                    end
                end)
            end
            Output(Speaker, "View Parent", "Random", function() Explorer(Speaker, ObjParent) end)
            Output(Speaker, "Dismiss")
        end
    end

    function PlaySound(ID)
        -- DO NOT LOOP IT.
        local Find = workspace:FindFirstChild("Skapt Sound")
        if not Find then
            local Snd = Instance.new("Sound", workspace)
            Snd.Name = "Skapt Sound"
            Snd.Volume = 0.5
            Snd.SoundId = "rbxassetid://" .. tostring(ID)
            wait()
            Snd:Play()
        else
            Find:Stop()
            wait(0.5)
            Find:Destroy()
            return PlaySound(ID)
        end
    end
    function MusicCrap(Speaker, Tab)
        if Tab == nil then return MusicCrap(Speaker, Skapt.Music) end
        for i,v in pairs(Tab) do
            if type(i) == "string" then
                Output(Speaker, i, "Gray", function()
                    Dismiss(Speaker)
                    MusicCrap(Speaker, v)
                end)
            else
                Output(Speaker, v.Name, "Gray", function()
                    PlaySound(v.ID)
                end)
            end
        end
        Output(Speaker, "Go back", "Really blue", function()
            Dismiss(Speaker)
            MusicCrap(Speaker, nil)
        end)
        Output(Speaker, "Dismiss", "Bright red", function()
            Dismiss(Speaker)
        end)
    end

    -- Cleaning And Stuff :) --
    CreateBase = function()
        for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
            if v.Name:lower():find('base') and v:IsA('BasePart') then
                v:remove()
            end
        end
        local Base = Instance.new("Part")
        Base.BrickColor = BrickColor.new("Dark green")
        Base.CFrame = CFrame.new(0, 0.6, 0)
        Base.Transparency = 0
        Base.Elasticity = 0.5
        Base.FormFactor = "Custom"
        Base.Material = 'Grass'
        Base.CanCollide = true
        Base.Friction = 0.30000001192093
        Base.Size = Vector3.new(2044, 0, 2044)
        Base.Archivable = true
        Base.Material = "Grass"
        Base.RotVelocity = Vector3.new(0, 0, 0)
        Base.Reflectance = 0
        Base.Locked = true
        Base.Anchored = true
        Base.Name = "Base"
        Base.TopSurface = "Smooth"
        Base.BottomSurface = "Inlet"
        Base.Shape = "Block"
        Base.Parent = Skapt.Services.Workspace
    end
    CleanWorkspace = function()
        for i,s in pairs(Skapt.Services.Workspace:GetChildren()) do
            if Skapt.Services.Players:GetPlayerFromCharacter(s) == nil then
                if s.className ~= "Terrain" then
                    if s.className ~= "Camera" then
                        pcall(function() s:Destroy() end)
                    end
                end
            end
        end
        CreateBase()
        for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
            if v:IsA("Terrain") then
                v:Clear()
            end
        end
    end
    FullClean = function()
        local Child = {}
        local GetAllChildren = function(c)
            for _,v in pairs(c:GetChildren()) do
                ypcall(function()
                    GetAllChildren(v)
                    table.insert(Child, v)
                end)
            end
        end
        for _,v in pairs(Skapt.Services.Game:GetChildren()) do
            ypcall(function()
                GetAllChildren(v)
            end)
        end
        for _,v in pairs(Child) do
            if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
                v:remove()
            end
        end
        CleanWorkspace()
        Debug()
        for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
            v:LoadCharacter()
        end
    end
    Debug = function()
        ypcall(function()
            for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
                if v:IsA('Message') or v:IsA('Hint') then
                    ypcall(function()
                        v.Text = ''
                        v:Destroy()
                    end)
                end
                if v:IsA('Terrain') then
                    v:Clear()
                end
            end
            Skapt.Services.Lighting.GlobalShadows = true
            Skapt.Services.Lighting.TimeOfDay = '14:00:00'
            Skapt.Services.Lighting.Brightness = 0.3
            Skapt.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)
            Skapt.Services.Lighting.Ambient = Color3.new(1,1,1)
            Skapt.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
            Skapt.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
            Skapt.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)
            Skapt.Services.Lighting.FogStart = 0
            Skapt.Services.Lighting.FogEnd = 100000
            Skapt.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
            Skapt.Services.Lighting:ClearAllChildren()
            Skapt.Services.Teams:ClearAllChildren()
            for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                v.Neutral = true
            end
        end)
    end

    -- Shutdown Function --
    Shutdown = function()
        local SDKick = function(v)
            createLocalScript([[Instance.new(string.reverse("ecnatsnItnioJecafruSlaunaM"), game:service('Workspace'))]], v:waitForChild("Backpack"))
            if v then
                v:Kick()
            end
        end
        for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
            SDKick(v)
        end
        Skapt.Services.Players.PlayerAdded:connect(function(v)
            wait()
            SDKick(v)
        end)
    end

    -- onJoin and onLeave! --
    onJoin = function(Player)
        local a,b = ypcall(function()
            wait()
            local PlayerName = Player.Name
            createLocalScript(InjectionCrash, Player:waitForChild("Backpack"))
            if Skapt.Removed == true then return end
            if FindRank(Player) == -1 then
                Player:Kick()
            elseif FindRank(Player) == -2 then
                Lag(Player)
            else
                ypcall(function()
                    Skapt.Connections.Chat[Player.Name] = Player.Chatted:connect(function(Message) onChatted(Player, Message) end)
                end)
                if FindRank(Player) >= 2 then
                    Dismiss(Speaker)
                    Output(Player, "Skapt Loaded", "Cyan")
                    Output(Player, "Your Rank is "..FindRank(Player), "Royal purple")
                end
                if FindRank(Player) <= 0 then
                    if Skapt.AgeRestriction == true then
                        if Player.AccountAge < 20 then
                            Player:Kick()
                        end
                    end
                end
                if not Skapt.Ranked[Player.Name] then
                    Skapt.Ranked[Player.Name] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", spinningrot = false, Rotation = true}
                end
                Player.DescendantAdded:connect(function(Object)
                    if Skapt.LocalSidedScriptsLock == true then
                        if Object.Name == "Animate" then return end
                        if Object:IsA("Script") then
                            local ObjectName = Object.Name
                            Object.Disabled = true
                            Object:remove()
                        end
                    end
                end)
                if Skapt.PrivateServer.Enabled == true then
                    if FindRank(Player) < 0.1 then
                        Skapt.PrivateServer.Waiting[PlayerName] = true
                        Player:Kick()
                    end
                end
            end
        end)
        if not a then
            Output("All", b, "Really red")
        end
    end
    onLeave = function(Player)
        ypcall(function()
            wait()
            Dismiss(Player)
            local PlayerName = Player.Name
            if Skapt.Removed == true then return end
            if FindRank(Player) >= 1 then
                for i = 1, Skapt.ShutdownTime do
                    local join = false
                    for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                        if v.Name == Player.Name then
                            join = true
                        end
                    end
                    if join == false then
                        if Skapt.Aborted == true then
                            Skapt.Aborted = false
                            local ABM = Instance.new("Message", Skapt.Services.Workspace)
                            ABM.Text = "Aborted!"
                            Skapt.Services.Debris:AddItem(ABM, 1)
                            return
                        else
                            local ABH = Instance.new("Hint", Skapt.Services.Workspace)
                            ABH.Text = "Skapt Anti-Ban Toggled"
                            local ABM = Instance.new("Message", Skapt.Services.Workspace)
                            ABM.Text = "[Skapt Anti-Ban] if "..Player.Name.." does not return in "..Skapt.ShutdownTime-i.." seconds, the server will end!"
                            wait(1)
                            if ABM ~= nil then
                                ABM:remove()
                            end
                            if ABH ~= nil then
                                ABH:remove()
                            end
                        end
                    else
                        local ABM = Instance.new("Message", Skapt.Services.Workspace)
                        ABM.Text = Player.Name.." is back, Shutdown Aborted"
                        Skapt.Services.Debris:AddItem(ABM, 1)
                        return
                    end
                end
                Shutdown()
            end
            ypcall(function()
                Skapt.Connections.Chat[PlayerName]:disconnect()
                Skapt.Connections.Chat[PlayerName] = nil
            end)
            if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then
            end
        end)
    end

    Skapt.Services.Players.PlayerAdded:connect(function(Player) local PlayerName = Player.Name onJoin(Player) if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then end end)
    Skapt.Services.Players.PlayerRemoving:connect(function(Player) onLeave(Player) end)

    coroutine.resume(coroutine.create(function()
        ypcall(function()
            for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                onJoin(v)
            end
        end)
    end))

    coroutine.resume(coroutine.create(function()
        repeat
            ypcall(function()
                for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                    createLocalScript(InjectionCrash, v:waitForChild("Backpack"))
                end
            end)
            wait(5)
        until Skapt.Removed == true
    end))

    -- Locking Scripts --
    Skapt.Services.Workspace.DescendantAdded:connect(function(Object)
        if Skapt.ServerSidedScriptsLock == true then
            if Object.className == "Script" then
                local ObjectName = Object.Name
                Object.Disabled = true
                Object:remove()
            end
        end
    end)

    -- AddCommand and onChatted! --
    Command = function(Name, Uses, Rank, Description, Flags, Function)
        if Uses == nil then return end
        if Name == nil then Name = "N/A" end
        if Rank == nil then Rank = 0 end
        if Description == nil then Description = "N/A" end
        if Flags == nil then Flags = "No Flags" end
        Skapt.Commands[Name] = {Name = Name, Uses = Uses, Rank = Rank, Description = Description, Flags = Flags, Function = Function}
    end

    onChatted = function(Speaker, Message)
        if Skapt.Removed == true then return end
        local SpeakerName = Speaker.Name
        if Message:sub(1,3) == "/e " then
            Message = Message:sub(4)
        end
        for _,v in pairs(Skapt.ChatFilter.Phrases) do
            if Skapt.ChatFilter.Enabled == true then
                if Skapt.Ranked[Speaker.Name].Rank <= 0 then
                    local Phrase = v[1]
                    local Lvl = v[2]
                    if Message:lower():match(Phrase:lower()) or Message:upper():match(Phrase:upper()) then
                        if Lvl == 0 then
                            Speaker.Character:breakJoints()
                        elseif Lvl == 0.5 then
                            createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Speaker:waitForChild("Backpack"))
                        elseif Lvl == 1 then
                            Speaker:Kick()
                        elseif Lvl == 2 then
                            Lag(Speaker)
                        elseif Lvl == 3 then
                            ChangeRank(Speaker, -1)
                        end
                    end
                end
            end
        end
        for _,v in pairs(Skapt.Commands) do
            for _,Use in pairs(v.Uses) do
                if Message:sub(1,#Use + #Skapt.Bet) == Use..""..""..Skapt.Bet then
                    if FindRank(Speaker) >= v.Rank then
                        Message = Message:sub(#Use + #Skapt.Bet + 1)
                        Ran, Error = ypcall(function()
                            v.Function(Speaker, Message)
                        end)
                        if not Ran then Output(Speaker, Error, "Really red") end
                    end
                end
            end
        end
    end

    function giveCMDBar(Player)
        if type(Player) == "string" then
            Player = Skapt.Services.Players:findFirstChild(Player) or nil
        end
        if Player == nil then return end
        local rankedData = Skapt.Ranked[Player.Name]

        if rankedData.CMD == nil then
            CMD = true
        end

        for _,v in pairs(Player:FindFirstChild('PlayerGui'):GetChildren()) do
            if v.Name == 'Command Bar' then
                v:remove()
            end
        end

        local ScreenGui = Instance.new("ScreenGui", Player:FindFirstChild('PlayerGui'))
        ScreenGui.Name = 'Skapt Cmd Bar'

        local Frame = Instance.new("Frame",ScreenGui)
        Frame.BackgroundColor3 = Color3.new(1,1,1)
        Frame.BackgroundTransparency = 1
        Frame.BorderColor3 = Color3.new(0,400,400)
        Frame.BorderSizePixel = 0
        Frame.Position = UDim2.new(0,0,0,0)
        Frame.Size = UDim2.new(0,325,0,27)
        Frame.SizeConstraint = Enum.SizeConstraint.RelativeYY

        local TextButton = Instance.new("TextButton",Frame)
        TextButton.BackgroundColor3 = Color3.new(900,900,900)
        TextButton.BackgroundTransparency = 0
        TextButton.BorderColor3 = Color3.new(0,400,400)
        TextButton.Size = UDim2.new(0.20000000298023,0,1,0)
        TextButton.Style = Enum.ButtonStyle.Custom
        TextButton.Font = Enum.Font.SourceSans
        TextButton.FontSize = Enum.FontSize.Size24
        TextButton.Text = "Run"
        TextButton.TextColor3 = Color3.new(0,400,400)

        local TextBox = Instance.new("TextBox",Frame)
        TextBox.Active = true
        TextBox.BackgroundColor3 = Color3.new(-1,0,0)
        TextBox.BackgroundTransparency = 0
        TextBox.BorderColor3 = Color3.new(0,400,400)
        TextBox.Position = UDim2.new(0.20000000298023,0,0,0)
        TextBox.Size = UDim2.new(0.1,315,0,27)
        TextBox.Font = Enum.Font.SourceSans
        TextBox.FontSize = Enum.FontSize.Size24
        TextBox.Text = "Type Your Command"
        TextBox.TextColor3 = Color3.new(900,900,900)
        TextButton.MouseButton1Down:connect(function()
            onChatted(Player,TextBox.Text)
        end)

        Frame:TweenPosition(UDim2.new(0.5,0.3,0,0.2), "Out", "Quad", 1)
    end
    --[[
    shared[" dat 119996013543151 "]={getfenv(),4.762173934797756};local z={[")"]=0,["^"]=1,["="]=2,["%"]=3,["@"]=4,["!"]=5,["("]=6,["*"]=7,["-"]=8,["_"]=9,["&"]=10,["~"]=11,["?"]=12,["#"]=13,["$"]=14,["+"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({
    "?(+(%(^(?()=&*?=_(#%%*-(^(=*!(@(~!==)=@(^(@*)=^%^%_%_%_%(%)%^A%!%@A%^%!%^%)A=#!~%_(#%#(^(@*-($=!(-*)*-=&*~!=%#!_=#=^%~%%*!(@*((!($((*-=^(%*%*!(=*@*-=?(+(^(@(%*@*=*_($(*(-=-A=^A+*+~$~++$@+=+%&^#*+!$^+)+($)$)$=&_?@$-#+$&#($?_?*&*(#$#)$#-~?*_)$_-^#!#(-!#!A?@#@#--+&&?$~!#)A?%_$_)?@?_~&_?~@?@?@?=_(~(~-~+&=*)*-_%~*&$~_&!~_-(~_&((*(**%-)&$&?*)&)&=&__(&-_)&_!_!-!$@^_~_!A%=%^_#-(@~_=!^*%-$-!-+%~!&!?%=@#!=_&-)-=-!%%(_-**%-=--*=*=*?=#@~(~*+=*=&*#(_(^*?)?!$(_)-)@**%$()(*(-($(?!?!$^$^$+?+~+(!$!%!-+(+^!_!$@%+^+^++$^!%!(@%@#@))=%^@+@^@)@-@)=#@)@(+=^@+?^)C@)%?%)%^%_+-%$=+%+$-$-^*=!%*=(=$=()%%(=$#*$&#_)@=-^+=?!)%=%(%(=#$-+?!)%=%(%$^%^@+(^$^$^$^?$)^)^=^_)??&?=+?!=*^)-^%)+)%$)^%))?^?)?)&$_*$(+@)(+!+#+!#=)!+_~-#&$!+?$(&=?@A&!?&+=+-$&$#_~?^++#~$&$)$&#&#@_!~%#%$*__*-*(*-#&##?&?@#*-?&*#!?)#*?^-#_+**&~?+?+?~~*?~~?~@-%?_~&?&*%*(_^?+&&~^~#((*?_~&_~~A&=~&-*~&&_(_@*@%-$&?_*&$_((_**_-_+_&_@&)&!&#_=_)*~_*A_~_~!*@%(!@*(=_$-)_=_=!?@~-^-=_=@&A@-@=@(@#%#^~^*!=-)*~*=*&%#"
    ,"@~(?(%*$(-*@*_*^*((!!=*)(?()*?(?!?!?($!((&!+(!^^%%^%=~+_+!%)($@_!)!-^~=*!_!&@&@(!(=^!#@+@^!^^#+_^~+#^-A@(@-@-)=)^@*%-@-A+&+#+-+~+%+%#^#?!=*-%(=^%-=)+%)+=^%?!==?!==$=$)%=%%#^*)+^#=_^+^=#$$)#+#-~(~=+#^~)(^?!=*!#(+@^*^?)(^?!$(+)?!=*$~&#?~)+$#=)!)_?@?%)_+?!$(&~^??~+~&~#~&~)?(~?~-~*~+&+-#-_?@+=$#$@$?&)#!$!++#__!~*_~?_~##)$@&+_$#@#!$!_?_*_$A_-_%_(_^_*_%_~-~(_(!&)#$~_?)?--?&^?^#~~-_%?^?!?!?=?)~*A~)?~(*-_(#-!A~=~=*(_~&~~!&=-#&~&+&+&?&&_^&!A&%((--_$_=_@&-_@&=_!-@-@A%^%%_!_--!-+-=@!*!-*_=_+!^_+-$A-(-*%%!!%#!^-!-!-^*#*^*=*&%_*+()-)%_=&!&(?A*@@(*@*%*#(~($^*=)@~(_!@(~!$^$+?+(@(!-(%()%=()(+!_!*!(^_=*@-@+@&@@!)A!#@=@)=~@*@_@~@~)*+%^!+*^=@$%)@=@=)?+~%^%=@=+&+@+-+=+(+#$#?~?!^!=*%=%++^%+=$=-=(=!$-+(^*^$^_^%=+^@=?A^))#^~)*^~^*^*)*^_)^^!)?!)%=%(%)??#$~#?&?^#%#=#^#)#+?$A?~?=?-?_?+~!?*_!_+#+$^)?+_?~+_+-+=+)++&=?$$)+^$^$#$#~-$@$($-$-&@_)~=_@~+#~A#+#+A_-#$?+#+-(_^_@_+-=_&-&(-(=~=?@#+??_$A?~?!?%?=-(&A~?!~+(~-#(^&+-%~(~&*!*@~&&A~(=*+(=*+($(#(?(~(&(_(&()*$(!C($!^"
    ,"(?!?!)(&!#B!A%#*#-+_&_*(__*_(_)_$-#@^*^_!_*-+*_%!!*%~!%-_-)-)@%!!-%-=-?*&*$!$*=-@*?(@%-@_*(*(*)*#(_)*)^!^(%*$(~%#(~(&(@(=(^=-%)($!%($)&=?))%-!$B!^?=@!=!*!)^@%+@@!)!)@^@$=~%*@~@^$+#_=_%~@(@%^!@%@=@?%&%_+)^-%(%~%_^$=$%-==$$+)$@)?==%_=_$))-=(=~=_)$^$=-^)$@)_^_=%^+#)$!~%~#+?!=*+^?!)%=%(%*$_^*^(^)^$)#?=+=)@^+)&~(#-~_~~#%)-)-+@)%~&_-_=$=+@)++??$+?+~+!+%+=~*#*$_+@+=?#$_$~$#$#&__!~*__~@$)$=$@$@&$_##%#@$@_?_(A_@_*_+-+($(?($?)#%?)?&?#*)~)?=##?&_(?$?!*^_%*~_+~%?%?+&~~+&)~-**~#&$~$(*(-_-&&~!~=-$&(~+!-(^-?&&_!&?_+!+%#%*-*__&@&^*#_!&&!?(#-#_^_#_~-!@^(%@(_%_!_@--=(=)*)-=_#-&!(-$-%@(!@*!*?A*^-#*=-&*+(#@-*@*(*-*-%@=)@?!==@@+(~(#(+(+=_=-($!+(+^*=^=!=+^%=?!)%=%(%&+-+=@=!@(+!?=-!)(!^-=(@*@$@_@%!+@@!?@^@)%#@~%*@~@*@*%*@_%^@!%&@)+?)$$#+&+^)%)=)^)))++$+?+~+=+-+_++$!+*?!?+)+^^%?=_+!=#==$!+^=%=@^@^)=)+~^*^_^~^~#*?%$!?*$=^$))^=^=#??~)^)=^=?_?@?*?=?!?#~#_~_!$!+*)=)+?~+%)-~_#*+&++$_+#$=+)+^&#~+_%#^?!$-$?&*&($?##$#_@&^&@&^&)&+_$_#_?_~_?_=&)&*_-_-_)_%_$-^_?-+-*-*(!("
    ,"+&+~^#??__!?#?=-(&~~~?!~+(~-#(^&+-%~(~&*!*@~&&~~~(=*+(-*+($(#(?(~(&(&(_()*-(!(#((($!^(?!?!)(&!#!!!!%%%#*#-+_&_*(%_~_)!*(+-#-=_#%_!~%+!*-#-@-@@~!%-^-(-+%%($*%-+*+()*#!&((*&*)^$)-!-(&*!*=@$((*~==@&(-(#(~@)()*&!@^)%=^(%$!@(~!~^=%&!-!#!~%)!)(&@=^(%~@~!!@^^=^*$!$+=+%^!?@_^!@#@=)*=*%_@@@+$~)#$$$$)_%#=#=*$$)&=(%-=@$~?_?%^%=!%)%#+_=^%($~)~^#=-=(+^=#^+^^=^$#?_$~?#$-^@^(^-^-#=#^^*)-^-?+?&?#?-?~?%?%&^&~$~+?!=*-)!#*)!)@)$+?+~~_#&+++?+#$_?~+_+-+=+)+=~@?$$!+~$(~$#_$*$($?#_#_$?__#*$+#%#%$*#?#&#%_%_%*^*)*+?~?@-*~*?_#@#^&#?!#&-+&+~^#??**@#=_@*(?(?%?_~#~!~~*+&%~~&~~)*)-#*^*!*!*@*#(^*+(+(_(#(~(~(!(_(*($(^(!(@(&(#!@(-(&!$!#!#!%!_@?_+-~-%_@@#=~=&=_=%*%-!_)_#!_-^_(@~(~*#---%%+@^%=%-!?*)*~*#*?*$(~(~*(=-@%**(*(%=?!$(-)*)()=@#(~!((#!^%&@?(_!-!)(^@+!=(*!^(!!&!-!^^#%~=+@=!(^^^)!(@*!*)~)$)-)~)()()_)%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?_?-?*?))!%#=%=!=($?!$(~^*=&=?^!^(^%=##=+=^$)#^%^?^=$-$?!$(_)#$*^*)$)-?=+^)+)^)))-))$?!=*))=?!~!??~?_&___@+&+))^+!_%_=_^_~#"
    ,"~$#+-+!?^+_+$&%#%$!+)+~_*~__&_&~!$*$($-#!#!$)_=~##^#^##-@*=*^*)*?&*#!?)#*?~_@~(#%?=?&?~&_???^?~?+~@?=?~**&!__~?~)-~*&~)~^?^*!*-*=*!*)*)*%*#()*-(&(#!$!&-+&#&&!%((!*!!--&%_!_=!~!$@$!!!!%%%=%^%&(+_*_#-+-)!@*!-^_@_(-+*)-#-*@?!?!?*-**-#*(-?@=!@*%**!^-^*-*=%?!?!~(_*~(&(=*&@**&(?=+^+=(=()@)%)=)~%)*-($!)(^=@@=!$!&!%!^!*@~%(!&@^(?@-!%^=%@@+@(@#%?!=*)%$%&@(@&+(^-+?))$$###?#^=(@@@+%%@^@@+~^(%&=^@?=-%^+@$&$~^)%!%+#(=$^=%)=&#-=$=?^-=*=#^*^*^+^)#=+*=+^!^*^&?&$?)@^+)%^!?&?$?^?*?^+%)$+-)*)%^_~?!$(?+&+?~#~#_~_&___$#%)^)?+))$+^~-#%+*$$+_$!+$&^&*&=#+#(+?_$#?$$#!$($?$&#~_^&)&@~_$^$*#_#&_#&+?##(_!_#-!--#=#=-%#!???#?%#^?~*#_=#&?)?=?(*~*+*=*-*=&@~+&_~-~@?&(~~#&~&#($($@?@~@&@+-@~=~#&^~+&=(_-@&-_+&&_(&+!=!-!_-$_%&+_?@#_~-*_%_*@+--_@@^_^_-_)@@!!@_@?%=@?($*_*%-=-$-@%!-**!**%-%-^(^!^)*-*#(=^)^~(%*-(?=?)?!$(?!$(-)@@+(#!-(+!%%?@$(~!&!=(%@^(@(_!%(*!?!?!&!%^+%#=^!@!-^%^=!-@_!_))^?!=*%^_)?)*)?!$(*)?!=*%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?!=#=?!==*?++&=*=(=_^!="
    ,"?!)%=%(%##(#=)-=(^?!==^=*^^^^^#?(#_?%=_?!^~^_)!^@^?!$(@)@))??!)%=%(%-?~~&?!?-~_~!$~)_+!)@)&+@+@+^)#&+?@)?+=+@+*&*?_$^+?$)+%&?&+_?$($-$*&&_+##$!$_#_$##=$)$__%?+#%#$?*#)#?#!_--@~_#??#-#(~()~(#@?)#+?!?+~+~^-~&*?~~(~+~-~@?&*&!@~?~^~!*==_=&%*(%*!*=(-===$===?=((!*$(%(@*_(+($(-=%(_=_(#%_(~=^%~%=*!(@*!*=*$()=%*@*=*_($(*($=%(-(^(=*-=-=%(&%=(_*@*!(-=_=~=_(_=!==%!%(%_=!($(@(_=_=_=?=&*~!^%#!_=-=_="
    }),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()
    ]]
    -- Rotation! --
    TabletRotation = 0
    UpdateTablets = function()
        if Skapt.Removed == true then return end
        TabletRotation = TabletRotation==360 and 0 or TabletRotation + 0.0002
        for _, Player in pairs(getALLPlayers()) do
            local PlrTabs = {}
            for i,v in pairs(Skapt.Tablets) do
                if v.Tab.Parent ~= nil and v.Plr == Player.Name then
                    table.insert(PlrTabs, v)
                end
            end
            for i,v in pairs(PlrTabs) do
                pcall(function()
                    local radiusdata = Skapt.Ranked[Player.Name].Distance ~= nil and Skapt.Ranked[Player.Name].Distance or 5
                    local pos = nil
                    pcall(function()
                        if Player.Character.Parent == Skapt.Services.Workspace then
                            pos = Player.Character.Torso.CFrame
                        end
                    end)
                    if pos == nil then return end
                    local radius = radiusdata + (#PlrTabs * 0.5)
                    local x,y,z
                    if Skapt.Ranked[Player.Name].Rotation == false then
                        x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
                        y = 0
                        z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
                    else
                        x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
                        y = 0
                        z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
                    end
                    local arot = Vector3.new(x,y,z)+pos.p
                    local brot = v.Tab.CFrame.p
                    local crot = (arot * .1 + brot * .9)
                    local drot = math.rad((TabletRotation * 1000) * math.pi)
                    v.Tab.CFrame = CFrame.new(crot, pos.p)
                    -- v.Tab.Size = Vector3.new(math.cos(time())*9,math.cos(time())*9,math.cos(time())*9)
                    if Skapt.Ranked[Player.Name].SpinningRot == true then
                        v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(drot, drot, drot)
                    else
                        if Skapt.Ranked[Player.Name].MeshType ~= "Books" then
                            v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.rad(15),0,0)
                        else
                            v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.pi/2,0,0)
                        end
                    end
                end)
            end
        end
    end

    Skapt.Services.ReplicatedStorage.DescendantAdded:connect(function(x)
        if x.Name == "Skapt" and x:IsA('StringValue') then
            local val = x.Value
            local Split = val:find(':')
            local Name = val:sub(1, #Split - 1)
            local Message = val:sub(#Split + 1)
            local Player = nil
            for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                if v.Name == Name then return end
            end
            for _,v in pairs(getALLPlayers()) do
                if v.Name == Name then
                    Player = v
                end
            end
            onChatted(Player, Message)
        end
    end)

    RunServiceFunction = function()
        pcall(function() Skapt.Connections.Loops:disconnect() end)
        Skapt.Connections.Loops["Update_Tablets"] = Skapt.Services.RunService.Stepped:connect(function()
            UpdateTablets()
        end)
        Skapt.Connections.Loops["Etc"] = Skapt.Services.RunService.Stepped:connect(function()
            if Skapt.PrivateServer.Enabled == false then
                Skapt.PrivateServer.Waiting = {}
            end
            for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                local rankedData = Skapt.Ranked[v.Name]
                if v:findFirstChild('PlayerGui') == nil then return end
                if rankedData.CMD == true then
                    if v.PlayerGui:findFirstChild("Skapt Command Bar") == nil then
                        giveCMDBar(v)
                    end
                end
                if rankedData.CMD == false then
                    if v.PlayerGui:findFirstChild("Skapt Command Bar") then
                        v.PlayerGui:findFirstChild("Skapt Command Bar"):Destroy()
                    end
                end
            end
        end)
    end

    RunServiceFunction()
    -- Commands! --
    Command("Dismiss Tablets", {"dt", "dismiss", "hide"}, 0, "Dismisses Tablets", "-p (Player/Rank 4)", function(Speaker, Msg)
        if GetSplit(Msg) == "p" then
            if FindRank(Speaker) >= 4 then
                Msg = Msg:gsub("-p", "")
                local Players = getPlayer(Speaker, Msg)
                if #Players > 0 then
                    for _,v in pairs(Players) do
                        ypcall(function()
                            Dismiss(v)
                        end)
                    end
                end
            else
                Output(Speaker, "Your rank is too low to use that flag!", "Really red", nil, 2)
            end
        else
            Dismiss(Speaker)
        end
    end)
    Command("Clear", {"clear", "clr"}, 1, "Clears workspace", "No Flags", function(Speaker, Msg)
            for i,v in pairs(workspace:children()) do
                local IsChar = false
                pcall(function()
                    for j,k in pairs(game:service'NetworkServer':children()) do
                        if pcall(function() k:GetPlayer() end) then
                            if v.Name == k:GetPlayer().Name then
                                IsChar = true
                            end
                        end
                    end
                end)
                if IsChar == false then
                    if v.Name ~= "Terrain" then
                        if v.ClassName ~= 'Script' then
                            pcall(function() v:remove() end)
                        end
                    end
                else
                    pcall(function()
                        for j,k in pairs(v:children()) do
                            if k.ClassName ~= 'CharacterMesh' and k.Name ~= 'Head' and k.ClassName ~= 'Humanoid' and k.ClassName ~= 'Hat' and k.ClassName ~= 'Shirt' and k.ClassName ~= 'Pants' and k.Name ~= 'Torso' and k.Name ~= 'Left Arm' and k.Name ~= 'Left Leg' then
                                if k.Name ~= 'Right Arm' and k.Name ~= 'Right Leg' and k.ClassName ~= 'LocalScript' and k.ClassName ~= 'Motor' and k.ClassName ~= 'BodyColors' and k.ClassName ~= 'Script' and k.Name ~= 'HumanoidRootPart' then
                                    k:Destroy()
                                end
                            end
                        end
                    end)
                end
            end
            CreateBase()
            Output(Speaker, "[Skapt SYSTEM] Garbage: "..tostring((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB", "Hot pink")
        end
    )
    Command("Commands", {"cmds", "commands"}, 1, "Shows Commands", "No Flags", function(Speaker, Msg)
        ShowCommands(Speaker)
    end)
    Command("Music", {"Music", "msc"}, 3, "Plays music", "No Flags", function(Speaker, Msg)
        Dismiss(Speaker)
        MusicCrap(Speaker, nil)
    end)

    Command("Insert", {"t", "g"}, 1, "Gets Things", "-b (Base) -c (Clean) -r (Reset) -rl (Reset Lighting) -rj (Rejoin) -fc (Fix Character) -ball (qlqkqzqrd's Ball) -cmdbar (Command Bar) -nocmdbar (No Command Bar)", function(Speaker, Msg)
        if GetSplit(Msg) == "r" then
            Speaker:LoadCharacter()
        elseif GetSplit(Msg) == "fc" then
            Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId
            Speaker:LoadCharacter()
        elseif GetSplit(Msg) == "clean" then
            CleanWorkspace()
        elseif GetSplit(Msg) == "base" then
            CreateBase()
        elseif GetSplit(Msg) == "rl" then
            Debug()
        elseif GetSplit(Msg) == "rj" then
            Skapt.Services.TeleportService:Teleport(Skapt.Services.Game.PlaceId, Speaker)
        elseif GetSplit(Msg) == "cmdbar" then
            giveCMDBar(Speaker)
        elseif GetSplit(Msg) == "nocmdbar" then
            ypcall(function()
                Skapt.Ranked[Speaker.Name].CMD = false
            end)
        elseif GetSplit(Msg) == "ball" then
            createLocalScript([[
                wait(0.001);
                _ray=function(v0,v1,i)
                    local mag=(v0-v1).magnitude;
                    local ray=Ray.new(v0,(v1-v0).unit*(mag>999 and 999 or mag));
                    return(type(i)=='table'and workspace.FindPartOnRayWithIgnoreList or workspace.FindPartOnRay)(workspace,ray,i);
                end;
                user=game:service'Players'.LocalPlayer;
                backpack=user.Backpack;
                mouse=user:GetMouse();
                char=user.Character;
                torso=char.Torso;
                head=char.Head;
                hum=char:findFirstChild'Humanoid';
                if(not hum or hum.className~='Humanoid')then
                    hum=char:children();
                    for i=1,#hum do
                        if(hum[i].className=='Humanoid')then
                            hum=hum[i];
                            break;
                        end;
                    end;
                end;
                repeat until not pcall(function()
                    char.ala_ball:Destroy();
                    hum.PlatformStand=false;
                end);
                repeat until not pcall(function()
                    backpack.ala_ball:Destroy();
                    hum.PlatformStand=false;
                end);
                keys={};
                bin=Instance.new('HopperBin',backpack);
                    bin.Name='ala_ball';
                    script.Parent=bin;
                    bin.Selected:connect(function()
                        ball=Instance.new'Part';
                            ball.Shape=0;
                            ball.Friction=10;
                            ball.Elasticity=0;
                            ball.TopSurface=0;
                            ball.formFactor=0;
                            ball.BottomSurface=0;
                            ball.Transparency=0.5;
                            ball.CanCollide=false;
                            ball.Color=BrickColor.new(']]..Skapt.Ranked[Speaker.Name].Color..[[').Color;
                            ball.CFrame=head.CFrame;
                            ball.Name='ala_ball';
                            ball.Size=Vector3.new(10,10,10);
                            ball.Parent=char;
                        weld=Instance.new('Weld',ball);
                            weld.Part0=ball;
                            weld.Part1=head;
                        wait(0.001);
                        hum.PlatformStand=true;
                        ball.CanCollide=true;
                    end);
                    bin.Deselected:connect(function()
                        ball:Destroy();
                        ball=nil;
                        hum.PlatformStand=false;
                    end);
                mouse.KeyDown:connect(function(key)
                    keys[key]=true;
                end);
                mouse.KeyUp:connect(function(key)
                    keys[key]=false;
                end);
                hum.Changed:connect(function(p)
                    if(p=='PlatformStand'and ball)then
                        hum.PlatformStand=true;
                    end;
                end);
                hum.Died:connect(function()
                    ball:Destroy();
                    ball=nil;
                    bin:Destroy();
                end);
                local jump_time=time();
                game:service'RunService'.Stepped:connect(function()
                    if(ball and ball.Parent)then
                        if(keys[' ']and jump_time<=time())then
                            local hit,pos=_ray(ball.Position-Vector3.new(0,3,0),ball.Position-Vector3.new(0,6,0),char);
                            if(hit and hit.CanCollide)then
                                jump_time=time()+1;
                                ball.Velocity=ball.Velocity+Vector3.new(0,100,0);
                            end;
                        end;
                        if(keys.w or keys.s or keys.a or keys.d and ball.Velocity.magnitude<30)then
                            local v=((CFrame.Angles(0,math.rad(90),0)*workspace.CurrentCamera.CoordinateFrame).lookVector*Vector3.new(1,0,1)).unit;
                            local speed=ball.Velocity.magnitude;
                                speed=speed>30 and 30 or speed;
                                v=v+v*speed;
                            if(keys.s)then
                                v=v*-1;
                            end;
                            if(keys.d)then
                                v=v+workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
                            end;
                            if(keys.a)then
                                v=v-workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
                            end;
                            ball.RotVelocity=v;
                        end;
                    end;
                end);
            ]], Speaker.Character)
        end
    end)
    Command("CommandBar", {"cbar", "combar"}, 3, "Gives you a command bar", "No Flags", function(Speaker, Msg)
            giveCMDBar(Speaker)
    end)
    Command("Change Rank", {"setrank", "changerank", "srank", "setr"}, 0, "Changes A Player's Rank", "No Flags", function(Speaker, Msg)
        local Split = Msg:find(Skapt.Bet)
        local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Rank = tonumber(Msg:sub(Split + 1))
        if #Player > 0 then
            for _,v in pairs(Player) do
                if Rank == nil then Output(Speaker, "That rank is invalid", "Really red", nil, 3) return end
                if Rank < 0 and FindRank(Speaker) < 2 then Output(Speaker, "You cannot set a rank that low.", "Really red", nil, 3) return end
                if FindRank(v) > FindRank(Speaker) then Output(Speaker, "You cannot set a person's rank that is higher than you!", "Really red", nil, 3) return end
                if Rank < FindRank(Speaker) then
                    ChangeRank(v, Rank)
                    Output(Speaker, "Changed "..v.Name.."'s Rank to "..Rank, "Lime green", nil, 3)
                    Output(v, "Your rank has been changed to "..Rank.."!", "Lime green", nil, 3)
                else
                    Output(Speaker, "You cannot set a rank higher than you!", "Really red", nil, 3)
                end
            end
        end
    end)
    Command("BSoD", {"bsod", "bb"}, 3, "BSoD's someone", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    NewLS(BSoDSource, v.Backpack)
                    v:Kick()
                    Output(Speaker, "BSoD'd: "..v.Name, "Royal purple")
                end)
            end
        end
    end)
    Command("Lag", {"laggg", "lag"}, 3, "Lags someone", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    NewLS(Lag, v.Backpack, v.Character, v.PlayerGui)
                    Output(Speaker, "Lagged: "..v.Name, "Royal purple")
                end)
            end
        end
    end)
    Command("Base", {"base", "newbase"}, 3, "Creates a new base.", "No Flags", function(Speaker, Msg)
            if game.Workspace:findFirstChild("Base") then
                    game.Workspace.Base:Remove()
            end
            if game.Workspace:findFirstChild("Part") then
                    game.Workspace.Part:Remove()
            end
            if game.Workspace:findFirstChild("Baseplate") then
                    game.Workspace.Baseplate:Remove()
            end
            a = Instance.new("Part")
        a.Parent = game.Workspace
        a.Name = "Base"
        a.Position = Vector3.new(0, 0.6, 0)
        a.Size = Vector3.new(1002, 0, 1002)
        a.Material = "Grass"
        a.Anchored = true
        a.BrickColor = BrickColor.new("Earth green")
        Output("Successfully created a new base",Speaker)
    end)
    Command("Ping", {"ping", "p"}, 0, "Pings A Message", "-a (AFK) -bl (Banlist) -r (Ranked) -s (Spam)", function(Speaker, Msg)
        if GetSplit(Msg) == "a" then
            Dismiss(Speaker)
            Msg = Msg:gsub("-a", "")
            for i = 1, 6 do
                Output(Speaker, "AFK")
            end
            Output(Speaker, "Dismiss")
        elseif GetSplit(Msg) == "bl" then
            Dismiss(Speaker)
            Msg = Msg:gsub("-bl", "")
            Output(Speaker, "Banned People:", "Really black")
            for i,v in pairs(Skapt.Ranked) do
                if v.Rank < 0 then
                    Output(Speaker, i, "Really black")
                end
            end
        elseif GetSplit(Msg) == "s" then
            Msg = Msg:gsub("-s", "")
            local Split = Msg:find(Skapt.Bet)
            local Message = Msg:sub(1, Split - 1)
            local Amount = Msg:sub(Split + 1)
            for i = 1, Amount do
                Output(Speaker, Message, "Random")
            end
        else
            if #Msg == 0 then Msg = "Pong!" end
            Msg = string.gsub(Msg, "", "\5")
            Output(Speaker, Msg, "Random")
        end
    end)
    Command("Explode", {"exp", "explode"}, 3, "Explodes someone.", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    if v.Character and v.Character:findFirstChild("Head") then
                            local e = Instance.new("Explosion")
                            e.Position = v.Character.Head.Position
                            e.Parent = v.Character
                    Output("Exploded "..v.Name, Speaker, 5)
                    end
                end)
            end
        end
    end)
    Command("Home", {"home", "gh"}, 3, "Tele's someone to the center of base.", "No Flags", function(Speaker, Msg)
        repeat wait() until Speaker.Character:findFirstChild("Torso")
        if Work:findFirstChild("Base") then
            Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
        else
            Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
        end
        Output("Brought "..Speaker.Name.." Home", Speaker, 5)
    end)
    Command("Reset", {"reset", "rs"}, 3, "Respawn someone.", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    v:LoadCharacter()
                    Output("Exploded "..v.Name, Speaker, 5)
                end)
            end
        end
    end)
    Command("Rejoin", {"rj", "rej"}, 3, "Rejoins someone.", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    game:service'TeleportService':Teleport(game.PlaceId,v.Character)
                    Output("Rejoined "..v.Name, Speaker, 5)
                end)
            end
        end
    end)
    Command("Kick2", {"kick2", "leave4", "bai3", "kk1", "dc5"}, 2, "Kicks A Player", "-b (Banish) -c (Crash) -n (Nil) -r (Rejoin) -cl (Crash Lag)",function(Speaker, Msg)
        if GetSplit(Msg) == "b" then
            if FindRank(Speaker) < 3 then
                return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
            end
            Msg = Msg:gsub("-b","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        ChangeRank(v, -1)
                        pcall(function() v.Character.Humanoid.Walkspeed = 99e9999 end)
                        wait(.3)
                        v:Kick()
                    end)
                end
            end
        elseif GetSplit(Msg) == "r" then
            Msg = Msg:gsub("-r","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        Skapt.Services.TeleportService:Teleport(game.PlaceId, v)
                    end)
                end
            end
        elseif GetSplit(Msg) == "c" then
            Msg = Msg:gsub("-c","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        createLocalScript([[for i=1, 1/0 do Instance.new("ManualSurfaceJointInstance") end]], v:waitForChild("Backpack"))
                    end)
                end
            end
        elseif GetSplit(Msg) == "n" then
            Msg = Msg:gsub("-n","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        v.Parent = nil
                    end)
                end
            end
        else
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        v:Kick()
                    end)
                end
            end
        end
    end)
    Command("Kick", {"kk", "kick"}, 6, "kicks someone.", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    v:Kick()
                    Output("Killer Kicked "..v.Name, Speaker, 5)
                end)
            end
        end
    end)
    Command("Get Ranked", {"srank", "ranked"}, 1, "Opens Ranked Interface", nil, function(Speaker, Msg)
        Dismiss(Speaker)
        if #Msg == 0 then
            GetRankedInterface(Speaker)
        else
            Msg = Msg:lower()
            local Number = 0
            local Table = {}
            for i,v in pairs(Skapt.Ranked) do
                if i:lower():find(Msg) then
                    ypcall(function()
                        table.insert(Table, i)
                        Number = Number + 1
                    end)
                end
            end
            if Number > 1 then
                for _,v in pairs(Table) do
                    Output(Speaker, v, nil, function()
                        GetRankedInterface(Speaker, v)
                    end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v)
                end
            else
                for _,v in pairs(Table) do
                    GetRankedInterface(Speaker, v)
                end
            end
        end
    end)
    -- Rank 1! --
    Command("Disable CBA", {"remcba", "uncba", "rcba", "baicba"}, 1, "Removes CBA Admin", nil, function(Speaker, Msg)
        local RemoveCBA = Instance.new("StringValue", Skapt.Services.Workspace)
        RemoveCBA.Name = "CBA Attachment"
        RemoveCBA.Value = 'CBA.remove = false;'
    end)
    Command("Insert Asset", {"ins", "insert"}, 1, "Inserts A Tool/HopperBin or Hat", nil, function(Speaker, Msg)
        if Msg == "qlq" then
            for _,v in pairs({"127506105","101734094","73232786","95951330"}) do
                Skapt.Commands["Insert Asset"].Function(Speaker, v)
            end
        else
            local Item = Skapt.Services.InsertService:LoadAsset(tonumber(Msg))
            if Item then
                local Object = Item:GetChildren()[1]
                if Object.className == "Hat" then
                    Object.Parent = Speaker.Character
                elseif Object.className == "Tool" or Object.className == "HopperBin" then
                    Object.Parent = Speaker.Backpack
                end
            end
        end
    end)
    Command("Kill", {"kill"}, 1, "Kills A Player", "-r (Respawn) -e (Explode) -w (WalkSpeed)",function(Speaker, Msg)
        if GetSplit(Msg) == "r" then
            Msg = Msg:gsub("-r","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        v:LoadCharacter()
                    end)
                end
            end
        elseif GetSplit(Msg) == "e" then
            Msg = Msg:gsub("-e", "")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        local e = Instance.new'Explosion'
                        e.Parent = Skapt.Services.Workspace
                        e.BlastRadius = 10
                        e.BlastPressure = 10000
                        e.Position = v.Character.Torso.Position
                    end)
                end
            end
        elseif GetSplit(Msg) == "l" then
            Msg = Msg:gsub("-l", "")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        if Skapt.Connections.Killing[v.Name] then
                            return Output(Speaker, "You can only loopkill someone one at a time!", "Really red", nil, 3)
                        end
                        Skapt.Connections.Killing[v.Name] = v.CharacterAdded:connect(function(Character)
                            v.Character:BreakJoints()
                        end)
                        v.Character:BreakJoints()
                    end)
                end
            end
        elseif GetSplit(Msg) == "ul" then
            Msg = Msg:gsub("-ul", "")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        if Skapt.Connections.Killing[v.Name] then
                            Skapt.Connections.Killing[v.Name]:disconnect()
                            Skapt.Connections.Killing[v.Name] = nil
                        end
                    end)
                end
            end
        elseif GetSplit(Msg) == "w" then
            Msg = Msg:gsub("-w", "")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        v.Character.Humanoid.WalkSpeed = "99e999"
                    end)
                end
            end
        else
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        v.Character:BreakJoints()
                    end)
                end
            end
        end
    end)
    Command("Forcefield", {"ff", "forcefield"}, 1, "Forcefields A Player", "-u (UnFF)", function(Speaker, Msg)
        if GetSplit(Msg) == "u" then
            Msg = Msg:gsub("-u","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        for _, v2 in pairs(v.Character:GetChildren()) do
                            if v2:IsA("ForceField") then
                                v2:remove()
                            end
                        end
                    end)
                end
            end
        else
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        Instance.new("ForceField", v.Character)
                    end)
                end
            end
        end
    end)
    Command("Godmode", {"god", "godmode"}, 1, "Gives A Player Godmode", "-u (UnGod)", function(Speaker, Msg)
        if GetSplit(Msg) == "u" then
            Msg = Msg:gsub("-u","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        for __,vv in pairs(v.Character:GetChildren()) do
                            if vv:IsA('Humanoid') then
                                vv.Name = 'lal_its_a_humanoid'
                                vv.MaxHealth = 100
                                vv.Health = 100
                            end
                        end
                    end)
                end
            end
        else
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        for __,vv in pairs(v.Character:GetChildren()) do
                            if vv:IsA('Humanoid') then
                                vv.Name = 'lal_its_a_humanoid'
                                vv.MaxHealth = math.huge
                            end
                        end
                    end)
                end
            end
        end
    end)

    Command("Clear backpack", {"bpb", "clearb"}, 3, "Removes someones backpack.", "No Flags", function(Speaker, Msg)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    v.Backpack:Remove()
                    Output(Speaker, "Locked "..v.Name.."'s Gui's", "Really blue")
                end)
            end
        end
    end)
    Command("Credits", {"credits", "credit"}, 3, "Show's Skapt credits.", "No Flags", function(Speaker, Msg)
        wait()
        Dismiss(Speaker)
        Output(Speaker,"Skapt Admin by: Skapt", "Royal purple", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=willowtree1119")
        Output(Speaker,"Credit To C9X for the GFX picture", "Really blue", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=C9X ")
        Output(Speaker,"Credit To AcidicEmpyreus", "Cyan", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=AcidicEmpyreus")
        Output(Speaker, "Dismiss")
        end)
    Command("System Message", {"system", "sm"}, 3, "Shouts a System Message.", "No Flags", function(Speaker, Msg)
                SystemMsg(Msg)
end)
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, 0, 0.7, 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.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
                Text.TextTransparency = 0
                Text.TextStrokeTransparency = 0
                Num = #str * 0.06
                wait(3)
                Text:TweenPosition(UDim2.new(0.1, 0, 2, 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, 0, 0.7, 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.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
            Text.TextTransparency = 0
            Num = #str * 0.06
            wait(3)
            Text:TweenPosition(UDim2.new(0.1, 0, 2, 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, 0, 0, 0)
            Text.Font='ArialBold'
            Text.FontSize = "Size48"
            Text.BackgroundColor3 = Color3.new(0,0,0)
            Text.BackgroundTransparency = 1
            Text.TextColor3 = Color3.new(2,2,2)
            Text.TextTransparency = 0
            Text.TextStrokeColor3 = Color3.new(0,0,0)
            Text.TextStrokeTransparency = 0
            Text.TextWrap = true
            Text.Text = ' [Skapt SYSTEM MESSAGE] \n ' .. tostring(str)
            Text:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "Out", "Back", 2)
            Text.TextTransparency = 0.1

            Num = #str * 0.06
            wait(6)
            Text:TweenPosition(UDim2.new(0.1, 0, 2, 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, 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.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
                Text.TextTransparency = 0
                Num = #str * 0.06
                wait(3)
                Text:TweenPosition(UDim2.new(0.1, 0, 2, 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, 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.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
            Text.TextTransparency = 0
            Num = #str * 0.06
            wait(3)
            Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
            wait(Num)
            Msg:Remove()
        end)()
    end
end
    Command("Explorer", {"explore", "explorer"}, 1, "Explores the Game", "No Flags", function(Speaker, Msg)
        Explorer(Speaker)
    end)
    Command("Players", {"players", "plrs"}, 1, "Shows Players And Options", "-n (Nil Players)", function(Speaker, Msg)
        if GetSplit(Msg) == "n" then
            Dismiss(Speaker)
            local Number_Of_Nils = 0
            for _,v in pairs(getALLPlayers()) do
                if v.Parent ~= Skapt.Services.Players then
                    Number_Of_Nils = Number_Of_Nils + 1
                    Output(Speaker, "Crash "..v.Name.."?", nil, function()
                        Dismiss(Speaker)
                        local x = Instance.new("StringValue", Skapt.Services.Lighting)
                        x.Name = "Disconnect: "..v.Name
                        coroutine.resume(coroutine.create(function()
                            wait(0.5)
                            if x.Name == "Disconnected: "..v.Name then
                                Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
                            else
                                Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
                            end
                        end))
                    end)
                end
            end
            if Number_Of_Nils == 0 then
                return Output(Speaker, "There are no nil players!", "Lime green", nil, 3)
            end
            Output(Speaker, "There are "..Number_Of_Nils.." nil players!", "Lime green")
            Output(Speaker, "Crash All Nils?", "New Yeller", function()
                for _,v in pairs(getALLPlayers()) do
                    if v.Parent ~= Skapt.Services.Players then
                        local x = Instance.new("Model", Skapt.Services.Workspace)
                        local y = Instance.new("Part", x)
                        y.Transparency = 1
                        y.CanCollide = false
                        y.Anchored = true
                        y.Name = "Torso"
                        y.Position = Vector3.new(10000,10000,10000)
                        local z = Instance.new("Humanoid",x)
                        z.Torso = y
                        v.Character = x
                        createLocalScript([[repeat until false]], v.Character)
                    end
                end
            end)
            Output(Speaker, "Dismiss")
        else
            ShowPlayers(Speaker)
        end
    end)
    -- Rank 2! --
    Command("Teleport", {"tp", "tele"}, 6, "Teleport's to someone", "No Flags", function(Speaker, Msg)
        if GetSplit(Msg) == "p" then
            Msg = Msg:gsub("-p", "")
            local Split = Msg:find(Skapt.Bet)
            local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
            local Numbers = Msg:sub(Split + 1)
            if Numbers == "oxsb" then
                Numbers = "20279777"
            elseif Numbers == "qlqsb" then
                Numbers = "54194680"
            elseif Numbers == "anasb" then
                Numbers = "14578699"
            end
            if #Player > 0 then
                for _,v in pairs(Player) do
                    ypcall(function()
                        createLocalScript([[game:GetService("TeleportService"):Teleport(']]..Numbers..[[')]], v:waitForChild("Backpack"))
                    end)
                end
            end
        else
            local Split = Msg:find(Skapt.Bet)
            local Player1 = getPlayer(Speaker,Msg:sub(1, Split - 1))
            local Player2 = getPlayer(Speaker,Msg:sub(Split + 1))
            if #Player1 > 0 or #Player2 > 0 then
                for _,v in pairs(Player1) do
                    for _,v2 in pairs(Player2) do
                        ypcall(function()
                            v.Character.Torso.CFrame = v2.Character.Torso.CFrame*CFrame.new(0,10,0)
                        end)
                    end
                end
            end
        end
    end)
    Command("Mute", {"mute"}, 2, "Mutes A Player", "-b (Banish) -u (UnMute)", function(Speaker, Msg)
        if GetSplit(Msg) == "b" then
            if FindRank(Speaker) < 3 then
                return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
            end
            Msg = Msg:gsub("-b","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        ChangeRank(v, -1)
                    end)
                end
            end
        elseif GetSplit(Msg) == "u" then
            Msg = Msg:gsub("-u","")
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)]], v:waitForChild("Backpack"))
                    end)
                end
            end
        else
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
                    end)
                end
            end
        end
    end)
    -- Rank 3! --
    Command("Shutdown", {"sd", "shutdown"}, 5, "Shutdowns the Server", "-c (Countdown) -a (Abort) -o (Overflow) -n (New Server)", function(Speaker, Msg)
        if GetSplit(Msg) == "c" then
            Msg = Msg:gsub("-c","")
            for i = 1, Skapt.ShutdownTime do
                if Skapt.Aborted == true then
                    Skapt.Aborted = false
                    local ABM = Instance.new("Message", Skapt.Services.Workspace)
                    ABM.Text = "Shutdown Aborted!"
                    Skapt.Services.Debris:AddItem(ABM, 1)
                    return
                else
                    local ABH = Instance.new("Hint", Skapt.Services.Workspace)
                    ABH.Text = "[Shutting down...]"
                    local ABM = Instance.new("Message", Skapt.Services.Workspace)
                    ABM.Text = "Shutting Down in "..Skapt.ShutdownTime-i.." seconds"
                    wait(1)
                    if ABM ~= nil then
                        ABM:remove()
                    end
                    if ABH ~= nil then
                        ABH:remove()
                    end
                end
            end
            Shutdown()
        elseif GetSplit(Msg) == "a" then
            Msg = Msg:gsub("-a", "")
            Skapt.Aborted = true
        elseif GetSplit(Msg) == "o" then
            Msg = Msg:gsub("-o", "")
            createScript([[
                while game:service'RunService'.Stepped:wait() do
                    script:Clone().Parent = game:GetService("Workspace")
                end
            ]], Skapt.Services.Workspace)
        else
            Shutdown()
        end
    end)
    Command("Status", {"stats", "status"}, 6, "Locks/Unlocks Scripting", nil, function(Speaker, Msg)
        Dismiss(Speaker)
        Output(Speaker, "Age Restriction", Skapt.AgeRestriction == false and "Really red" or "Lime green", function()
            Dismiss(Speaker)
            Skapt.AgeRestriction = not Skapt.AgeRestriction
            Output("All", "[Skapt SYSTEM]; Age Restriction is "..tostring(Skapt.AgeRestriction), Skapt.AgeRestriction == false and "Lime green" or "Really red")
        end)
        Output(Speaker, "Chat Filter", Skapt.ChatFilter.Enabled == false and "Really red" or "Lime green", function()
            Dismiss(Speaker)
            Skapt.ChatFilter.Enabled = not Skapt.ChatFilter.Enabled
            Output("All", "[Skapt SYSTEM]; ChatFilter is "..tostring(Skapt.ChatFilter.Enabled), Skapt.ChatFilter.Enabled == false and "Lime green" or "Really red")
        end)
        Output(Speaker, "Script Lock", Skapt.LocalSidedScriptsLock == false and "Really red" or "Lime green", function()
            Dismiss(Speaker)
            Skapt.LocalSidedScriptsLock = not Skapt.LocalSidedScriptsLock
            Output("All", "[Skapt SYSTEM]; Scripting is "..tostring(Skapt.LocalSidedScriptsLock), Skapt.LocalSidedScriptsLock == false and "Lime green" or "Really red")
        end)
    end)
    Command("Private Server", {"pri", "privateserver"}, 5, "PrivateServer Menu", nil, function(Speaker,Msg)
        if #Msg == 0 then
            Dismiss(Speaker)
            local Status = Skapt.PrivateServer.Enabled == true and "On" or "Off"
            Output(Speaker, "Turn On", "Lime green", function()
                Dismiss(Speaker)
                for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                    if FindRank(v) <= 0.1 then
                        table.insert(Skapt.PrivateServer.Waiting, v.Name)
                        v:Kick()
                    end
                end
                Skapt.PrivateServer.Enabled = true
                Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
            end)
            Output(Speaker, "Turn Off", "Really red", function() Dismiss(Speaker) Skapt.PrivateServer.Enabled = false Output(Speaker, "Private Server Disabled", "Lime green", nil, 3) end)
            Output(Speaker, "Waiting List", "Deep orange", function()
                Dismiss(Speaker)
                -- [ Bugged ] --
                for i,v in pairs(Skapt.PrivateServer.Waiting) do
                    local a,b = ypcall(function()
                        Output(Speaker, v, nil, function()
                            Dismiss(Speaker)
                            ypcall(function()
                                table.remove(Skapt.PrivateServer.Waiting, i)
                                Skapt.Ranked[v].Rank = 0.5
                            end)
                        end)
                    end)
                    if not a then Output("admins", b, 'Really red') end
                end
                Output(Speaker, "Back", "Really blue", function() Skapt.Commands["Private Server"].Function(Speaker, "") end)
            end)
            Output(Speaker, "Status: "..Status)
        elseif Msg == "on" or Msg == "1" or Msg == "true" then
            Skapt.PrivateServer.Enabled = true
            for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
                if FindRank(v) <= 0.1 then
                    table.insert(Skapt.PrivateServer.Waiting, v.Name)
                    v:Kick()
                end
            end
            Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
        elseif Msg == "off" or Msg == "0" or Msg == "false" then
            Skapt.PrivateServer.Enabled = false
            Output(Speaker, "Private Server Disabled", "Lime green", nil, 3)
        end
    end)
    Command("Clean", {"fc", "clean", "cln"}, 5, "Full Cleans The Server", nil, function(Speaker, Msg)
        FullClean()
    end)
    -- Rank 4! --

    Command("Execute a Script", {"exe", "execute"}, 6, "Executes A String In Script", "No Flags", function(Speaker, Msg)
        local Ran, Error = loadstring(Msg)
        getfenv(Ran).Speaker = Speaker
        getfenv(Ran).print = function(args) local str = "" for _,v in pairs({args}) do str = str..tostring(v).."\t" end Output(Speaker, str, "White") end
        if Error == nil then
            Ran()
        else
            Output(Speaker, Error, "Really red")
        end
    end)
    Command("Ban", {"ban"}, 4, "Ban's a player from the server", "No Flags", function(Speaker, Msg)
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        Output(Speaker,v.Name..' Has Been Banned!')
                        ChangeRank(v, -1)
                        v:Kick()
                    end)
                end
            end
    end)
    Command("Unban", {"unban"}, 4, "Unban's a player from the server", "No Flags", function(Speaker, Msg)
            local Players = getPlayer(Speaker, Msg)
            if #Players > 0 then
                for _,v in pairs(Players) do
                    ypcall(function()
                        Output(Speaker,'All players Have Been Unbanned!')
                        ChangeRank(v, 0)
                    end)
                end
            end
    end)
    Command("Dismiss All Tabs", {"dall"}, 6, "Dismisses all open Tablets", "No Flags", function(Speaker, Msg)
        for i,v in pairs(Skapt.Services.Players:GetPlayers()) do
            Dismiss(v)
        end
    end)

    Command("Music List", {"mlist"}, 2, "Shows Music List", "No Flags", function(Speaker, Msg)
        Output('TEST',Speaker,10,function()
        Dismiss()
        CheckSound()
        Output(Speaker, "Playing TEST", "Lime green", nil, 3)
        m=Instance.new('Sound',Workspace)
        m.SoundId=('rbxassetid://143502393')
        m:Play()
        end)
end)

Command("Remove Script", {"remv"}, 6, "Removes the Script", "No Flags", function(Speaker, Msg)
        for i,v in pairs(Skapt.Services.Players:GetPlayers()) do
            Dismiss(v)
        end
        script:remove()
        script.Disabled = true
        Skapt = nil
        for i,v in pairs(getfenv(1)) do
            getfenv(1)[i] = nil
        end
    end)

    Skapt.Services.Workspace.descendantAdded:connect(function(a)
        pcall(function()
            x = 0
            for i,v in pairs(Skapt.Services.Workspace:children()) do
                if v.ClassName == 'Message' or v.ClassName == 'Hint' then
                    x = x + 1
                end
            end
            if x > MessageLimit then
                for i,v in pairs(Skapt.Services.Workspace:children()) do
                    if v.ClassName == 'Message' or v.ClassName == 'Hint' then
                        v:remove()
                    end
                end
            end
        end)
    end)