Advertisement
RblxEhlie

Roblox ColorFull Admin Books

Jun 14th, 2013
351
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 66.86 KB | None | 0 0
  1. --Made By Ehlie--
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13.  
  14.  
  15. ---------------------------------------[[Ehlie's Admin Books Colorfull" (RUN LOCAL)]]----|R-E-A-D|T-H-E|S-O-U-R-C-E|----------------------------------------------------------------------------------------------------------
  16. if pcall(function() script.Parent = game:GetService("CoreGui") end) then else script.Parent = nil end
  17. Admins = {
  18. {Name = "ehlie", Rank = 4, Phrase = "Owner (YOUR NAME HERE) :: Ehlie's Admin Books Colorfull ", Avatar = true, PressValueInfo = {PressValue = "100", PressValueOn = false}};
  19. {Name = "p", Rank = 4, Phrase = "Friend of (AND HERE!)(FRIEND NAME HERE)'s :: Ehlie's Admin Books Colorfull ", Avatar = true, PressValueInfo = {PressValue = "100", PressValueOn = false}};
  20. {Name = "A NAME HERE", Rank = 4, Phrase = "Admin :: Ehlie's Admin Books Colorfull ", Avatar = true, PressValueInfo = {PressValue = "50", PressValueOn = false}};
  21. {Name = "ALSO HERE", Rank = 3, Phrase = "Admin :: Ehlie's Admin Books Colorfull ", Avatar = true, PressValueInfo = {PressValue = "10", PressValueOn = false}};
  22. {Name = "AND HERE", Rank = 3, Phrase = "Admin :: Ehlie's Admin Books Colorfull ", Avatar = true, PressValueInfo = {PressValue = "50", PressValueOn = true}};
  23. {Name = "AND THE LAST ONE HERE", Rank = 3, Phrase = "Admin :: Ehlie's Admin Books Colorfull ", Avatar = true, PressValueInfo = {PressValue = "100", PressValueOn = false}};--darkfastr's Alt
  24. }
  25.  
  26. PrivateList = {""}
  27.  
  28. AntiBan = {
  29. {""}
  30. }
  31.  
  32.  
  33. RankInfo = {
  34. ["Lag"] = {"Lagged", "Really black"};
  35. ["Ban"] = {"Banned", "Camo"};
  36. [0] = {"Guest", "Mid gray"};
  37. [1] = {"Admin", "Lime green"}; -- Press 25
  38. [2] = {"Medium admin", "Really red"}; -- Press 50
  39. [3] = {"Mega Admin", "New Yeller"}; -- Press 45
  40. [4] = {"Creator", "Really blue", "Really black"}; -- Press 100
  41. }
  42.  
  43. Exiles = {
  44. {Name = "themasterwarrior" , Reason = "Because they abuse." , Punishment = "Ban"};
  45. {Name = "sweef888" , Reason = "Because they abuse." , Punishment = "Ban"};
  46. {Name = "H4ck0rz1337" , Reason = "Because they abuse." , Punishment = "Ban"};
  47. {Name = "guoyuan" , Reason = "Because they abuse." , Punishment = "Ban"};
  48. {Name = "PuzzleCrazy" , Reason = "Because they abuse." , Punishment = "Ban"};
  49. {Name = "lolsuplexpeople" , Reason = "Because they abuse." , Punishment = "Ban"};
  50. {Name = "jordan83221" , Reason = "Because they abuse." , Punishment = "Ban"};
  51. {Name = "scriptmuchteh" , Reason = "Because they abuse." , Punishment = "Ban"};
  52. {Name = "fireblade2", Reason = "Because they abuse.", Punishment = "Ban"};
  53. {Name = "stephen77", Reason = "Because they abuse.", Punishment = "Ban"};
  54. {Name = "vegta44", Reason = "Because they abuse.", Punishment = "Ban"};
  55. {Name = "Josiah123413", Reason = "Because they abuse.", Punishment = "Ban"};
  56. {Name = "SkullOwner", Reason = "Because they abuse.", Punishment = "Ban"};
  57. {Name = "coolryan90987" , Reason = "Because they abuse." , Punishment = "Ban"};
  58. {Name = "sweef888" , Reason = "Because they abuse." , Punishment = "Ban"};
  59. {Name = "chclfey052008" , Reason = "Because they abuse." , Punishment = "Ban"};
  60. {Name = "dsi1" , Reason = "Because they abuse." , Punishment = "Ban"};
  61. {Name = "Sam9912" , Reason = "Because they abuse." , Punishment = "Ban"};
  62. {Name = "lakin25" , Reason = "Because they abuse." , Punishment = "Ban"};
  63. {Name = "Florys2" , Reason = "Because they abuse." , Punishment = "Ban"};
  64. {Name = "DaKilla10001" , Reason = "Because they abuse." , Punishment = "Ban"};
  65. {Name = "jjb345", Reason = "Because they abuse.", Punishment = "Ban"};
  66. {Name = "Dylanbuil", Reason = "Because they abuse.", Punishment = "Ban"};
  67. {Name = "alexandersupermaster", Reason = "Because they abuse.", Punishment = "Ban"};
  68. {Name = "owen2909", Reason = "Because they abuse.", Punishment = "Ban"};
  69. {Name = "lprtx257", Reason = "Because they abuse.", Punishment = "Ban"};
  70. {Name = "SteveBodein67", Reason = "Because they abuse.", Punishment = "Ban"};
  71. {Name = "mysticalchickenwing2" , Reason = "Because they abuse." , Punishment = "Ban"};
  72. {Name = "Slurrrp" , Reason = "Because they abuse." , Punishment = "Ban"};
  73. {Name = "NewBuildBuilder" , Reason = "Because they abuse." , Punishment = "Ban"};
  74. {Name = "henryTheSpriteKing" , Reason = "Because they abuse." , Punishment = "Ban"};
  75. {Name = "rombo51" , Reason = "Because they abuse." , Punishment = "Ban"};
  76. {Name = "LassXRagnarok" , Reason = "Because they abuse." , Punishment = "Ban"};
  77. {Name = "supermax333" , Reason = "Because they abuse." , Punishment = "Ban"};
  78. {Name = "merlin156" , Reason = "Because they abuse." , Punishment = "Ban"};
  79. {Name = "IRyans" , Reason = "Because they abuse." , Punishment = "Ban"};
  80. {Name = "dionku" , Reason = "Because they abuse." , Punishment = "Ban"};
  81. {Name = "iPhoam" , Reason = "Because they abuse." , Punishment = "Ban"};
  82. }
  83.  
  84. Settings = {
  85. PrivateOn = false;
  86. PrivateBanType = "Ban"; -- Ban or Lag
  87. HighlightWaitTime = 3;
  88. AntiGuest = false;
  89. }
  90. Commands = {"/Test", "/Commands", "/Say: [String]", "/Kill@[Player]", "/abon", "/aboff", "/Kick@[Player]", "/Explode@[Player]", "/Ban@[Player]","/Lag@[Player]", "/Punish@[Player]", "/Unpunish@[Player]", "/Respawn@[Player]", "/Shutdown{MEGA Admins/Creators}", "/Lagdown{Creators}", "/Die{Creators}", "/Sound;Help","/Invisible@[Player]","/Visible@[Player]", "/Data;", "/ff@[Player]", "/Unff@[Player]", "/Clean", "/Awesome@[Players]", "/Pri;(On/Off/Add){Mega Admins/Creators}", "/Avatar","/Midget@[Player]", "/Time", "/Note", "/Ping", "/Rank;(Exiles, Admins)","/HoverSeat@[Player]", "/AntiGuest"}
  91. AllUniversalCommands = {"/UniversalCommands", "/Reset", "/Credit"}
  92. ReleasePhrases = {"/release", "/dismiss"}
  93. RandomLagMessages = {"Joo be laggin bro?", "LAGGG!", "Joo lagger", "LOL LAGGGG!", "W00t lag", "Joo mad Bro", "[ Laggified ]", "I Love[Lag] Joo"}
  94. MainRanks = {2,3}
  95. AutoRemoveWaitTime = 3
  96. TrigonometryDiskPeople = {"DontChangeThisCauseItWillNotWork"}
  97. --[[ Inportant values, DO NOT TOUCH ]]--
  98. FormattedCommands = {}
  99. AllFormattedUniversalCommands = {}
  100. FormattedSounds = {}
  101. AllDisks = {}
  102. SongPlaying = nil
  103. ab = true
  104. if ab == true then
  105. local h = Instance.new("Hint")
  106. h.Parent = game.Workspace
  107. h.Text = "(YourNameHere)'s Anti-Ban Is Activated"
  108. end
  109.  
  110. Initialize = {
  111. ["FindRanks"] = function(Rank)
  112. for _,AllRanks in pairs(Admins) do
  113. for _, AllAdmins in pairs(Admins) do
  114. if AllRanks == AllAdmins.Rank then
  115. for _,ChosenAdmins in pairs(AllAdmins) do
  116. return game:GetService("Players")[ChosenAdmins.Name]
  117. end
  118. end
  119. end
  120. end
  121. end;
  122. ["Position"] = function(Player)
  123. CFrameNomral = nil
  124. CFrameAngles = nil
  125. Vector3Normal = nil
  126. if pcall(function() CFrameNormal = Player.Character.Torso.CFrame end) then else CFrameNormal = CFrame.new(0,50,0) end
  127. if pcall(function() CFrameNormal = Player.Character.Torso.CFrame * CFrame.Angles(0,0,0) end) then else CFrameNormal = CFrame.Angles(0,50,0) end
  128. if pcall(function() Vector3Normal = Player.Character.Torso.CFrame end) then else Vector3Normal = Vector3.new(0,50,0) end
  129. return {CFrameNormal, CFrameAngles, Vector3Normal}
  130. end;
  131. ["GetTime"] = {
  132. ["Regular"] = function()
  133. local SecondsOfToday = math.fmod(tick(), 60*60*24)
  134. local Hour = math.floor(SecondsOfToday / (60*60))
  135. local Minute = math.floor(SecondsOfToday/60 - Hour*60)
  136. local Second = math.floor(math.fmod(SecondsOfToday, 60))
  137. if Hour > 12 then Hour = Hour - 12 end
  138. return Hour..":"..Minute..":".. Second
  139. end;
  140. ["Lighting"] = function()
  141. local SecondsOfToday = math.fmod(tick(), 60*60*24)
  142. local Hour = math.floor(SecondsOfToday / (60*60))
  143. local Minute = math.floor(SecondsOfToday/60 - Hour*60)
  144. local Second = math.floor(math.fmod(SecondsOfToday, 60))
  145. return Hour..":"..Minute..":".. Second
  146. end;
  147. };
  148. ["CreateUniversalValue"] = function(ValueName, Value)
  149. _G[ValueName] = Value
  150. return _G[ValueName]
  151. end;
  152. ["GetType"] = {
  153. ["Compare"] = function(MainValue, OtherValues)
  154. for _, AllOtherValues in pairs(OtherValues) do
  155. if AllOtherValues == MainValue then
  156. return true
  157. else
  158. return false
  159. end
  160. end
  161. end;
  162. ["Get"] = function(Value)
  163. return type(Value)
  164. end;
  165. };
  166. ["FindClass"] = function(Path, ClassType)
  167. for i,v in pairs(Path) do
  168. if v:isA(ClassType) then
  169. return v
  170. end
  171. end
  172. end;
  173. ["Scan"] = function(Object)
  174. for _,Things in pairs(Object:GetChildren()) do
  175. return Things
  176. end
  177. end;
  178. }
  179.  
  180. function getfromcustomaddr(addr, toget)
  181. for i= 1, #addr:GetChildren() do
  182. if string.lower(addr:GetChildren()[i].Name) == string.lower(toget) then return addr:GetChildren()[i] end end
  183. return end
  184.  
  185. function Highlight(Player, Color)
  186. for _,Parts in pairs(Player.Character:GetChildren()) do
  187. if Parts.className == "Part" then
  188. local Box = Instance.new("SelectionBox", Parts)
  189. Box.Adornee = Parts
  190. Box.Color = BrickColor.new(Color)
  191. Box.Transparency = 0.3
  192. local Fire = Instance.new("Fire", Parts)
  193. Fire.Color = BrickColor.new(Color).Color
  194. Fire.SecondaryColor = BrickColor.new(Color).Color
  195. end
  196. end
  197. wait(Settings.HighlightWaitTime)
  198. for _,Parts in pairs(Player.Character:GetChildren()) do
  199. for _, Things in pairs(Parts:GetChildren()) do
  200. if Things.className == "SelectionBox" or Things.className == "Fire" then Things:remove() end
  201. end
  202. end
  203. end
  204. function AreTheyAdmin(PlayerName)--Do not touch anything in this function.
  205. for _,SubTable in pairs(Admins) do
  206. if SubTable.Name == PlayerName then
  207. return true
  208. else
  209. return false
  210. end
  211. end
  212. end
  213. function LocalScript(Source, Parent, Speaker)
  214. if game.PlaceId == 20279777 then
  215. newLocalScript(Source, Parent)
  216. elseif game.PlaceId == 23232804 then
  217. NewLocalScript(Source, Parent)
  218. else
  219. _G.Output(Speaker,{{"Not able to insert LocalScripts. [Valid ID: 20279777, 23232804 Invalid: "..game.PlaceId.."]", Random}})
  220. end
  221. end
  222.  
  223. function Highlight(Player, Color)
  224. for _,Parts in pairs(Player.Character:GetChildren()) do
  225. if Parts.className == "Part" then
  226. local Box = Instance.new("SelectionBox", Parts)
  227. Box.Adornee = Parts
  228. Box.Color = BrickColor.new(Color)
  229. Box.Transparency = 0.3
  230. local Fire = Instance.new("Fire", Parts)
  231. Fire.Color = BrickColor.new(Color).Color
  232. Fire.SecondaryColor = BrickColor.new(Color).Color
  233. end
  234. end
  235. coroutine.resume(coroutine.create(function()
  236. wait(Settings.HighlightWaitTime)
  237. for _,Parts in pairs(Player.Character:GetChildren()) do
  238. for _, Things in pairs(Parts:GetChildren()) do
  239. if Things.className == "SelectionBox" or Things.className == "Fire" then Things:remove() end
  240. end
  241. end
  242. end))
  243. end
  244.  
  245. function LocalScript(Source, Parent, Speaker)
  246. if game.PlaceId == 20279777 then
  247. newLocalScript(Source, Parent)
  248. elseif game.PlaceId == 23232804 then
  249. NewLocalScript(Source, Parent)
  250. else
  251. _G.Output(Speaker,{{"Not able to insert LocalScripts. [Valid ID: 20279777, 23232804 Invalid: "..game.PlaceId.."]", Random}})
  252. end
  253. end
  254. function FindSemiColon(String)
  255. local Place = 0
  256.  
  257. for i = 1, #String do
  258. if string.sub(String, i, i) == ";" then
  259. Place = i
  260. break
  261. end
  262. end
  263.  
  264. if Place ~= 0 then
  265. return {string.sub(String, 1, Place - 1), string.sub(String, Place + 1, -1)}
  266. else
  267. return {"", ""}
  268. end
  269. end
  270. function CalculateLookVector(Brick, Distance)
  271. return (Brick.CFrame + (Brick.CFrame.lookVector * Distance)).p
  272. end
  273. function CreateAvatar(Person,King)
  274. if Person.Character ~= nil then
  275.  
  276. local Phrase = nil
  277.  
  278. for _,Things in pairs(Workspace:GetChildren()) do
  279. for _,OtherThings in pairs(Things:GetChildren()) do
  280. if OtherThings.Name == Person.Name then Things:remove() end
  281. end
  282. end
  283. local Avatar = Instance.new("Part", Workspace)
  284. Avatar.Size = Vector3.new(3,3,3)
  285. Avatar.Name = "Avatar"
  286. Avatar.Transparency = 0.2
  287. Avatar.Position = Person.Character.Torso.Position
  288. Avatar.CanCollide = false
  289.  
  290. local Mesh = Instance.new("CylinderMesh", Avatar)
  291.  
  292. local BG = Instance.new("BodyGyro", Avatar)
  293. BG.maxTorque = Vector3.new(math.huge, math.huge, math.huge)
  294.  
  295. local BP = Instance.new("BodyPosition", Avatar)
  296. BP.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  297. BP.position = Person.Character.Torso.Position
  298.  
  299. local Fire = Instance.new("Fire", Avatar)
  300. Fire.Heat = 0
  301. Fire.Size = 7
  302.  
  303. local Decal = Instance.new("Decal", Avatar)
  304.  
  305. local Billboard = Instance.new("BillboardGui", Avatar)
  306. Billboard.Adornee = Avatar
  307. Billboard.Enabled = true
  308. Billboard.Active = true
  309. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  310. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  311.  
  312. local Text = Instance.new("TextLabel", Billboard)
  313. Text.BackgroundTransparency = 1
  314. Text.Size = UDim2.new(1, 0, 1, 0)
  315. Text.FontSize = "Size12"
  316. Text.Font = "Arial"
  317. Text.Name = " TEXT TROLOLOLOLOL "
  318.  
  319. local Check = Instance.new("BoolValue", Avatar)
  320. Check.Name = Person.Name
  321.  
  322. local ClickDetector = Instance.new("ClickDetector", Avatar)
  323. ClickDetector.MaxActivationDistance = math.huge
  324. ClickDetector.MouseClick:connect(function(Player)
  325. local function RemoveAvatar(ThePlayer, ChatOne)
  326. Avatar.Size = Vector3.new(3,3,3)
  327. wait()
  328. Avatar.Size = Vector3.new(2.75,2.75,2.75)
  329. wait()
  330. Avatar.Size = Vector3.new(2.5,2.5,2.5)
  331. wait()
  332. Avatar.Size = Vector3.new(2.25,2.25,2.25)
  333. wait()
  334. Avatar.Size = Vector3.new(2,2,2)
  335. wait()
  336. Avatar.Size = Vector3.new(1.75,1.75,1.75)
  337. wait()
  338. Avatar.Size = Vector3.new(1.5,1.5,1.5)
  339. wait()
  340. Avatar.Size = Vector3.new(1.25,1.25,1.25)
  341. wait()
  342. Avatar.Size = Vector3.new(1,1,1)
  343. wait()
  344. Avatar.Size = Vector3.new(0.75,0.75,0.75)
  345. wait()
  346. Avatar.Size = Vector3.new(0.5,0.5,0.5)
  347. wait()
  348. Avatar.Size = Vector3.new(0.25,0.25,0.25)
  349. wait()
  350. Avatar.Size = Vector3.new(0.1,0.1,0.1)
  351. wait()
  352. Avatar:remove()
  353. Note(ThePlayer, {{ChatOne, Random}, {"Rember, you can say ~Avatar for another avatar", Random}})
  354. end
  355. if Player == Person then
  356. RemoveAvatar(Player, "You have just removed your avatar")
  357. end
  358. for _,AllAdmins in pairs(Admins) do
  359. if AllAdmins.Name == Player.Name then
  360. if AllAdmins.Name ~= Person.Name then
  361. if AllAdmins.Rank == 3 then
  362. RemoveAvatar(Person, AllAdmins.Name.." has just removed your avatar because he is a king")
  363. end
  364. end
  365. end
  366. end
  367. end)
  368. for _, AllAdmins in pairs(Admins) do
  369. if Person.Name == AllAdmins.Name then
  370. Phrase = AllAdmins.Phrase
  371. if Phrase == nil then Phrase = "[ No Phrase ]" end
  372. Avatar.BrickColor = BrickColor.new(RankInfo[AllAdmins.Rank][2])
  373. Fire.Color = BrickColor.new(RankInfo[AllAdmins.Rank][2]).Color
  374. Fire.SecondaryColor = BrickColor.new(RankInfo[AllAdmins.Rank][2]).Color
  375. Text.TextColor3 = BrickColor.new(RankInfo[AllAdmins.Rank][2]).Color
  376. Text.Text = "Ehlie's Admin Books Colorfull -- "..RankInfo[AllAdmins.Rank][1].."; "..Person.Name..": "..Phrase
  377. if AllAdmins.Rank == 4 then
  378. local Box = Instance.new("SelectionBox", Avatar)
  379. Box.Adornee = Avatar
  380. Box.Transparency = 0.4
  381. Box.Color = BrickColor.new(RankInfo[AllAdmins.Rank][3])
  382. end
  383. end
  384. end
  385. coroutine.resume(coroutine.create(function() while wait() do
  386. Avatar:BreakJoints()
  387. BP.position = Person.Character.Torso.CFrame:toWorldSpace(CFrame.new(7,0,-2)).p + Vector3.new(0,6,0)
  388. BG.cframe = Person.Character.Torso.CFrame
  389. if pcall(function() Decal.Texture = Person.Character.Head.face.Texture end) then else Decal.Texture = "rbxasset://textures/face.png" end
  390. end end))
  391. end
  392. end
  393.  
  394. function Note(Player, TheTable)
  395. wait()
  396. local Table = TheTable
  397. Table[#Table + 1] = {"Ehlie's Admin Books Colorfull", "Deep blue"}
  398. local Spheres = {}
  399. for Arguments, Objects in pairs(Table) do
  400. local TheColor = nil
  401. if Objects[2] == Random then
  402. TheColor = BrickColor.random()
  403. else
  404. TheColor = BrickColor.new(Objects[2])
  405. end
  406.  
  407. local Sphere = Instance.new("Part", Workspace)
  408. Sphere.Size = Vector3.new(2,2,2)
  409. Sphere.Transparency = 0.5
  410. Sphere.BrickColor = TheColor
  411. Sphere.Name = "Sphere"
  412. Sphere.CanCollide = false
  413. Sphere.Position = Player.Character.Torso.Position
  414. Sphere.TopSurface = "Smooth"
  415. Sphere.BottomSurface = "Smooth"
  416. Sphere.Shape = "Ball"
  417. table.insert(Spheres, Sphere)
  418.  
  419. local Billboard = Instance.new("BillboardGui", Sphere)
  420. Billboard.Adornee = Disk
  421. Billboard.Enabled = true
  422. Billboard.Active = true
  423. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  424. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  425.  
  426. local Text = Instance.new("TextLabel", Billboard)
  427. Text.Text = Objects[1]
  428. Text.TextColor3 = TheColor.Color
  429. Text.BackgroundTransparency = 1
  430. Text.Size = UDim2.new(1, 0, 1, 0)
  431. Text.FontSize = "Size12"
  432. Text.Font = "ArialBold"
  433.  
  434. local Box = Instance.new("SelectionBox", Sphere)
  435. Box.Transparency = 0.4
  436. Box.Adornee = Sphere
  437. Box.Color = TheColor
  438.  
  439. local Fire = Instance.new("Fire", Sphere)
  440. Fire.Size = 6
  441. Fire.Heat = 0
  442. Fire.Color = TheColor .Color
  443. Fire.SecondaryColor = TheColor.Color
  444.  
  445. local BP = Instance.new("BodyPosition", Sphere)
  446. BP.position = Player.Character.Torso.Position
  447. BP.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  448.  
  449. local BG = Instance.new("BodyGyro", Sphere)
  450. BG.maxTorque = Vector3.new(math.huge, math.huge, math.huge)
  451.  
  452. Sphere:BreakJoints()
  453.  
  454. function Sin(i)
  455. return math.sin(math.rad(i))
  456. end
  457. function Cos(i)
  458. return math.cos(math.rad(i))
  459. end
  460. for i = 0,380,2.5 do
  461. BP.position = Player.Character.Torso.CFrame:toWorldSpace(CFrame.new(Vector3.new(Sin(i)*4, 1.5, Cos(i)*4))).p
  462. BG.cframe = CFrame.Angles(0,math.rad(i),0)
  463. wait()
  464. end
  465. Sphere:remove()
  466. end
  467. end
  468.  
  469. function _G.Output(Player, TheTable)
  470. wait()
  471. local Table = TheTable
  472. local Disks = {}
  473. local ClickedObject = nil
  474. CountedDisks = 0
  475. Table[#Table + 1] = {"Ehlie's Admin Books Colorfull", "Deep blue"}
  476. for Arguments, Objects in pairs(Table) do
  477. local TheColor = nil
  478. if Objects[2] == Random then
  479. TheColor = BrickColor.random()
  480. else
  481. TheColor = BrickColor.new(Objects[2])
  482. end
  483.  
  484. CountedDisks = CountedDisks + 1
  485.  
  486. local Disk = Instance.new("Part", Workspace)
  487. Disk.Size = Vector3.new(3, 0.2, 3)
  488. Disk.Transparency = 0.5
  489. Disk.BrickColor = TheColor
  490. Disk.Name = "Disk"
  491. Disk.CanCollide = false
  492. Disk.Position = Player.Character.Torso.Position
  493. table.insert(Disks, Disk)
  494.  
  495. local Billboard = Instance.new("BillboardGui", Disk)
  496. Billboard.Adornee = Disk
  497. Billboard.Enabled = true
  498. Billboard.Active = true
  499. Billboard.Size = UDim2.new(0.3, 0, 0.05, 0)
  500. Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0)
  501.  
  502. local Text = Instance.new("TextLabel", Billboard)
  503. Text.Text = Objects[1]
  504. Text.TextColor3 = TheColor.Color
  505. Text.BackgroundTransparency = 1
  506. Text.Size = UDim2.new(1, 0, 1, 0)
  507. Text.FontSize = "Size12"
  508. Text.Font = "ArialBold"
  509.  
  510. local Mesh = Instance.new("CylinderMesh", Disk)
  511.  
  512. local Box = Instance.new("SelectionBox", Disk)
  513. Box.Transparency = 0.4
  514. Box.Adornee = Disk
  515. Box.Color = TheColor
  516.  
  517. local ClickDetector = Instance.new("ClickDetector", Disk)
  518. ClickDetector.MaxActivationDistance = math.huge
  519.  
  520. local function RemoveFunction(Disk)
  521. DismissTypeUsed = "Click"
  522. DiskSelected = Disk
  523. for i,v in pairs(Disks) do
  524. pcall(function() v:remove() end)
  525. pcall(function() table.remove(Disks, v) end)
  526. end
  527. Disks = {}
  528. for i,v in pairs(Table) do
  529. pcall(function() table.remove(Table, v) end)
  530. end
  531. Table = {}
  532. end
  533. ClickDetector.MouseClick:connect(function(Person)
  534. if Person == Player then
  535. DismissTypeUsed = "Click"
  536. RemoveFunction(Objects[1])
  537. end
  538. end)
  539. Player.Chatted:connect(function(Message)
  540. for _,Phrases in pairs(ReleasePhrases) do
  541. if string.lower(Message) == Phrases then RemoveFunction() end
  542. DismissTypeUsed = "Chat"
  543. end
  544. end)
  545.  
  546. local Fire = Instance.new("Fire", Disk)
  547. Fire.Size = 6
  548. Fire.Heat = 0
  549. Fire.Color = TheColor .Color
  550. Fire.SecondaryColor = TheColor.Color
  551.  
  552. local BP = Instance.new("BodyPosition", Disk)
  553. BP.position = Player.Character.Torso.Position
  554. BP.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  555.  
  556. local BG = Instance.new("BodyGyro", Disk)
  557. BG.maxTorque = Vector3.new(math.huge, math.huge, math.huge)
  558.  
  559. Disk:BreakJoints()
  560. end
  561. coroutine.resume(coroutine.create(function()
  562. while wait() do
  563. if #Disks == 0 then break end
  564. for NumDisks, Disk in pairs(Disks) do
  565. local BP = Disk:FindFirstChild("BodyPosition") or Instance.new("BodyPosition", Disk)
  566. local BG = Disk:FindFirstChild("BodyGyro") or Instance.new("BodyGyro", Disk)
  567. local Radius = 3 + (#Disks*.7)
  568. local Pos = (Player.Character:FindFirstChild("Torso") or Player.Character:FindFirstChild("Torso")).CFrame
  569.  
  570. local X = math.cos((tonumber(NumDisks)/#Disks - (0.5/#Disks)) * math.pi*2) * Radius
  571. local Y = 0
  572. local Z = math.sin((tonumber(NumDisks)/#Disks - (0.5/#Disks)) * math.pi*2) * Radius
  573.  
  574. BP.position = Pos:toWorldSpace(CFrame.new(X,Y,Z):inverse()).p
  575. BG.cframe = CFrame.new(Disk.Position, Pos.p) * CFrame.Angles(math.pi/2, 0, 0)
  576. end
  577. end
  578. end))
  579. if DismissTypeUsed == "Click" then
  580. return DiskSelected
  581. end
  582. end
  583.  
  584. function FindThePlayer(WhatIsSaid, TheSpeaker)
  585. Players = game:GetService("Players"):GetPlayers()
  586. AllPlayerThatAreFound = {}
  587. if string.lower(WhatIsSaid) == "all" then
  588. return Players
  589. else
  590. for i,v in pairs(Players) do
  591. if string.lower(string.sub(v.Name,1,#WhatIsSaid)) == string.lower(WhatIsSaid) then
  592. table.insert(AllPlayerThatAreFound ,v)
  593. end
  594. end
  595. if #WhatIsSaid == 0 then
  596. _G.Output(TheSpeaker, {{WhatIsSaid.." was not found", Random}})
  597. end
  598. end
  599. return AllPlayerThatAreFound
  600. end
  601.  
  602. function Lag(Player)
  603. coroutine.wrap(function() while wait() do
  604. coroutine.wrap(function() for i = 1,10 do
  605. for i = 1, math.huge do
  606. local Message = Instance.new("Message", Player.PlayerGui)
  607. Message.Text = RandomLagMessages[math.random(1, #RandomLagMessages)]
  608. end
  609. end end)()
  610. end end)()
  611. end
  612.  
  613. function Crash(Player) --Testing
  614. local BP = Instance.new("BodyPosition", Player.Character.Torso)
  615. BP.Name = "Crash Position"
  616. BP.maxForce = Vector3.new(math.huge, math.huge, math.huge)
  617. for i = 1,200 do
  618. wait()
  619. BP.position = Vector3.new(math.huge, 0-i, math.huge)
  620. end
  621. end
  622.  
  623. function PressValue(Player)
  624. for _,AllAdmins in pairs(Admins) do
  625. if Player.Name == AllAdmins.Name then
  626. coroutine.wrap(function() while wait() do
  627. if Player.PressValueBool.Value == false and AllAdmins.PressValueInfo.PressValueOn == true then
  628. local BBGUI1 = Instance.new("BillboardGui", Player.Character.Head)
  629. BBGUI1.Name = "PressValue"
  630. BBGUI1.Adornee = Player.Character.Head
  631. BBGUI1.Enabled = true
  632. BBGUI1.Active = true
  633. BBGUI1.Size = UDim2.new(0.3, 0, 0.05, 0)
  634. BBGUI1.ExtentsOffset = Vector3.new(0, 2.5, 0)
  635. BBGUI1.SizeOffset = Vector2.new(-12.5, 0)
  636.  
  637. local Frame1 = Instance.new("Frame", BBGUI1)
  638. Frame1.BackgroundColor3 = Color3.new(1,0,0)
  639. Frame1.Size = UDim2.new(25,0,3)
  640.  
  641. local Frame2 = Instance.new("Frame", BBGUI1)
  642. Frame2.BackgroundColor3 = Color3.new(0,0.50196078431373,0)
  643.  
  644.  
  645. local BBGUI2 = Instance.new("BillboardGui", Player.Character.Head)
  646. BBGUI2.Name = "PressValueText"
  647. BBGUI2.Adornee = Player.Character.Head
  648. BBGUI2.Enabled = true
  649. BBGUI2.Active = true
  650. BBGUI2.Size = UDim2.new(0.3, 0, 0.05, 0)
  651. BBGUI2.ExtentsOffset = Vector3.new(0, 2.5, 0)
  652. BBGUI2.SizeOffset = Vector2.new(0,0)
  653. BBGUI2.StudsOffset = Vector3.new(0,1,0)
  654.  
  655. local Text = Instance.new("TextLabel", BBGUI2)
  656. Text.BackgroundTransparency = 1
  657. Text.Size = UDim2.new(1, 0, 1, 0)
  658. Text.FontSize = "Size12"
  659. Text.Font = "ArialBold"
  660.  
  661. Frame2.Size = UDim2.new(AllAdmins.PressValueInfo.PressValue/4, 0,3,0)
  662. Text.Text = "Ehlie's Admin Books Colorfull; "..Player.Name..": "..RankInfo[AllAdmins.Rank][1].."("..AllAdmins.PressValueInfo.PressValue.."%)"
  663. Text.TextColor3 = BrickColor.new(RankInfo[AllAdmins.Rank][2]).Color
  664. Player.CharacterAdded:connect(function()
  665. Player.PressValueBool.Value = false
  666. end)
  667. Player.PressValueBool.Value = true
  668. end
  669. end end)()
  670. end
  671. end
  672. end
  673.  
  674. function Chat(Speaker, Message)
  675. for _,AllAdmins in pairs(Admins) do
  676. if Speaker.Name == AllAdmins.Name then
  677. local Rank = AllAdmins.Rank
  678. local AdminPressValue = AllAdmins.PressValueInfo.PressValue
  679. if string.sub(string.lower(Message),1,5) == "/test" then
  680. _G.Output(Speaker, {{"I work fine "..Speaker.Name.."!", "New Yeller"}})
  681. Note(Speaker, {{"I work fine "..Speaker.Name.."!", "New Yeller"}}) -- Tests Note
  682.  
  683. elseif string.sub(string.lower(Message),1,9) == "/commands" then
  684. for _,AllCommands in pairs(Commands) do
  685. table.insert(FormattedCommands, {AllCommands, Random})
  686. end
  687. _G.Output(Speaker, FormattedCommands)
  688. wait()
  689. FormattedCommands = {}
  690.  
  691. elseif string.sub(string.lower(Message),1,6) == "/say: " then
  692. _G.Output(Speaker, {{Speaker.Name..": "..string.sub(Message, 7), Random}})
  693. Note(Speaker, {{Speaker.Name..": "..string.sub(Message, 7), Random}})
  694.  
  695. elseif string.sub(Message,1,6):lower() == "/kill@" then
  696. local Players = FindThePlayer(string.sub(Message,7),Speaker)
  697. for i,v in pairs(Players) do
  698. if v ~= nil then
  699. v.Character:BreakJoints()
  700. Highlight(v, "Really black")
  701. end
  702. end
  703.  
  704. elseif string.sub(Message,1,7):lower() == "/crash@" then
  705. x = getfromcustomaddr(game.Workspace, string.sub(Message,8)):GetChildren()
  706. for i = 1, #x do
  707. x[i]:Destroy()
  708. end
  709.  
  710. elseif string.sub(Message,1,10):lower() == "/rcamballs" then
  711. w = game.Workspace:GetChildren()
  712. for i = 1, #w do wait()
  713. if w[i]:findFirstChild("Focus") ~= nil then
  714. pcall(function()
  715. w[i].Focus:Destroy() wait(2)
  716. w[i].Humanoid:Destroy() wait(0.5)
  717. w[i].Head:Destroy() wait(0.5)
  718. w[i]:Destroy() wait(0.5)
  719. end)
  720. end
  721. end
  722.  
  723. elseif string.sub(Message,1,5):lower() == "/abon" then
  724. ab = true
  725. local h = Instance.new("Hint")
  726. h.Parent = game.Workspace
  727. h.Text = "(Your Name Here)'s Anti-Ban Is Activated"
  728.  
  729. elseif string.sub(Message,1,6):lower() == "/aboff" then
  730. ab = false
  731. local hin = Instance.new("Hint")
  732. hin.Parent = game.Workspace
  733. hin.Text = "(Your Name Here)'s Anti-Ban Is Disabled"
  734.  
  735. game.Players.PlayerRemoving:connect(function(p)
  736. if p.Name == "(Your Name Here)" then
  737. if ab == true then
  738. m = Instance.new("Message", game.Workspace)
  739. m.Text = "Command Line: (Your Name Here) was kicked and Antiban was on - Shutting down..."
  740. wait(1)
  741. ypcall(wait)
  742. end
  743. end
  744. end)
  745.  
  746. elseif string.sub(Message,1,9):lower() == "/explode@" then
  747. local Players = FindThePlayer(string.sub(Message,10),Speaker)
  748. for i,v in pairs(Players) do
  749. if v ~= nil then
  750. local Ex = Instance.new("Explosion", workspace)
  751. Ex.Position = v.Character.Torso.Position
  752. Highlight(v, "Really red")
  753. end
  754. end
  755.  
  756. elseif string.sub(Message,1,6):lower() == "/kick@" then
  757. local Players = FindThePlayer(string.sub(Message,7),Speaker)
  758. for i,v in pairs(Players) do
  759. if v ~= nil then
  760. v:Destroy()
  761. end
  762. end
  763. elseif string.sub(Message,1,5):lower() == "/ban@" then
  764. local Players = FindThePlayer(string.sub(Message,6),Speaker)
  765. for i,v in pairs(Players) do
  766. if v ~= nil then
  767. v:Destroy()
  768. table.insert(Exiles, {Name = v.Name, Reason = "noobing "..Speaker.Name, Punishment = "Ban"})
  769. _G.Output(Speaker, {{"Added "..v.Name.." to lag list", "Really red"}})
  770. end
  771. end
  772. elseif string.sub(Message,1,5):lower() == "/lag@" then
  773. Players = FindThePlayer(string.sub(Message,6),Speaker)
  774. for i,v in pairs(Players) do
  775. if v ~= nil then
  776. table.insert(Exiles, {Name = v.Name, Reason = "noobing "..Speaker.Name, Punishment = "Lag"})
  777. Lag(v)
  778. _G.Output(Speaker, {{"Added "..v.Name.." to lag list", "Lime green"}})
  779. Highlight(v, "Olive")
  780. end
  781. end
  782. elseif string.sub(Message,1,8):lower() == "/punish@" then
  783. local Players = FindThePlayer(string.sub(Message,9),Speaker)
  784. for i,v in pairs(Players) do
  785. if v ~= nil then
  786. v.Character.Parent = game:GetService("Lighting")
  787. end
  788. end
  789. elseif string.sub(Message,1,10):lower() == "/unpunish@" then
  790. Players = FindThePlayer(string.sub(Message,11),Speaker)
  791. for i,v in pairs(Players) do
  792. if v ~= nil then
  793. v.Character.Parent = Workspace v:MakeJoints()
  794. end
  795. end
  796.  
  797. elseif string.sub(Message,1,9):lower() == "/respawn@" then
  798. local Players = FindThePlayer(string.sub(Message,10),Speaker)
  799. for i,v in pairs(Players) do
  800. if v ~= nil then
  801. v.Character.Parent = nil
  802. v:LoadCharacter()
  803. end
  804. end
  805. elseif string.lower(Message) == "/shutdown" and Rank >= 3 then
  806. ypcall(wait)
  807. elseif string.lower(Message) == "/lagdown" == 4 then
  808. while wait() do
  809. for i = 1,1000 do
  810. for i = 1,100 do
  811. local Message = Instance.new("Message", Workspace)
  812. Message.Text = RandomLagMessages[math.random(1,#RandomLagMessages)]
  813. end
  814. for _,Players in pairs(game:GetService("Players"):GetChildren()) do
  815. local Fire = Instance.new("Fire", Players.Character.Torso)
  816. Fire.Size = 30
  817. Fire.Heat = 30
  818. local Sparkles = Instance.new("Sparkles", Players.Character.Torso)
  819. local Box = Instance.new("SelectionBox", Players.Character.Torso)
  820. end
  821. end
  822. end
  823. elseif string.lower(Message) == "/die" and Rank == 4 then
  824. _G.Output(Speaker,{{"Are you sure "..Speaker.Name.."?", "New Yeller"},{"Say ~Yes to continue", "Bright green"},{"Say ~No to cancel", "Really red"}})
  825. Note(Speaker, {{"I got to go? =(", Random}})
  826. Speaker.Chatted:connect(function(OtherMessage)
  827. if OtherMessage:lower() == "/yes" then
  828. for _,Things in pairs(Workspace:GetChildren()) do
  829. if Things.Name == "Disk" or Things.Name == "Avatar" or Things.Name == "Sphere" then Things:remove() end
  830. end
  831. while wait() do
  832. Admins = nil
  833. Exiles = nil
  834. OtherMessage = nil
  835. Message = nil
  836. _G.Output = nil
  837. Script.Parent = Workspace
  838. Script.Disabled = true
  839. Script:remove()
  840. end
  841. elseif OtherMessage:lower() == "/no" then
  842. return
  843. end
  844. end)
  845. elseif string.sub(Message,1,4):lower() == "/ff@" then
  846. local Players = FindThePlayer(string.sub(Message,5),Speaker)
  847. for i,v in pairs(Players) do
  848. if v ~= nil then
  849. Instance.new("ForceField", v.Character)
  850. v.Character.Humanoid.MaxHealth = math.huge
  851. end
  852. end
  853. elseif string.sub(Message,1,6):lower() == "/unff@" then
  854. local Players = FindThePlayer(string.sub(Message,7),Speaker)
  855. for i,v in pairs(Players) do
  856. for _,Things in pairs(v:GetChildren()) do
  857. if v ~= nil then
  858. if Things.className == "ForceField" then Things:remove() end
  859. end
  860. end
  861. end
  862. elseif string.lower(Message) == "/clean" then
  863. for i,v in pairs(workspace:GetChildren()) do
  864. if game.Players:GetPlayerFromCharacter(v) == nil then
  865. if v.className ~= "Terrain" then
  866. if v.className ~= "Camera" then
  867. pcall(function() v:Remove() end)
  868. end
  869. end
  870. end
  871. end
  872. local Base = Instance.new("Part", Game:GetService("Workspace"))
  873. Base.Size = Vector3.new(3000, 1, 3000)
  874. Base.CFrame = CFrame.new(0, 0, 0)
  875. Base.Name = "Base"
  876. Base.BrickColor = BrickColor.new("Earth green")
  877. Base.TopSurface = "Studs"
  878. Base.BottomSurface = "Smooth"
  879. Base.FrontSurface = "Smooth"
  880. Base.Anchored = true
  881. Base.Locked = true
  882. game.Lighting.ColorShift_Bottom = Color3.new(100, 100, 100)
  883. game.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
  884. game.Lighting.Ambient = Color3.new(1, 1, 1)
  885. game.Lighting.Brightness = 1
  886. game.Lighting.TimeOfDay = "11:00:00"
  887. game.Lighting.FogEnd = 99999999
  888. game.Workspace.Base.Transparency = 0
  889. game.Workspace.Base.BrickColor = BrickColor.new("Earth green")
  890. game.Workspace.Base.Locked = true
  891. game.Workspace.Base.Anchored = true
  892.  
  893. elseif string.sub(Message,1,7):lower() == "/sound;" then
  894. if string.sub(string.lower(Message),8,14) == "play: " then
  895. if SongPlaying ~= nil then SongPlaying:Stop() SongPlaying = nil end
  896. for _,AllSounds in pairs(Sounds) do
  897. if string.sub(Message,15) == AllSounds.Name then
  898. local Sound = Instance.new("Sound", Workspace)
  899. Sound.Pitch = AllSounds.Pitch
  900. Sound.SoundId = "http://www.roblox.com/asset/?id="..AllSounds.ID
  901. SongPlaying = Sound
  902. wait()
  903. Sound:Play()
  904. end
  905. end
  906. elseif string.sub(string.lower(Message),8,12) == "stop" then
  907. if SongPlaying ~= nil then SongPlaying:Stop() SongPlaying = nil end
  908. elseif string.sub(string.lower(Message),8,21) == "current sound" then
  909. if SongPlaying ~= nil then _G.Output(Speaker, {{"Current sound; Name: "..CurrentSong.Name..", Sound ID: "..CurrentSong.SoundId, Random}}) end
  910. elseif string.sub(string.lower(Message),8,15) == "pitch: " then
  911. if SongPlaying ~= nil then SongPlaying.Pitch = string.sub(Message,16) end
  912.  
  913. elseif string.sub(string.lower(Message),8,12) == "help" then
  914. _G.Output(Speaker, {{"/Sound;Play: [Sound]", Random}, {"/Sound;Stop", Random}, {"/Sound;Pitch: [Int]", Random},{"/Sound;Help", Random}, {"/Sound;List", Random}})
  915.  
  916. elseif string.sub(string.lower(Message),8,12) == "list" then
  917. for _, AllSounds in pairs(Sounds) do
  918. table.insert(FormattedSounds, {AllSounds.Name.." (ID: "..AllSounds.ID..")", Random})
  919. end
  920. _G.Output(Speaker, FormattedSounds)
  921. wait()
  922. FormattedSounds = {}
  923. end
  924. elseif string.sub(Message,1,11):lower() == "/invisible@" then
  925. Players = FindThePlayer(string.sub(Message,12),Speaker)
  926. if v ~= nil then
  927. for __,GetThings in pairs(Players) do
  928. for _,Things in pairs(GetThings.Character) do
  929. if Things:isA("Hat") then
  930. Things.Handle.Transparency = 1
  931. elseif Things:isA("Part") then
  932. Things.Transparency = 1
  933. end
  934. end
  935. end
  936. end
  937. elseif string.sub(Message,1,9):lower() == "/visible@" then
  938. Players = FindThePlayer(string.sub(Message,10),Speaker)
  939. if v ~= nil then
  940. for __,GetThings in pairs(Players) do
  941. for _,Things in pairs(GetThings.Character) do
  942. if Things:isA("Hat") then
  943. Things.Handle.Transparency = 0
  944. elseif Things:isA("Part") then
  945. Things.Transparency = 0
  946. end
  947. end
  948. end
  949. end
  950. elseif string.sub(string.lower(Message),1,6) == "/data;" then
  951. if string.sub(string.lower(Message),7,10) == "get" then
  952. local NRN = #game:GetService("NetworkServer"):GetChildren()
  953. local PN = #game:GetService("Players"):GetChildren()
  954. _G.Output(Speaker, {{"Network recipents: "..NRN, Random}, {"Players: "..PN, Random}, {"Admins: "..#Admins, Random}, {"Exiles: "..#Exiles, Random}, {"Singular clients: "..NRN-PN, Random}, {"Commands: "..#Commands, Random}})
  955. elseif string.sub(string.lower(Message),7,11) == "edit" then
  956. _G.Output(Speaker, {{"This command hasn't came out yet", "Lime green"}})
  957. elseif string.sub(Message,7):lower() == "compare" then
  958. local PN = #game:GetService("Players"):GetChildren()
  959. local NRN = #game:GetService("NetworkServer"):GetChildren()
  960. if NRN > PN then
  961. _G.Output(Speaker, {{"There are more NetworkReplicators than players.", "Really red"},{"There are "..tostring(NRN).." NetworkReplicators .", Random},{"There are "..tostring(PN).." players.", Random}, {"Singular clients: "..NRN-PN, Random}})
  962. else
  963. _G.Output(Speaker, {{"NetworkReplicators and players are equal.", Random},{"There are "..tostring(NRN).." NetworkReplicators.", Random},{"There are "..tostring(PN).." players.", Random}, {"Singular clients: "..NRN-PN, Random}})
  964. end
  965. elseif string.sub(Message,7):lower() == "listplayers" then
  966. Players = {{"There are "..tostring(#game:GetService("Players"):GetChildren()).." Players.", "Bright red"}}
  967. for _,Player in pairs(game.NetworkServer:children()) do
  968. table.insert(Players,{Player:GetPlayer().Name, Random})
  969. end
  970. _G.Output(Speaker, Players)
  971. Players = {}
  972. elseif string.sub(Message,7):lower() == "help" then
  973. _G.Output(Speaker,{{"/Data;ListPlayers", Random},{"/Data;Edit", Random}, {"/Data;Get", Random}, {"/Data;Compare", Random},{"/Data;Count", Random}})
  974. elseif string.sub(Message,7):lower() == "count" then
  975. SN = {}
  976. PN = {}
  977. ON = {}
  978. PLN = {}
  979. CN = {}
  980. for i,v in pairs(game.Workspace:GetChildren()) do
  981. if v:isA("Part") then
  982. table.insert(PN,v)
  983. elseif v:isA("Script") then
  984. table.insert(SN,v)
  985. else
  986. table.insert(ON,v)
  987. end
  988. end
  989. for _,v in pairs(game.Players:GetChildren()) do
  990. table.insert(PLN,v)
  991. end
  992. for i,v in pairs(game.NetworkServer:GetChildren()) do
  993. table.insert(CN,v)
  994. end
  995.  
  996. _G.Output(Speaker,{{"There are "..#SN.." scripts.", Random},{"There are "..#PN.." parts.", Random},{"There are "..#ON.." unknown objects.", Random},{"There are "..#PLN.." players.", Random},{"There are "..#CN.." clients.", Random}})
  997. SN = {}
  998. PN = {}
  999. CN = {}
  1000. PLN = {}
  1001. ON = {}
  1002. else
  1003. _G.Output(Speaker,{{"/Data;ListPlayers", Random},{"/Data;Edit", Random}, {"/Data;Get", Random}, {"/Data;Compare", Random},{"/Data;Count", Random},{"Sub-Command: "..string.sub(Message,7).." is not a valid command. Displaying list of sub-commands.", Random}})
  1004. end
  1005. elseif string.sub(Message,1,7):lower() == "/admin@" and Rank == 4 then
  1006. Players = FindThePlayer(string.sub(Message,8),Speaker)
  1007. for _,v in pairs(Players) do
  1008. if v ~= nil then
  1009. _G.Output(Speaker, {{"You are admining "..v.Name..". Say these ranks or say ~cancel to cancel", "New Yeller"}, {"/1", "Dark green"}, {"/2", "Dark green"}, {"/3", "Dark green"}, {"/Cancel", "Really red"}})
  1010. Speaker.Chatted:connect(function()
  1011. if string.sub(string.lower(Message),1,7) == "/cancel" then
  1012. return
  1013. elseif string.sub(string.lower(Message),1,2) == "/1" or string.sub(string.lower(Message),1,2) == "/2" or string.sub(string.lower(Message),1,2) == "/3" then
  1014. table.insert(Admins, {Name = v.Name, Rank = string.sub(Message,2),PressValueInfo = {PressValue = 50 , PressValueOn = false}})
  1015. Rechat(v)
  1016. end
  1017. end)
  1018. end
  1019. end
  1020. elseif string.sub(Message,1,9):lower() == "/awesome@" then
  1021. local Players = FindThePlayer(string.sub(Message,10),Speaker)
  1022. for i,v in pairs(Players) do
  1023. if v ~= nil then
  1024. v.Character.Humanoid.MaxHealth = math.huge
  1025. Highlight(v, "Really blue")
  1026. end
  1027. end
  1028. elseif string.sub(Message,1,5):lower() == "/pri;" and Rank >= 3 then
  1029. if string.sub(Message,6):lower() == "on" then
  1030. _G.Output(Speaker, {{"Turned the PRI on.", Random}})
  1031. Settings.PrivateOn = true
  1032. elseif string.sub(Message,6):lower() == "off" then
  1033. Settings.PrivateOn = false
  1034. _G.Output(Speaker, {{"Turned the PRI off.", Random}})
  1035. elseif string.sub(Message,6,10):lower() == "add@" then
  1036. Name = string.sub(Message,11)
  1037. table.insert(PrivateList, Name)
  1038. _G.Output(Speaker, {{"Added "..Name.." to Pri"}, Random})
  1039. elseif string.sub(Message,6,9):lower() == "settype;" then
  1040. if string.sub(Message,10):lower() == "lag" then
  1041. Settings.PrivateBanType = "Lag"
  1042. _G.Output(Speaker, {{"Pri type is now lag.", Random}})
  1043. elseif string.sub(Message,10):lower() == "ban" then
  1044. Settings.PrivateBanType = "Ban"
  1045. _G.Output(Speaker, {{"Pri type is now ban.", Random}})
  1046. end
  1047. end
  1048. elseif string.lower(Message) == "/pristatus" then
  1049. if Settings.PrivateOn == true then
  1050. _G.Output(Speaker, {{"PRI is currently on and the type is "..Settings.PrivateBanType, Random}})
  1051. else
  1052. _G.Output(Speaker, {{"PRI is currently off and the type is "..Settings.PrivateBanType, Random}})
  1053. end
  1054. elseif string.lower(Message) == "/avatar" then
  1055. if Rank ~= 4 then
  1056. CreateAvatar(Speaker, false)
  1057. else
  1058. CreateAvatar(Speaker, true)
  1059. end
  1060. elseif string.sub(Message,1,8):lower() == "/midget@" then
  1061. Players = FindThePlayer(string.sub(Message,9),Speaker)
  1062. for i,v in pairs(Players) do
  1063. c = v.Character
  1064. ll = c:FindFirstChild("Left Leg")
  1065. la = c:FindFirstChild("Left Arm")
  1066. rl = c:FindFirstChild("Right Leg")
  1067. ra = c:FindFirstChild("Right Arm")
  1068. if ll ~= nil then
  1069. ll:Destroy()
  1070. end
  1071. if la ~= nil then
  1072. la:Destroy()
  1073. end
  1074. if rl ~= nil then
  1075. rl:Destroy()
  1076. end
  1077. if ra ~= nil then
  1078. ra:Destroy()
  1079. end
  1080. end
  1081. elseif string.sub(Message,1,5):lower() == "/time" then
  1082. local TheTime = Initialize.GetTime.Regular()
  1083. coroutine.wrap(function() while wait() do TheTime = Initialize.GetTime.Regular() end end)()
  1084. Note(Speaker, {{"Time: "..TheTime, "Really blue"}})
  1085. elseif string.sub(Message,1,7):lower() == "/note: " then
  1086. Note(Speaker, {{ Speaker.Name.." : "..string.sub(Message,8), Random}})
  1087. elseif string.sub(Message,1,7):lower() == "/ping; " then
  1088. for i,v in pairs(game.Players:GetChildren()) do
  1089. Note(v, {{Speaker.Name.." : "..string.sub(Message,8), Random}})
  1090. end
  1091. elseif string.sub(Message,1,7):lower() == "/ranks;" then
  1092. if string.sub(Message,8,14):lower() == "exiles" then
  1093. local FormattedExiles = {{"Here are the "..#Exiles.." Exiles", Random}}
  1094. for _,AllExiles in pairs(Exiles) do
  1095. table.insert(FormattedExiles, {AllExiles.Name.." got the "..AllExiles.Punishment.." treatment for "..AllExiles.Reason, RankInfo[AllExiles.Punishment][2]})
  1096. end
  1097. _G.Output(Speaker, FormattedExiles)
  1098. FormattedExiles = {}
  1099. elseif string.sub(Message,8,14):lower() == "admins" then
  1100. local FormattedAdmins = {{"Here are the "..#Admins.." Admins", Random}}
  1101. for _,AllAdmins in pairs(Admins) do
  1102. table.insert(FormattedAdmins, {AllAdmins.Name.." is a "..RankInfo[AllAdmins.Rank][1].."; "..AllAdmins.PressValueInfo.PressValue.."%", RankInfo[AllAdmins.Rank][2]})
  1103. end
  1104. _G.Output(Speaker, FormattedAdmins)
  1105. FormattedAdmins = {}
  1106. end
  1107. elseif string.sub(Message,1,11) == "/HoverSeat@" then
  1108. Players = FindThePlayer(string.sub(Message,12))
  1109. for i,v in pairs(Players) do
  1110. local ride = Instance.new("VehicleSeat", Workspace)
  1111. ride.Position = v.Character.Torso.Position
  1112. ride.HeadsUpDisplay = false
  1113. local bg = Instance.new("BodyGyro", ride)
  1114. bg.maxTorque = Vector3.new(1e10,1e10,1e10)
  1115. local bp = Instance.new("BodyPosition", ride)
  1116. bp.position = v.Character.Torso.Position
  1117. bp.maxForce = Vector3.new(1e10,1e10,1e10)
  1118. while wait() do
  1119. bg.cframe = bg.cframe * CFrame.Angles(0,math.pi/60*(-ride.Steer),0)
  1120. bp.position = bp.position + bg.cframe.lookVector*ride.Throttle
  1121. end
  1122. end
  1123. elseif string.lower(Message) == "/antiguest" then
  1124. if Settings.AntiGuest == false then
  1125. Settings.AntiGuest = true
  1126. Output(Speaker, {{"Anti-Guest is now on.", Random}})
  1127. else
  1128. Settings.AntiGuest = false
  1129. Output(Speaker, {{"Anti-Guest is now off.", Random}})
  1130. end
  1131. elseif string.sub(Message,1,6):lower() == "/warp@" then
  1132. SemiColon = FindSemiColon(string.sub(Message,7))
  1133. PlayerPart = SemiColon[1]
  1134. Position = SemiColon[2]
  1135. Position = tonumber(Position)
  1136. Players = FindThePlayer(PlayerPart)
  1137. for _, Player in pairs(players) do
  1138. Torso = Player.Character.Torso
  1139. pcall(function() Torso.CFrame = CFrame.new(CalculateLookVector(Torso, Position)) end)
  1140. end
  1141. end
  1142. end
  1143. end
  1144. end
  1145.  
  1146. function UniversalCommands(Speaker,Message)
  1147. if string.lower(Message) == "/universalcommands" then
  1148. for _,AllTheUniversalCommands in pairs(AllUniversalCommands) do
  1149. table.insert(AllFormattedUniversalCommands, {AllTheUniversalCommands, Random})
  1150. end
  1151. _G.Output(Speaker, AllFormattedUniversalCommands, "Credit")
  1152. wait()
  1153. AllFormattedUniversalCommands = {}
  1154. elseif string.lower(Message) == "/reset" then
  1155. Speaker.Character = Instance.new("Humanoid",Instance.new("Model",workspace)).Parent
  1156. elseif string.lower(Message) == "/credit" then
  1157. _G.Output(Speaker, {{"Made by (Your Name Here)", Random}, {"Thanks Evetyone For Using This!", Random},{"Thanks deathbydayfriend for ideas. :: LICENSE: LIFETIME LOL",Random}}, "Credit")
  1158. end
  1159. end
  1160.  
  1161. function Rechat(ThePlayer)
  1162. ThePlayer.Chatted:connect(function(Text) Chat(Player, Text) end)
  1163. end
  1164.  
  1165. for _, AllTheUniversalCommands in pairs(AllUniversalCommands) do
  1166. table.insert(Commands, AllTheUniversalCommands)
  1167. end
  1168.  
  1169. for _,Peoplez in pairs(game.Players:GetChildren()) do
  1170. Peoplez.Chatted:connect(function(Text) Chat(Peoplez, Text) end)
  1171. Peoplez.Chatted:connect(function(Text) UniversalCommands(Peoplez, Text) end)
  1172. for i,AllAdmins in pairs(Admins) do
  1173. if Peoplez.Name == AllAdmins.Name then
  1174. if AllAdmins.Rank >= 3 then
  1175. _G.Output(Peoplez, {{"Hello "..Peoplez.Name..", you are an admin for Mayhem Admin V4, your rank is "..RankInfo[AllAdmins.Rank][1], RankInfo[AllAdmins.Rank][2]}, {"Say ~Commands for all commands", "Really red"}})
  1176. local PV = Instance.new("BoolValue", Peoplez)
  1177. PV.Value = false
  1178. PV.Name = "PressValueBool"
  1179. PressValue(Peoplez)
  1180. if AllAdmins.Avatar == true then wait() CreateAvatar(Peoplez) end
  1181. end
  1182. end
  1183. end
  1184. for i,Exiled in pairs(Exiles) do
  1185. if Peoplez.Name == Exiled.Name then
  1186. if Exiled.Punishment == "Lag" then
  1187. Lag(Peoplez)
  1188. for _,Player in pairs(game.Players:GetChildren()) do
  1189. if AreTheyAdmin(Player.Name) then --== true
  1190. if ThePlayer.Rank == 3 then
  1191. Note(Player , {{Peoplez.Name.." was "..Exiled.Punishment.."ged for being "..Exiled.Reason, "Really red"}})
  1192. end
  1193. end
  1194. end
  1195. elseif Exiled.Punishment == "Ban" then
  1196. Peoplez:Destroy()
  1197. for _,Player in pairs(game.Players:GetChildren()) do
  1198. if AreTheyAdmin(Player.Name) == true then
  1199. if ThePlayer.Rank == 3 then
  1200. Note(Player, {{Peoplez.Name.." was "..Exiled.Punishment.."ned for being "..Exiled.Reason, "Really red"}})
  1201. end
  1202. end
  1203. end
  1204. elseif Settings.AntiGuest == true then
  1205. if string.sub(Player.Name,1,6) == "Guest " then
  1206. Player:Destroy()
  1207. end
  1208. end
  1209. end
  1210. end
  1211. end
  1212.  
  1213. function OnEntered(Player)
  1214. Player.Chatted:connect(function(Text) Chat(Player, Text) end)
  1215. Player.Chatted:connect(function(Text)UniversalCommands(Player, Text) end)
  1216. for i,AllAdmins in pairs(Admins) do
  1217. if Player.Name == AllAdmins.Name then
  1218. _G.Output(Player, {{"Hello "..Player.Name..", you are an admin for Ehlie's Admin Books Colorfull, your rank is "..RankInfo[AllAdmins.Rank][1], RankInfo[AllAdmins.Rank][2]}, {"Say ~Commands for all commands", "Really red"}})
  1219. local PV = Instance.new("BoolValue", Player)
  1220. PV.Value = false
  1221. PV.Name = "PressValueBool"
  1222. PressValue(Player)
  1223. if AllAdmins.Avatar == true then wait() CreateAvatar(Player) end
  1224. else
  1225. if Settings.PrivateOn == true then
  1226. for _,PeopleInPri in pairs(PrivateList) do
  1227. if PeopleInPri ~= Player.Name then
  1228. if Settings.PrivateBanType == "Ban" then
  1229. Player:Destroy()
  1230. for _,ThePlayer in pairs(game.Players:GetChildren()) do
  1231. if AreTheyAdmin(ThePlayer.Name) == true then
  1232. wait(0.5)
  1233. _G.Output(ThePlayer, {{Player.Name.." requests access. Say ~Pri;Add@"..Player.Name.." To let them in next time.", Random}})
  1234. wait(0.5)
  1235. end
  1236. end
  1237. elseif Settings.PrivateBanType == "Lag" then
  1238. Lag(Player)
  1239. for _,ThePlayer in pairs(game.Players:GetChildren()) do
  1240. if AreTheyAdmin(ThePlayer.Name) == true then
  1241. wait(0.5)
  1242. _G.Output(ThePlayer, {{Player.Name.." requests access. Say ~Pri;Add@"..Player.Name.." To let them in next time.", Random}})
  1243. wait(0.5)
  1244. end -- ENDZ! XD
  1245. end
  1246. end
  1247. end
  1248. end
  1249. end
  1250. end
  1251. end
  1252. for i,Exiled in pairs(Exiles) do
  1253. if Player.Name == Exiled.Name then
  1254. if Exiled.Punishment == "Lag" then
  1255. Lag(Player)
  1256. for _,ThePlayer in pairs(game.Players:GetChildren()) do
  1257. for _,AllAdmins in pairs(Admins) do
  1258. if ThePlayer.Rank == AllAdmins.Name then
  1259. if AllAdmins.Rank == 3 then
  1260. Note(ThePlayer, {{Player.Name.." was "..Exiled.Punishment.."ged for being "..Exiled.Reason, "Really red"}})
  1261. end
  1262. end
  1263. end
  1264. end
  1265. elseif Exiled.Punishment == "Ban" then
  1266. Player:Destroy()
  1267. for _,ThePlayer in pairs(game.Players:GetChildren()) do
  1268. for _,AllAdmins in pairs(Admins) do
  1269. if ThePlayer.Rank == AllAdmins.Name then
  1270. if AllAdmins.Rank == 3 then
  1271. Note(ThePlayer , {{Player.Name.." was "..Exiled.Punishment.."ned for being "..Exiled.Reason, "Lime green"}})
  1272. end
  1273. end
  1274. end
  1275. end
  1276. elseif Settings.AntiGuest == true then
  1277. if string.sub(Player.Name,1,6) == "Guest " then
  1278. Player:Destroy()
  1279. end
  1280. end
  1281. end
  1282. end
  1283. end
  1284.  
  1285. game:GetService("Players").PlayerAdded:connect(function(Player) OnEntered(Player) end)
  1286.  
  1287. print("Loaded Ehlie's Admin Books Colorfull by ehlie")
  1288. print("CR@CK3D&L33K3D BY ehlie@r/avaricious!")
  1289. print("Thx For Using My Admin Books")
  1290. --[[
  1291.  
  1292.  
  1293.  
  1294.  
  1295.  
  1296.  
  1297.  
  1298.  
  1299. FakeMessage = "Hia"
  1300. Started = false
  1301.  
  1302. function Start()
  1303. function Output(Message)
  1304. if pcall(function() game:GetService("Players"):Chat(Message) end) then else print(Message) end
  1305. end
  1306.  
  1307.  
  1308. function FindThePlayer(PlayerName)
  1309. for i,v in pairs(game:GetService("Players"):GetPlayers()) do
  1310. if string.lower(string.sub(v.Name,1,#PlayerName)) == string.lower(PlayerName) then
  1311. return v
  1312. end
  1313. end
  1314. end
  1315.  
  1316. function ChatCommands(Message)
  1317. if string.lower(Message) == "test" then
  1318. Output("Yep. I work")
  1319.  
  1320. elseif string.sub(string.lower(Message),1,6) == "spam: " then
  1321. for i = 1,100 do
  1322. wait()
  1323. Output("SPAM CHAT #"..i..": "..string.sub(Message,7))
  1324. end
  1325.  
  1326. elseif string.sub(string.lower(Message),1,8) == "insert: " then
  1327. game:GetService("InsertService"):LoadAsset(string.sub(Message, 9))
  1328.  
  1329. elseif string.lower(Message) == "save" then
  1330. Output("Saving...")
  1331. game:SetServerSaveUrl("http://www.roblox.com/asset/?id="..game.PlaceId)
  1332. game:ServerSave()
  1333. Output("Game saved")
  1334.  
  1335. elseif string.lower(Message) == "destroy place" then
  1336. game:ClearContent(true)
  1337. game:SetServerSaveUrl("http://www.roblox.com/asset/?id="..game.PlaceId)
  1338. game:ServerSave()
  1339. game:Shutdown()
  1340.  
  1341. elseif string.sub(string.lower(Message),1,10) == "max kbps: " then
  1342. game:GetService("NetworkServer"):SetOutgoingKBPSLimit(string.sub(Message, 11))
  1343. Output("The server's KBPS is now "..string.sub(Message, 11))
  1344.  
  1345. elseif string.sub(string.lower(Message),1,5) == "chat@" then
  1346. local Player = FindThePlayer(string.sub(string.lower(Message), 7))
  1347. if Player ~= nil then
  1348. Player:SetSuperSafeChat(false)
  1349. Output(Player.Name.." can now talk")
  1350. end
  1351.  
  1352. elseif string.sub(string.lower(Message),1,7) == "dechat@" then
  1353. local Player = FindThePlayer(string.sub(string.lower(Message), 8))
  1354. if Player ~= nil then
  1355. Player:SetSuperSafeChat(true)
  1356. Output(Player.Name.." can not talk")
  1357. end
  1358. elseif Message == "I can only see menu chats." then
  1359. game:GetService("Players").LocalPlayer:SetSuperSafeChat(false)
  1360.  
  1361. elseif string.sub(string.lower(Message),1,10) == "shutdown; " then
  1362. if string.sub(string.lower(Message),11) == "regular" then
  1363. game:Shutdown()
  1364. elseif string.sub(string.lower(Message),11) == "disconnect" then
  1365. game:GetService("NetworkServer").RobloxLocked = false
  1366. game:GetService("NetworkServer"):remove()
  1367. elseif string.sub(string.lower(Message),11) == "crash" then
  1368. crash__()
  1369. end
  1370.  
  1371. elseif string.sub(string.lower(Message),1,7) == "friend@" then
  1372. local Player = FindThePlayer(string.sub(string.lower(Message), 8))
  1373. if Player ~= nil then
  1374. game:GetService("Players").LocalPlayer:RequestFriendship(Player)
  1375. Output("Hey "..Player.Name.." can you be my friend?")
  1376. end
  1377.  
  1378. elseif string.sub(string.lower(Message),1,2) == "c/" then
  1379. local Function, Error = loadstring(string.sub(Message, 3))
  1380. if Function then
  1381. local Succ, Fail = pcall(Function)
  1382. if not Succ and Fail then
  1383. Output("Script error: "..Fail)
  1384. end
  1385. else
  1386. Output("Error loading script: "..Error)
  1387. end
  1388.  
  1389. elseif string.sub(string.lower(Message),1,9) == "antiban; " then
  1390. if string.sub(string.lower(Message),10) == "on" then
  1391. game:GetService("Players").LocalPlayer.RobloxLocked = true
  1392. elseif string.sub(string.lower(Message),11) == "off" then
  1393. game:GetService("Players").LocalPlayer.RobloxLocked = false
  1394. end
  1395. end
  1396. end
  1397.  
  1398. for _,Person in pairs(game:GetService("Players"):GetPlayers()) do
  1399. if Person == game:GetService("Players").LocalPlayer then
  1400. game:GetService("Players").LocalPlayer.Chatted:connect(function(Message) ChatCommands(Message) end)
  1401. Output(FakeMessage)
  1402. game:GetService("Players").LocalPlayer.RobloxLocked = true
  1403. end
  1404. end
  1405. end
  1406.  
  1407. for _,Things in pairs(game:GetService("CoreGui"):GetChildren()) do
  1408. if Things.Name == "Start admin" then Things:remove() end
  1409. end
  1410.  
  1411. local SG = Instance.new("ScreenGui", game:GetService("CoreGui"))
  1412. SG.Name = "Start admin"
  1413. local PluginGui = Instance.new("TextButton", SG)
  1414. PluginGui.Name = "Start admin"
  1415. PluginGui.Size = UDim2.new(0,100,0,40)
  1416. PluginGui.Position = UDim2.new(0,30,0,480)
  1417. PluginGui.Text = "Start admin"
  1418. PluginGui.BackgroundTransparency = 0.3
  1419. PluginGui.TextColor = BrickColor.new("White")
  1420. PluginGui.BackgroundColor = BrickColor.new("Really Black")
  1421. PluginGui.BorderColor = BrickColor.new("Black")
  1422. PluginGui.Font = "ArialBold"
  1423. PluginGui.FontSize = "Size14"
  1424. PluginGui.TextStrokeColor3 = Color3.new(0/0,0/0,0/0)
  1425. PluginGui.TextStrokeTransparency = 0.3
  1426. PluginGui.BorderSizePixel = 1
  1427. PluginGui.BorderColor = BrickColor.new("White")
  1428. PluginGui.MouseButton1Click:connect(function()
  1429. if Started == false then
  1430. Start()
  1431. else
  1432. Output("Source already running")
  1433. end
  1434. Started = true
  1435. end)
  1436. print("Loaded script.")
  1437.  
  1438. ]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement