Advertisement
memberhero

Untitled

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