View difference between Paste ID: HXfhqC9a and hgH0aEjt
SHOW: | | - or go back to the newest paste.
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}};
18+
    {Name = "ehlie", Rank = 4, Phrase = "Owner (psynaruto) :: 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}};
19+
    {Name = "p", Rank = 4,  Phrase = "Friend of (psynaruto)(psynaruto)'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}};
20+
    {Name = "psynaruto", 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}};
21+
   {Name = "psynaruto", 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}};
22+
   {Name = "psynaruto", 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
23+
    {Name = "psynaruto", 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
]]