xOmqJacky

MaybeRandom?

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