Advertisement
xZkills_Guerreroser

Crash Your Computer/Studio

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