Advertisement
DigitalZer3

Untitled

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