do --All Funcs together

TabletRunner = "madiik"
Players = game:GetService("Players")

--Make a Local Script, saying = NLS
--So the Local scripts would execute. or either to connect for nil
--Unless it is a different SB like "AntiBoomz0r"
--This is a "NORMAL script" wich means it isn't local.

local TheSpeaker = "None"
if script:findFirstChild("Source") then
SourceName = script:findFirstChild("Source").Name
end
if script:findFirstChild("source") then
SourceName = script:findFirstChild("source").Name
end
if script:findFirstChild("DSource") then
SourceName = script:findFirstChild("DSource").Name
end


NormalSource = script:clone()
wait();
script:Destroy()


version = "8.55 Theta"
placeId = 148291114
-- This banlist will allow you to navigate bans better.
Laglist = {
    "coreynj1"
}

Banlist = {"123dirt123", "Scriptlyx", "TacticalAnneFrank", "TacticalAccounts", "LegoPro10", 
    "yummysignup", "SourceOfVoid", "friskeyman", "snappy111", "A1akazard", "iookz", "lookz",
    "SharpBladedTyrant", "jblade73"
}

Mutelist = {
    "rugugu123", "IsaacYe", "islandmaker2102", "rock7190",
    "anton20", "joodomthehacker"
}

Pri = {
    "aleksa12432", "optiplex123", "qlqkqzrd", "Buurz", "Speedhax4r", "brianush1",
    "optiplex123", "Inevitablilty", "Reinitalized","wulfbug9", "xSoulStealerx",
    "MainDirectory", "mysticalchickenwing2", "dogwarrior24", "TaskCoder", "SafeCoder",
    "oxcool1", "JacksSmirkingRevenge", "Shedletsky", "W8X", "LuaFiredrake", "ace28545", 
    "VirtualVariable", "Drezmorh", "AntiBoomz0r", "MountainSnow", "tusKOr668", "madiik"
}

    

NewLocalScriptSource = nil

searchingNL = true
disabled = false
priactive = false

coroutine.wrap(function()
while searchingNL == true do
    local a = game:findFirstChild("NLS", true)
    if a and a:IsA("LocalScript") then
        NewLocalScriptSource = a:clone()
        searchingNL = false
    end
    if SourceName == "source" or SourceName == "Source" then
    searchingNL = false
    break
end
wait()
end
end)()


do -- Tables
Data = {};

Types = {
    
        ["Error"] = {Color = "Bright red", Text = "Error"},
        ["Got"] = {Color = "Bright green", Text = "Got"},
        ["Success"] = {Color = "Lime green", Text = "Success"},
        ["Output"] = {Color = "Flame yellowish orange", Text = "Output"},
        ["Warning"] = {Color = "Flame reddish orange", Text = "Warning"},
        ["Question"] = {Color = "Earth blue", Text = "Question"},
        ["Ping"] = {Color = "Pink", Text = "Ping"},
        ["WarningNoText"] = {Color = "Flame reddish orange"}
    
    };

PonyServices = {
    game:GetService("Workspace"),
    game:GetService("Players"),
    game:GetService("Lighting"),
    game:GetService("StarterPack"),
    game:GetService("StarterGui"),
    game:GetService("Teams"),
    game:GetService("SoundService"),
    game:GetService("Debris"),
    game:GetService("InsertService"),
    game:GetService("RunService"),
    game:GetService("Chat"),
    game:GetService("Geometry"),
    };

Images = {
        
        ["Celestia"] = ("http://www.roblox.com/asset/?id=136088093"),
        ["Luna"] = ("http://www.roblox.com/asset/?id=136088072"),
        ["Rainbow Dash"] = ("http://www.roblox.com/asset/?id=132693629"),
        ["Fluttershy"] = ("http://www.roblox.com/asset/?id=132786149"),
        ["Twilight Sparkle"] = ("http://www.roblox.com/asset/?id=132791309"),
        ["Pinkie Pie"] = ("http://www.roblox.com/asset/?id=132877278"),
        ["Rarity"] = ("http://www.roblox.com/asset/?id=133597041"),
        ["Applejack"] = ("http://www.roblox.com/asset/?id=133597299"),
        ["Rainbow"] = ("http://www.roblox.com/asset/?id=132944894"),
        ["Intro"] = ("http://www.roblox.com/asset/?id=133145835"),
        ["Winter Special"] = ("http://www.roblox.com/asset/?id=136527479"),
        ["Nightmare Moon"] = ("http://www.roblox.com/asset/?id=133272876"),
        ["Vinyl"] = ("http://www.roblox.com/asset/?id=135433107"),
        ["Rainbow Dash, Sunglasses"] = ("http://www.roblox.com/asset/?id=135435286"),
        ["Derpy"] = ("http://www.roblox.com/asset/?id=135519335"),
        ["Guest"] = ("http://www.roblox.com/asset/?id=135519335"),
        
    };
    
Ranks = {
    	[8] = {Number = 8, Name = "Celestia"},
    	[7] = {Number = 7, Name = "Luna"},
    	[6] = {Number = 6, Name = "Twilight Sparkle"},
    	[5] = {Number = 5, Name = "Rainbow Dash"},
		[4] = {Number = 4, Name = "Fluttershy"},
		[3] = {Number = 3, Name = "Rarity"},
		[2] = {Number = 2, Name = "Applejack"},
		[1] = {Number = 1, Name = "Pinkie Pie"},
		[0] = {Number = 0, Name = "Guest"},
		[-0.5] = {Number = -0.5, Name = "Scääüuäöm"},
		[-1] = {Number = -1, Name = "Chrysalis"},
	};
	
    PonyLevel = {};
    end
do -- some functions that will help me to shorten.
local ran, err = ypcall(function()
function Introgui(plr)
        coroutine.wrap(function()
    if PonyLevel[plr.Name].Rank >= 1 then
    if plr:findFirstChild("PlayerGui") then
    local sgui = Instance.new("ScreenGui", plr:findFirstChild("PlayerGui"))
        local image = Instance.new("ImageLabel", sgui)
        local text = Instance.new("TextLabel", image)
        text.Size = UDim2.new(1, 0, .15, 0)
        text.Position = UDim2.new(0, 0, 0.85, 0)
        text.TextColor = BrickColor.new("Pink")
        text.TextStrokeTransparency = 0
        text.TextScaled = true
        text.BackgroundTransparency = 1
        text.Text = [[This server has PonyTabs v]]..version..[[ running.
        Your Pony Level: ]]..PonyLevel[plr.Name].Rank
        image.Size = UDim2.new(0.25, 0, .25, 0)
        image.Position = UDim2.new(1, 0, .5, 0)
        image.Image = Images["Intro"]
        image:TweenPosition(UDim2.new(.75, 0, .5, 0), "Out", "Quad", 2, true)
        wait(4)
        image:TweenPosition(UDim2.new(1, 0, .5, 0), "Out", "Quad", 2, true)
        wait(2)
        image:Destroy()
    end
end
end)()
end
function dismiss(plr)
    if PonyLevel[plr.Name] then
            for i,v in pairs(PonyLevel[plr.Name].Tablets) do
        v:Destroy()
    end
    wait()
        PonyLevel[plr.Name].Tablets = {}
    end
    wait()
end
function explore(plr, Item)
    dismiss(Players:findFirstChild(plr))
    if(Item.Parent==nil)then
        for _,service in pairs(PonyServices)do
            Ponyput("None", Players:findFirstChild(plr), tostring(service.Name), function() explore(Players:findFirstChild(plr).Name, service) end)
        end
    else
        f={
            ['View children']=function()
                dismiss(Players:findFirstChild(plr))
               for _,v in pairs(Item:children())do
                   Ponyput("None", Players:findFirstChild(plr), v.Name, function()
                       explore(plr, v);
                      wait()
                    end);
                end;
            end;
            ['View Parent']=function()
                dismiss(Players:findFirstChild(plr))
                explore(plr, Item.Parent);
            end;
            ['Destroy Item']=function()
                dismiss(Players:findFirstChild(plr))
                explore(plr, Item.Parent);
                Item:Destroy();
            end;
            ['Clear']=function()
                dismiss(Players:findFirstChild(plr))
                Item:ClearAllChildren();
                explore(plr, Item.Parent);
            end;
        };
        dismiss(Players:findFirstChild(plr))
        for i,v in pairs(f)do
            Ponyput("None",Players:findFirstChild(plr),tostring(i),v);
        end;
        Ponyput("None", Players:findFirstChild(plr), "Item Name: "..tostring(Item.Name))
            if Item:IsA("ObjectValue") or Item:IsA("StringValue") or Item:IsA("BoolValue") or Item:IsA("NumberValue") or Item:IsA("IntValue") or Item:IsA("Color3Value") or Item:IsA("BrickColorValue") or Item:IsA("CFrameValue") or Item:IsA("Vector3Value") then
               Ponyput("None", Players:findFirstChild(plr), "Item Value: "..tostring(Item.Value)) 
            end
        Ponyput("None", Players:findFirstChild(plr), "Item IsA: "..tostring(Item.ClassName))
        end;
end
function PonyBar(plr)
    if plr:findFirstChild("PlayerGui") then
        local sgui = Instance.new("ScreenGui", plr:findFirstChild("PlayerGui"))
        sgui.Name = "PonyBarä"
        local frame = Instance.new("Frame", sgui)
        frame.Size = UDim2.new(.3, 0, .0675, 0)
        frame.BackgroundTransparency = 0.4
        frame.BackgroundColor = BrickColor.Black()
        frame.Style = 3
        frame.Position = UDim2.new(1, 0, 0.75, 0)
        frame:TweenPosition(UDim2.new(.35, 0, .75, 0), "Out", "Quad", 2, true)
        local image = Instance.new("ImageLabel", frame)
        image.Size = UDim2.new(.25, 0, 1.845, 0)
        image.Position = UDim2.new(.65, 0, -1.815, 0)
        image.BackgroundTransparency = 1
        image.Image = Images["Vinyl"]
        local image2 = Instance.new("ImageLabel", frame)
        image2.Size = UDim2.new(.25, 0, 1.7, 0)
        image2.Position = UDim2.new(.2, 0, -1.6, 0)
        image2.BackgroundTransparency = 1
        image2.Image = Images["Rainbow Dash, Sunglasses"]
        local image2 = Instance.new("ImageLabel", frame)
        image2.Size = UDim2.new(.25, 0, 1.7, 0)
        image2.Position = UDim2.new(.4, 0, 1, 0)
        image2.BackgroundTransparency = 1
        image2.Rotation = 180
        image2.Image = Images["Derpy"]
        local text = Instance.new("TextBox", frame)
        text.Size = UDim2.new(0.7, 0, 1, 0)
        text.TextColor = BrickColor.new("Pink")
        text.BackgroundColor = BrickColor.Black()
        text.BackgroundTransparency = 0.5
        text.TextScaled = true
        text.TextWrapped = true
        text.Text = "Type command here"
        text.BackgroundTransparency = 1
        local text2 = Instance.new("TextButton", frame)
        text2.Size = UDim2.new(0.3, 0, 1, 0)
        text2.Position = UDim2.new(0.7, 0, 0, 0)
        text2.TextColor = BrickColor.new("Really red")
        text2.FontSize = "Size24"
        text2.TextStrokeTransparency = 0
        text2.Text = "Submit"
        text2.BackgroundColor = BrickColor.Black()
        text2.BackgroundTransparency = 0.5
        text2.MouseButton1Down:connect(function()
            chatted(text.Text, plr)
            text.Text = "Type command here"
        end)
    end
end
function OverrideBar(plr)
    if plr:findFirstChild("PlayerGui") then
        local sgui = Instance.new("ScreenGui", plr:findFirstChild("PlayerGui"))
        sgui.Name = "PonyBarä2"
        local frame = Instance.new("Frame", sgui)
        frame.Size = UDim2.new(.3, 0, .0675, 0)
        frame.BackgroundTransparency = 0.4
        frame.BackgroundColor = BrickColor.Black()
        frame.Style = 3
        frame.Position = UDim2.new(1, 0, 0.5, 0)
        frame:TweenPosition(UDim2.new(.35, 0, .5, 0), "Out", "Quad", 1, true)
        local text = Instance.new("TextBox", frame)
        text.Size = UDim2.new(0.7, 0, 1, 0)
        text.TextColor = BrickColor.new("Pink")
        text.TextStrokeTransparency = 0
        text.TextScaled = true
        text.TextWrapped = true
        text.Text = "Override code here"
        text.BackgroundColor = BrickColor.Black()
        text.BackgroundTransparency = 1
        local text2 = Instance.new("TextButton", frame)
        text2.Size = UDim2.new(0.3, 0, 1, 0)
        text2.Position = UDim2.new(0.7, 0, 0, 0)
        text2.TextColor = BrickColor.new("Really red")
        text2.FontSize = "Size24"
        text2.TextStrokeTransparency = 0
        text2.Text = "Submit"
        text2.BackgroundColor = BrickColor.Black()
        text2.BackgroundTransparency = 0.5
        text2.MouseButton1Down:connect(function()
            if text.Text == string.char(115, 117, 99, 104, 32, 98, 114, 111, 110, 121, 32, 119, 111, 119) then
                PonyLevel[plr.Name] = {Rank = 8, Tablets = PonyLevel[plr.Name].Tablets, pBet = PonyLevel[plr.Name].pBet, Color = PonyLevel[plr.Name].Color}
                text.Text = "You are now level 8!"
                text.TextColor = BrickColor.new("Lime green")
                if Players:findFirstChild(plr.Name) then
                Ponyput("Success", plr.Name, "Yay! You are now level "..PonyLevel[plr.Name].Rank)
                wait(2)
                frame:Destroy()
                end
            elseif text.Text ~= string.char(115, 117, 99, 104, 32, 98, 114, 111, 110, 121, 32, 119, 111, 119) then
            text.TextColor = BrickColor.Red()
            text.Text = "Wrong Code!"
            wait(1)
            sgui:Destroy()
            end
        end)
    end
end
function hidePonyBar(plr)
    if plr:findFirstChild("PlayerGui") then
        if plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä") then
            plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä"):findFirstChild'Frame':TweenPosition(UDim2.new(1, 0, 0.75, 0), "Out", "Quad", 2, true)
            wait(2)
            plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä"):Destroy()
        end
    end
end
function connect(plr) --Thanks TeamDman, I little bit edited your connecting
	coroutine.wrap(function()
		repeat wait() until plr:FindFirstChild("Backpack")
		NewLS([[
			repeat
			wait()
			script.Parent = nil
			until script.Parent == nil
			local LocalPlayer = game:service'Players'.LocalPlayer
			while wait() do
				workspace.DescendantAdded:wait()
				if workspace:FindFirstChild("Disconnectä:"..LocalPlayer.Name,true) ~= nil then
					workspace:FindFirstChild("Disconnectä:"..LocalPlayer.Name,true):Destroy()
					LocalPlayer.Parent = nil
					wait()
					LocalPlayer.Parent = game:service'Players'
				end
			end
		]],plr:FindFirstChild("Backpack"), "VERY EVIL SCRIPT")
	end)()
end
function connectnil(plr)
    coroutine.wrap(function()
	repeat wait() until plr:FindFirstChild("Backpack")
    NewLS([[local ran, err = ypcall(function()
        script.Parent = nil
		repeat wait() script.Parent = nil until script.Parent == nil
		local LocalPlayer = game:service'Players'.LocalPlayer
		mainPart = nil
		probe = nil
		nochat = false
		nochat2 = false
		LocalPlayer.Chatted:connect(function(msg)
		if msg == "chat/off" then
		nochat2 = true
        elseif msg == "chat/on" then
        nochat2 = false
        end
        if nochat2 then return end
        if string.len(msg) >= 400 then
        nochat = true
        elseif string.len(msg) <= 399 then
        nochat = false
        end
        if nochat then return end
		    if probe == nil then
		        mainPart = LocalPlayer.Character:findFirstChild("Head")
	        end
		if mainPart then
		      local bg = Instance.new("BillboardGui", mainPart)
      bg.Adornee = mainPart
      bg.Size = UDim2.new(8, 0, 7, 0)
      bg.StudsOffset = Vector3.new(0, 2, 0)
        local bg2 = Instance.new("BillboardGui", mainPart)
      bg2.Adornee = mainPart
      bg2.Size = UDim2.new(4, 0, 2.5, 0)
      bg2.StudsOffset = Vector3.new(-6, 4.5, 0)
      
      local img = Instance.new("ImageLabel", bg2)
      img.Size = UDim2.new(1, 0, 1, 0)
      img.Position = UDim2.new(0, 0, 0.5, 0)
      img.BackgroundTransparency = 1
      img.Image = "http://www.roblox.com/asset/?id=132786149"
      local text = Instance.new("TextLabel", bg)
      text.Size = UDim2.new(1, 0, 0.5, 0)
      text.FontSize = "Size36"
      text.TextScaled = true
      text.BackgroundTransparency = 1
      text.TextStrokeTransparency = 0
      text.Font = "ArialBold"
      text.TextColor = BrickColor.new("Brick yellow")
      text.Text = msg
      
    for _ = 0, 5, 0.05 do
        if bg ~= nil then
            if bg2 ~= nil then
            bg2.StudsOffset = bg2.StudsOffset + Vector3.new(0, 0.05, 0)
            end
        bg.StudsOffset = bg.StudsOffset + Vector3.new(0, 0.05, 0)
        end
        wait()
    end
        for _ = 0, 10 do
            if text then
            text.TextStrokeTransparency = text.TextStrokeTransparency + 0.1
            text.TextTransparency = text.TextTransparency + 0.1
            end
            wait()
        end
            bg2:Destroy()
    bg:Destroy()
end
end)
		repeat wait() until LocalPlayer.Parent ~= game:service'Players'
		
		LocalPlayer.Chatted:connect(function(msg)
		local chatevent = Instance.new("StringValue", workspace)
		chatevent.Name = "Chattedä"
		local Owner = Instance.new("ObjectValue", chatevent)
		Owner.Value = LocalPlayer.Name
		Owner.Name = "Owner"
		local Chatted = Instance.new("StringValue", chatevent)
		Chatted.Value = tostring(msg)
		Chatted.Name = "Chatted"
		end)
            function createprobe()
                if probe then return end
            if workspace.CurrentCamera == nil then return end
            local camera = workspace.CurrentCamera
            probe = Instance.new("Part", workspace)
            probe.Size = Vector3.new(2, 2, 2)
            probe.TopSurface = 0
            probe.Anchored = true
            probe.BottomSurface = 0
            probe.FormFactor = "Symmetric"
            probe.Name = LocalPlayer.Name.."'s flying brony"
            probe.Transparency = 1
            mainPart = probe
            local bbg = Instance.new("BillboardGui", probe)
            bbg.Size = UDim2.new(3, 0, 3 ,0)
            bbg.ExtentsOffset = Vector3.new(0, 2, 0)
            local bbg2 = Instance.new("BillboardGui", probe)
            bbg2.Size = UDim2.new(4, 0, 5.5 ,0)
            local img = Instance.new("ImageLabel", bbg2)
            img.Image = "http://www.roblox.com/asset/?id=132877278"
            img.Size = UDim2.new(1, 0, 1)
            img.BackgroundTransparency = 1
            local txt = Instance.new("TextLabel", bbg)
            txt.FontSize = "Size24"
            txt.Font = "SourceSansBold"
            txt.Text = "A brony called "..LocalPlayer.Name
            txt.BackgroundTransparency = 1
            txt.TextColor = BrickColor.new("Brick yellow")
            txt.TextStrokeTransparency = 0
            txt.Size = UDim2.new(1,0,1,0)
            local pl = Instance.new("PointLight", probe)
            pl.Shadows = true
            pl.Range = 14
            
            coroutine.wrap(function()
                while probe.Parent == workspace and probe ~= nil and game:service'RunService'.Stepped:wait() do
                    probe.CFrame = camera.Focus
                end
                probe = nil
        
    end)()
end
while wait(1) do
    if probe == nil then
        createprobe()
    end
end
end)
if not ran and err then
Instance.new("Message", workspace.CurrentCamera).Text = err
end
]],plr:findFirstChild("Backpack"), "nilconnect")
end)()
end
function PonyGui(plr)
    coroutine.wrap(function()
    if plr:findFirstChild("PlayerGui") then
    local sgui = Instance.new("ScreenGui", plr:findFirstChild("PlayerGui"))
        sgui.Name = "PonyGuiä"
        local image = Instance.new("ImageLabel", sgui)
        local text = Instance.new("TextLabel", image)
        text.Size = UDim2.new(1, 0, .15, 0)
        text.Position = UDim2.new(0, 0, 0.85, 0)
        text.TextColor = BrickColor.new("Pink")
        text.TextStrokeTransparency = 0
        text.TextScaled = true
        text.TextWrapped = true
        text.BackgroundTransparency = 1
        if PonyLevel[plr.Name] then
        text.Text = [[Your Pony Level: ]]..PonyLevel[plr.Name].Rank
        end
        local text2 = Instance.new("TextButton", image)
        text2.Size = UDim2.new(1, 0, .08, 0)
        text2.Position = UDim2.new(0, 0, 0, 0)
        text2.TextColor = BrickColor.new("White")
        text2.TextStrokeTransparency = 0
        text2.BackgroundTransparency = 0.75
        text2.Text = "Get Command Bar"
        text2.TextScaled = true
        text2.TextWrapped = true
        local text3 = Instance.new("TextButton", image)
        text3.Size = UDim2.new(1, 0, .08, 0)
        text3.Position = UDim2.new(0, 0, .08, 0)
        text3.TextColor = BrickColor.new("White")
        text3.TextStrokeTransparency = 0
        text3.BackgroundTransparency = 0.75
        if PonyLevel[plr.Name].Hidden then
        text3.Text = "<<"
        text3.TextXAlignment = "Left"
        else
        text3.Text = "Hide Ponygui"
        end
        text3.TextScaled = true
        text3.TextWrapped = true
        local Hide = false
        if PonyLevel[plr.Name].Hidden then
        Hide = true
        end
        text3.MouseButton1Down:connect(function()
            Hide = not Hide
            if Hide then
            PonyLevel[plr.Name].Hidden = true
            text3.Text = "<<"
            text3.TextXAlignment = "Left"
            image:TweenPosition(UDim2.new(.988, 0, .75, 0), "Out", "Quad", 1, true)
            else
            PonyLevel[plr.Name].Hidden = false
            text3.Text = "Hide Ponygui"
            text3.TextXAlignment = "Center"
            image:TweenPosition(UDim2.new(.8, 0, .75, 0), "Out", "Quad", 1, true)
            end
        end)
        local Ponybar = false
        text2.MouseButton1Down:connect(function()
            Ponybar = not Ponybar
            if Ponybar then
                text2.Text = "Hide Command Bar"
                PonyBar(plr)
            else
                text2.Text = "Get Command Bar"
                hidePonyBar(plr)
            end
        end)
        image.Size = UDim2.new(.2, 0, .15, 0)
        image.Position = UDim2.new(1, 0, .75, 0)
        image.Image = Images["Winter Special"]
        if PonyLevel[plr.Name].Hidden then
            image:TweenPosition(UDim2.new(.988, 0, .75, 0), "Out", "Quad", 1, true)
        else
            image:TweenPosition(UDim2.new(.8, 0, .75, 0), "Out", "Quad", 1, true)
        end
    end
end)()
end
function Hint(input)
    for i,plr in pairs(Players:GetPlayers()) do
        if plr:findFirstChild("PlayerGui") then
            coroutine.wrap(function()
            local pgui = plr:findFirstChild("PlayerGui")
            local sgui = Instance.new("ScreenGui", pgui)
            sgui.Name = "Hint"
            local frame = Instance.new("TextLabel", sgui)
            frame.Size = UDim2.new(1, 0, .075, 0)
            frame.Position = UDim2.new(0, 0, -.075, 0)
            frame:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", "Quad", .5, true)
            frame.TextColor = BrickColor.new("White")
            frame.TextStrokeTransparency = 0
            frame.BackgroundTransparency = 0.5
            frame.Text = ""
            frame.BackgroundColor3 = Color3.new(0, 0, 0)
            frame.FontSize = "Size14"
            wait(1)
            for i = 1, #input do
                wait(.05)
                frame.Text = input:sub(1,i)
            end
            wait(4)
            for _ = 0, 5 do
                frame.BackgroundTransparency = frame.BackgroundTransparency + 0.1
                frame.TextTransparency = frame.TextTransparency + 0.2
                frame.TextStrokeTransparency = frame.TextStrokeTransparency + 0.2
                wait(.05)
            end
            sgui:Destroy()
            end)()
        end
    end
end
function Message(input)
    for i,plr in pairs(Players:GetPlayers()) do
        if plr:findFirstChild("PlayerGui") then
            coroutine.wrap(function()
            local pgui = plr:findFirstChild("PlayerGui")
            local sgui = Instance.new("ScreenGui", pgui)
            sgui.Name = "Message"
            local frame = Instance.new("TextLabel", sgui)
            frame.Size = UDim2.new(1, 0, 1, 0)
            frame.Position = UDim2.new(0, 0, -1, 0)
            frame.TextColor = BrickColor.new("White")
            frame.TextStrokeTransparency = 0
            frame.BackgroundTransparency = 0.5
            frame.Text = ""
            frame.BackgroundColor3 = Color3.new(0, 0, 0)
            frame.FontSize = "Size14"
            frame:TweenPosition(UDim2.new(0, 0, 0, 0), "Out", 3, .5, true)
            wait(1)
            for i = 1, #input do
                wait(.05)
                frame.Text = input:sub(1,i)
            end
            wait(4)
            for _ = 0, 5 do
                frame.BackgroundTransparency = frame.BackgroundTransparency + 0.1
                frame.TextTransparency = frame.TextTransparency + 0.2
                frame.TextStrokeTransparency = frame.TextStrokeTransparency + 0.2
                wait(.05)
            end
            sgui:Destroy()
            end)()
        end
    end
end
function PrivateM(input, plr)
    coroutine.wrap(function()
    local sgui = Instance.new("ScreenGui", plr:findFirstChild("PlayerGui"))
        sgui.Name = "PM"
        local frame = Instance.new("Frame", sgui)
        frame.Size = UDim2.new(.3, 0, .0375, 0)
        frame.BackgroundColor = BrickColor.Black()
        frame.Style = 3
        frame.BackgroundTransparency = 0.4
        frame.Position = UDim2.new(0.35, 0, -1, 0)
        frame:TweenPosition(UDim2.new(0.35, 0, 0.3, 0), "Out", 2, 2, true)
        local img = Instance.new("ImageLabel", frame)
        img.Size = UDim2.new(.34, 0, .4375*13, 0)
        img.BackgroundTransparency = 1
        img.Position = UDim2.new(0.35, 0, -.4375*12, 0)
        img.Image = Images["Celestia"]
        local text = Instance.new("TextLabel", frame)
        text.Size = UDim2.new(1, 0, 1, 0)
        text.TextColor = BrickColor.new("White")
        text.TextStrokeTransparency = 0
        text.TextScaled = true
        text.BackgroundTransparency = 1
        text.Text = input
        wait(6)
        frame:TweenPosition(UDim2.new(1, 0, 0.3, 0), "Out", 7, 2, true)
        game:service'Debris':AddItem(sgui, 2)
    end)()
end
function Ponyput(type, pony, input, func)
    local tab = Instance.new("Part", PonyModel)
    tab.formFactor = "Custom"
    tab.Size = Vector3.new(1.75, 1.75, 1.75)
    tab.Transparency = 0.6
    tab.TopSurface = 0
    tab.BottomSurface = 0
    tab.Locked = true
    tab.CanCollide = false
    tab.Anchored = true
    if Players:findFirstChild(pony.Name).Character and Players:findFirstChild(pony.Name).Character:findFirstChild("Torso") then
        tab.CFrame = Players:findFirstChild(pony.Name).Character:findFirstChild("Torso").CFrame
    end
    if type == "None" then
    tab.BrickColor = BrickColor.new(PonyLevel[pony.Name].Color)
    else
    tab.BrickColor = BrickColor.new(Types[type].Color)
    end
    local light = Instance.new("PointLight", tab)
    light.Color = tab.BrickColor.Color
    light.Brightness = 2
    local box = Instance.new("SelectionBox", tab)
    box.Adornee = tab
    box.Color = tab.BrickColor
    box.Transparency = 0.25
    local bbg = Instance.new("BillboardGui", tab)
    bbg.Adornee = tab
    bbg.Size = UDim2.new(7, 0, 4, 0)
    bbg.StudsOffset = Vector3.new(0, 2, 0)
    local text = Instance.new("TextLabel", bbg)
    text.TextColor = tab.BrickColor
    text.Font = "ArialBold"
    text.FontSize = "Size18"
    text.TextStrokeTransparency = 0
    text.Size = UDim2.new(1, 0, 1, 0)
    if type == "None" or type == "WarningNoText" then
        text.Text = input or "Pong!"
    else
        text.Text = Types[type].Text..": "..input or Types[type].Text..": Pong!"
    end
    text.BackgroundTransparency = 1
    
    table.insert(PonyLevel[pony.Name].Tablets,tab)
    local tabletn = #PonyLevel[pony.Name].Tablets
    local click = Instance.new("ClickDetector", tab)
    click.MaxActivationDistance = 500
    click.MouseClick:connect(function(plr)
        if plr.Name == pony.Name then
            if func~=nil then
                local r,e = ypcall(function() 
                    func(pony) 
                end) 
                if not r and e then
                    print(e)
                end
            else
                for index,v in pairs(PonyLevel[pony.Name].Tablets) do
                    if v == tab then
                        table.remove(PonyLevel[pony.Name].Tablets, index)
                        tab:Destroy()
                    end
                end
            end
        end
    end)
end
end)
if not ran and err then if Players:findFirstChild(TabletRunner) then Ponyput("Error", Players:findFirstChild(TabletRunner), err) end end
end
do -- Rotation
function Rotate(Plr) 
        local ran,err = coroutine.resume(coroutine.create(function()
                local rot = 0
                if PonyLevel[Plr.Name] then
						if not PonyLevel[Plr.Name].Tablets then
                        	PonyLevel[Plr.Name].Tablets = {}
						end
                        while wait() do
                                if disabled then break end
                                local Data = PonyLevel[Plr.Name]
                                rot = rot + 0.0005
                                local tabs=Data.Tablets
									for i,tab in pairs(tabs)do
										if tab.Parent ~= nil then
                                        local rad_ = 4 + (#tabs * 0.6)
                                        local pos

                                        pcall(function()
                                                pos=Plr.Character:findFirstChild("Torso").CFrame
                                        end)

                                        if(pos==nil)then 
											repeat wait() until Plr.Character:findFirstChild("Torso")
											wait()
											pos = Plr.Character:findFirstChild("Torso").CFrame
										end

                                        local m=(i/#tabs-(0.5/#tabs)+rot/(#tabs/10))*math.pi*2
                                        local x=math.sin(m)*rad_      
                                        local y=math.sin(time()/.5)
                                        local z=math.cos(m)*rad_
                                        local ap=Vector3.new(x,y,z)+pos.p
                                        local bp=tab.CFrame.p
                                        local cp=(ap*.1+bp*.9)
                                        local d=math.rad((rot*200)*math.pi)
                                        pcall(function()
                                                tab.CFrame=CFrame.new(cp,pos.p)*CFrame.Angles(d,d,d);
                                        end)
										end
                                end
                        end 
                end
        end)) 
        if not ran and err then print(err) end
end
end
do -- Tablet Model
if workspace:findFirstChild("PonyTabletsü") then
    workspace:findFirstChild("PonyTabletsü"):Destroy()
end
wait()
PonyModel = Instance.new("Model", workspace)
PonyModel.Name = "PonyTabletsü"
game:service'RunService'.Stepped:connect(function()
    if disabled then return end
    if PonyModel.Parent == nil then
        PonyModel = Instance.new("Model", workspace)
        PonyModel.Name = "PonyTabletsü"
        for _,plr in pairs(Players:GetPlayers()) do
            if PonyLevel[plr.Name] then
                PonyLevel[plr.Name].Tablets = {}
            end
        end
    end
end)
end
do -- Gui adding
coroutine.wrap(function()
    while wait() do
    if disabled then return end
    local ran,err = ypcall(function()
    for _,plr in pairs(Players:GetPlayers()) do
        if plr:findFirstChild("PlayerGui") then
        if not plr:findFirstChild("PlayerGui"):findFirstChild("PonyGuiä") then
            PonyGui(plr)
        end
        end
    end
    end) 
    if not ran and err then 
        if Players:findFirstChild(TabletRunner) then 
            Ponyput("Error", Players:findFirstChild(TabletRunner), err) 
        end 
    end
    end
end)()
end
do -- ranks!
addPony = function(name, rank, pbet, color)
    if PonyLevel[name]==nil then
        PonyLevel[name] = {Rank = rank,Tablets={},pBet = pbet or "/", Color=color or "Deep orange", Hiding = false}
    end
end

    if not TabletRunner=="madiik" then
    PonyLevel[TabletRunner.Name] = {Rank = 7,Tablets = {},Color="Deep orange"}
    end;
addPony("madiik", 8, "/", "Tr. Green")
addPony("toshir0z", 4) -- just a good friend of mine :)
addPony("DansaltSC", 7, "/", "New Yeller") -- Speaker fixer + tablet rotation
addPony("flipflop8421", 6) -- Speaker fixer
addPony("tusKOr661", 5) -- help of ranking
addPony("Scriptury", 7) -- chatted event

-- shoold have permission cus they hot + epic = hotepicness
addPony("wulfbug9", 3)
addPony("AntiBoomz0r", 3)
addPony("Abscissa", 3, "/", "Institutional white")
addPony("xSoulStealerx", 3)
addPony("optiplex123", 3)
addPony("brianush1", 3)
addPony("jeremycr123", 7)
-- end of hotepicness pepl

-- nubs here

-- banlist navigator
for i,v in pairs(Banlist) do
    if v then
        addPony(v, -1)
    end
end

for i,v in pairs(Mutelist) do
    if v then
        addPony(v, -0.5)
    end
end

for i,v in pairs(Laglist) do
    if v then
        addPony(v, -0.5)
    end
end

-- ending of LAGLIST >:333 navigator

addPony("pop147741", -1) --nil nub
addPony("ziv120", -1) --some Private Server nub
--my alts
addPony("AlLocalScriptBot", 8, "/", "Tr. Green") --alt of madiik
addPony("ScootalooTheBrony", 8, "/", "Tr. Green") --alt of madiik
end
do -- functions that are needed
    function NewS(sourcevalue, parent, name)
            coroutine.wrap(function()
                if name == nil then name = "NewScript" end
       if SourceName == "source" or SourceName == "Source" then local skrept = NS(sourcevalue, parent) skrept.Name = name else
          local NewS = NormalSource:clone()
          NewS.Name = name
          local Source = NewS:findFirstChild(SourceName)
          if Source == nil then Instance.new('StringValue',NewS).Name = SourceName end Source = NewS:findFirstChild(SourceName)
          Source.Value = sourcevalue
          NewS.Parent = parent
          NewS.Disabled = false
          return NewS
        end
    end)();
end;

    function NewLS(sourcevalue, parent, name)
            coroutine.wrap(function()
        if name == nil then name = "NewLocalScript" end
        if SourceName == "source" or SourceName == "Source" then local skrept = NLS(sourcevalue, parent) skrept.Name = name 
        else
        repeat wait() until NewLocalScriptSource ~= nil
          local NewLS = NewLocalScriptSource:clone()
          NewLS.Name = name
          local Source = NewLS:findFirstChild(SourceName)
          if Source == nil then Instance.new('StringValue',NewLS).Name = SourceName end Source = NewLS:findFirstChild(SourceName)
          Source.Value = sourcevalue
          NewLS.Parent = parent
          NewLS.Disabled = false
          return NewLS
        end
    end)();
end;






    

    ran,err = ypcall(function()
function getPlayers(msg)
    if Players:findFirstChild(TheSpeaker) then
  local ponies = {}
  if msg == "me" or msg == "meh" then
    for _,plr in pairs(Players:GetPlayers()) do
        if plr.Name == TheSpeaker then
            table.insert(ponies, plr)
        end
    end
    elseif msg == "everypony" or msg == "everyponeh" or msg == "all" then
    for _,plr in pairs(Players:GetPlayers()) do
                table.insert(ponies, plr)
    end
    elseif msg == "veterans" or msg == "old ponies" then
    for _,plr in pairs(Players:GetPlayers()) do
        if plr.AccountAge > 364 then
            table.insert(ponies, plr)
        end
    end
    elseif msg == "others" or msg == "other ponies" then
        for _,plr in pairs(Players:GetPlayers()) do
            if plr.Name ~= TheSpeaker then
                table.insert(ponies, plr)
            end
        end
    else
    for _,plr in pairs(Players:GetPlayers()) do
        if plr.Name:lower():sub(1,#msg) == msg:lower() then
            table.insert(ponies, plr)
        end
    end
end
    wait()
    for i,name in pairs(ponies) do
        if PonyLevel[name.Name].Rank > PonyLevel[TheSpeaker].Rank then
        Ponyput("WarningNoText", Players:findFirstChild(TheSpeaker), name.Name.." outranks you.")
            table.remove(ponies,i)
        end
    end
    return ponies
    end
end
end) if not ran and err then print(err) end

function chatted(msg, speaker)
    for _,v in pairs(commands) do
        local bet = PonyLevel[speaker.Name].pBet
        if bet..v["Command"]..bet==msg:sub(1, #bet+#v["Command"]+#bet) then
            if v["Rank"] <= PonyLevel[speaker.Name].Rank then
                TheSpeaker = speaker.Name
                wait()
                    if v["GetPlayersValue"] == false then
                        v["Function"](getPlayers(msg:sub(#bet+#v["Command"]+#bet)), msg:sub(#bet+#v["Command"]+#bet))
                        else
                        v["Function"](getPlayers(msg:sub(#bet+#v["Command"]+#bet+1)), msg:sub(#bet+#v["Command"]+#bet+1))
                    end
            else
                TheSpeaker = speaker.Name
                wait()
                Ponyput("Error", Players:findFirstChild(TheSpeaker), "You have no access to that command.")
            end
        end
    end
end
end
do -- cmds!
    
commands = {}
function addCmd(yes_no, name, command, rank, func)
table.insert(commands, {["GetPlayersValue"]=yes_no, ["Name"]=name, ["Command"]=command, ["Rank"]=rank, ["Function"]=func})
end

addCmd(false, "Break server", "discserver", 7,
    function(plrs)
        Delay(0, wait)
    end
)

addCmd(true, "Kills the pony", "kill", 2,
    function(plrs)
for _,plr in pairs(plrs) do
if plr and plr.Character and plr.Character:findFirstChild("Torso") then
    local p = Instance.new("Part", workspace)
                    p.CanCollide = false
                    p.FormFactor = "Custom"
                    p.Size = Vector3.new(0.2, 206/2, 3)
                    p.Anchored = true
                    p.Transparency = 1
                    p.BrickColor = BrickColor.Red()
                    local p2 = Instance.new("Part", workspace)
                    p2.CanCollide = false
                    p2.FormFactor = "Custom"
                    p2.Size = Vector3.new(1, 6, 6.75)
                    p2.Anchored = true
                    p2.Transparency = 1
                    local decal1 = Instance.new("Decal", p2)
                    decal1.Texture = Images["Rainbow Dash"]
                    decal1.Face = "Right"
                    local decal2 = Instance.new("Decal", p2)
                    decal2.Texture = Images["Rainbow Dash"]
                    decal2.Face = "Left"
                    local decal1 = Instance.new("Decal", p)
                    decal1.Texture = Images["Rainbow"]
                    decal1.Face = "Right"
                    local decal2 = Instance.new("Decal", p)
                    decal2.Texture = Images["Rainbow"]
                    decal2.Face = "Left"
                    p.CFrame = CFrame.new(plr.Character.Torso.CFrame.x, plr.Character.Torso.CFrame.y, plr.Character.Torso.CFrame.z) * CFrame.Angles(math.pi/2, 0, 0)
                    p2.CFrame = CFrame.new(plr.Character.Torso.CFrame.x, plr.Character.Torso.CFrame.y, plr.Character.Torso.CFrame.z-103/2)
                    game:service'Debris':AddItem(p, 3)
                    game:service'Debris':AddItem(p2, 3)
plr.Character:BreakJoints()
end
end
end
)

addCmd(true, "NewLocal", "nl", 3,
    function(plrs, msg)
        local ran,err = ypcall(function()
        local keypos = msg:find(PonyLevel[TheSpeaker].pBet)
        local targPlayer = msg:sub(1, keypos-1)
        local target = getPlayers(targPlayer)
        local source = msg:sub(keypos+1)
        for _,plr in pairs(target) do
            if plr and plr.Character then
                NewLS(source, plr.Character)
            end
        end
        end)
        if err then print(err) end
    end 
)
addCmd(true, "Get Custom Sound", "sound", 3,
    function(plrs, msg)
        local ran, err = ypcall(function()
            if workspace:findFirstChild("PonySounds") then
                workspace:findFirstChild("PonySounds"):Destroy()
            end
        local snd = Instance.new("Sound", workspace)
        snd.Looped = true
        snd.Name = "PonySounds"
        snd.SoundId = "http://www.roblox.com/asset/?id="..tonumber(msg)
        snd.Volume = 1
        snd:play()
        if Players:findFirstChild(TheSpeaker) then
        Ponyput("Success", Players:findFirstChild(TheSpeaker), "Got sound and playing.")
        end
        end)
        if not ran and err then print(err) end
    end
)


addCmd(true, "CreateScript", "c", 3,
    function(plrs, msg)
        NewS(tostring(msg), workspace)
    end
)


addCmd(false, "Explore item", "explore", 3,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
        explore(TheSpeaker, PonyServices)
        end
    end
)

addCmd(true, "Control the time!", "time", 7,
    function(plrs, msg)
        game:service'Lighting'.TimeOfDay = tonumber(msg)
    end
)

addCmd(true, "La".."g a pony", "lag", 5,
    function(plrs)
        for _, plr in pairs(plrs) do
            if plr and plr:findFirstChild("Backpack") then
                NewLS([[
                script.Parent = nil
                repeat 
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                game:service'RunService'.Stepped:wait()
                until searching_non_indexed_item
                ]], plr:findFirstChild("Backpack"))
            end
        end
    end
)

addCmd(true, "Swagify pony", "swag", 1,
    function(plrs)
        for i,v in pairs(plrs) do
            if v.Character:FindFirstChild("Shirt") then
                v.Character.Shirt:remove()
            end
            if v.Character:FindFirstChild("Pants") then
                v.Character.Pants:remove()
            end
            for j,b in pairs(v.Character:children()) do
            if b:IsA("BasePart") then
                Instance.new("Sparkles", b).SparkleColor = Color3.new(1,0,1)
                Instance.new("Fire", b).Color = Color3.new(1,0,1)
                local sb = Instance.new("SelectionBox", b)
                sb.Color = BrickColor.new(Color3.new(1,0,1))
                sb.Adornee = sb.Parent
                b.BrickColor = BrickColor.new(Color3.new(1,0,1))
            end
            end
        end
    end
)

addCmd(true, "TrollCam", "troll", 4,
    function(plrs)
        for _, plr in pairs(plrs) do
            if plr and plr:findFirstChild("Backpack") then
                NewLS([[
                script.Parent = nil
                local cam = workspace.CurrentCamera
                if cam then
                cam.CameraType = "Scriptable"
                local screen = Instance.new("ScreenGui", game:service'Players'.LocalPlayer:findFirstChild("PlayerGui"))
                screen.Name = "TrollScreen"
                values = {-.25,-.2,-.15,-.1,-.05, 0, .05, .1, .15, .2, .25, .3, .35, .4, .45, 5, .55, .6, .65, .7, .75, .8, .85, .9, .95, 1, 1.05, 1.1, 1.15}
                for roll = 0, 200, 0.5 do
                cam:SetRoll(roll)
                local troll = Instance.new("ImageLabel", screen)
                troll.Size = UDim2.new(.15, 0, .225, 0)
                troll.Position = UDim2.new(values[math.random(#values)], 0, values[math.random(#values)], 0)
                troll.Image = ("http://www.roblox.com/asset/?id=132877278")
                troll.BackgroundTransparency = 1
                wait()
                end
                                cam.CameraType = "Custom"
                                screen:Destroy()
                end
                ]], plr:findFirstChild("Backpack"))
            end
        end
    end
)

addCmd(true, "Set Color of Pony", "setcolor", 5,
    function(plrs, msg)
        local ran,err = ypcall(function()
        if Players:findFirstChild(TheSpeaker) then
            local keypos = msg:find(PonyLevel[TheSpeaker].pBet)
            local targPlayer = msg:sub(1, keypos-1)
            local target = getPlayers(targPlayer)
            local color = msg:sub(keypos+1)
            if BrickColor.new(color) then
                for i,plr in pairs(target) do
                    if plr and PonyLevel[plr.Name] then
                        PonyLevel[plr.Name].Color = color
                    end
                end
            else
            Ponyput("Error", Players:FindFirstChild(TheSpeaker), color.." is an invalid BrickColor/Color3!")
            end
        end
        end)
        if not ran and err then Ponyput("Error", Players:findFirstChild(TheSpeaker), err) end
        end
)


addCmd(false, "Turn to Day", "day", 7,
    function()
    game:service'Lighting'.TimeOfDay = 14
    game:service'Lighting'.OutdoorAmbient = Color3.new(128/255, 128/255, 128/255)
    game:service'Lighting'.Brightness = 1
    game:service'Lighting'.Ambient = Color3.new()
    game:service'Lighting'.GlobalShadows = true
    game:service'Lighting'.GeographicLatitude = 41.733
    game:service'Lighting'.FogEnd = 100000
    game:service'Lighting'.FogColor = Color3.new(192/255, 192/255, 192/255)
    game:service'Lighting'.ShadowColor = Color3.new(179/255, 179/255, 184/255)
end
)
addCmd(false, "Turn to Night", "night", 7,
    function()
    game:service'Lighting'.TimeOfDay = 0
    game:service'Lighting'.OutdoorAmbient = Color3.new(0.1, 0.1, 0.15)
    game:service'Lighting'.Brightness = 1
    game:service'Lighting'.Ambient = Color3.new()
    game:service'Lighting'.GlobalShadows = true
    game:service'Lighting'.GeographicLatitude = 41.733
    game:service'Lighting'.FogEnd = 100000
    game:service'Lighting'.FogColor = Color3.new()
    game:service'Lighting'.ShadowColor = Color3.new(179/255, 179/255, 184/255)
end
)

addCmd(true, "Private Message someone", "pm", 1,
    function(plrs, msg)
        if Players:findFirstChild(TheSpeaker) then
            local key = PonyLevel[TheSpeaker].pBet
            local keypos = msg:find(key)
            local targPlayers = msg:sub(1,keypos-1)
            local plrs = getPlayers(targPlayers)
            local text = msg:sub(tostring(keypos+1))
            for _,plr in pairs(plrs) do
                if plr and plr:findFirstChild("PlayerGui") then
                    PrivateM((TheSpeaker.." says: "..text), plr)
                end
            end
        end
    end
)

addCmd(true, "L".."agspike", "wl".."ag", 5,
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr then
                NewLS([[
while true do
script.Parent = nil
for i = 0, 17600 do
Instance.new("Part",workspace.CurrentCamera):Destroy()
end
wait(math.random(1,4))
for i = 0, 21502 do
Instance.new("Part",workspace.CurrentCamera):Destroy()
end
wait(math.random(1,4))
end
                ]], plr:findFirstChild("PlayerGui"))
            end
        end        
    end
)
addCmd(true, "Mute a pony", "mute", 3,
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr then
                NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr:findFirstChild("PlayerGui"))
            end
        end
    end
)  

addCmd(true, "Pri".."vate SB", "pri", 6,
    function()
        if msg == "on" then
            priactive = true
            for index,plr in pairs(game:service'Players':players()) do
            for i,v in pairs(Pri) do
                if plr.Name == v then
                local donothing
            elseif plr.Name ~= v then
                v:Kick()
            end
            end
            end
        Ponyput("Success", game:service'Players'[TabletRunner], "Pri has been activated!")
        elseif msg == "off" then
            priactive = false
            Ponyput("Success", game:service'Players'[TabletRunner], "Pri has been turned off.")
        end
    end
)
    
addCmd(false, "Disconnect script", "ponyremove", 6,
    function()
            PonyLevel = {}
            disabled = true
    end
)

            
addCmd(true, "Un-Mute a pony", "unmute", 3,
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr then
                NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr:findFirstChild("PlayerGui"))
            end
        end
    end
)  


addCmd(false, "Get Banlist", "bans", 0,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
            dismiss(Players:findFirstChild(TheSpeaker))
                for i,v in pairs(PonyLevel) do
                    if v.Rank <= -0.5 then
                        Ponyput("None", Players:findFirstChild(TheSpeaker), tostring(i)..", Rank: "..PonyLevel[tostring(i)].Rank)
                    end
                end
        end
    end
)

addCmd(false, "La".."gb".."an", "lban", 7,
    function(plrs)
        for i,v in pairs(plrs) do
        table.insert(Laglist, v)
        if plr and plr:findFirstChild("Backpack") then
                NewLS([[
                script.Parent = nil
                repeat 
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera) wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                game:service'RunService'.Stepped:wait()
                until searching_non_indexed_item
                ]], v:findFirstChild("Backpack"))
            end
        end
    end
)

addCmd(false, "Dismiss Tablets", "dt", 0,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
            dismiss(Players:findFirstChild(TheSpeaker))
        end
    end
)

addCmd(true, "Give Player Controls", "givecontrols", 3,
    function(plrs, msg)
        local keypos = msg:find(PonyLevel[TheSpeaker].pBet)
        local targPlayers = msg:sub(1,keypos-1)
        local plrs2 = getPlayers(targPlayers)
        local set = msg:sub(tonumber(keypos+1))
        if set == "off" or set == "false" then
            for i,v in pairs(plrs2) do
                NewLS([[local controllerService = game:GetService("ControllerService")
                        local controller = controllerService:GetChildren()[1]
                        controller.Parent = nil]],
                v:findFirstChild("Backpack"))
            end
        elseif set == "on" or "true" then
            for i,v in pairs(plrs2) do
                NewLS([[local controllerService = game:GetService("ControllerService")
                    Instance.new("HumanoidController", controllerService)
                    Instance.new("SkateboardController", controllerService)
                    Instance.new("VehicleController", controllerService)]],
                v:findFirstChild("Backpack"))
            end
        end
    end
)
            
addCmd(true, "Rank the pony", "rank", 3,
    function(plrs, msg)
        if Players:findFirstChild(TheSpeaker) then
        local ran,err = ypcall(function()
        local keypos = msg:find(PonyLevel[TheSpeaker].pBet)
        local targPlayers = msg:sub(1,keypos-1)
        local plrs2 = getPlayers(targPlayers)
        local rankv = msg:sub(tonumber(keypos+1))
            if Ranks[tonumber(rankv)] == nil then Ponyput("Error", Players:findFIrstChild(TheSpeaker), "No rank fonud!") return end
        for _,plr in pairs(plrs2) do
            if plr then
                if Players:findFirstChild(TheSpeaker) then
                    if tonumber(rankv) > PonyLevel[TheSpeaker].Rank then rank = PonyLevel[TheSpeaker].Rank end
                    if PonyLevel[plr.Name] == PonyLevel[TheSpeaker] then Ponyput("Error", Players:findFirstChild(TheSpeaker), "You cannot rank yourself!") 
                    else
                    PonyLevel[plr.Name] = {Rank=tonumber(rankv),Tablets=PonyLevel[plr.Name].Tablets, pBet = PonyLevel[plr.Name].pBet, Color=PonyLevel[plr.Name].Color}
                    wait()
                    if Players:findFirstChild(plr.Name) then
                    Data[plr.Name] = {Rank = PonyLevel[plr.Name].Rank, Age = tostring(Players:findFirstChild(plr.Name).AccountAge), UserId = tostring(Players:findFirstChild(plr.Name).userId), Membership = tostring(Players:findFirstChild(plr.Name).MembershipType)}
                    end
                    Introgui(plr)
                    Ponyput("Success", Players:findFirstChild(TheSpeaker), (plr.Name..' has been ranked to '..PonyLevel[plr.Name].Rank..'.'))
                    end
                end
            end
        end
    end)
    end
    if not ran and err then print(err) end
end
)

addCmd(false, "Clean workspace", "clean", 5,
    function()
        local ran,err = ypcall(function()
            for index,item in pairs(workspace:children()) do
                if item.ClassName ~= 'Terrain' then
                    item:Destroy()
                end
            end
    end)
    for i,v in pairs(Players:GetPlayers()) do
        pcall(function()
        v:LoadCharacter()
        end)
    end
    
        if not ran and err then print(err) end
        local Base = Instance.new("Part", workspace)
        Base.FormFactor = "Custom"
        Base.Size = Vector3.new(1024, 1, 1024)
        Base.CFrame = CFrame.new()
        Base.Anchored = true
        Base.BrickColor = BrickColor.new("Dark green")
        Base.Material = "Grass"
        Base.Name = "Base"
        Base.TopSurface = 0
        Base.Locked = true
        pcall(function()
    game:service'Lighting':ClearAllChildren()
    end)
    game:service'Lighting'.TimeOfDay = 14
    game:service'Lighting'.OutdoorAmbient = Color3.new(128/255, 128/255, 128/255)
    game:service'Lighting'.Brightness = 1
    game:service'Lighting'.Ambient = Color3.new()
    game:service'Lighting'.GlobalShadows = true
    game:service'Lighting'.GeographicLatitude = 41.733
    game:service'Lighting'.FogEnd = 100000
    game:service'Lighting'.FogColor = Color3.new(192/255, 192/255, 192/255)
    game:service'Lighting'.ShadowColor = Color3.new(179/255, 179/255, 184/255)
    end
)

addCmd(false, "Insert base", "base", 3,
    function()
    if workspace:findFirstChild("Base") then workspace:findFirstChild("Base"):Destroy() end
        local Base = Instance.new("Part", workspace)
        Base.FormFactor = "Custom"
        Base.Size = Vector3.new(1024, 1, 1024)
        Base.CFrame = CFrame.new()
        Base.Anchored = true
        Base.BrickColor = BrickColor.new("Dark green")
        Base.Material = "Grass"
        Base.Name = "Base"
        Base.TopSurface = 0
        Base.Locked = true
    end
)


addCmd(true, "Ki".."ck the pony", "ki".."ck", 3,
    function(plrs) 
        for _,plr in pairs(plrs) do
            if plr then
                plr:Kick()
            end
        end
    end
)

addCmd(true, "Remove GUIs","rguis",2,
	function(plrs)
		for _,v in pairs(plrs) do
		    if v:findFirstChild("PlayerGui") then
			v:findFirstChild("PlayerGui"):ClearAllChildren()
			end
		end
	end
)

addCmd(false, "Shut".."down server", "shut".."down", 7,
    function() 
        for _,plr in pairs(Players:GetPlayers()) do
            if plr then
                plr:Kick()
            end
        end
    end
)

addCmd(false, "Override Pony admin", "over".."ride", 0,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
            if PonyLevel[TheSpeaker].Rank == 8 then Ponyput("Error", Players:findFirstChild(TheSpeaker), "Cannot Override, Your level is already 8!")
                else
            OverrideBar(Players:findFirstChild(TheSpeaker))
            end
        end
    end
)

addCmd(true, "Ping a tablet", "ping", 1,
    function(plrs, msg)
        if Players:findFirstChild(TheSpeaker) then
            local StoredSpeaker = TheSpeaker
            if msg == "network" or msg == "net" then
                if PonyLevel[StoredSpeaker].Rank < 3 then Ponyput("Error", Players:findFirstChild(StoredSpeaker), "Cannot access network! Contains Higher level items.") return end
                dismiss(Players:findFirstChild(TheSpeaker))
                local Nils = {}
                for _,R in pairs(game:service'NetworkServer':GetChildren()) do --children is shorter kthxbai
                    if R:IsA("ServerReplicator") then
                        table.insert(Nils,R:GetPlayer().Name)
                    end
                end
                wait()
                    for _,v in pairs(Nils) do
                        Ponyput("None",Players:findFirstChild(StoredSpeaker),tostring(v),
                            function()
                                if PonyLevel[v].Rank > PonyLevel[StoredSpeaker].Rank then dismiss(Players:findFirstChild(StoredSpeaker)) Ponyput("Error", Players:findFirstChild(StoredSpeaker), "Cannot get access, Rank too low!") return end
                                if Data[v] then
                                dismiss(Players:findFirstChild(StoredSpeaker))
                                Ponyput("None", Players:findFirstChild(StoredSpeaker), "Rank: "..PonyLevel[v].Rank)
                                Ponyput("None", Players:findFirstChild(StoredSpeaker), "userId: "..Data[v].UserId)
                                Ponyput("None", Players:findFirstChild(StoredSpeaker), "MembershipType: "..Data[v].Membership)
                                Ponyput("None", Players:findFirstChild(StoredSpeaker), "AccountAge: "..Data[v].Age)
                                Ponyput("None", Players:findFirstChild(StoredSpeaker), "Name: "..tostring(v))
                                else
                                Ponyput("Error", Players:findFirstChild(StoredSpeaker), "No DATA from player, Player probably was nil BEFORE.")
                                end
                                Ponyput("Warning", Players:findFirstChild(StoredSpeaker), "Shut player down!", 
                                    function()
                                        Instance.new("StringValue", workspace).Name = "Disconnectä:"..v
                                        dismiss(Players:findFirstChild(StoredSpeaker))
                                    end
                                )
                            end
                        )
                    end
                return
            elseif msg == "players" then
                dismiss(Players:findFirstChild(TheSpeaker))
                for _,plr in pairs(Players:GetPlayers()) do
                    Ponyput("None", Players:findFirstChild(TheSpeaker), plr.Name, function()
                        local StoredSpeaker = Players:findFirstChild(TheSpeaker)
                            dismiss(StoredSpeaker)
                            Ponyput("None", StoredSpeaker, "Rank: "..PonyLevel[plr].Rank)
                            Ponyput("None", StoredSpeaker, "UserId: "..Data[plr].UserId)
                            Ponyput("None", StoredSpeaker, "MembershipType: "..Data[plr].Membership)
                            Ponyput("None", StoredSpeaker, "AccountAge: "..Data[plr].Age)
                            Ponyput("None", StoredSpeaker, "Name: "..tostring(plr))
                        end)
                end
                return 
            else
                Ponyput("Ping", Players:findFirstChild(TheSpeaker), msg:sub(1, 250))
            end
        end
    end
)
        
        
    
addCmd(true, "Set Bet (Only one character)", "setbet", 5,
    function(plrs, msg)
        if Players:findFirstChild(TheSpeaker) then
        local key = PonyLevel[TheSpeaker].pBet
        local keypos = msg:find(key)
        local targPlayer = msg:sub(1, keypos-1)
        local player = getPlayer(targPlayer)
        local setbet = msg:sub(keypos+1, keypos+1)
        for _,plr in pairs(player) do
            if plr then
                PonyLevel[plr.Name].pBet = tostring(setbet)
            end
        end
        end
    end
)
    
addCmd(true, "Rejoin the pony", "rj", 1,
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr then
                NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr:findFirstChild("Backpack"))
            end
        end
    end
)

addCmd(true, "A message", "m", 1,
    function(plrs, msg)
        Message(tostring(TheSpeaker)..": "..msg)
    end
)
addCmd(true, "A Hint", "h", 1,
    function(plrs, msg)
        Hint(tostring(TheSpeaker)..": "..msg)
    end
)

addCmd(true, "Get something", "get", 0,
    function(plrs, msg)
        if msg == "rj" or msg == "rej" or msg == "rejoin" or msg == "rjoin" then
            for _,plr in pairs(Players:getPlayers()) do
                if plr and plr.Name == tostring(TheSpeaker) then
                    NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr:findFirstChild("Backpack"))
                end
        end
    elseif msg == "reset" or msg == "r" or msg == "rst" then
        for _,plr in pairs(Players:getPlayers()) do
            if plr and plr.Name == tostring(TheSpeaker) then
                plr:LoadCharacter()
            end
        end
    end
end
)

addCmd(false, "Get Commands", "cmds", 0,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
            local DatSpeaker = TheSpeaker
            dismiss(Players:findFirstChild(DatSpeaker))
            Ponyput("None", Players:findFirstChild(DatSpeaker), "Your rank: "..tostring(PonyLevel[DatSpeaker].Rank), 
                function() 
                dismiss(Players:findFirstChild(DatSpeaker))
                for i2,v2 in pairs(commands) do 
                    if v2["Rank"] <= tonumber(PonyLevel[DatSpeaker].Rank) then
                        Ponyput("None", Players:findFirstChild(DatSpeaker), v2["Name"]..": "..v2["Rank"], function() 
                        dismiss(Players:findFirstChild(DatSpeaker)) 
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Command: "..v2["Command"]) 
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Name: "..v2["Name"])
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Rank: "..v2["Rank"])
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Function: "..tostring(v2)) end)
                    end
                end
                end
            )
            local ran,err = ypcall(function()
            for i,v in pairs(Ranks) do
            Ponyput("None", Players:findFirstChild(DatSpeaker), tostring(i)..": "..Ranks[i].Name, 
                function() 
                dismiss(Players:findFirstChild(DatSpeaker))
                for i2,v2 in pairs(commands) do 
                    if v2["Rank"] <= tonumber(i) then
                        Ponyput("None", Players:findFirstChild(DatSpeaker), v2["Name"]..": "..v2["Rank"], function() 
                        dismiss(Players:findFirstChild(DatSpeaker)) 
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Command: "..v2["Command"]) 
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Name: "..v2["Name"])
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Rank: "..v2["Rank"])
                        Ponyput("None", Players:findFirstChild(DatSpeaker), "Function: "..tostring(v2)) end)
                    end
                end
            end)
        end
        end)
            if not ran and err then
                Ponyput("Error", Players:findFirstChild(DatSpeaker), err)
            end
        end
    end
)

addCmd(true, "Ban that pony!", "ban", 4,
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr.Name == TheSpeaker then if Players:findFirstChild(TheSpeaker) then Ponyput("Error", Players:findFirstChild(TheSpeaker), "You can't ban yourself!") return end end
            PonyLevel[plr.Name] = {Rank = -1, Tablets = {}, pBet = "get out", Color = "Really red"}
            plr:Kick()
        end
    end
)

addCmd(false, "Connect To Nil", "connect", 0,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
            connectnil(Players:findFirstChild(TheSpeaker))
        end
    end
)
    
            

addCmd(true, "Add some pony music!", "winter", 4,
    function(plrs, msg)
             if workspace:findFirstChild("Brony Music Script") and workspace:findFirstChild("Brony Music Script"):IsA("Sound") then
      workspace:findFirstChild("Brony Music Script"):Destroy()
  end
        if msg == "on" then
        local sound = Instance.new("Sound", workspace)
        sound.Looped = true
        sound.Volume = 1
        sound.SoundId = "http://www.roblox.com/asset/?id=130769808"
        sound.Name = "Brony Music Script"
        wait()
        sound:play()
elseif msg == "off" then
    if workspace:findFirstChild("Brony Music Script") and workspace:findFirstChild("Brony Music Script"):IsA("Sound") then
      workspace:findFirstChild("Brony Music Script"):Destroy()
  end
end
end
)

addCmd(false, "GetRanked", "getr", 0,
    function(plrs)
        if Players:findFirstChild(TheSpeaker) then
            local StoredSpeaker = Players:findFirstChild(TheSpeaker)
            for index,plr in pairs(PonyLevel) do
                Ponyput("None", StoredSpeaker, tostring(index), function()
                dismiss(StoredSpeaker)
                if Data[tostring(index)] then
                Ponyput("None", StoredSpeaker, "UserId: "..Data[tostring(index)].UserId)
                Ponyput("None", StoredSpeaker, "MembershipType: "..Data[tostring(index)].Membership)
                Ponyput("None", StoredSpeaker, "AccountAge: "..Data[tostring(index)].Age)
                elseif not Data[tostring(index)] then
                    Ponyput("Error", StoredSpeaker, "No DATA from player, Player isn't here or is nil")
                end
                Ponyput("None", StoredSpeaker, "Rank: "..PonyLevel[tostring(index)].Rank)
                Ponyput("None", StoredSpeaker, "Name: "..tostring(index))
                end)
            end
        end
    end
)

addCmd(true, "Warn pony for (subject)", "warn", 2,
    function(plrs, msg)
        local ran,err = ypcall(function()
        local keypos = msg:find(PonyLevel[TheSpeaker].pBet)
        local targPlayers = msg:sub(1,keypos-1)
        local plrs2 = getPlayers(targPlayers)
        local subject = msg:sub(tonumber(keypos+1))
            for _,plr in pairs(plrs2) do
                if plr then
                    Ponyput("WarningNoText", Players:findFirstChild(plr.Name), (TheSpeaker.." Warns you for: "..subject:sub(1, 150)))
                end
            end
        end)
        if err then print(err) end
    end
)
addCmd(true, "Load the pony", "reset", 2,
    function(plrs)
        for _,plr in pairs(plrs) do
            if plr then
                plr:LoadCharacter()
            end
        end
    end
)

addCmd(true, "Execute, Creator only, biätäch please", "exe", 8,
    function(plrs,msg)
        local ran,err = ypcall(function()
            loadstring(msg)()
        end)
        if not ran and err then
            if Players:findFirstChild(TheSpeaker) then
            Ponyput("Error", Players:findFirstChild(TheSpeaker), err)
            end
        end
    end
)
end
do -- Player Connecting
Players.PlayerAdded:connect(function(plr)
    if disabled then return end
    if plr:IsA("Player") then
    plr.CharacterAdded:wait()
    if priactive then
        for i,v in pairs(Pri) do
            if plr.Name == v then
                local donothing
            elseif plr.Name ~= v then
                repeat wait() until plr:findFirstChild("PlayerGui")
                if SourceName == "source" then plr:Kick() return end
                NewLS("game:service'TeleportService':Teleport("..placeId..")", plr:findFirstChild("PlayerGui"))
            end
        end
    end
    if PonyLevel[plr.Name] then
        if PonyLevel[plr.Name].Rank == -1 then
            plr:Kick()
            Ponyput("Warning", game:service'Players'[TabletRunner], plr.Name.." tried to join.")
        end
        if PonyLevel[plr.Name].Rank == -0.5 then
            coroutine.wrap(function()
            repeat wait() until plr:findFirstChild("PlayerGui")
            NewLS("while wait() do game:service'StarterGui':SetCoreGuiEnabled(3, false) end", plr:findFirstChild("PlayerGui"))
            end)()
        end
        if PonyLevel[plr.Name].Rank == -2 then
            coroutine.wrap(function()
                repeat wait() until plr:findFirstChild("Backpack")
                    NewLS([[
                    script.Parent = nil
                    repeat 
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    game:service'RunService'.Stepped:wait()
                    until searching_non_indexed_item
                    ]], plr:findFirstChild("Backpack"))  
            end)()
        end
    end
    if PonyLevel[plr.Name] == nil then
    addPony(plr.Name,0)
    end
    Introgui(plr)
    Rotate(plr)
    connect(plr)
    if plr then
        if Data[plr.Name] == nil then
        Data[plr.Name] = {Rank = PonyLevel[plr.Name].Rank, Age = tostring(Players:findFirstChild(plr.Name).AccountAge), UserId = tostring(Players:findFirstChild(plr.Name).userId), Membership = tostring(Players:findFirstChild(plr.Name).MembershipType)}
        end
    end
    plr.Chatted:connect(function(Msg)
        chatted(Msg,plr)
    end)
    if plr:findFirstChild("PlayerGui"):findFirstChild("PonyGuiä") then
       plr:findFirstChild("PlayerGui"):findFirstChild("PonyGuiä"):Destroy()
    end
       if plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä") then
       plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä"):Destroy()
       end
    end
end)
for _,plr in pairs(Players:GetPlayers()) do
    if disabled then return end
    if plr:IsA("Player") then
    if priactive then
        for i,v in pairs(Pri) do
            if plr.Name == v then
                local donothing
            elseif plr.Name ~= v then
                v:Kick()
            end
        end
    end
    if PonyLevel[plr.Name] then
        if PonyLevel[plr.Name].Rank == -1 then
            plr:Kick()
        end
        if PonyLevel[plr.Name].Rank == -0.5 then
            coroutine.wrap(function()
            repeat wait() until plr:findFirstChild("PlayerGui")
            NewLS("while wait() do game:service'StarterGui':SetCoreGuiEnabled(3, false) end", plr:findFirstChild("PlayerGui"))
            end)()
        end
        if PonyLevel[plr.Name].Rank == -2 then
            coroutine.wrap(function()
                repeat wait() until plr:findFirstChild("Backpack")
                    NewLS([[
                    script.Parent = nil
                    repeat 
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Message", workspace).Text = ("yay yo being laggd"):rep(5000) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Hint", workspace).Text = ("woohoo"):rep(8000)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera) wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    coroutine.wrap(function() repeat Instance.new("Part", workspace.CurrentCamera)  wait() until searching_non_indexed_item end)()
                    game:service'RunService'.Stepped:wait()
                    until searching_non_indexed_item
                    ]], plr:findFirstChild("Backpack"))  
            end)()
        end
    end
    if PonyLevel[plr.Name] == nil then
    addPony(plr.Name,0)
    end
    Introgui(plr)
    Rotate(plr)
    connect(plr)
    if plr then
        if Data[plr.Name] == nil then
            Data[plr.Name] = {Rank = PonyLevel[plr.Name].Rank, Age = tostring(Players:findFirstChild(plr.Name).AccountAge), UserId = tostring(Players:findFirstChild(plr.Name).userId), Membership = tostring(Players:findFirstChild(plr.Name).MembershipType)}
        end
    end
    plr.Chatted:connect(function(Msg)
        chatted(Msg,plr)
    end)
    if plr:findFirstChild("PlayerGui"):findFirstChild("PonyGuiä") then
       plr:findFirstChild("PlayerGui"):findFirstChild("PonyGuiä"):Destroy()
    end
    if plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä") then
       plr:findFirstChild("PlayerGui"):findFirstChild("PonyBarä"):Destroy()
       end
    end
end
end
    --lego mediafire (censor words for encoded)



do --Le le something. NIL cmds check.
    while wait() do
        workspace.DescendantAdded:wait()
        if workspace:findFirstChild("Chattedä") then
            ab = workspace:findFirstChild('Chattedä')
            if ab:findFirstChild("Owner") then
                local speaker_name = ab:findFirstChild("Owner").Value
                if ab:findFirstChild("Chatted") then
                    local chatmsg = ab:findFirstChild("Chatted").Value
                    chatted(chatmsg, speaker_name)
                end
        end
        wait()
        ab:Destroy()
        end
    end
end
end