Advertisement
robobot

Nova admin

Apr 29th, 2016
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 25.79 KB | None | 0 0
  1. Admins = {
  2.  
  3. ["RoboPwner32"] = 3, -- Your name
  4.  
  5. ["FRIENDS NAME HERE"] = 3, -- Friends names
  6.  
  7. ["FRIENDS NAME HERE"] = 3,
  8.  
  9. ["FRIENDS NAME HERE"] = 3
  10.  
  11. }
  12.  
  13. local Levels = {
  14.  
  15. [0] = {"Peasant", BrickColor.new("Medium stone grey")};
  16.  
  17. [1] = {"Knight", BrickColor.new("Bright red")};
  18.  
  19. [2] = {"Lord", BrickColor.new("Navy blue")};
  20.  
  21. [3] = {"King", BrickColor.new("Really black")}
  22.  
  23. }
  24.  
  25. Players = Game:GetService("Players")
  26.  
  27. Workspace = Game:GetService("Workspace")
  28.  
  29. Debris = Game:GetService("Debris")
  30.  
  31. Lighting = Game:GetService("Lighting")
  32.  
  33. Teams = Game:GetService("Teams")
  34.  
  35. MR = math.rad
  36.  
  37. MD = math.deg
  38.  
  39. IPStore = {}
  40.  
  41. IPBans = {}
  42.  
  43. Banned = {"Network Server"}
  44.  
  45. PrivateServer = {}
  46.  
  47. PrivateServerWarnings = {}
  48.  
  49. function IncommingConnection(IPAddress, Replicator)
  50.  
  51. local IP = IPAddress:sub(1, IPAddress:find(":")-1)
  52.  
  53. local ThePlayer
  54.  
  55. Players.PlayerAdded:connect(function(NewPlayer)
  56.  
  57. if not ThePlayer then
  58.  
  59. ThePlayer = NewPlayer
  60.  
  61. end
  62.  
  63. end)
  64.  
  65. repeat wait() until ThePlayer
  66.  
  67. IPStore[ThePlayer.Name] = IP
  68.  
  69. for i=1, #IPBans do
  70.  
  71. if IPBans[i] == IP then
  72.  
  73. ThePlayer:Remove()
  74.  
  75. end
  76.  
  77. end
  78.  
  79. end
  80.  
  81. function Round(Number, ToWhatExtent)
  82.  
  83. if ToWhatExtent then
  84.  
  85. return math.floor(Number/ToWhatExtent+0.5)*ToWhatExtent
  86.  
  87. else
  88.  
  89. return math.floor(Number + 0.5)
  90.  
  91. end
  92.  
  93. end
  94.  
  95. Settings = {
  96.  
  97. Color = BrickColor.new("Institutional white"), --Its bright red...
  98.  
  99. Name = "ProLevi27 Scythe Admin",
  100.  
  101. Version = "0.0.8"
  102.  
  103. }
  104.  
  105. function ShowInCircle(Prompter,...)
  106.  
  107. local Args = {...}
  108.  
  109. local Books = {}
  110.  
  111. Args[#Args + 1] = "Dismiss"
  112.  
  113. local Ans = nil
  114.  
  115. local Rank = Admins[Prompter.Name]
  116.  
  117. for i=1, #Args do
  118.  
  119. local IsKings
  120.  
  121. if Args[i]:find("(Kings Only)") then
  122.  
  123. IsKings = true
  124.  
  125. end
  126.  
  127. local Book = Instance.new("Part", Game:GetService("Workspace"))
  128.  
  129. Book.Anchored = false
  130.  
  131. Book.Locked = true
  132.  
  133. Book.CanCollide = false
  134.  
  135. Book.TopSurface, Book.BottomSurface = 0, 0
  136.  
  137. Book.Transparency = 0.5
  138.  
  139. Book.FormFactor = Enum.FormFactor.Custom
  140.  
  141. Book.Size = Vector3.new(2.3, 1, 3)
  142.  
  143. if IsKings and Admins[Prompter.Name] < 3 then
  144.  
  145. Book.BrickColor = BrickColor.new("institutional white")
  146.  
  147. else
  148.  
  149. Book.BrickColor = Settings.Color
  150.  
  151. end
  152.  
  153. table.insert(Books, Book)
  154.  
  155. local Mesh = Instance.new("SpecialMesh", Book)
  156.  
  157. Mesh.MeshId = "http://www.roblox.com/asset/?id=1136139"
  158.  
  159. Mesh.MeshType = "FileMesh"
  160.  
  161. local BG = Instance.new("BodyGyro", Book)
  162.  
  163. local BP = Instance.new("BodyPosition", Book)
  164.  
  165. if (IsKings and Admins[Prompter.Name] == 3) or not IsKings then
  166.  
  167. local Fire = Instance.new("Fire", Book)
  168.  
  169. Fire.Heat = 0
  170.  
  171. Fire.Color = Settings.Color.Color
  172.  
  173.  
  174.  
  175. Fire.SecondaryColor = Settings.Color.Color
  176.  
  177. end
  178.  
  179. local Billboard = Instance.new("BillboardGui", Book)
  180.  
  181. Billboard.Adornee = Book
  182.  
  183. Billboard.Enabled = true
  184.  
  185. Billboard.Active = true
  186.  
  187. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  188.  
  189. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  190.  
  191. local Text = Instance.new("TextLabel", Billboard)
  192.  
  193. Text.Text = Args[i]
  194.  
  195. if IsKings and Admins[Prompter.Name] ~= 3 then
  196.  
  197. Text.TextColor3 = BrickColor.new("Really black").Color
  198.  
  199. else
  200.  
  201. Text.TextColor3 = Settings.Color.Color
  202.  
  203. end
  204.  
  205. Text.BackgroundTransparency = 1
  206.  
  207. Text.Size = UDim2.new(1, 0, 1, 0)
  208.  
  209. local ClickDetector = Instance.new("ClickDetector", Book)
  210.  
  211. ClickDetector.MouseClick:connect(function(Player)
  212.  
  213. if Player == Prompter and Args[i] == "Dismiss" then
  214.  
  215. Ans = Args[i]
  216.  
  217. for _, v in pairs(Books) do
  218.  
  219. v:Remove()
  220.  
  221. end
  222.  
  223. Books = {}
  224.  
  225. end
  226.  
  227. end)
  228.  
  229. end
  230.  
  231. coroutine.resume(coroutine.create(function()
  232.  
  233. local radius = 3 + (#Books*.7)
  234.  
  235. while wait() do
  236.  
  237. if #Books == 0 then break end
  238.  
  239. for _, Book in pairs(Books) do
  240.  
  241. local BP = Book:FindFirstChild("BodyPosition") or Instance.new("BodyPosition", Book)
  242.  
  243. BP.maxForce = Vector3.new(1000000000, 1000000000, 1000000000)
  244.  
  245. local BG = Book:FindFirstChild("BodyGyro") or Instance.new("BodyGyro", Book)
  246.  
  247. BG.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
  248.  
  249. local Pos = (Prompter.Character:FindFirstChild("Torso") or Prompter.Character:FindFirstChild("Torso")).CFrame
  250.  
  251. local x = math.cos((tonumber(_)/#Books - (0.5/#Books)) * math.pi*2) * radius -- cos
  252.  
  253. local y = 0
  254.  
  255. local z = math.sin((tonumber(_)/#Books - (0.5/#Books)) * math.pi*2) * radius -- sin
  256.  
  257. BP.position = Pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
  258.  
  259. BG.cframe = CFrame.new(Book.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
  260.  
  261. end
  262.  
  263. end
  264.  
  265. end))
  266.  
  267. end
  268.  
  269. function Prompt(Prompter, ...)
  270.  
  271. local Args = {...}
  272.  
  273. local Books = {} --Dismiss sounds cooler :3
  274.  
  275. Args[#Args + 1] = "Dismiss"
  276.  
  277. local Ans = nil
  278.  
  279. for i=1, #Args do
  280.  
  281. local Book = Instance.new("Part", Game:GetService("Workspace"))
  282.  
  283. Book.Anchored = false
  284.  
  285. Book.Locked = true
  286.  
  287. Book.CanCollide = false
  288.  
  289. Book.TopSurface, Book.BottomSurface = 0, 0
  290.  
  291. Book.Transparency = 0.5
  292.  
  293. Book.FormFactor = Enum.FormFactor.Custom
  294.  
  295. Book.Size = Vector3.new(2.3, 1, 3)
  296.  
  297. Book.BrickColor = Settings.Color
  298.  
  299. table.insert(Books, Book)
  300.  
  301. local Mesh = Instance.new("SpecialMesh", Book)
  302.  
  303. Mesh.MeshId = "http://www.roblox.com/asset/?id=1136139"
  304.  
  305. Mesh.MeshType = "FileMesh"
  306.  
  307. local Fire = Instance.new("Fire", Book)
  308.  
  309. Fire.Heat = 0
  310.  
  311. Fire.Color = Settings.Color.Color
  312.  
  313. Fire.SecondaryColor = Settings.Color.Color
  314.  
  315. local Billboard = Instance.new("BillboardGui", Book)
  316.  
  317. Billboard.Adornee = Book
  318.  
  319. Billboard.Enabled = true
  320.  
  321. Billboard.Active = true
  322.  
  323. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  324.  
  325. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  326.  
  327. local Text = Instance.new("TextLabel", Billboard)
  328.  
  329. Text.Text = Args[i]
  330.  
  331. Text.TextColor3 = Settings.Color.Color
  332.  
  333. Text.BackgroundTransparency = 1
  334.  
  335. Text.Size = UDim2.new(1, 0, 1, 0)
  336.  
  337. local AttemptToFixPrompt = i
  338.  
  339. local ClickDetector = Instance.new("ClickDetector", Book)
  340.  
  341. ClickDetector.MouseClick:connect(function(Player)
  342.  
  343. if Player == Prompter then
  344.  
  345. Ans = Args[i]
  346.  
  347. local BackupBooks = Books
  348.  
  349. Books = {}
  350.  
  351. local AnimationOver
  352.  
  353. pcall(function() BP.Position = Player.Character.Torso.Position end)
  354.  
  355. Book.Touched:connect(function(zPart)
  356.  
  357. pcall(function()
  358.  
  359. if zPart == Player.Character.Torso then
  360.  
  361. AnimationOver = true
  362.  
  363. end
  364.  
  365. end)
  366.  
  367. end)
  368.  
  369. delay(5, function() AnimationOver = true end)
  370.  
  371. for _, v in pairs(BackupBooks) do
  372.  
  373. v:Remove()
  374.  
  375. end
  376.  
  377. BackupBooks = nil
  378.  
  379. return AttemptToFixPrompt
  380.  
  381. end
  382.  
  383. end)
  384.  
  385. end
  386.  
  387. coroutine.resume(coroutine.create(function()
  388.  
  389. local radius = 3 + (#Books)
  390.  
  391. while wait() do
  392.  
  393. if #Books == 0 then break end
  394.  
  395. for _, Book in pairs(Books) do
  396.  
  397. local BP = Book:FindFirstChild("BodyPosition") or Instance.new("BodyPosition", Book)
  398.  
  399. BP.maxForce = Vector3.new(1000000000, 1000000000, 1000000000)
  400.  
  401. local BG = Book:FindFirstChild("BodyGyro") or Instance.new("BodyGyro", Book)
  402.  
  403. BG.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
  404.  
  405. local Pos = (Prompter.Character:FindFirstChild("Torso") or Prompter.Character:FindFirstChild("Torso")).CFrame
  406.  
  407. local x = math.cos((tonumber(_)/#Books - (0.5/#Books)) * math.pi) * radius -- cos
  408.  
  409. local y = 0
  410.  
  411. local z = math.sin((tonumber(_)/#Books - (0.5/#Books)) * math.pi) * radius -- sin
  412.  
  413. BP.position = Pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
  414.  
  415. BG.cframe = CFrame.new(Book.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
  416.  
  417. end
  418.  
  419. end
  420.  
  421. end))
  422.  
  423. while (Ans == nil) and (#Books > 0) do
  424.  
  425. wait()
  426.  
  427. end
  428.  
  429. return Ans
  430.  
  431. end
  432.  
  433. function ParseMessage(Message)
  434.  
  435. Message = Message:gsub("lego%s", "")
  436.  
  437. Message = Message:gsub("runescape%s", "")
  438.  
  439. Message = Message:gsub("minecraft%s", "")
  440.  
  441. local Command
  442.  
  443. local Args = {}
  444.  
  445. for Word in Message:gmatch("%w+") do
  446.  
  447. if not Command then
  448.  
  449. Command = Word
  450.  
  451. else
  452.  
  453. table.insert(Args, Word)
  454.  
  455. end
  456.  
  457. end
  458.  
  459. return Command, Args
  460.  
  461. end
  462.  
  463.  
  464.  
  465. function ErrorHandler(Error)
  466.  
  467. print(Error)
  468.  
  469. local Message = Instance.new("Message", Workspace)
  470.  
  471. Message.Text = "!ERROR!: " .. Error:gsub("(.-:)","")
  472.  
  473. Game:GetService("Debris"):AddItem(Message, 5)
  474.  
  475. end
  476.  
  477.  
  478.  
  479. function onPlayerAdded(NewPlayer)
  480.  
  481. for b=1, #Banned do
  482.  
  483. if NewPlayer.Name == Banned[b] then
  484.  
  485. coroutine.resume(coroutine.create(function()
  486.  
  487. for i=1, 25 do
  488.  
  489. pcall(function() NewPlayer:Destroy() end)
  490.  
  491. wait(0.5)
  492.  
  493. end
  494.  
  495. end))
  496.  
  497. end
  498.  
  499. end
  500.  
  501. NewPlayer.Chatted:connect(function(C)
  502.  
  503. xpcall(function()
  504.  
  505. local a, b = coroutine.resume(coroutine.create(function()
  506.  
  507. onChat(NewPlayer, C)
  508.  
  509. end))
  510.  
  511. assert(a,b)
  512.  
  513. end, ErrorHandler)
  514.  
  515. end)
  516.  
  517. end
  518.  
  519. function onChat(player, message)
  520.  
  521. local Command, Arguments = ParseMessage(message)
  522.  
  523. if Admins[player.Name] ~= nil then
  524.  
  525. if Command == "kickmenu" then
  526.  
  527. local People = Game:GetService("Players"):GetPlayers()
  528.  
  529. local Names = {}
  530.  
  531. for _, v in pairs(People) do
  532.  
  533. table.insert(Names, v.Name)
  534.  
  535. end
  536.  
  537. local OptionChoosen = Prompt(player, unpack(Names))
  538.  
  539. print(OptionChoosen)
  540.  
  541. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  542.  
  543. game:GetService("Players") [OptionChoosen]:Destroy()
  544.  
  545. else
  546.  
  547. print("Player missing")
  548.  
  549. end
  550.  
  551. elseif Command == "privateserver" then
  552.  
  553. local Option = Prompt(player, "Turn on", "Turn off", "Add name", "Remove name", "Remove all names")
  554.  
  555. if Option == "Turn on" then
  556.  
  557. PrivateServerOn = true
  558.  
  559. local OnJoinCon = function(NewPlayer)
  560.  
  561. if PrivateServer[NewPlayer.Name] == nil then
  562.  
  563. NewPlayer:Remove()
  564.  
  565. if PrivateServerWarnings[NewPlayer.Name] == nil then
  566.  
  567. local AddHim = Prompt(player, "Click me to add " .. NewPlayer.Name .. " to the private server list")
  568.  
  569. if AddHim == "Click me to add " .. NewPlayer.Name .. " to the private server list" then
  570.  
  571. PrivateServer[NewPlayer.Name] = true
  572.  
  573. end
  574.  
  575. end
  576.  
  577. end
  578.  
  579. end
  580.  
  581. while PrivateServerOn do wait() end
  582.  
  583. OnJoinCon:disconnect()
  584.  
  585. elseif Option == "Turn off" then
  586.  
  587. PrivateServerOn = nil
  588.  
  589. elseif Option == "Add name" then
  590.  
  591. local Names = {}
  592.  
  593. for _, v in pairs(Players:GetPlayers()) do
  594.  
  595. table.insert(Names, v.Name)
  596.  
  597. end
  598.  
  599. local PlayerToAdd = Prompt(player, unpack(Names))
  600.  
  601. if Players:FindFirstChild(PlayerToAdd) then
  602.  
  603. PrivateServer[PlayerToAdd] = true
  604.  
  605. end
  606.  
  607. elseif Option == "Remove name" then
  608.  
  609. local Names = {}
  610.  
  611. for Name in pairs(PrivateServer) do
  612.  
  613. table.insert(Names, Name)
  614.  
  615. end
  616.  
  617. local NameToRemove = Prompt(player, unpack(Names))
  618.  
  619. if Names[NameToRemove] then
  620.  
  621. Names[NameToRemove] = nil
  622.  
  623. end
  624.  
  625. elseif Option == "Remove all names" then
  626.  
  627. PrivateServer = {}
  628.  
  629. end
  630.  
  631. elseif Command == "banmenu" then
  632.  
  633. local People = Game:GetService("Players"):GetPlayers()
  634.  
  635. local Names = {}
  636.  
  637. for _, v in pairs(People) do
  638.  
  639. table.insert(Names, v.Name)
  640.  
  641. end
  642.  
  643. local OptionChoosen = Prompt(player, unpack(Names))
  644.  
  645. print(OptionChoosen)
  646.  
  647. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  648.  
  649. table.insert(Banned, OptionChoosen)
  650.  
  651. game:GetService("Players") [OptionChoosen]:Destroy()
  652.  
  653. else
  654.  
  655. print("Player missing")
  656.  
  657. end
  658.  
  659. elseif Command == "rankset" and Admins[player.Name] == 3 then
  660.  
  661. if Arguments[1] and tonumber(Arguments[1]) ~= nil then
  662.  
  663. local RankSet
  664.  
  665. if tonumber(Arguments[1]) == 0 then
  666.  
  667. RankSet = nil
  668.  
  669. else
  670.  
  671. RankSet = tonumber(Arguments[1])
  672.  
  673. end
  674.  
  675. for i=2, #Arguments do
  676.  
  677. local arg = Arguments[i]
  678.  
  679. for z, vPlayer in pairs(Players:GetPlayers()) do
  680.  
  681. if vPlayer.Name:lower():find(arg:lower()) == 1 then
  682.  
  683. Admins[vPlayer.Name] = RankSet
  684.  
  685. end
  686.  
  687. end
  688.  
  689. end
  690.  
  691. end
  692.  
  693. elseif message:sub(1, 5) == "load/" then
  694.  
  695. xpcall(function()
  696.  
  697. local c, d = coroutine.resume(coroutine.create(function()
  698.  
  699. loadstring(message:sub(6))()
  700.  
  701. end))
  702.  
  703. assert(c, d)
  704.  
  705. end, function(Error)
  706.  
  707. local Hint = Instance.new("Message", Workspace)
  708.  
  709. Hint.Text = "|QUICKSCRIPT ERROR|:| " .. Error:sub("(.-:)")
  710.  
  711. wait(4)
  712.  
  713. Hint:Remove()
  714.  
  715. end)
  716.  
  717. elseif Command == "cleanup" then
  718.  
  719. for _, v in pairs(Workspace:GetChildren()) do
  720.  
  721. if Players:GetPlayerFromCharacter(v) == nil and v.className ~= "Terrain" and v~=script then
  722.  
  723. pcall(function() v:Remove() end)
  724.  
  725. end
  726.  
  727. end
  728.  
  729. local Base = Instance.new("Part", Workspace)
  730.  
  731. Base.Anchored = true
  732.  
  733. Base.TopSurface = Enum.SurfaceType.Smooth
  734.  
  735. Base.BottomSurface = Enum.SurfaceType.Smooth
  736.  
  737. Base.FormFactor = Enum.FormFactor.Symmetric
  738.  
  739. Base.BrickColor = BrickColor.new("Earth green")
  740.  
  741. Base.Size = Vector3.new(1000, 1, 1000)
  742.  
  743. Base.Name = "Base"
  744.  
  745. Base.CFrame = CFrame.new(Vector3.new())
  746.  
  747. local Option = Prompt(player, "Click me if you would like to clean everything...")
  748.  
  749. if Option == "Click me if you would like to clean everything..." then
  750.  
  751. pcall(function() Lighting:ClearAllChildren() end)
  752.  
  753. pcall(function() Teams:ClearAllChildren() end)
  754.  
  755. pcall(function() table.foreach(Players:GetPlayers(), function(_, v) v.Neutral = true end) end)
  756.  
  757. end
  758.  
  759. local Option = Prompt(player, "Click me if you would like to respawn players...")
  760.  
  761. if Option == "Click me if you would like to respawn players..." then
  762.  
  763. for _, v in pairs(Players:GetPlayers()) do
  764.  
  765. pcall(function()
  766.  
  767. local Model = Instance.new("Model", Workspace)
  768.  
  769. Instance.new("Humanoid", Model)
  770.  
  771. v.Character = Model
  772.  
  773. end)
  774.  
  775. end
  776.  
  777. end
  778.  
  779. elseif Command == "hide" then
  780.  
  781. if Arguments[1] == "ranks" then
  782.  
  783. NotInViewRanks = true
  784.  
  785. Lighting.TimeOfDay = "14:00:00"
  786.  
  787. Lighting.Ambient = BrickColor.new("Medium stone grey").Color
  788.  
  789. while Workspace:FindFirstChild("RankStatus", true) do
  790.  
  791. Workspace:FindFirstChild("RankStatus", true):Destroy()
  792.  
  793. end
  794.  
  795. end
  796.  
  797. elseif Command == "shutdown" then
  798.  
  799. local InitTime = time()
  800.  
  801. while wait() do
  802.  
  803. pcall(function()
  804.  
  805. Players:ClearAllChildren()
  806.  
  807. end)
  808.  
  809. pcall(function()
  810.  
  811. if #Players:GetPlayers() >= 1 or InitTime + 30 < time() then
  812.  
  813. Instance.new("ManualSurfaceJointInstance", Workspace)
  814.  
  815. end
  816.  
  817. end)
  818.  
  819. end
  820.  
  821. elseif Command == "view" or Command == "show" then
  822.  
  823. if Arguments[1] == "ranks" then
  824.  
  825. NotInViewRanks = nil
  826.  
  827. Lighting.TimeOfDay = "2:00:00"
  828.  
  829. Lighting.Ambient = BrickColor.new("Black").Color
  830.  
  831. local AutoColorConnection = Workspace.ChildAdded:connect(function(v)
  832.  
  833. local Player = Players:GetPlayerFromCharacter(v)
  834.  
  835. if Player and Admins[Player.Name] then
  836.  
  837. local Rank = Admins[Player.Name]
  838.  
  839. coroutine.resume(coroutine.create(function()
  840.  
  841. local Head = v:FindFirstChild("Head")
  842.  
  843. local Status = Instance.new("Part", v)
  844.  
  845. Status.FormFactor = "Symmetric"
  846.  
  847. Status.Shape = "Ball"
  848.  
  849. Status.Name = "Status"
  850.  
  851. Status.TopSurface = 0
  852.  
  853. Status.BottomSurface = 0
  854.  
  855. Status.BrickColor = Levels[Rank][2]
  856.  
  857. Status.CanCollide = false
  858.  
  859. Status.Name = "RankStatus"
  860.  
  861. Status.Transparency = 0.5
  862.  
  863. local Billboard = Instance.new("BillboardGui", Status)
  864.  
  865. Billboard.Adornee = Status
  866.  
  867. Billboard.Enabled = true
  868.  
  869. Billboard.Active = true
  870.  
  871. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  872.  
  873. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  874.  
  875. local Text = Instance.new("TextLabel", Billboard)
  876.  
  877. Text.Text = Levels[Rank][1] .. " - " .. Player.Name
  878.  
  879. Text.TextColor3 = Levels[Rank][2].Color
  880.  
  881. Text.BackgroundTransparency = 1
  882.  
  883. Text.Size = UDim2.new(1, 0, 1, 0)
  884.  
  885. local Body = Instance.new("BodyPosition", Status)
  886.  
  887. Body.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  888.  
  889. local Fire = Instance.new("Fire", Status)
  890.  
  891. Fire.Color = Levels[Rank][2].Color
  892.  
  893. Fire.SecondaryColor = Levels[Rank][2].Color
  894.  
  895. local function gS(i)
  896.  
  897. return math.sin(math.rad(i))
  898.  
  899. end
  900.  
  901. local function gC(i)
  902.  
  903. return math.cos(math.rad(i))
  904.  
  905. end
  906.  
  907. for _, v in pairs(v:GetChildren()) do
  908.  
  909. if v:IsA("Part") and v.Name ~= "RankStatus" then
  910.  
  911. local Sel = Instance.new("SelectionBox", Status)
  912.  
  913. Sel.Adornee = v
  914.  
  915. Sel.Color = Levels[Rank][2]
  916.  
  917. local Fir = Instance.new("Fire", Status)
  918.  
  919. Fir.Color = Levels[Rank][2].Color
  920.  
  921. Fir.SecondaryColor = Levels[Rank][2].Color
  922.  
  923. end
  924.  
  925. end
  926.  
  927. while wait() and Head and Head.Parent do
  928.  
  929. for i = 0, 360, 2 do
  930.  
  931. Body.position = (CFrame.new(Head.Position) * CFrame.new(Vector3.new(gS(i)*5, gC(i*5)*2 + 1.5, gC(i)*5))).p
  932.  
  933. wait()
  934.  
  935. end
  936.  
  937. end
  938.  
  939. end))
  940.  
  941. end
  942.  
  943. end)
  944.  
  945. for _, v in pairs(Workspace:GetChildren()) do
  946.  
  947. local Player = Players:GetPlayerFromCharacter(v)
  948.  
  949. if Player and Admins[Player.Name] then
  950.  
  951. local Rank = Admins[Player.Name]
  952.  
  953. coroutine.resume(coroutine.create(function()
  954.  
  955. local Head = v:FindFirstChild("Head")
  956.  
  957. local Status = Instance.new("Part", v)
  958.  
  959. Status.FormFactor = "Symmetric"
  960.  
  961. Status.Shape = "Ball"
  962.  
  963. Status.Name = "Status"
  964.  
  965. Status.TopSurface = 0
  966.  
  967. Status.BottomSurface = 0
  968.  
  969. Status.BrickColor = Levels[Rank][2]
  970.  
  971. Status.CanCollide = false
  972.  
  973. Status.Name = "RankStatus"
  974.  
  975. Status.Transparency = 0.5
  976.  
  977. local Billboard = Instance.new("BillboardGui", Status)
  978.  
  979. Billboard.Adornee = Status
  980.  
  981. Billboard.Enabled = true
  982.  
  983. Billboard.Active = true
  984.  
  985. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  986.  
  987. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  988.  
  989. local Text = Instance.new("TextLabel", Billboard)
  990.  
  991. Text.Text = Levels[Rank][1] .. " - " .. Player.Name
  992.  
  993. Text.TextColor3 = Levels[Rank][2].Color
  994.  
  995. Text.BackgroundTransparency = 1
  996.  
  997. Text.Size = UDim2.new(1, 0, 1, 0)
  998.  
  999. local Body = Instance.new("BodyPosition", Status)
  1000.  
  1001. Body.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  1002.  
  1003. local Fire = Instance.new("Fire", Status)
  1004.  
  1005. Fire.Color = Levels[Rank][2].Color
  1006.  
  1007. Fire.SecondaryColor = Levels[Rank][2].Color
  1008.  
  1009. local function gS(i)
  1010.  
  1011. return math.sin(math.rad(i))
  1012.  
  1013. end
  1014.  
  1015. local function gC(i)
  1016.  
  1017. return math.cos(math.rad(i))
  1018.  
  1019. end
  1020.  
  1021. for _, v in pairs(v:GetChildren()) do
  1022.  
  1023. if v:IsA("Part") and v.Name ~= "RankStatus" then
  1024.  
  1025. local Sel = Instance.new("SelectionBox", Status)
  1026.  
  1027. Sel.Adornee = v
  1028.  
  1029. Sel.Color = Levels[Rank][2]
  1030.  
  1031. local Fir = Instance.new("Fire", Status)
  1032.  
  1033. Fir.Color = Levels[Rank][2].Color
  1034.  
  1035. Fir.SecondaryColor = Levels[Rank][2].Color
  1036.  
  1037. end
  1038.  
  1039. end
  1040.  
  1041. while wait() and Head and Head.Parent do
  1042.  
  1043. for i = 0, 360, 2 do
  1044.  
  1045. Body.position = (CFrame.new(Head.Position) * CFrame.new(Vector3.new(gS(i)*5, gC(i*5)*2 + 1.5, gC(i)*5))).p
  1046.  
  1047. wait()
  1048.  
  1049. end
  1050.  
  1051. end
  1052.  
  1053. end))
  1054.  
  1055. end
  1056.  
  1057. end
  1058.  
  1059. repeat wait() until NotInViewRanks
  1060.  
  1061. AutoColorConnection:disconnect()
  1062.  
  1063. elseif Arguments[1] == "time" or Arguments[1] == "clock" then
  1064.  
  1065. local SecondsOfToday = math.fmod(tick(), 60*60*24) -- Long story check in wiki...
  1066.  
  1067. local Hour = math.floor(SecondsOfToday / (60*60))
  1068.  
  1069. local Minute = math.floor(SecondsOfToday/60 - Hour*60)
  1070.  
  1071. local Second = math.floor(math.fmod(SecondsOfToday, 60))
  1072.  
  1073. if Hour > 12 then Hour = Hour - 12 end
  1074.  
  1075. ShowInCircle(player, "Current time: " .. Hour .. ":" .. Minute .. ":" .. Second, "Server Time: " .. math.floor(time()))
  1076.  
  1077. end
  1078.  
  1079. elseif Command == "kick" then
  1080.  
  1081. for _, Arg in pairs(Arguments) do
  1082.  
  1083. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1084.  
  1085. if Player.Name:lower():match(Arg:lower()) then
  1086.  
  1087. pcall(function() Player:Destroy() end)
  1088.  
  1089. end
  1090.  
  1091. end
  1092.  
  1093. end
  1094.  
  1095. elseif Command == "commands1" then
  1096.  
  1097. ShowInCircle(player,
  1098.  
  1099. "kill", "kick", "ban", "fire", "day", "night", "unfire", "ff", "unff", "admin", "unadmin", "unban", "fog", "nbc", "bc", "tbc", "obc", "getage", "cave"
  1100.  
  1101. )
  1102.  
  1103. elseif Command == "commands2" then
  1104.  
  1105. ShowInCircle(player,
  1106.  
  1107. "tree", "lag", "semikick", "getmsg", "sparkles", "respawn", "kickmenu", "banmenu", "load/[script]", "cleanup", "shutdown", "rankset", "ip", "antiban", "lag", "breakscripts", "killmenu", "hackaccount", "hackmenu", "privateserver"
  1108.  
  1109. )
  1110.  
  1111. elseif Command == "commandsALL" then
  1112.  
  1113. ShowInCircle(player,
  1114.  
  1115. "kill", "kick", "ban", "fire", "day", "night", "override", "unfire", "ff", "unff", "admin", "unadmin", "unban", "fog", "nbc", "bc", "tbc", "obc", "getage", "cave", "tree", "lag", "semikick", "getmsg", "sparkles", "respawn", "kickmenu", "banmenu", "load/[script]", "cleanup", "shutdown", "rankset", "ip", "antiban", "lag", "breakscripts", "killmenu", "hackaccount", "hackmenu", "privateserver"
  1116.  
  1117. )
  1118.  
  1119. elseif Command == "antiban" then
  1120.  
  1121. local PeopleNames = {}
  1122.  
  1123. for _, v in pairs(Game:GetService("Players"):GetPlayers()) do
  1124.  
  1125. table.insert(PeopleNames, v.Name)
  1126.  
  1127. end
  1128.  
  1129. local Option = Prompt(player, unpack(PeopleNames))
  1130.  
  1131. if Option then
  1132.  
  1133. Game:GetService("Players").PlayerRemoving:connect(function(Player)
  1134.  
  1135. if Player.Name == Option then
  1136.  
  1137. while wait() do
  1138.  
  1139. pcall(function() Players:ClearAllChildren() end)
  1140.  
  1141. end
  1142.  
  1143. end
  1144.  
  1145. end)
  1146.  
  1147. end
  1148.  
  1149. elseif Command == "ip" and Admins[player.Name] == 3 then
  1150.  
  1151. local Option = Prompt(player, "Add banishment", "View ip's", "Remove ip ban")
  1152.  
  1153. if Option == "Add banishment" then
  1154.  
  1155. local Names = {}
  1156.  
  1157. local IPs = IPStore
  1158.  
  1159. for Name, IP in pairs(IPs) do
  1160.  
  1161. table.insert(Names, Name)
  1162.  
  1163. end
  1164.  
  1165. local BanPlayer = Prompt(player, unpack(Names))
  1166.  
  1167. if IPs[BanPlayer] ~= nil then
  1168.  
  1169. table.insert(IPBans, IPs[BanPlayer])
  1170.  
  1171. for _, v in pairs(Game:GetService("Players"):GetPlayers()) do
  1172.  
  1173. if v.Name == BanPlayer then
  1174.  
  1175. v:Remove()
  1176.  
  1177. end
  1178.  
  1179. end
  1180.  
  1181. end
  1182.  
  1183. elseif Option == "View ip's" then
  1184.  
  1185. local Names = {}
  1186.  
  1187. local IPs = IPStore
  1188.  
  1189. for Name, IP in pairs(IPs) do
  1190.  
  1191. table.insert(Names, Name)
  1192.  
  1193. end
  1194.  
  1195. local Option = Prompt(player, unpack(Names))
  1196.  
  1197. if IPStore[Option] ~= nil then
  1198.  
  1199. Prompt(player, IPStore[Option])
  1200.  
  1201. end
  1202.  
  1203. end
  1204.  
  1205. elseif Command == "lag" then
  1206.  
  1207. for _, Args in pairs(Arguments) do
  1208.  
  1209. for v, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1210.  
  1211. if Player.Name:lower():find(Args:lower()) == 1 then
  1212.  
  1213. while wait() do
  1214.  
  1215. for i=1, 10 do
  1216.  
  1217. Instance.new("Message", Player:FindFirstChild("PlayerGui") or nil).Text = "I B LAGGIN JOO!"
  1218.  
  1219. end
  1220.  
  1221. end
  1222.  
  1223. end
  1224.  
  1225. end
  1226.  
  1227. end
  1228.  
  1229. elseif Command == "hackaccount" and Admins[player.Name] == 3 then
  1230.  
  1231. local Option = Prompt(player, "Add Ban[ROBLOX]", "Hack Accounts", "Remove Hacked")
  1232.  
  1233. if Option == "Add Ban[ROBLOX]" then
  1234.  
  1235. local Names = {}
  1236.  
  1237. local IPs = IPStore
  1238.  
  1239. for Name, IP in pairs(IPs) do
  1240.  
  1241. table.insert(Names, Name)
  1242.  
  1243. end
  1244.  
  1245. local BanPlayer = Prompt(player, unpack(Names))
  1246.  
  1247. if IPs[BanPlayer] ~= nil then
  1248.  
  1249. table.insert(IPBans, IPs[BanPlayer])
  1250.  
  1251. for _, v in pairs(Game:GetService("Players"):GetPlayers()) do
  1252.  
  1253. if v.Name == BanPlayer then
  1254.  
  1255. v:Remove()
  1256.  
  1257. end
  1258.  
  1259. end
  1260.  
  1261. end
  1262.  
  1263. elseif Option == "Hack Accounts" then
  1264.  
  1265. local Names = {}
  1266.  
  1267. local IPs = IPStore
  1268.  
  1269. for Name, IP in pairs(IPs) do
  1270.  
  1271. table.insert(Names, Name)
  1272.  
  1273. end
  1274.  
  1275. local Option = Prompt(player, unpack(Names))
  1276.  
  1277. if IPStore[Option] ~= nil then
  1278.  
  1279. Prompt(player, IPStore[Option])
  1280.  
  1281. end
  1282.  
  1283. end
  1284.  
  1285. elseif Command == "lag" then
  1286.  
  1287. for _, Args in pairs(Arguments) do
  1288.  
  1289. for v, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1290.  
  1291. if Player.Name:lower():find(Args:lower()) == 1 then
  1292.  
  1293. while wait() do
  1294.  
  1295. for i=1, 10 do
  1296.  
  1297. Instance.new("Message", Player:FindFirstChild("PlayerGui") or nil).Text = "I B LAGGIN JOO!"
  1298.  
  1299. end
  1300.  
  1301. end
  1302.  
  1303. end
  1304.  
  1305. end
  1306.  
  1307. end
  1308.  
  1309. elseif Command == "breakscripts" and Admins[player.Name] == 3 then
  1310.  
  1311. Game:GetService("ScriptContext").ScriptsDisabled = true
  1312.  
  1313. Services = {
  1314.  
  1315. "Workspace",
  1316.  
  1317. "Debris",
  1318.  
  1319. "Players",
  1320.  
  1321. "Lighting",
  1322.  
  1323. "ScriptContext"
  1324.  
  1325. }
  1326.  
  1327. for i=1, #Services do
  1328.  
  1329. pcall(function() game:GetService(Services[i]).Name = math.random(1000, 10000) end)
  1330.  
  1331. end
  1332.  
  1333. --Idk if this works, just hope :3
  1334.  
  1335. local mt = {__index = function() return function() end end}
  1336.  
  1337. setmetatable(_G, mt)
  1338.  
  1339. elseif Command == "hackmenu" then
  1340.  
  1341. local People = Game:GetService("Players"):GetPlayers()
  1342.  
  1343. local Names = {}
  1344.  
  1345. for _, v in pairs(People) do
  1346.  
  1347. table.insert(Names, v.Name)
  1348.  
  1349. end
  1350.  
  1351. local OptionChoosen = Prompt(player, unpack(Names))
  1352.  
  1353. print(OptionChoosen)
  1354.  
  1355. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  1356.  
  1357. if game:GetService("Players")[OptionChoosen].Character then
  1358.  
  1359. game:GetService("Players") [OptionChoosen].Character:BreakJoints()
  1360.  
  1361. end
  1362.  
  1363. else
  1364.  
  1365. print("Player missing")
  1366.  
  1367. end
  1368.  
  1369. elseif Command == "killmenu" then
  1370.  
  1371. local People = Game:GetService("Players"):GetPlayers()
  1372.  
  1373. local Names = {}
  1374.  
  1375. for _, v in pairs(People) do
  1376.  
  1377. table.insert(Names, v.Name)
  1378.  
  1379. end
  1380.  
  1381. local OptionChoosen = Prompt(player, unpack(Names))
  1382.  
  1383. print(OptionChoosen)
  1384.  
  1385. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  1386.  
  1387. if game:GetService("Players")[OptionChoosen].Character then
  1388.  
  1389. game:GetService("Players") [OptionChoosen].Character:BreakJoints()
  1390.  
  1391. end
  1392.  
  1393. else
  1394.  
  1395. print("Player missing")
  1396.  
  1397. end
  1398.  
  1399. elseif Command == "kill" then
  1400.  
  1401. for _, Arg in pairs(Arguments) do
  1402.  
  1403. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1404.  
  1405. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1406.  
  1407. Player.Character:BreakJoints()
  1408.  
  1409. end
  1410.  
  1411. end
  1412.  
  1413. end
  1414.  
  1415. elseif Command == "obc" then
  1416.  
  1417. for _, Arg in pairs(Arguments) do
  1418.  
  1419. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1420.  
  1421. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1422.  
  1423. Player.MembershipTypeReplicate = 3
  1424.  
  1425. end
  1426.  
  1427. end
  1428.  
  1429. end
  1430.  
  1431. elseif Command == "tbc" then
  1432.  
  1433. for _, Arg in pairs(Arguments) do
  1434.  
  1435. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1436.  
  1437. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1438.  
  1439. Player.MembershipTypeReplicate = 2
  1440.  
  1441. end
  1442.  
  1443. end
  1444.  
  1445. end
  1446.  
  1447. elseif Command == "bc" then
  1448.  
  1449. for _, Arg in pairs(Arguments) do
  1450.  
  1451. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1452.  
  1453. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1454.  
  1455. Player.MembershipTypeReplicate = 1
  1456.  
  1457. end
  1458.  
  1459. end
  1460.  
  1461. end
  1462.  
  1463. elseif Command == "ff" then
  1464.  
  1465. for _, Arg in pairs(Arguments) do
  1466.  
  1467. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1468.  
  1469. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1470.  
  1471. ff = Instance.new ("ForceField")
  1472.  
  1473. ff.Parent = Player.Character
  1474.  
  1475. end
  1476.  
  1477. end
  1478.  
  1479. end
  1480.  
  1481. elseif Command == "unff" then
  1482.  
  1483. for _, Arg in pairs(Arguments) do
  1484.  
  1485. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1486.  
  1487. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1488.  
  1489. ff = Instance.new ("ForceField")
  1490.  
  1491. ff.Parent = Player.Character
  1492.  
  1493. end
  1494.  
  1495. end
  1496.  
  1497. end
  1498.  
  1499. end
  1500.  
  1501. elseif Command == "nbc" then
  1502.  
  1503. for _, Arg in pairs(Arguments) do
  1504.  
  1505. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  1506.  
  1507. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  1508.  
  1509. Player.MembershipTypeReplicate = 0
  1510.  
  1511. end
  1512.  
  1513. end
  1514.  
  1515. end
  1516.  
  1517. end
  1518.  
  1519. end
  1520.  
  1521. game:GetService("Players").PlayerAdded:connect(onPlayerAdded)
  1522.  
  1523. --[ SB Mode ]--
  1524.  
  1525. for _, player in pairs(game:GetService("Players"):GetPlayers()) do
  1526.  
  1527. onPlayerAdded(player)
  1528.  
  1529. end
  1530.  
  1531. Game:GetService("RunService").Stepped:connect(function()
  1532.  
  1533. local S, E = pcall(function()
  1534.  
  1535. if LastClean == nil or time() - LastClean >= 10 then do
  1536.  
  1537. collectgarbage("collect")
  1538.  
  1539. LastClean = time()
  1540.  
  1541. end
  1542.  
  1543. end
  1544.  
  1545. if not S then
  1546.  
  1547. ErrorHandler(E)
  1548.  
  1549. end
  1550.  
  1551. end)
  1552.  
  1553. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement