Advertisement
alpayspastbin

Untitled

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