Advertisement
Nova2152

Nova Admin

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