Advertisement
ares200345

ADMIN BOOKS DARK VERSION XD

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