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