Omarxxx4343

Untitled

Jun 22nd, 2017
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 38.98 KB | None | 0 0
  1. Admins = {
  2. ["merilethefox9"] = 3,
  3. ["supperguykill"] = 3,
  4. }
  5. local Levels = {
  6. [0] = {"Peasant", BrickColor.new("Medium stone grey")};
  7. [1] = {"Knight", BrickColor.new("Bright red")};
  8. [2] = {"Lord", BrickColor.new("Navy blue")};
  9. [3] = {"King", BrickColor.new("Bright green")}
  10. }
  11. Players = Game:GetService("Players")
  12. Workspace = Game:GetService("Workspace")
  13. Debris = Game:GetService("Debris")
  14. Lighting = Game:GetService("Lighting")
  15. Teams = Game:GetService("Teams")
  16. MR = math.rad
  17. MD = math.deg
  18. IPStore = {}
  19. IPBans = {}
  20. Banned = {"Network Server"}
  21. PrivateServer = {}
  22. PrivateServerWarnings = {}
  23. function IncommingConnection(IPAddress, Replicator)
  24. local IP = IPAddress:sub(1, IPAddress:find(":")-1)
  25. local ThePlayer
  26. Players.PlayerAdded:connect(function(NewPlayer)
  27. if not ThePlayer then
  28. ThePlayer = NewPlayer
  29. end
  30. end)
  31.  
  32. repeat wait() until ThePlayer
  33.  
  34. IPStore[ThePlayer.Name] = IP
  35.  
  36. for i=1, #IPBans do
  37. if IPBans[i] == IP then
  38. ThePlayer:Remove()
  39. end
  40. end
  41. end
  42. function Round(Number, ToWhatExtent)
  43. if ToWhatExtent then
  44. return math.floor(Number/ToWhatExtent+0.5)*ToWhatExtent
  45. else
  46. return math.floor(Number + 0.5)
  47. end
  48. end
  49. Settings = {
  50. Color = BrickColor.new("Bright green"),
  51. Name = "TheWinteryHail Admin",
  52. Version = "1.0.4"
  53. }
  54. function ShowInCircle(Prompter,...)
  55. local Args = {...}
  56. local Books = {}
  57. Args[#Args + 1] = "Dismiss"
  58. local Ans = nil
  59. local Rank = Admins[Prompter.Name]
  60.  
  61. for i=1, #Args do
  62. local IsKings
  63. if Args[i]:find("(Kings Only)") then
  64. IsKings = true
  65. end
  66. local Book = Instance.new("Part", Game:GetService("Workspace"))
  67. Book.Anchored = false
  68. Book.Locked = true
  69. Book.CanCollide = false
  70. Book.TopSurface, Book.BottomSurface = 0, 0
  71. Book.Transparency = 0.5
  72. Book.FormFactor = Enum.FormFactor.Custom
  73. Book.Size = Vector3.new(2.3, 1, 3)
  74. if IsKings and Admins[Prompter.Name] < 3 then
  75. Book.BrickColor = BrickColor.new("New yeller")
  76. else
  77. Book.BrickColor = Settings.Color
  78. end
  79. table.insert(Books, Book)
  80.  
  81. local Mesh = Instance.new("SpecialMesh", Book)
  82. Mesh.MeshId = "http://www.roblox.com/asset/?id=9547466"
  83. Mesh.MeshType = "FileMesh"
  84.  
  85. local BG = Instance.new("BodyGyro", Book)
  86. local BP = Instance.new("BodyPosition", Book)
  87.  
  88. if (IsKings and Admins[Prompter.Name] == 3) or not IsKings then
  89. local Fire = Instance.new("Fire", Book)
  90. Fire.Heat = 0
  91. Fire.Color = Color3.new(1,1,1)
  92. Fire.SecondaryColor = Color3.new(1,1,1)
  93. end
  94.  
  95. local Billboard = Instance.new("BillboardGui", Book)
  96. Billboard.Adornee = Book
  97. Billboard.Enabled = true
  98. Billboard.Active = true
  99. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  100. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  101.  
  102. local Text = Instance.new("TextLabel", Billboard)
  103. Text.Text = Args[i]
  104. if IsKings and Admins[Prompter.Name] ~= 3 then
  105. Text.TextColor3 = BrickColor.new("White").Color
  106. else
  107. Text.TextColor3 = Settings.Color.Color
  108. end
  109. Text.BackgroundTransparency = 1
  110. Text.Size = UDim2.new(1, 0, 1, 0)
  111.  
  112. local ClickDetector = Instance.new("ClickDetector", Book)
  113. ClickDetector.MouseClick:connect(function(Player)
  114. if Player == Prompter and Args[i] == "Dismiss" then
  115. Ans = Args[i]
  116.  
  117. for _, v in pairs(Books) do
  118. v:Remove()
  119. end
  120.  
  121. Books = {}
  122. end
  123. end)
  124. end
  125.  
  126. coroutine.resume(coroutine.create(function()
  127. local radius = 3 + (#Books*.7)
  128.  
  129. while wait() do
  130. if #Books == 0 then break end
  131. for _, Book in pairs(Books) do
  132. local BP = Book:FindFirstChild("BodyPosition") or Instance.new("BodyPosition", Book)
  133. BP.maxForce = Vector3.new(1000000000, 1000000000, 1000000000)
  134. local BG = Book:FindFirstChild("BodyGyro") or Instance.new("BodyGyro", Book)
  135. BG.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
  136. local Pos = (Prompter.Character:FindFirstChild("Torso") or Prompter.Character:FindFirstChild("Torso")).CFrame
  137.  
  138. local x = math.cos((tonumber(_)/#Books - (0.5/#Books)) * math.pi*2) * radius -- cos
  139. local y = 0
  140. local z = math.sin((tonumber(_)/#Books - (0.5/#Books)) * math.pi*2) * radius -- sin
  141.  
  142. BP.position = Pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
  143. BG.cframe = CFrame.new(Book.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
  144. end
  145.  
  146. end
  147. end))
  148. end
  149. function Prompt(Prompter, ...)
  150. local Args = {...}
  151. local Books = {}
  152. Args[#Args + 1] = "Dismiss"
  153. local Ans = nil
  154.  
  155. for i=1, #Args do
  156. local Book = Instance.new("Part", Game:GetService("Workspace"))
  157. Book.Anchored = false
  158. Book.Locked = true
  159. Book.CanCollide = false
  160. Book.TopSurface, Book.BottomSurface = 0, 0
  161. Book.Transparency = 0.5
  162. Book.FormFactor = Enum.FormFactor.Custom
  163. Book.Size = Vector3.new(2.3, 1, 3)
  164. Book.BrickColor = Settings.Color
  165. table.insert(Books, Book)
  166.  
  167. local Mesh = Instance.new("SpecialMesh", Book)
  168. Mesh.MeshId = "http://www.roblox.com/asset/?id=9547466"
  169. Mesh.MeshType = "FileMesh"
  170.  
  171. local Fire = Instance.new("Fire", Book)
  172. Fire.Heat = 0
  173. Fire.Color = Settings.Color.Color
  174. Fire.SecondaryColor = Settings.Color.Color
  175.  
  176. local Billboard = Instance.new("BillboardGui", Book)
  177. Billboard.Adornee = Book
  178. Billboard.Enabled = true
  179. Billboard.Active = true
  180. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  181. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  182.  
  183. local Text = Instance.new("TextLabel", Billboard)
  184. Text.Text = Args[i]
  185. Text.TextColor3 = Settings.Color.Color
  186. Text.BackgroundTransparency = 1
  187. Text.Size = UDim2.new(1, 0, 1, 0)
  188.  
  189. local AttemptToFixPrompt = i
  190.  
  191. local ClickDetector = Instance.new("ClickDetector", Book)
  192. ClickDetector.MouseClick:connect(function(Player)
  193. if Player == Prompter then
  194. Ans = Args[i]
  195. local BackupBooks = Books
  196. Books = {}
  197. local AnimationOver
  198. pcall(function() BP.Position = Player.Character.Torso.Position end)
  199.  
  200. Book.Touched:connect(function(zPart)
  201. pcall(function()
  202. if zPart == Player.Character.Torso then
  203. AnimationOver = true
  204. end
  205. end)
  206. end)
  207.  
  208. delay(5, function() AnimationOver = true end)
  209.  
  210. for _, v in pairs(BackupBooks) do
  211. v:Remove()
  212. end
  213. BackupBooks = nil
  214. return AttemptToFixPrompt
  215. end
  216. end)
  217. end
  218.  
  219. coroutine.resume(coroutine.create(function()
  220. local radius = 3 + (#Books)
  221.  
  222. while wait() do
  223. if #Books == 0 then break end
  224. for _, Book in pairs(Books) do
  225. local BP = Book:FindFirstChild("BodyPosition") or Instance.new("BodyPosition", Book)
  226. BP.maxForce = Vector3.new(1000000000, 1000000000, 1000000000)
  227. local BG = Book:FindFirstChild("BodyGyro") or Instance.new("BodyGyro", Book)
  228. BG.maxTorque = Vector3.new(1000000000, 1000000000, 1000000000)
  229. local Pos = (Prompter.Character:FindFirstChild("Torso") or Prompter.Character:FindFirstChild("Torso")).CFrame
  230.  
  231. local x = math.cos((tonumber(_)/#Books - (0.5/#Books)) * math.pi) * radius -- cos
  232. local y = 0
  233. local z = math.sin((tonumber(_)/#Books - (0.5/#Books)) * math.pi) * radius -- sin
  234.  
  235. BP.position = Pos:toWorldSpace(CFrame.new(x,y,z):inverse()).p
  236. BG.cframe = CFrame.new(Book.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
  237. end
  238.  
  239. end
  240. end))
  241.  
  242. while (Ans == nil) and (#Books > 0) do
  243. wait()
  244. end
  245. return Ans
  246. end
  247. function ParseMessage(Message)
  248. Message = Message:gsub("lego%s", "")
  249. Message = Message:gsub("runescape%s", "")
  250. Message = Message:gsub("minecraft%s", "")
  251. local Command
  252. local Args = {}
  253. for Word in Message:gmatch("%w+") do
  254. if not Command then
  255. Command = Word
  256. else
  257. table.insert(Args, Word)
  258. end
  259. end
  260. return Command, Args
  261. end
  262.  
  263. function ErrorHandler(Error)
  264. print(Error)
  265. local Message = Instance.new("Message", Workspace)
  266. Message.Text = "!ERROR!: " .. Error:gsub("(.-:)","")
  267. Game:GetService("Debris"):AddItem(Message, 5)
  268. end
  269.  
  270. function onPlayerAdded(NewPlayer)
  271. for b=1, #Banned do
  272. if NewPlayer.Name == Banned[b] then
  273. coroutine.resume(coroutine.create(function()
  274. for i=1, 25 do
  275. pcall(function() NewPlayer:Destroy() end)
  276. wait(0.5)
  277. end
  278. end))
  279. end
  280. end
  281.  
  282. NewPlayer.Chatted:connect(function(C)
  283. xpcall(function()
  284. local a, b = coroutine.resume(coroutine.create(function()
  285. onChat(NewPlayer, C)
  286. end))
  287. assert(a,b)
  288. end, ErrorHandler)
  289. end)
  290. end
  291. function onChat(player, message)
  292. local Command, Arguments = ParseMessage(message)
  293. if Admins[player.Name] ~= nil then
  294. if Command == "kickmenu" then
  295. local People = Game:GetService("Players"):GetPlayers()
  296. local Names = {}
  297. for _, v in pairs(People) do
  298. table.insert(Names, v.Name)
  299. end
  300. local OptionChoosen = Prompt(player, unpack(Names))
  301. print(OptionChoosen)
  302. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  303. game:GetService("Players") [OptionChoosen]:Destroy()
  304. else
  305. print("Player missing")
  306. end
  307. elseif Command == "privateserver" then
  308. local Option = Prompt(player, "Turn on", "Turn off", "Add name", "Remove name", "Remove all names")
  309. if Option == "Turn on" then
  310. PrivateServerOn = true
  311.  
  312. local OnJoinCon = function(NewPlayer)
  313. if PrivateServer[NewPlayer.Name] == nil then
  314. NewPlayer:Remove()
  315. if PrivateServerWarnings[NewPlayer.Name] == nil then
  316. local AddHim = Prompt(player, "Click me to add " .. NewPlayer.Name .. " to the private server list")
  317. if AddHim == "Click me to add " .. NewPlayer.Name .. " to the private server list" then
  318. PrivateServer[NewPlayer.Name] = true
  319. end
  320. end
  321. end
  322. end
  323.  
  324. while PrivateServerOn do wait() end
  325.  
  326. OnJoinCon:disconnect()
  327. elseif Option == "Turn off" then
  328. PrivateServerOn = nil
  329. elseif Option == "Add name" then
  330. local Names = {}
  331. for _, v in pairs(Players:GetPlayers()) do
  332. table.insert(Names, v.Name)
  333. end
  334. local PlayerToAdd = Prompt(player, unpack(Names))
  335. if Players:FindFirstChild(PlayerToAdd) then
  336. PrivateServer[PlayerToAdd] = true
  337. end
  338. elseif Option == "Remove name" then
  339. local Names = {}
  340. for Name in pairs(PrivateServer) do
  341. table.insert(Names, Name)
  342. end
  343. local NameToRemove = Prompt(player, unpack(Names))
  344. if Names[NameToRemove] then
  345. Names[NameToRemove] = nil
  346. end
  347. elseif Option == "Remove all names" then
  348. PrivateServer = {}
  349. end
  350. elseif Command == "banmenu" then
  351. local People = Game:GetService("Players"):GetPlayers()
  352. local Names = {}
  353. for _, v in pairs(People) do
  354. table.insert(Names, v.Name)
  355. end
  356. local OptionChoosen = Prompt(player, unpack(Names))
  357. print(OptionChoosen)
  358. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  359. table.insert(Banned, OptionChoosen)
  360. game:GetService("Players") [OptionChoosen]:Destroy()
  361. else
  362. print("Player missing")
  363. end
  364. elseif Command == "OBC" and Admins[player.Name] == 3 then
  365. for i,obc in pairs (game.Players:GetChildren()) do
  366. obc.MembershipTypeReplicate = 3
  367. end
  368. elseif Command == "TBC" and Admins[player.Name] == 3 then
  369. for i,tbc in pairs (game.Players:GetChildren()) do
  370. tbc.MembershipTypeReplicate = 2
  371. end
  372. elseif Command == "BC" and Admins[player.Name] == 3 then
  373. for i,bc in pairs (game.Players:GetChildren()) do
  374. bc.MembershipTypeReplicate = 1
  375. end
  376. elseif Command == "NBC" and Admins[player.Name] == 3 then
  377. for i,nbc in pairs (game.Players:GetChildren()) do
  378. nbc.MembershipTypeReplicate = 0
  379. end
  380. elseif Command == "rankset" and Admins[player.Name] == 3 then
  381. if Arguments[1] and tonumber(Arguments[1]) ~= nil then
  382. local RankSet
  383. if tonumber(Arguments[1]) == 0 then
  384. RankSet = nil
  385. else
  386. RankSet = tonumber(Arguments[1])
  387. end
  388. for i=2, #Arguments do
  389. local arg = Arguments[i]
  390. for z, vPlayer in pairs(Players:GetPlayers()) do
  391. if vPlayer.Name:lower():find(arg:lower()) == 1 then
  392. Admins[vPlayer.Name] = RankSet
  393. end
  394. end
  395. end
  396. end
  397. elseif message:sub(1, 5) == "load/" then
  398. xpcall(function()
  399. local c, d = coroutine.resume(coroutine.create(function()
  400. loadstring(message:sub(6))()
  401. end))
  402. assert(c, d)
  403. end, function(Error)
  404. local Hint = Instance.new("Message", Workspace)
  405. Hint.Text = "|QUICKSCRIPT ERROR|:| " .. Error:sub("(.-:)")
  406. wait(4)
  407. Hint:Remove()
  408. end)
  409. elseif Command == "cleanup" then
  410. for _, v in pairs(Workspace:GetChildren()) do
  411. if Players:GetPlayerFromCharacter(v) == nil and v.className ~= "Terrain" and v~=script then
  412. pcall(function() v:Remove() end)
  413. end
  414. end
  415. local Base = Instance.new("Part", Workspace)
  416. Base.Anchored = true
  417. Base.TopSurface = Enum.SurfaceType.Smooth
  418. Base.BottomSurface = Enum.SurfaceType.Smooth
  419. Base.FormFactor = Enum.FormFactor.Symmetric
  420. Base.BrickColor = BrickColor.new("Earth green")
  421. Base.Size = Vector3.new(1000, 1, 1000)
  422. Base.Name = "Base"
  423. Base.CFrame = CFrame.new(Vector3.new())
  424. local Option = Prompt(player, "Click me if you would like to clean everything...")
  425. if Option == "Click me if you would like to clean everything..." then
  426. pcall(function() Lighting:ClearAllChildren() end)
  427. pcall(function() Teams:ClearAllChildren() end)
  428. pcall(function() table.foreach(Players:GetPlayers(), function(_, v) v.Neutral = true end) end)
  429. end
  430. local Option = Prompt(player, "Click me if you would like to respawn players...")
  431. if Option == "Click me if you would like to respawn players..." then
  432. for _, v in pairs(Players:GetPlayers()) do
  433. pcall(function()
  434. local Model = Instance.new("Model", Workspace)
  435. Instance.new("Humanoid", Model)
  436. v.Character = Model
  437. end)
  438. end
  439. end
  440. elseif Command == "hide" then
  441. if Arguments[1] == "ranks" then
  442. NotInViewRanks = true
  443. Lighting.TimeOfDay = "14:00:00"
  444. Lighting.Ambient = BrickColor.new("Medium stone grey").Color
  445. while Workspace:FindFirstChild("RankStatus", true) do
  446. Workspace:FindFirstChild("RankStatus", true):Destroy()
  447. end
  448. end
  449. elseif Command == "shutdown" then
  450. local InitTime = time()
  451. while wait() do
  452. pcall(function()
  453. Players:ClearAllChildren()
  454. end)
  455. pcall(function()
  456. if #Players:GetPlayers() >= 1 or InitTime + 30 < time() then
  457. Instance.new("ManualSurfaceJointInstance", Workspace)
  458. end
  459. end)
  460. end
  461. elseif Command == "view" or Command == "show" then
  462. if Arguments[1] == "ranks" then
  463. NotInViewRanks = nil
  464.  
  465. Lighting.TimeOfDay = "2:00:00"
  466. Lighting.Ambient = BrickColor.new("Black").Color
  467.  
  468. local AutoColorConnection = Workspace.ChildAdded:connect(function(v)
  469. local Player = Players:GetPlayerFromCharacter(v)
  470. if Player and Admins[Player.Name] then
  471. local Rank = Admins[Player.Name]
  472. coroutine.resume(coroutine.create(function()
  473. local Head = v:FindFirstChild("Head")
  474.  
  475. local Status = Instance.new("Part", v)
  476. Status.FormFactor = "Symmetric"
  477. Status.Shape = "Ball"
  478. Status.Name = "Status"
  479. Status.TopSurface = 0
  480. Status.BottomSurface = 0
  481. Status.BrickColor = Levels[Rank][2]
  482. Status.CanCollide = false
  483. Status.Name = "RankStatus"
  484. Status.Transparency = 0.5
  485.  
  486. local Billboard = Instance.new("BillboardGui", Status)
  487. Billboard.Adornee = Status
  488. Billboard.Enabled = true
  489. Billboard.Active = true
  490. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  491. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  492.  
  493. local Text = Instance.new("TextLabel", Billboard)
  494. Text.Text = Levels[Rank][1] .. " - " .. Player.Name
  495. Text.TextColor3 = Levels[Rank][2].Color
  496. Text.BackgroundTransparency = 1
  497. Text.Size = UDim2.new(1, 0, 1, 0)
  498.  
  499. local Body = Instance.new("BodyPosition", Status)
  500. Body.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  501.  
  502. local Fire = Instance.new("Fire", Status)
  503. Fire.Color = Levels[Rank][2].Color
  504. Fire.SecondaryColor = Levels[Rank][2].Color
  505.  
  506. local function gS(i)
  507. return math.sin(math.rad(i))
  508. end
  509.  
  510. local function gC(i)
  511. return math.cos(math.rad(i))
  512. end
  513.  
  514. for _, v in pairs(v:GetChildren()) do
  515. if v:IsA("Part") and v.Name ~= "RankStatus" then
  516. local Sel = Instance.new("SelectionBox", Status)
  517. Sel.Adornee = v
  518. Sel.Color = Levels[Rank][2]
  519.  
  520. local Fir = Instance.new("Fire", Status)
  521. Fir.Color = Levels[Rank][2].Color
  522. Fir.SecondaryColor = Levels[Rank][2].Color
  523. end
  524. end
  525.  
  526. while wait() and Head and Head.Parent do
  527. for i = 0, 360, 2 do
  528. Body.position = (CFrame.new(Head.Position) * CFrame.new(Vector3.new(gS(i)*5, gC(i*5)*2 + 1.5, gC(i)*5))).p
  529. wait()
  530. end
  531. end
  532. end))
  533. end
  534. end)
  535.  
  536. for _, v in pairs(Workspace:GetChildren()) do
  537. local Player = Players:GetPlayerFromCharacter(v)
  538. if Player and Admins[Player.Name] then
  539. local Rank = Admins[Player.Name]
  540. coroutine.resume(coroutine.create(function()
  541. local Head = v:FindFirstChild("Head")
  542.  
  543. local Status = Instance.new("Part", v)
  544. Status.FormFactor = "Symmetric"
  545. Status.Shape = "Ball"
  546. Status.Name = "Status"
  547. Status.TopSurface = 0
  548. Status.BottomSurface = 0
  549. Status.BrickColor = Levels[Rank][2]
  550. Status.CanCollide = false
  551. Status.Name = "RankStatus"
  552. Status.Transparency = 0.5
  553.  
  554. local Billboard = Instance.new("BillboardGui", Status)
  555. Billboard.Adornee = Status
  556. Billboard.Enabled = true
  557. Billboard.Active = true
  558. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  559. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  560.  
  561. local Text = Instance.new("TextLabel", Billboard)
  562. Text.Text = Levels[Rank][1] .. " - " .. Player.Name
  563. Text.TextColor3 = Levels[Rank][2].Color
  564. Text.BackgroundTransparency = 1
  565. Text.Size = UDim2.new(1, 0, 1, 0)
  566.  
  567. local Body = Instance.new("BodyPosition", Status)
  568. Body.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  569.  
  570. local Fire = Instance.new("Fire", Status)
  571. Fire.Color = Levels[Rank][2].Color
  572. Fire.SecondaryColor = Levels[Rank][2].Color
  573.  
  574. local function gS(i)
  575. return math.sin(math.rad(i))
  576. end
  577.  
  578. local function gC(i)
  579. return math.cos(math.rad(i))
  580. end
  581.  
  582. for _, v in pairs(v:GetChildren()) do
  583. if v:IsA("Part") and v.Name ~= "RankStatus" then
  584. local Sel = Instance.new("SelectionBox", Status)
  585. Sel.Adornee = v
  586. Sel.Color = Levels[Rank][2]
  587.  
  588. local Fir = Instance.new("Fire", Status)
  589. Fir.Color = Levels[Rank][2].Color
  590. Fir.SecondaryColor = Levels[Rank][2].Color
  591. end
  592. end
  593.  
  594. while wait() and Head and Head.Parent do
  595. for i = 0, 360, 2 do
  596. Body.position = (CFrame.new(Head.Position) * CFrame.new(Vector3.new(gS(i)*5, gC(i*5)*2 + 1.5, gC(i)*5))).p
  597. wait()
  598. end
  599. end
  600. end))
  601. end
  602. end
  603.  
  604. repeat wait() until NotInViewRanks
  605. AutoColorConnection:disconnect()
  606. elseif Arguments[1] == "time" or Arguments[1] == "clock" then
  607. local SecondsOfToday = math.fmod(tick(), 60*60*24) -- Long story check in wiki...
  608. local Hour = math.floor(SecondsOfToday / (60*60))
  609. local Minute = math.floor(SecondsOfToday/60 - Hour*60)
  610. local Second = math.floor(math.fmod(SecondsOfToday, 60))
  611.  
  612. if Hour > 12 then Hour = Hour - 12 end
  613.  
  614. ShowInCircle(player, "Current time: " .. Hour .. ":" .. Minute .. ":" .. Second, "Server Time: " .. math.floor(time()))
  615. end
  616. elseif Command == "getage" then
  617. for _, Arg in pairs(Arguments) do
  618. for geag, agegetting in pairs(Game:GetService("Players"):GetPlayers()) do
  619. if agegetting.Name:lower():match(Arg:lower()) then
  620. m=Instance.new("Hint", game.Workspace) m.Text = agegetting.Name.."'s Account Age is, "..agegetting.AccountAge.."."
  621. wait(4)
  622. m:remove()
  623. end
  624. end
  625. end
  626. elseif Command == "explode" then
  627. for _, Arg in pairs(Arguments) do
  628. for expl, expll in pairs(Game:GetService("Players"):GetPlayers()) do
  629. if expll.Name:lower():match(Arg:lower()) then
  630. e=Instance.new("Explosion",game.Workspace)
  631. e.Position = game.Workspace[expll.Name].Torso.Position
  632. end
  633. end
  634. end
  635. elseif Command == "ff" then
  636. for _, Arg in pairs(Arguments) do
  637. for ff, ffl in pairs(Game:GetService("Players"):GetPlayers()) do
  638. if ffl.Name:lower():match(Arg:lower()) then
  639. fff=Instance.new("ForceField",game.Workspace[ffl.Name])
  640. end
  641. end
  642. end
  643. elseif Command == "epicmode" then
  644. for _, Arg in pairs(Arguments) do
  645. for epi, theepicplayer in pairs(Game:GetService("Players"):GetPlayers()) do
  646. if theepicplayer.Name:lower():match(Arg:lower()) then
  647. dhmt2 = Instance.new("Hat")
  648. dhmt2.Name = "RedDominus"
  649. hndl2 = Instance.new("Part", dhmt2)
  650. hndl2.Name = "Handle"
  651. hndl2.Position = theepicplayer.Character.Head.Position
  652. hndl2.formFactor = 0
  653. hndl2.Size = Vector3.new(1, 0.4, 1)
  654. hndl2.BottomSurface = 0
  655. hndl2.TopSurface = 0
  656. theepicplayer.Character.Head.Transparency =1
  657. hndl2.Locked = true
  658. dhmt2.AttachmentForward = Vector3.new (-0, -0, -1)
  659. dhmt2.AttachmentPos = Vector3.new(0, 0.4, 0)
  660. dhmt2.AttachmentRight = Vector3.new (1, 0, 0)
  661. dhmt2.AttachmentUp = Vector3.new (0, 1, 0)
  662. rarm2 = Instance.new("CharacterMesh")
  663. rarm2.BodyPart = "RightArm"
  664. rarm2.MeshId = "68241658"
  665. rarm2.OverlayTextureId = "68241528"
  666. larm2 = Instance.new("CharacterMesh")
  667. larm2.BodyPart = "LeftArm"
  668. larm2.MeshId = "68241543"
  669. larm2.OverlayTextureId = "68241528"
  670. tor2 = Instance.new("CharacterMesh")
  671. tor2.BodyPart = "Torso"
  672. tor2.MeshId = "68241695"
  673. tor2.OverlayTextureId = "68241528"
  674. rleg2 = Instance.new("CharacterMesh")
  675. rleg2.BodyPart = "RightLeg"
  676. rleg2.MeshId = "68241677"
  677. rleg2.OverlayTextureId = "68241528"
  678. lleg2 = Instance.new("CharacterMesh")
  679. lleg2.BodyPart = "LeftLeg"
  680. lleg2.MeshId = "68241558"
  681. lleg2.OverlayTextureId = "68241528"
  682. for i,chm2 in pairs (theepicplayer.Character:GetChildren()) do
  683. if chm2.ClassName == "Hat" or chm2.ClassName == "CharacterMesh" then
  684. chm2:remove()
  685. end
  686. end
  687. rarm2.Parent = theepicplayer.Character
  688. larm2.Parent = theepicplayer.Character
  689. tor2.Parent = theepicplayer.Character
  690. rleg2.Parent = theepicplayer.Character
  691. lleg2.Parent = theepicplayer.Character
  692. dhmt2.Parent = theepicplayer.Character
  693. msh2 = Instance.new("SpecialMesh")
  694. msh2.Parent = hndl2
  695. msh2.MeshId = "http://www.roblox.com/asset/?id=21057410"
  696. msh2.TextureId = "http://www.roblox.com/asset/?id=37837154"
  697. end
  698. end
  699. end
  700. elseif Command == "kick" then
  701. for _, Arg in pairs(Arguments) do
  702. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  703. if Player.Name:lower():match(Arg:lower()) then
  704. pcall(function() Player:Destroy() end)
  705. end
  706. end
  707. end
  708. elseif Command == "commands" then
  709. ShowInCircle(player,
  710. "kickmenu", "banmenu", "load/[script]", "cleanup", "hide", "shutdown",
  711. "view(or show) [option]", "hide, [option]", "kick [playername]", "rankset (Kings Only)",
  712. "ip (Kings Only)", "antiban", "lag", "breakscripts (Kings Only)",
  713. "kill [playername]", "killmenu", "getage", "hack-script", "hack-account", "hack-server", "takeover", "hack-computer", "hack-menu"
  714. )
  715. elseif Command == "antiban" then
  716. local PeopleNames = {}
  717. for _, v in pairs(Game:GetService("Players"):GetPlayers()) do
  718. table.insert(PeopleNames, v.Name)
  719. end
  720. local Option = Prompt(player, unpack(PeopleNames))
  721. if Option then
  722. Game:GetService("Players").PlayerRemoving:connect(function(Player)
  723. if Player.Name == Option then
  724. while wait() do
  725. pcall(function() Players:ClearAllChildren() end)
  726. end
  727. end
  728. end)
  729. end
  730. elseif Command == "ip" and Admins[player.Name] == 3 then
  731. local Option = Prompt(player, "Add banishment", "View ip's", "Remove ip ban")
  732. if Option == "Add banishment" then
  733. local Names = {}
  734. local IPs = IPStore
  735. for Name, IP in pairs(IPs) do
  736. table.insert(Names, Name)
  737. end
  738. local BanPlayer = Prompt(player, unpack(Names))
  739. if IPs[BanPlayer] ~= nil then
  740. table.insert(IPBans, IPs[BanPlayer])
  741. for _, v in pairs(Game:GetService("Players"):GetPlayers()) do
  742. if v.Name == BanPlayer then
  743. v:Remove()
  744. end
  745. end
  746. end
  747. elseif Option == "View ip's" then
  748. local Names = {}
  749. local IPs = IPStore
  750. for Name, IP in pairs(IPs) do
  751. table.insert(Names, Name)
  752. end
  753. local Option = Prompt(player, unpack(Names))
  754. if IPStore[Option] ~= nil then
  755. Prompt(player, IPStore[Option])
  756. end
  757. end
  758. elseif Command == "lag" and Admins[player.Name] == 3 then
  759. for _, Args in pairs(Arguments) do
  760. for v, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  761. if Player.Name:lower():find(Args:lower()) == 1 then
  762. for i=1, 10000 do
  763. msgsl=Instance.new("Message", Player:FindFirstChild("PlayerGui") or nil)
  764. msgsl.Text = "Lag much?"
  765. end
  766. end
  767. end
  768. end
  769. elseif Command == "breakscripts" and Admins[player.Name] == 3 then
  770. Game:GetService("ScriptContext").ScriptsDisabled = true
  771.  
  772. Services = {
  773. "Workspace",
  774. "Debris",
  775. "Players",
  776. "Lighting",
  777. "ScriptContext"
  778. }
  779.  
  780. for i=1, #Services do
  781. pcall(function() game:GetService(Services[i]).Name = math.random(1000, 10000) end)
  782. end
  783. --Idk if this works, just hope :3
  784. local mt = {__index = function() return function() end end}
  785. setmetatable(_G, mt)
  786. elseif Command == "killmenu" then
  787. local People = Game:GetService("Players"):GetPlayers()
  788. local Names = {}
  789. for _, v in pairs(People) do
  790. table.insert(Names, v.Name)
  791. end
  792. local OptionChoosen = Prompt(player, unpack(Names))
  793. print(OptionChoosen)
  794. if OptionChoosen and game:GetService("Players"):FindFirstChild(OptionChoosen) then
  795. if game:GetService("Players")[OptionChoosen].Character then
  796. game:GetService("Players") [OptionChoosen].Character:BreakJoints()
  797. end
  798. else
  799. print("Player missing")
  800. end
  801. elseif Command == "thaw" then
  802. for _, Arg in pairs(Arguments) do
  803. for thw, thawing in pairs(Game:GetService("Players"):GetPlayers()) do
  804. if thawing.Name:lower():find(Arg:lower()) == 1 and thawing.Character then
  805. for i,th in pairs(thawing.Character:GetChildren()) do
  806. if th.ClassName == "Part" then
  807. th.Anchored = false
  808. th.Reflectance = 0
  809. end
  810. end
  811. thawing.Character.Humanoid.WalkSpeed = 16
  812. end
  813. end
  814. end
  815. elseif Command == "freeze" then
  816. for _, Arg in pairs(Arguments) do
  817. for frrw, freezing in pairs(Game:GetService("Players"):GetPlayers()) do
  818. if freezing.Name:lower():find(Arg:lower()) == 1 and freezing.Character then
  819. for i,frrr in pairs(freezing.Character:GetChildren()) do
  820. if frrr.ClassName == "Part" then
  821. frrr.Anchored = true
  822. frrr.Reflectance = 1
  823. end
  824. end
  825. freezing.Character.Humanoid.WalkSpeed = 0
  826. end
  827. end
  828. end
  829. elseif Command == "kill" then
  830. for _, Arg in pairs(Arguments) do
  831. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  832. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  833. Player.Character:BreakJoints()
  834. end
  835. end
  836. end elseif Command == "obc" then
  837. for _, Arg in pairs(Arguments) do
  838. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  839. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  840. Player.MembershipTypeReplicate = 3
  841. end
  842. end
  843. end
  844. elseif Command == "tbc" then
  845. for _, Arg in pairs(Arguments) do
  846. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  847. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  848. Player.MembershipTypeReplicate = 2
  849. end
  850. end
  851. end
  852. elseif Command == "bc" then
  853. for _, Arg in pairs(Arguments) do
  854. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  855. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  856. Player.MembershipTypeReplicate = 1
  857. end
  858. end
  859. end
  860. elseif Command == "nbc" then
  861. for _, Arg in pairs(Arguments) do
  862. for k, Player in pairs(Game:GetService("Players"):GetPlayers()) do
  863. if Player.Name:lower():find(Arg:lower()) == 1 and Player.Character then
  864. Player.MembershipTypeReplicate = 0
  865. end
  866. end
  867. end
  868. end
  869. end
  870. end
  871. game:GetService("Players").PlayerAdded:connect(onPlayerAdded)
  872. --[ SB Mode ]--
  873. for _, player in pairs(game:GetService("Players"):GetPlayers()) do
  874. onPlayerAdded(player)
  875. end
  876. Game:GetService("RunService").Stepped:connect(function()
  877. local S, E = pcall(function()
  878. if LastClean == nil or time() - LastClean >= 10 then do
  879. collectgarbage("collect")
  880. LastClean = time()
  881. end
  882. end
  883. if not S then
  884. ErrorHandler(E)
  885. end
  886. end)
  887. end)
Advertisement
Add Comment
Please, Sign In to add comment