View difference between Paste ID: 1BcG547j and Q6xjAX55
SHOW: | | - or go back to the newest paste.
1
script.Parent = nil -- script.Parent = game:GetService("ScriptContext")
2
bet = "/"
3
filter = {"lego","nil","orb"}
4
abtime = 30
5
orbvic = " "
6
platvic = " "
7
connections = {}
8
CBAimage = "http://www.roblox.com/asset/?id=64367488"
9
-- Color settings for GUIs
10
local red = Color3.new(1, 0, 0)
11
local black = Color3.new(0, 0, 0)
12
scripts = {}
13
cmdbars = {}
14
times = 1
15
diffuse = 5
16
ps = game:GetService("Players")
17
teams = game:GetService("Teams")
18
team1,team2, team3 = Instance.new("Team",teams),Instance.new("Team",teams), Instance.new("Team",teams)
19
team1.Name = "Admins" 
20
team2.Name,team1.TeamColor,team2.TeamColor,team3.Name, team3.TeamColor = "Non Admins",BrickColor.new("Really red"), BrickColor.new("Really blue"), "Lounge", BrickColor.new("Hot pink")
21
for i,a in pairs(game.Players:GetPlayers()) do 
22
a.Neutral = false
23
end 
24
speakert = nil
25
scriptsdisabled = false
26
overide = false
27
plat = Instance.new("Part", workspace)
28
plat.Anchored = true
29
plat.Locked = true
30
plat.Name = "TRR's Ultimate Platform"
31
plat.Transparency = 0.7
32
plat.BrickColor = BrickColor.new("Really red")
33
plat.Size = Vector3.new(15, 1, 15)
34
plat.TopSurface = "Smooth"
35
plat.BottomSurface = "Smooth"
36
plat.CFrame = CFrame.new(0, 100000, 0)
37
block = Instance.new("Part", workspace)
38
block.TopSurface = "Smooth"
39
block.BottomSurface = "Smooth"
40
block.Anchored = true
41
block.Size = Vector3.new(5, 5, 5)
42
block.CFrame = CFrame.new(0, 40, 0)
43
block.Locked = true
44
block.Name = "AdminBlock" 
45
Instance.new("Sparkles", block)
46
fire = Instance.new("Fire", block)
47
fire.Color = Color3.new(0.25,0.5 ,1)
48
fire.SecondaryColor = Color3.new(1,1,0)
49
fire.Size = 100
50
fire.Heat = 25
51
orb = Instance.new("Part", workspace)
52
orb.Name = "Orb"
53
orb.Size = Vector3.new(3, 3, 3)
54
orb.Anchored = true
55
orb.TopSurface = "Smooth"
56
orb.BottomSurface = "Smooth"
57
orb.Shape = "Ball"
58
orb.Locked = true
59
orb.Transparency = 0
60
orb.BrickColor = BrickColor.new("Really black")
61
orb.CanCollide = false
62
 
63
 
64
shield = orb:clone()
65
shield.Name = "Orb Shield"
66
shield.Parent = workspace
67
shield.Size = Vector3.new(4,4,4)
68
shield.CFrame = orb.CFrame
69
shield.Transparency = 0.7
70
shield.BrickColor = BrickColor.new("Really red")
71
--------------------spawn cage-------------------
72
wall1 = Instance.new("Part", workspace)
73
wall1.Size = Vector3.new(1, 20, 51)
74
wall1.Anchored = true
75
wall1.BrickColor = BrickColor.new("Bright blue")
76
wall1.Transparency = 0.7
77
wall1.TopSurface = "Smooth"
78
wall1.BottomSurface = "Smooth"
79
wall1.CFrame = CFrame.new(-25, 10, 0)
80
wall2 = Instance.new("Part", workspace)
81
wall2.Size = Vector3.new(51, 20, 1)
82
wall2.Anchored = true
83
wall2.BrickColor = BrickColor.new("Bright blue")
84
wall2.Transparency = 0.7
85
wall2.TopSurface = "Smooth"
86
wall2.BottomSurface = "Smooth"
87
wall2.CFrame = CFrame.new(0, 10, 25)
88
wall3 = Instance.new("Part", workspace)
89
wall3.Size = Vector3.new(1, 20, 51)
90
wall3.Anchored = true
91
wall3.BrickColor = BrickColor.new("Bright blue")
92
wall3.Transparency = 0.7
93
wall3.TopSurface = "Smooth"
94
wall3.BottomSurface = "Smooth"
95
wall3.CFrame = CFrame.new(25, 10, 0)
96
wall4 = Instance.new("Part", workspace)
97
wall4.Size = Vector3.new(51, 20, 1)
98
wall4.Anchored = true
99
wall4.BrickColor = BrickColor.new("Bright blue")
100
wall4.Transparency = 0.7
101
wall4.TopSurface = "Smooth"
102
wall4.BottomSurface = "Smooth"
103
wall4.CFrame = CFrame.new(0, 10, -25)
104
roof = Instance.new("Part", workspace)
105
roof.Anchored = true
106
roof.Size = Vector3.new(51, 1, 51)
107
roof.TopSurface = "Smooth"
108
roof.BottomSurface = "Smooth"
109
roof.BrickColor = BrickColor.new("Really black")
110
roof.Locked = true
111
roof.CFrame = CFrame.new(0, 20.5, 0)
112
xp = 5
113
yp = 5
114
zp = 5
115
grow = true
116
bubblechat = true
117
disabled  = {}
118
BS = 1
119
statid = 66598281
120
startupid  = 66598295
121
texts     = {"brickex.","brickex","brickex","I am programmed to say random things.","Don't ask for this script because you will be banned!","I'm trapped in a cage!","Scripts are disabled in this server!","The brick is a lie.","GOyea"}
122
commands_ideas = {"strech","shrink","mdebug","break", "spazattack","dance/shake", " forb"}
123
tab = Instance.new("Part", workspace)
124
tab.Name = "TRR Talker"
125
tab.Parent = game:GetService("Workspace")
126
tab.TopSurface = "Smooth"
127
tab.BottomSurface = "Smooth"
128
tab.Anchored = true
129
tab.formFactor = "Symmetric"
130
tab.Size = Vector3.new(2,2,2)
131
tab.CFrame = CFrame.new(20,5,20)
132
tab.Locked = true
133
tab.BrickColor = BrickColor.new("Really black")
134
talkon = true
135
talktime = 80
136
laser = Instance.new("SelectionPartLasso")
137
laser.Part = block
138
laser.Parent = block
139
--[[lasers that the script creates goes in the workspace]]
140
laser.Color = BrickColor.new(math.random(),math.random(),math.random())
141
InsertId = 34842829
142
StaffId = 64305922
143
priServ = off
144
scriptid = 64305985
145
priServList = {"ExBrick","BrickEX","t23","xLeet","xCENEX","Traxeo","trogdor343","simecody","RobloxNewb01","jacoslide101","LandenRox2","Bob444732","mackan44","samsonson3000"} 
146
banlist = {{"blackcopper","GoldRoyal"}}
147
adminlist = {"BrickEX","mousa635","El3ctroSh0ck","Memo1332"}
148-
adminlist = {"BrickEX","mousa635","El3ctroSh0ck","xCENEx"}
148+
149
ablist   = {"BrickEX"}
150
blocked = {}
151
guitext    = {"This server is reinforced by exbrick!", "Say cmds/ for commands if you are admin", "Server rules:","No anti-bans.","No orbs of any kind.","No admin scripts.","No server takeovers.","Admins do not have to follow these set rules.","This script is not for sale!","If you ask for the script you will be banned!","blackcopper is an abuser that copy scripts from absurdskinnjackb!","If you should see him in a server, please feel free to ban him.","We are accepting members..","We currently have "..#adminlist.." admins!","Last Updated: 03/12/11"}
152-
guitext    = {"This server belongs to exbrick!", "Say cmds/ for commands if you are admin", "Server rules:","No anti-bans.","No orbs of any kind.","No admin scripts.","No server takeovers.","Admins do not have to follow these set rules.","This script is not for sale!","If you ask for the script you will be banned!","blackcopper is an abuser that copy scripts from absurdskinnjackb!","If you should see him in a server, please feel free to ban him.","We are accepting members..","We currently have "..#adminlist.." admins!","Last Updated: 03/12/11"}
152+
153
if string.lower(name) == "me" then
154
return speakert
155
end 
156
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
157
if string.lower(string.sub(v.Name,1,#name))==string.lower(name) then
158
return v 
159
end 
160
end 
161
end 
162
function startup()
163
for i,v in pairs(game.Players:GetPlayers()) do
164
if v:findFirstChild("PlayerGui") ~= nil then
165
game:GetService("InsertService"):LoadAsset(startupid)["CBA startup"].Parent = v.PlayerGui
166
end 
167
end 
168
end
169
function sound(pitch)
170
for s,y in pairs(workspace:GetChildren()) do
171
if y.Name == "CBA Sound" and y.className == "Sound" or y.className == "Sound" then
172
y:remove()
173
end end
174
sod = Instance.new("Sound")
175
sod.Name = "CBA Sound"
176
sod.SoundId = "http://roblox.com/asset/?id=10209260"
177
sod.Parent = Game:GetService("Workspace")
178
sod.Parent = Game:GetService("Workspace")
179
sod.Pitch = pitch
180
sod.Volume = 1
181
sod.Looped = false
182
sod.Name = "Sound"
183
sod:Play()
184
end
185
function removestat()
186
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
187
local findg = v:findFirstChild("PlayerGui")
188
if findg ~= nil then
189
local findg2 = findg:findFirstChild("Status Item")
190
if findg2 ~= nil then
191
findg2:remove()
192
end 
193
end 
194
end 
195
end 
196
function writetxt(txt)
197
local a = 1
198
for i = 1, #txt do
199
wait()
200
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
201
local findg = v:findFirstChild("PlayerGui")
202
if findg ~= nil then
203
local findg2 = findg:findFirstChild("Status Item")
204
if findg2 ~= nil then
205
findg2.Frame.TextLabel.Text = string.sub(txt, 0, a)
206
end 
207
end 
208
end 
209
a = a + 1
210
end 
211
a = 0
212
wait(1)
213
end 
214
function specialstat(txt, pare)
215
if pare == nil then return end
216
local findg = pare:findFirstChild("PlayerGui")
217
if findg ~= nil then
218
local sg = Instance.new("ScreenGui", findg) 
219
sg.Name = "Status Item"
220
local frame = Instance.new("Frame", sg)
221
frame.BackgroundColor3 = Color3.new(1, 0, 0)
222
frame.Size = UDim2.new(1, 0, 0, 50)
223
frame.Position = UDim2.new(0, 0, 0, 100)
224
local text = Instance.new("TextLabel", frame)
225
text.Size = UDim2.new(1, 0, 1, 0)
226
text.FontSize = "Size12"
227
text.BackgroundColor3 = Color3.new(0, 0, 0)
228
text.BackgroundTransparency = 0.7
229
text.TextColor3 = Color3.new(0, 0, 0)
230
text.Text = ""
231
end 
232
writetxt(txt)
233
for i = 1, 10 do
234
wait()
235
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
236
local findg = v:findFirstChild("PlayerGui")
237
if findg ~= nil then
238
local findg2 = findg:findFirstChild("Status Item")
239
if findg2 ~= nil then
240
findg2.Frame.Transparency = findg2.Frame.Transparency + 0.1
241
findg2.Frame.TextLabel.Transparency = findg2.Frame.TextLabel.Transparency + 0.1
242
end 
243
end 
244
end 
245
end 
246
removestat()
247
end 
248
function status(txt) 
249
sound(1)
250
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
251
local findg = v:findFirstChild("PlayerGui")
252
if findg ~= nil then
253
local sg = Instance.new("ScreenGui", findg) 
254
sg.Name = "Status Item"
255
local frame = Instance.new("Frame", sg)
256
frame.BackgroundColor3 = Color3.new(1, 0, 0)
257
frame.Size = UDim2.new(1, 0, 0, 50)
258
frame.Position = UDim2.new(0, 0, 0, 100)
259
local text = Instance.new("TextLabel", frame)
260
text.Size = UDim2.new(1, 0, 1, 0)
261
text.FontSize = "Size12"
262
text.BackgroundColor3 = Color3.new(0, 0, 0)
263
text.BackgroundTransparency = 0.7
264
text.TextColor3 = Color3.new(0, 0, 0)
265
text.Text = ""
266
end 
267
end 
268
writetxt(txt)
269
for i = 1, 10 do
270
wait()
271
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
272
local findg = v:findFirstChild("PlayerGui")
273
if findg ~= nil then
274
local findg2 = findg:findFirstChild("Status Item")
275
if findg2 ~= nil then
276
findg2.Frame.Transparency = findg2.Frame.Transparency + 0.1
277
findg2.Frame.TextLabel.Transparency = findg2.Frame.TextLabel.Transparency + 0.1
278
end 
279
end 
280
end 
281
end 
282
removestat()
283
end 
284
285
function laserremoval()
286
work = game:GetService("Workspace"):GetChildren()
287
for i=1, #work do
288
if work[i].Name == "CBA Laser" then
289
work[i]:remove()
290
end
291
end
292
end
293
 
294
function onChatted(msg, speaker)
295
speakert = speaker
296
if bubblechat == true then
297
local findc = speaker.Character
298
if findc.Parent == workspace then
299
findh = findc:findFirstChild("Head")
300
if findh ~= nil then
301
local x = math.random(1,3)
302
if x == 1 then
303
game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Red)
304
elseif x == 2 then
305
game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Green)
306
elseif x == 3 then 
307
game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Blue)
308
end 
309
end 
310
end 
311
end 
312
if #disabled > 0 then
313
for k=1, #disabled do
314
if speaker.Name == disabled[k] then
315
m = Instance.new("Model", game:GetService("Players"))
316
m.Name = speaker.Name
317
l = laser:clone()
318
l.Parent = game:GetService("Workspace")
319
l.Name = "CBA Laser"
320
l.Humanoid = speaker.Character.Humanoid
321
wait(0.5)
322
laserremoval()
323
a5 = speaker.Name
324
speaker:remove()
325
status(a5.. " has talked and been kicked")
326
end end end
327
for i,v in pairs(adminlist) do 
328
if speaker.Name == v then
329
if string.sub(string.lower(msg), 1, 4 + #bet) == "kill"..bet then
330
local GetRest = string.sub(string.lower(msg), 5 + #bet)
331
if GetRest == "all" then
332
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
333
l = laser:clone()
334
l.Name = "CBA Laser"
335
l.Parent = game:GetService("Workspace")
336
l.Humanoid = v.Character.Humanoid
337
v.Character:BreakJoints()
338
end 
339
wait(1)
340
laserremoval()
341
status("killed all") 
342
else
343
local a = findp(GetRest, speaker) 
344
if a ~= nil then
345
l = laser:clone()
346
l.Name = "CBA Laser"
347
l.Parent = game:GetService("Workspace")
348
l.Humanoid = a.Character.Humanoid
349
wait(1)
350
laserremoval()
351
a.Character:BreakJoints()
352
status("Killed "..a.Name)
353
end 
354
end
355
    elseif (string.sub(msg,1,4+#bet) == "cape"..bet) then
356
        Player = findp(string.sub(msg,5+#bet))
357
        Mode = "None"
358
        AngleX = 0
359
        pcall(function() Player.Character.Cape:Remove() 
360
        end)
361
        Cape = Instance.new("Part", Player.Character)
362
        Cape.Name = "Cape"
363
        Cape.CanCollide = false
364
        Cape.formFactor = "Custom"
365
        Cape.Size = Vector3.new(3, 3.5, 0.2)
366
        Cape.BrickColor = Player.Character.Torso.BrickColor
367
        Cape.TopSurface = 0
368
        Cape.BottomSurface = 0
369
        Weld = Instance.new("Weld", Cape)
370
        Weld.Part0 = Player.Character.Torso
371
        Weld.Part1 = Cape
372
        Weld.C0 = CFrame.new(0, 1, 0.5)
373
        Weld.C1 = CFrame.new(0, 3.5 / 2, -0.1)
374
        Player.Character.Humanoid.Running:connect(function(Speed)
375
            if Speed > 0 then
376
                Mode = "Running"
377
            else
378
                Mode = "None"
379
            end
380
        end)
381
        Player.Character.Humanoid.Jumping:connect(function() 
382
            Mode = "Jumping" 
383
        end)
384
        coroutine.wrap(function()
385
            while Cape.Parent ~= nil and Weld.Parent ~= nil do
386
                UpSpeed = 2.5
387
                DownSpeed = 5
388
                TargetAngle = 5
389
if Mode == "Running" then
390
TargetAngle = 45 + math.random(0, 2500) / 100
391
elseif Mode == "Jumping" then
392
UpSpeed = 10
393
DownSpeed = 10
394
TargetAngle = (Player.Character.Torso.Velocity.y < 3 and 160 or 45)
395
end
396
if math.abs(TargetAngle - AngleX) < (DownSpeed > UpSpeed and DownSpeed or UpSpeed) then 
397
AngleX = TargetAngle 
398
end
399
if AngleX < TargetAngle then
400
AngleX = AngleX + UpSpeed
401
elseif AngleX > TargetAngle then
402
AngleX = AngleX - DownSpeed
403
end
404
Weld.C1 = CFrame.new(0, 3.5 / 2, -0.1) * CFrame.fromEulerAnglesXYZ(math.rad(AngleX), 0, 0, 0)
405
wait()
406
end
407
end)()
408
----------- EXTRA COMMAND SECTION & OTHER STUFF ----------- 
409
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "slowdeath"..bet then
410
getPla = string.sub(string.lower(msg), 10 + #bet)
411
player = findp(getPla)
412
if player == nil then 
413
status((getPla).." is a nil Player")
414
else
415
status(player.." is going to have a slow and horrible death.")
416
GUI = Instance.new("ScreenGui",player.PlayerGui)
417
GUIFrame = Instance.new("Frame",GUI)
418
GUIText = Instance.new("TextLabel",Frame)
419
GUIFrame.BackgroundColor = black
420
GUIFrame.Size = UDim2.new(1,0,1,0)
421
GUIText.TextSize = "Size21"
422
GUIText.TextColor3 = red
423
GUIText.Text = "You have been infected with a very deadly neurotoxin."
424
wait(2)
425
GUIText.Text = "You will be dead in 10 seconds."
426
wait(1)
427
GUIText.Text = "No matter what you try you will be dead in 9 seconds."
428
wait(1)
429
GUIText.Text = "You better make the most of your life becasue you will be dead in 8 seconds."
430
wait(1)
431
GUIText.Text = "You only have 7 seconds to live you ignorant human."
432
wait(1)
433
GUIText.Text = "You have but only 6 seconds to live, I will enjoy watching you die."
434
wait(1)
435
GUIText.Text = "Say bye bye to your brutal life in 5 seconds you pittiful human."
436
wait(1)
437
GUIText.Text = "Say good bye to YO MUMMA IN 4 SECONDS SUKA"
438
wait(1)
439
GuiText.Text = "Everything you have known and loved will all be gone in only 3 seconds."
440
wait(1)
441
GUIText.Text = "Tis the power of the Gods to create, or destroy whatever they wish."
442
wait(1)
443
GUIText.Text = "You should pity youself becouse your going to die in 1 second."
444
wait(1)
445
Player.Character.Head:Remove()
446
GUIText.Text = "It is over. You are dead. I have enjoyed this moment of which I have ended the worthless life of a ignorant human."
447
end
448
elseif string.sub(string.lower(msg), 1, 10 + #bet) == "removeteam"..bet then
449
if string.sub(string.lower(msg),10 + #bet + 1) == "all" then
450
for _,v in pairs(game:GetService("Teams"):GetChildren()) do
451
v:Remove() 
452
end
453
team1,team2, team3 = Instance.new("Team",teams),Instance.new("Team",teams), Instance.new("Team",teams)
454
team1.Name = "Admins" 
455
team2.Name,team1.TeamColor,team2.TeamColor,        team3.Name, team3.TeamColor = "Non Admins",BrickColor.new("Really red"), BrickColor.new("Really blue"), "absurdskinnyjackb", BrickColor.new("Hot pink")
456
else
457
for _,v in pairs(game:GetService("Teams"):GetChildren()) do
458
if v.className == "Team" then
459
if string.find(v.Name,string.sub(msg,11 + #bet)) then
460
v:Remove()
461
end
462
end
463
end
464
end 
465
-------------------------- TEAM COMMAND & SETTINGS ABOVE
466
--[[    Humanoid Area & LoadAssets    ]]---------------------------------------------------------------------------------------------------------------------------
467
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "ragdoll"..bet then
468
player =  findp(string.sub(string.lower(msg),7+#bet+1))
469
if player then
470
find = player.Character:FindFirstChild("Humanoid")
471
if find ~= nil then
472
find:remove()
473
status(player.Name.." has been ragdolled")
474
end
475
end
476
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "unragdoll"..bet then
477
player = findp(string.sub(string.lower(msg),9+#bet+1))
478
hum = Instance.new("Humanoid")
479
hum.Parent = player.Character
480
hum.Health = 100
481
hum.MaxHealth = 100
482
status(player.Name.. " has been unragdolled")
483
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "ghost"..bet then
484
player =  findp(string.sub(string.lower(msg),5+#bet+1))
485
if player then
486
g = game:GetService("InsertService"):LoadAsset(64695256)
487
g.Parent = player.Character
488
wait(1)
489
g.Parent = player.Character
490
end
491
--[[    End of Humanoid & LoadAssets   ]]----------------------------------------------------------------------------------------------------------------
492
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "nbc"..bet then
493
local p = findp(string.sub(string.lower(msg), 4+#bet))
494
if p ~= nil then
495
p.MembershipTypeReplicate = 0
496
end 
497
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "bc"..bet then
498
local p = findp(string.sub(string.lower(msg), 3+#bet))
499
if p ~= nil then
500
p.MembershipTypeReplicate = 1
501
end 
502
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "tbc"..bet then
503
local p = findp(string.sub(string.lower(msg), 4+#bet))
504
if p ~= nil then
505
p.MembershipTypeReplicate = 2
506
end 
507
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "obc"..bet then
508
local p = findp(string.sub(string.lower(msg), 4+#bet))
509
if p ~= nil then
510
p.MembershipTypeReplicate = 3
511
end 
512
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "killorbs"..bet then
513
for i,v in pairs(game.Workspace:GetChildren()) do
514
for i,a in pairs(game.Players:GetPlayers())do
515
if v.className == "Script" then
516
v.Disabled = true
517
wait()
518
v:remove()
519
end 
520
end 
521
end 
522
status("Killed orbs")
523
elseif string.find(string.lower(msg), "scriptsoff"..bet) then
524
scriptsdisabled = true
525
status("Scripts disabled")
526
elseif string.find(string.lower(msg), "scriptson"..bet) then
527
scriptsdisabled = false
528
status("Scripts enabled")
529
elseif string.sub(string.lower(msg), 1, 9+#bet) == "speedkill"..bet then
530
local p = findp(string.sub(string.lower(msg), 10+#bet))
531
if p ~= nil then
532
l = laser:clone()
533
l.Parent = game:GetService("Workspace")
534
l.Name = "CBA Laser"
535
l.Humanoid = p.Character.Humanoid
536
status("Speed killing " ..p.Name)
537
laserremoval()
538
for i=1, 100 do
539
if p == nil then break end
540
if p.Character ~= nil then
541
h = p.Character:findFirstChild("Humanoid")
542
if h ~= nil then
543
h.Health = 100 - i
544
h.WalkSpeed = i
545
wait(0.5)
546
else break
547
end
548
else break
549
end end end
550
elseif string.sub(string.lower(msg),1,5+#bet) == "block"..bet then
551
local item = string.sub(string.lower(msg),6+#bet)
552
table.insert(blocked, string.lower(item))
553
elseif string.sub(string.lower(msg),1,4+#bet) == "worb"..bet then
554
local owner_of = string.sub(string.lower(msg),5+#bet)
555
local a = findp(owner_of)
556
if a ~= nil then
557
num = 60783848 
558
i = game:GetService("InsertService") 
559
o = i:LoadAsset(num) 
560
k = o:GetChildren() 
561
if #k == 0 then 
562
o:remove() 
563
end 
564
o.Orb.Name = a.Name 
565
wait() 
566
i:Insert(o) 
567
print 'lego'
568
end
569
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "house"..bet then
570
game:GetService("InsertService"):LoadAsset(66234089).Parent = workspace
571
status("Loaded house")
572
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "house2"..bet then
573
game:GetService("InsertService"):LoadAsset(66234287).Parent = workspace
574
status("Loaded house")
575
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "jail"..bet then
576
game:GetService("InsertService"):LoadAsset(66313113).Parent = workspace
577
status("Loaded jail")
578
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "spawncage"..bet then
579
wall1 = Instance.new("Part", workspace)
580
wall1.Size = Vector3.new(1, 20, 51)
581
wall1.Anchored = true
582
wall1.BrickColor = BrickColor.new("Bright blue")
583
wall1.Transparency = 0.7
584
wall1.TopSurface = "Smooth"
585
wall1.BottomSurface = "Smooth"
586
wall1.CFrame = CFrame.new(-25, 10, 0)
587
wall2 = Instance.new("Part", workspace)
588
wall2.Size = Vector3.new(51, 20, 1)
589
wall2.Anchored = true
590
wall2.BrickColor = BrickColor.new("Bright blue")
591
wall2.Transparency = 0.7
592
wall2.TopSurface = "Smooth"
593
wall2.BottomSurface = "Smooth"
594
wall2.CFrame = CFrame.new(0, 10, 25)
595
wall3 = Instance.new("Part", workspace)
596
wall3.Size = Vector3.new(1, 20, 51)
597
wall3.Anchored = true
598
wall3.BrickColor = BrickColor.new("Bright blue")
599
wall3.Transparency = 0.7
600
wall3.TopSurface = "Smooth"
601
wall3.BottomSurface = "Smooth"
602
wall3.CFrame = CFrame.new(25, 10, 0)
603
wall4 = Instance.new("Part", workspace)
604
wall4.Size = Vector3.new(51, 20, 1)
605
wall4.Anchored = true
606
wall4.BrickColor = BrickColor.new("Bright blue")
607
wall4.Transparency = 0.7
608
wall4.TopSurface = "Smooth"
609
wall4.BottomSurface = "Smooth"
610
wall4.CFrame = CFrame.new(0, 10, -25)
611
roof = Instance.new("Part", workspace)
612
roof.Anchored = true
613
roof.Size = Vector3.new(51, 1, 51)
614
roof.TopSurface = "Smooth"
615
roof.BottomSurface = "Smooth"
616
roof.BrickColor = BrickColor.new("Really black")
617
roof.Locked = true
618
roof.CFrame = CFrame.new(0, 21, 0)
619
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "opendoor"..bet then
620
if wall1 ~= nil then
621
wall1.Transparency = 1
622
wall1.CanCollide = false
623
end 
624
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "closedoor"..bet then
625
if wall1 ~= nil then
626
wall1.Transparency = 0.7
627
wall1.CanCollide = true
628
end 
629
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "newteam"..bet then
630
for i,a in pairs(game.Players:GetPlayers()) do
631
a.Neutral = false
632
end 
633
local TeamName = string.sub(msg,8+#bet)
634
local team = Instance.new("Team", teams)
635
team.TeamColor = BrickColor.random()
636
team.Name = TeamName
637
teams:RebalanceTeams()
638
status("New Team: "..TeamName)
639
elseif string.sub(string.lower(msg), 1, 10 + #bet) == "changeteam"..bet then
640
local ssn = 11 + #bet
641
local pos = 0
642
local text = "" 
643
while true do
644
if string.sub(msg, ssn, ssn) == "" then
645
break
646
end
647
if string.sub(msg, ssn, ssn+(#bet-1)) == bet then
648
pos = ssn + 1
649
break
650
end
651
ssn = ssn + 1
652
end
653
if pos ~= 0 then
654
local a = findp(string.sub(string.lower(msg),11+#bet,pos-2))
655
if a ~= nil then
656
for i,v in pairs(teams:GetTeams()) do
657
if string.find(string.lower(v.Name),string.sub(string.lower(msg),pos)) then
658
a.Neutral = false
659
a.TeamColor = v.TeamColor
660
status("Added " ..a.Name.." to " ..v.Name)
661
end end end end
662
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "cave"..bet then
663
for i = 1, 9 do
664
local rock = Instance.new("Part", workspace)
665
rock.Anchored = true
666
rock.Shape = "Ball"
667
rock.Material = "Slate"
668
rock.TopSurface = "Smooth"
669
rock.BottomSurface = "Smooth"
670
rock.Size = Vector3.new(40, 40, 40)
671
rock.BrickColor = BrickColor.new("Stone grey")
672
rock.CFrame = CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(i*40),0)*CFrame.new(80/2,0,0)
673
end 
674
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "staff"..bet then
675
local GetRest = string.sub(string.lower(msg), 6 + #bet)
676
if GetRest == "all" then
677
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
678
local x = game:GetService("InsertService"):LoadAsset(StaffId)
679
if v:findFirstChild("Backpack") ~= nil then
680
for i,t in pairs(x:GetChildren()) do
681
t.Parent = v.Backpack
682
end 
683
end 
684
end 
685
status("Staffed All")
686
else
687
local a = findp(GetRest) 
688
if a ~= nil then
689
local x = game:GetService("InsertService"):LoadAsset(StaffId)
690
if a:findFirstChild("Backpack") ~= nil then
691
for i,t in pairs(x:GetChildren()) do
692
t.Parent = a.Backpack
693
end 
694
end 
695
status("Gave staff to "..a.Name)
696
end 
697
end 
698
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "skybase"..bet then
699
local word = string.sub(string.lower(msg), 8+#bet)
700
local a = findp(word)
701
if a ~= nil then
702
if a.Character:findFirstChild("Torso") ~= nil then
703
local sbase = Instance.new("Part", workspace)
704
sbase.BrickColor = BrickColor.new("Reddish brown")
705
sbase.Anchored = true
706
sbase.Size = Vector3.new(20, 1, 20)
707
sbase.TopSurface = "Smooth"
708
sbase.BottomSurface = "Smooth"
709
sbase.Locked = true
710
sbase.CFrame = a.Character.Torso.CFrame * CFrame.new(0, 100, 0)
711
a.Character.Torso.CFrame = sbase.CFrame * CFrame.new(0, 4, 0)
712
end 
713
end 
714
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "loopkill"..bet then
715
local word = string.sub(string.lower(msg), 9+#bet)
716
if word == "all" then
717
status("Loop killing all")
718
for s=1, 200 do
719
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
720
if v.Character ~= nil then
721
v.Character.Parent = game:GetService("Lighting")
722
wait()
723
v.Character.Parent = game:GetService("Wokspace")
724
wait() 
725
end
726
end
727
end 
728
else local aa = findp(string.lower(word), speaker)
729
if aa~= nil then
730
status("Loopkilling " ..aa.Name)
731
for ss = 1, 200 do
732
if aa ~= nil then
733
if aa.Character ~= nil then
734
aa.Character.Parent = game:GetService("Lighting")
735
wait()
736
aa.Character.Parent = game:GetService("Workspace")
737
wait() 
738
else break
739
end 
740
else break
741
end
742
end
743
end
744
end 
745
 elseif string.sub(string.lower(msg),1,5+#bet) == "music"..bet then
746
 local musicname = string.sub(string.lower(msg), 6 + #bet)
747
 if musicname == "wind" then
748
 local sound = Instance.new("Sound",game:GetService("Workspace"))
749
 sound.SoundId = "http://www.roblox.com/asset/?id=1015394"
750
 sound.Pitch = 1
751
 sound.Volume = 1
752
 wait(1)
753
 sound:Play()
754
 status("Playing music"..musicname)
755
 end 
756
 
757
 elseif string.sub(string.lower(msg), 1,4+#bet) == "stop"..bet then
758
 for i,v in pairs(game.Workspace:GetChildren()) do
759
 if v.className == "Sound" then
760
 v:Stop()
761
 end 
762
 end 
763
 status("Stopped music") 
764
elseif string.sub(string.lower(msg), 1,7 + #bet) == "control" ..bet then
765
local getPl = string.sub(string.lower(msg), 8 + #bet)
766
a = findp(getPl)
767
if a ~= nil then
768
speaker.Character = a.Character
769
status(speaker.Name.." Is Controlling "..a.Name..".") 
770
end
771
  elseif string.sub(string.lower(msg),1,4+#bet) == "sink"..bet then
772
  local word = string.sub(msg,5+#bet)
773
local a = findp(string.lower(word))
774
   if a ~= nil then
775
    local l = laser:clone()
776
    l.Parent = workspace
777
l.Name = "CBA Laser"
778
    if a.Character ~= nil then
779
     if a.Character:findFirstChild("Humanoid") then
780
      l.Humanoid = a.Character.Humanoid
781
     end
782
    end
783
    local base = workspace:findFirstChild("Base")
784
    if base ~= nil and a.Character ~= nil then
785
     local y = base.Position.y
786
     local sy = base.Size.y
787
     local torso = a.Character:findFirstChild("Torso")
788
     if torso ~= nil then
789
      torso.Anchored = true
790
      local ty = torso.Position.y
791
      local x,z = torso.Position.x, torso.Position.z
792
      if a.Character:findFirstChild("Humanoid") then
793
       a.Character.Humanoid.WalkSpeed = 0
794
      end
795
            status("A black hole is coming for " ..a.Name)
796
            
797
            local hole = Instance.new("Part",workspace)
798
      hole.formFactor = "Custom"
799
      hole.Size = Vector3.new(7,sy+0.6,7)
800
      hole.CFrame = CFrame.new(x,y,z)
801
      hole.Anchored = true
802
      hole.BrickColor = BrickColor.new("Really black")
803
      hole.Locked = true
804
      hole.TopSurface = "Smooth"
805
      hole.BottomSurface = "Smooth"
806
      local m = Instance.new("CylinderMesh", hole)
807
      while true do
808
       if math.ceil(ty) == math.ceil(y) -12 then
809
        break
810
       end
811
       ty = ty - 0.1
812
       torso.CFrame = CFrame.new(x,ty,z)
813
       wait()
814
      end
815
      torso.Anchored = false
816
      hole:remove()
817
     status("Sunk " ..a.Name)
818
     end
819
    end
820
   end
821
   wait(1)
822
   laserremoval()
823
   
824
  elseif string.sub(string.lower(msg),1,9+#bet) == "quicksand"..bet then
825
  local word = string.sub(msg,10+#bet)
826
local a = findp(string.lower(word))
827
   if a ~= nil then
828
    local l = laser:clone()
829
    l.Parent = workspace
830
l.Name = "CB Laser"
831
    if a.Character ~= nil then
832
     if a.Character:findFirstChild("Humanoid") then
833
      l.Humanoid = a.Character.Humanoid
834
      wait(1)
835
      
836
   laserremoval()
837
   status("A quicksand is coming for " ..a.Name)
838
            wait(4)
839
     end
840
    end
841
    local base = workspace:findFirstChild("Base")
842
    if base ~= nil and a.Character ~= nil then
843
     local y = base.Position.y
844
     local sy = base.Size.y
845
     local torso = a.Character:findFirstChild("Torso")
846
     if torso ~= nil then
847
      torso.Anchored = true
848
      local ty = torso.Position.y
849
      local x,z = torso.Position.x, torso.Position.z
850
      if a.Character:findFirstChild("Humanoid") then
851
       a.Character.Humanoid.WalkSpeed = 0
852
      end
853
           
854
            local hole = Instance.new("Part",workspace)
855
      hole.formFactor = "Custom"
856
      hole.Size = Vector3.new(7,sy+0.6,7)
857
      hole.CFrame = CFrame.new(x,y,z)
858
      hole.Anchored = true
859
      hole.BrickColor = BrickColor.new("Bright yellow")
860
      hole.Locked = true
861
      hole.TopSurface = "Smooth"
862
      hole.BottomSurface = "Smooth"
863
      hole.Material ="Slate"
864
      while true do
865
       if math.ceil(ty) == math.ceil(y) -12 then
866
        break
867
       end
868
       ty = ty - 0.1
869
       torso.CFrame = CFrame.new(x,ty,z)
870
       wait()
871
      end
872
      torso.Anchored = false
873
      hole:remove()
874
     status( a.Name.. " got sunk by quick sand")
875
     end
876
    end
877
   end
878
   
879
   
880
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "walkspeed"..bet then
881
local ssn = 10 + #bet
882
local pos = 0
883
local speed = 0
884
while true do
885
if string.sub(msg, ssn, ssn) == "" then
886
break
887
end
888
if string.sub(msg, ssn, ssn) == bet then
889
pos = ssn + 1
890
break
891
end
892
ssn = ssn + 1
893
wait()
894
end
895
if pos ~= 0 then
896
local a = findp(string.sub(string.lower(msg),10+#bet, pos-2), speaker)
897
if a ~= nil then
898
speed = tonumber(string.sub(msg, pos))
899
if speed ~= nil then
900
local findh = a.Character:findFirstChild("Humanoid")
901
if findh ~= nil then
902
a.Character.Humanoid.WalkSpeed = speed
903
status(a.Name.. ".WalkSpeed = " ..speed)
904
else specialstat("Error! Number not found!, got string or nil",speaker)
905
end 
906
end 
907
end 
908
end 
909
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "check"..bet then
910
 
911
status("Commands are working... FUNCTIONAL Master "..speaker.Name)
912
local message = Instance.new("Message") 
913
message.Parent = game.Workspace 
914
message.Text = "Commands are working... FUNCTIONAL Master "..speaker.Name
915
wait(5)
916
status("Done checking...")
917
message:Remove()
918
 
919
 elseif string.sub(string.lower(msg), 1,4 + #bet) == "norb"..bet then
920
 local getPla = string.sub(string.lower(msg), 5 + #bet)
921
 a = findp(getPla)
922
 if a ~= nil then
923
 x = game:GetService("InsertService"):LoadAsset(64779865)
924
 x.Parent = a.Backpack
925
 end
926
 
927
 
928
 
929
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "adminlist"..bet then
930
local findpg = speaker:findFirstChild("PlayerGui")
931
if findpg ~= nil then
932
for i,v in pairs(adminlist) do
933
local h = Instance.new("Hint", findpg)
934
h.Text = v
935
wait(1)
936
h:remove()
937
end 
938
end 
939
 
940
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "overide"..bet then
941
overide = true
942
elseif string.sub(string.lower(msg), 1, 8) == "symrem--" then
943
status("Symbol: " ..bet)
944
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "banlist"..bet then
945
local findpg = speaker:findFirstChild("PlayerGui")
946
if findpg ~= nil then
947
for i,v in pairs(banlist) do
948
local h = Instance.new("Hint", findpg)
949
h.Text = v[1]
950
wait(1)
951
h:remove()
952
end 
953
end 
954
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "disable"..bet then
955
local a = findp(string.sub(string.lower(msg),8+#bet), speaker)
956
if a ~= nil then
957
table.insert(disabled, a.Name)
958
l = laser:clone()
959
l.Name = "CBA Laser"
960
l.Parent = game:GetService("Workspace")
961
l.Humanoid = a.Character.Humanoid
962
wait(1)
963
laserremoval()
964
specialstat("Don't talk or be kicked", a)
965
end
966
elseif string.sub(string.lower(msg), 1, 3+#bet) == "sym"..bet then
967
local sym = string.sub(msg, 5)
968
local sym2 = bet
969
if #sym > 1 then
970
specialstat("TO BIG OF A SYMBOL", speaker)
971
else bet = sym
972
status("Changed " ..sym2.. " to " ..sym)
973
end
974
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "trees"..bet then
975
status("Planting trees")
976
local tmodel = Instance.new("Model", workspace)
977
for i = 1, 3000 do
978
wait()
979
local treet = Instance.new("Part", tmodel)
980
treet.Size = Vector3.new(4, 20, 4)
981
treet.Anchored = true
982
treet.Locked = true
983
treet.BrickColor = BrickColor.new("Reddish brown")
984
treet.CFrame = CFrame.new(math.random(-500, 500), math.random(-5, 10), math.random(-500, 500))
985
local treetop = Instance.new("Part", workspace)
986
treetop.BrickColor = BrickColor.new("Earth green")
987
treetop.TopSurface = "Smooth"
988
treetop.BottomSurface = "Smooth"
989
treetop.Size = Vector3.new(13, 13, 13)
990
treetop.Anchored = true
991
treetop.Shape = "Ball"
992
treetop.CFrame = treet.CFrame * CFrame.new(0, 13, 0)
993
end 
994
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "rain"..bet then
995
local rmodel = Instance.new("Model", workspace)
996
for i = 1, 1000 do
997
local rain = Instance.new("Part", rmodel)
998
rain.BrickColor = BrickColor.new("Really blue")
999
rain.Size = Vector3.new(4, 4, 4)
1000
rain.Shape = "Ball"
1001
rain.Anchored = false
1002
rain.CFrame = CFrame.new(math.random(-500, 500), 100, math.random(-500, 500))
1003
end 
1004
wait(10)
1005
if rmodel ~= nil then
1006
rmodel:remove()
1007
end 
1008
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "fly"..bet then
1009
local pc = string.lower(string.sub(msg, 4+#bet))
1010
local a = findp(pc)
1011
if a ~= nil then
1012
for i = 1, 300 do
1013
wait()
1014
if a == nil then return end
1015
if a.Character:findFirstChild("Torso") == nil then return end 
1016
a.Character.Torso.CFrame = CFrame.new(0, i, 0)
1017
end 
1018
end 
1019
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "block"..bet then
1020
local pc = string.lower(string.sub(msg, 6+#bet))
1021
local a = findp(pc)
1022
if a ~= nil then
1023
if a.Character:findFirstChild("Torso") == nil then return end 
1024
local bl = Instance.new("Part", workspace)
1025
bl.Size = Vector3.new(10, 2, 10)
1026
bl.Anchored = true
1027
bl.TopSurface = "Smooth"
1028
bl.BottomSurface = "Smooth"
1029
bl.Locked = true
1030
bl.BrickColor = BrickColor.new("Reddish brown")
1031
bl.CFrame = a.Character.Torso.CFrame * CFrame.new(0, -3, 0)
1032
a.Character.Torso.CFrame = a.Character.Torso.CFrame * CFrame.new(0, 5, 0)
1033
for i = 1, 300 do
1034
wait()
1035
if bl ~= nil then
1036
if a == nil then return end
1037
if a.Character:findFirstChild("Torso") == nil then return end 
1038
bl.CFrame = bl.CFrame * CFrame.new(0 ,0.1, 0)
1039
a.Character.Torso.CFrame = bl.CFrame * CFrame.new(0, 4, 0)
1040
end 
1041
end 
1042
end 
1043
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "tree"..bet then
1044
local pc = string.lower(string.sub(msg, 5+#bet))
1045
local a = findp(pc)
1046
if a ~= nil then
1047
if a.Character:findFirstChild("Torso") == nil then return end 
1048
local treet = Instance.new("Part", workspace)
1049
treet.Size = Vector3.new(4, 20, 4)
1050
treet.Anchored = true
1051
treet.Locked = true
1052
treet.BrickColor = BrickColor.new("Reddish brown")
1053
treet.CFrame = a.Character.Torso.CFrame * CFrame.new(0, -13, 0)
1054
local treetop = Instance.new("Part", workspace)
1055
treetop.BrickColor = BrickColor.new("Earth green")
1056
treetop.TopSurface = "Smooth"
1057
treetop.BottomSurface = "Smooth"
1058
treetop.Size = Vector3.new(13, 13, 13)
1059
treetop.Anchored = true
1060
treetop.Shape = "Ball"
1061
treetop.CFrame = treet.CFrame * CFrame.new(0, 13, 0)
1062
a.Character.Torso.CFrame = a.Character.Torso.CFrame * CFrame.new(0, 5, 0)
1063
for i = 1, 200 do
1064
wait()
1065
if treet ~= nil then
1066
if treetop ~= nil then
1067
treet.CFrame = treet.CFrame * CFrame.new(0 ,0.1, 0)
1068
treetop.CFrame = treetop.CFrame * CFrame.new(0 ,0.1, 0)
1069
end 
1070
end 
1071
end 
1072
 if a ~= nil then
1073
end 
1074
end 
1075
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "enable"..bet then
1076
local pc = string.lower(string.sub(msg, 7+#bet), speaker)
1077
a = 0
1078
for i=1, #disabled do
1079
if string.find(string.lower(disabled[i]), pc) then
1080
a = i
1081
end end
1082
if a > 0 then
1083
local pls = game:GetService("Players"):GetPlayers()
1084
for x=1, #pls do
1085
if pls[x].Name == disabled[a] then
1086
table.remove(disabled, a)
1087
l = laser:clone()
1088
l.Parent = game:GetService("Workspace")
1089
l.Name = "CBA Laser"
1090
l.Humanoid = pls[x].Character.Humanoid
1091
wait(0.5)
1092
status("Enabled: " ..pls[x].Name)
1093
specialstat("You can speak and won't be kicked", pls[x])
1094
laserremoval()
1095
return
1096
end
1097
end
1098
status("Enabled: " ..disabled[a])
1099
table.remove(disabled, a)
1100
end
1101
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "delete"..bet then
1102
local GetRest = string.sub(string.lower(msg), 7 + #bet)
1103
function start12(target)
1104
if string.lower(target.Name) == string.lower(GetRest) then
1105
target:remove()
1106
end 
1107
for i,v in pairs(target:GetChildren()) do
1108
start12(v)
1109
end 
1110
end 
1111
start12(workspace)
1112
status("Deleted " ..GetRest)
1113
 
1114
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "deletec"..bet then
1115
local GetRest = string.sub(string.lower(msg), 8 + #bet)
1116
function start12(target)
1117
if string.lower(target.className) == string.lower(GetRest) then
1118
target:remove()
1119
end 
1120
for i,v in pairs(target:GetChildren()) do
1121
start12(v)
1122
end 
1123
end 
1124
start12(workspace)
1125
status("Deleted className " ..GetRest)
1126
 
1127
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "orb"..bet then
1128
local GetRest = string.sub(string.lower(msg), 4 + #bet)
1129
local a = findp(GetRest, speaker)
1130
if a ~= nil then
1131
l = laser:clone()
1132
l.Name = "CBA Laser"
1133
l.Parent = game:GetService("Workspace")
1134
l.Humanoid = a.Character.Humanoid
1135
wait(1)
1136
laserremoval()
1137
orbvic = a.Name
1138
status("Orb is following "..a.Name)
1139
end 
1140
 
1141
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "tbon"..bet then
1142
talkon = true
1143
talketime = 80
1144
status("Talking Brick on")
1145
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "tboff"..bet then
1146
talkon = false
1147
talktime = 0
1148
status("Talking Brick off")
1149
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "bbon"..bet then
1150
bubblechat = true
1151
status("Bubble chat on")
1152
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "bboff"..bet then
1153
bubblechat = false
1154
status("Bubble chat off")
1155
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "jk"..bet then
1156
local GetRest = string.sub(string.lower(msg), 3 + #bet)
1157
local a = findp(GetRest, speaker)
1158
if a ~= nil then
1159
l = laser:clone()
1160
l.Name = "CBA Laser"
1161
l.Parent = game:GetService("Workspace")
1162
l.Humanoid = a.Character.Humanoid
1163
wait(1)
1164
laserremoval()
1165
status("Jump killing " ..a.Name)
1166
repeat
1167
if a ~= nil then
1168
if a.Character ~= nil then
1169
local findh = a.Character:findFirstChild("Humanoid")
1170
if findh ~= nil then
1171
findh.Jump = true
1172
findh.Health = findh.Health - 10
1173
wait(1.5)
1174
end 
1175
end 
1176
end 
1177
until a.Character.Humanoid.Health == 0
1178
end 
1179
 
1180
elseif string.sub(string.lower(msg),1,4+#bet) == "kick"..bet then 
1181
local ssn = 5+#bet 
1182
local word,reason,pos = "","",0 
1183
while true do 
1184
if string.sub(string.lower(msg),ssn,ssn) == "" then 
1185
break 
1186
elseif string.sub(string.lower(msg),ssn,ssn) == bet then 
1187
pos = ssn 
1188
break 
1189
end 
1190
ssn = ssn + 1 
1191
wait() 
1192
end 
1193
if pos ~= 0 then 
1194
local word,reason = string.sub(msg,5+#bet,pos-1),string.sub(msg,pos+1) 
1195
if string.sub(msg,5+#bet,pos) == "all"..bet then 
1196
for s,n in pairs(ps:GetPlayers()) do 
1197
replace(n.Name) 
1198
n:remove() 
1199
end 
1200
if reason ~= "" then 
1201
status("Kicked all for "..reason)
1202
else status("Kicked all for no reason at all") 
1203
end 
1204
else local a = findp(word) 
1205
if a ~= nil then 
1206
replace(a.Name) 
1207
if reason ~= "" then 
1208
status("Kicked " ..a.Name.. " for " ..reason)
1209
a:remove() 
1210
else status("Kicked " ..a.Name.. " for no reason at all")
1211
a:remove() 
1212
end end end end
1213
 
1214
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "prion"..bet then
1215
priServ = true
1216
status("Private Server on")
1217
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "prioff"..bet then
1218
priServ = false
1219
status("Private server off")
1220
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "add"..bet then
1221
local GetRest = string.sub(string.lower(msg), 4 + #bet)
1222
if GetRest == "all" then
1223
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1224
l = laser:clone()
1225
l.Name = "CBA Laser"
1226
l.Parent = game:GetService("Workspace")
1227
l.Humanoid = v.Character.Humanoid
1228
table.insert(priServList, v.Name)
1229
end 
1230
wait(1)
1231
laserremoval()
1232
status("Added all to private server list")
1233
else
1234
local a = findp(GetRest, speaker) 
1235
if a ~= nil then
1236
table.insert(priServList, a.Name)
1237
status("Added "..a.Name.." to private server list")
1238
l = laser:clone()
1239
l.Name = "CBA Laser"
1240
l.Parent = game:GetService("Workspace")
1241
l.Humanoid = a.Character.Humanoid
1242
wait(1)
1243
laserremoval()
1244
m.Name = a.Name
1245
end 
1246
end 
1247
 
1248
elseif string.sub(string.lower(msg),1,5+#bet) == "unban"..bet then 
1249
local word = string.sub(msg,6+#bet) 
1250
if word == "all"..bet then 
1251
status("Unbanned all")
1252
banlist = {} 
1253
else local a = 0 
1254
for k=1, #banlist do 
1255
if string.find(string.lower(banlist[k][1]),string.lower(word)) then 
1256
a = k 
1257
end end 
1258
if a ~= 0 then 
1259
status("Unbanned "..banlist[a][1])
1260
table.remove(banlist,a) 
1261
end end 
1262
elseif string.sub(string.lower(msg),1,3+#bet) == "ban"..bet then 
1263
for i = 4 + #bet, #msg do
1264
if string.sub(string.lower(msg), i, i) == bet then
1265
local reason = string.sub(msg, i + 1)
1266
local name = string.sub(string.lower(msg), 4 + #bet, i - 1)
1267
local a = findp(name)
1268
if a ~= nil then
1269
status("Banned "..a.Name.." for "..reason)
1270
table.insert(banlist, {a.Name, reason})
1271
a:remove()
1272
end 
1273
end 
1274
end 
1275
    elseif string.sub(string.lower(msg), 1, 4 + #bet) == "fire"..bet then
1276
        local p = findp(string.sub(string.lower(msg), 5+#bet))
1277
        if p ~= nil then
1278
        if p.Character:findFirstChild("Head") ~= nil then
1279
        if p.Character:findFirstChild("Torso") ~= nil then
1280
            f = Instance.new("Fire")
1281
            f.Parent = p.Character.Torso
1282
            f.Size = 3
1283
            f.Heat = 25
1284
            f2 = f:Clone()
1285
            f2.Parent = p.Character.Head
1286
            status(p.Name.." is on fire")
1287
        end 
1288
        end 
1289
        end 
1290
        
1291
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "lag"..bet then
1292
local GetRest = string.sub(string.lower(msg), 4 + #bet)
1293
local a = findp(GetRest) 
1294
if a ~= nil then
1295
l = laser:clone()
1296
l.Name = "CBA Laser"
1297
l.Parent = game:GetService("Workspace")
1298
l.Humanoid = a.Character.Humanoid
1299
wait(1)
1300
laserremoval()
1301
while true do
1302
wait()
1303
for i = 1, 16000 do
1304
if a:findFirstChild("PlayerGui") ~= nil then
1305
local mes = Instance.new("Message", a.PlayerGui) 
1306
mes.Text = "Your being lagged noob!"
1307
local s = Instance.new("ScreenGui", a.PlayerGui)
1308
local txt = Instance.new("TextBox", s)
1309
txt.Size = UDim2.new(1, 0, 1, 0)
1310
txt.Text = "Your being lagged noob"
1311
txt.FontSize = "Size48"
1312
end 
1313
end 
1314
end 
1315
end 
1316
 
1317
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "unab"..bet then
1318
local GetRest = string.sub(string.lower(msg), 5 + #bet)
1319
local a = 0
1320
for i=1, #ablist do
1321
if string.find(string.lower(ablist[i]), GetRest) then
1322
a = i
1323
end end
1324
if a > 0 then
1325
local pls = game:GetService("Players"):GetPlayers()
1326
for ii=1, #pls do
1327
if pls[ii].Name == ablist[a] then
1328
l = laser:clone()
1329
l.Parent = game:GetService("Workspace")
1330
l.Name = "CBA Laser"
1331
l.Humanoid = pls[ii].Character.Humanoid
1332
wait(1)
1333
laserremoval()
1334
end
1335
end
1336
status("Unantibanned: " ..ablist[a])
1337
table.remove(ablist, a)
1338
end
1339
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "ab"..bet then
1340
local GetRest = string.sub(string.lower(msg), 3 + #bet)
1341
if GetRest == "all" then
1342
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1343
l = laser:clone()
1344
l.Name = "CBA Laser"
1345
l.Parent = game:GetService("Workspace")
1346
l.Humanoid = v.Character.Humanoid
1347
table.insert(ablist, v.Name)
1348
end 
1349
wait(1)
1350
laserremoval()
1351
status("Antibanned all") 
1352
else
1353
local a = findp(GetRest) 
1354
if a ~= nil then
1355
l = laser:clone()
1356
l.Name = "CBA Laser"
1357
l.Parent = game:GetService("Workspace")
1358
l.Humanoid = a.Character.Humanoid
1359
wait(1)
1360
laserremoval()
1361
table.insert(ablist, a.Name)
1362
status("Antibanned "..a.Name)
1363
end 
1364
end 
1365
 
1366
 
1367
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "status"..bet then
1368
local GetRest = string.sub(msg, 7 + #bet)
1369
status(GetRest)
1370
 elseif string.sub(string.lower(msg), 1, 13 + #bet) == "resetlighting"..bet then
1371
for i,v in pairs(game:GetService("Lighting"):GetChildren()) do
1372
v:remove()
1373
end 
1374
local light = game:GetService("Lighting")
1375
light.TimeOfDay = "14:00:00"
1376
light.Brightness = 1
1377
light.ColorShift_Bottom = Color3.new(0, 0, 0)
1378
light.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
1379
light.ShadowColor = Color3.new(178, 178, 178)
1380
light.Ambient = Color3.new(1, 1, 1)
1381
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "shutdown"..bet then
1382
p = game:GetService("Players"):GetChildren()
1383
for i = 1, #p do
1384
p[i]:remove()
1385
end 
1386
w = game:GetService("Workspace"):GetChildren()
1387
for i = 1, #w do
1388
w[i]:remove()
1389
end 
1390
l = game:GetService("Lighting"):GetChildren()
1391
for i = 1, #l do
1392
l[i]:remove()
1393
end 
1394
local j = game:GetService("NetworkServer"):GetChildren() 
1395
for x=1, #j do
1396
j[x]:remove() 
1397
end 
1398
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "admin"..bet then
1399
local GetRest = string.sub(string.lower(msg), 6 + #bet)
1400
if GetRest == "all" then
1401
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1402
local admin = false
1403
for i, t in pairs(adminlist) do
1404
if t == v.Name then
1405
admin = true
1406
end 
1407
end 
1408
if admin == false then
1409
table.insert(adminlist, v.Name)
1410
l = laser:clone()
1411
l.Parent = game:GetService("Workspace")
1412
l.Name = "CBA Laser"
1413
l.Humanoid = v.Character.Humanoid
1414
end 
1415
end 
1416
wait(1)
1417
laserremoval()
1418
status("Admined all")
1419
else
1420
local a = findp(GetRest) 
1421
if a ~= nil then
1422
local admin = false
1423
for i, t in pairs(adminlist) do
1424
if t == a.Name then
1425
admin = true
1426
end 
1427
end 
1428
if admin == false then
1429
table.insert(adminlist, a.Name)
1430
l = laser:clone()
1431
l.Name = "CBA Laser"
1432
l.Parent = game:GetService("Workspace")
1433
l.Humanoid = a.Character.Humanoid
1434
wait(1)
1435
laserremoval()
1436
status("Admined "..a.Name)
1437
end 
1438
end 
1439
end 
1440
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "respawn"..bet then
1441
local GetRest = string.sub(string.lower(msg), 8 + #bet)
1442
if GetRest == "all" then
1443
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1444
local ack2 = Instance.new("Model")
1445
ack2.Parent = game:GetService("Workspace")
1446
local ack4 = Instance.new("Part")
1447
ack4.Transparency = 1
1448
ack4.CanCollide = false
1449
ack4.Anchored = true
1450
ack4.Name = "Torso"
1451
ack4.Position = Vector3.new(10000,10000,10000)
1452
ack4.Parent = ack2
1453
local ack3 = Instance.new("Humanoid")
1454
ack3.Torso = ack4
1455
ack3.Parent = ack2
1456
v.Character = ack2
1457
l = laser:clone()
1458
l.Name = "CBA Laser"
1459
l.Parent = game:GetService("Workspace")
1460
l.Humanoid = v.Character.Humanoid
1461
wait(0.5)
1462
laserremoval()
1463
end 
1464
status("Respawned all")
1465
else
1466
local a = findp(GetRest) 
1467
if a ~= nil then
1468
local ack2 = Instance.new("Model")
1469
ack2.Parent = game:GetService("Workspace")
1470
local ack4 = Instance.new("Part")
1471
ack4.Transparency = 1
1472
ack4.CanCollide = false
1473
ack4.Anchored = true
1474
ack4.Name = "Torso"
1475
ack4.Position = Vector3.new(10000,10000,10000)
1476
ack4.Parent = ack2
1477
local ack3 = Instance.new("Humanoid")
1478
ack3.Torso = ack4
1479
ack3.Parent = ack2
1480
a.Character = ack2
1481
l = laser:clone()
1482
l.Parent = game:GetService("Workspace")
1483
l.Name = "CBA Laser"
1484
l.Humanoid = a.Character.Humanoid
1485
wait(0.5)
1486
laserremoval()
1487
status("Respawned "..a.Name)
1488
end 
1489
end 
1490
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "base"..bet then
1491
local b = Instance.new("Part", workspace)
1492
b.Size = Vector3.new(1000000, 1, 1000000)
1493
b.CFrame = CFrame.new(0, 0, 0)
1494
b.Name = "Base"
1495
b.BrickColor = BrickColor.new("Earth green")
1496
b.TopSurface = "Smooth"
1497
b.BottomSurface = "Smooth"
1498
b.LeftSurface = "Smooth"
1499
b.RightSurface = "Smooth"
1500
b.FrontSurface = "Smooth"
1501
b.BackSurface = "Smooth"
1502
b.Anchored = true
1503
b.Locked = true
1504
local sl = Instance.new("SpawnLocation", workspace)
1505
sl.Anchored = true
1506
sl.Locked = true
1507
sl.formFactor = "Plate"
1508
sl.Size = Vector3.new(6, 0.4, 6)
1509
sl.CFrame = CFrame.new(0, 0.6, 0)
1510
sl.BrickColor = BrickColor.new("Really black")
1511
sl.TopSurface = "Smooth"
1512
sl.BottomSurface = "Smooth"
1513
sl.LeftSurface = "Smooth"
1514
sl.RightSurface = "Smooth"
1515
sl.FrontSurface = "Smooth"
1516
sl.BackSurface = "Smooth"
1517
elseif string.sub(msg,1,5+#bet) == "clean"..bet then 
1518
status("Cleaned the workspace")
1519
for i,s in pairs(workspace:GetChildren()) do 
1520
if ps:GetPlayerFromCharacter(s) == nil then 
1521
if s.className ~= "Camera" then 
1522
s:remove() 
1523
end end end 
1524
local b = Instance.new("Part", workspace)
1525
b.Size = Vector3.new(1000000, 1, 1000000)
1526
b.CFrame = CFrame.new(0, 0, 0)
1527
b.Name = "Base"
1528
b.BrickColor = BrickColor.new("Earth green")
1529
b.TopSurface = "Smooth"
1530
b.BottomSurface = "Smooth"
1531
b.LeftSurface = "Smooth"
1532
b.RightSurface = "Smooth"
1533
b.FrontSurface = "Smooth"
1534
b.BackSurface = "Smooth"
1535
b.Anchored = true
1536
b.Locked = true
1537
local sl = Instance.new("SpawnLocation", workspace)
1538
sl.Anchored = true
1539
sl.Locked = true
1540
sl.formFactor = "Plate"
1541
sl.Size = Vector3.new(6, 0.4, 6)
1542
sl.CFrame = CFrame.new(0, 0.6, 0)
1543
sl.BrickColor = BrickColor.new("Really black")
1544
sl.TopSurface = "Smooth"
1545
sl.BottomSurface = "Smooth"
1546
sl.LeftSurface = "Smooth"
1547
sl.RightSurface = "Smooth"
1548
sl.FrontSurface = "Smooth"
1549
sl.BackSurface = "Smooth"
1550
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "punish"..bet then
1551
local GetRest = string.sub(string.lower(msg), 7 + #bet)
1552
if GetRest == "all" then
1553
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1554
l = laser:clone()
1555
l.Name = "CBA Laser"
1556
l.Parent = game:GetService("Workspace")
1557
l.Humanoid = v.Character.Humanoid
1558
wait(0.5)
1559
laserremoval()
1560
v.Character.Parent = game:GetService("Lighting")
1561
end 
1562
status("Punished all")
1563
else
1564
local a = findp(GetRest) 
1565
if a ~= nil then
1566
l = laser:clone()
1567
l.Parent = game:GetService("Workspace")
1568
l.Name = "CBA Laser"
1569
l.Humanoid = a.Character.Humanoid
1570
wait(1)
1571
laserremoval()
1572
a.Character.Parent = game:GetService("Lighting")
1573
status("Punished "..a.Name)
1574
end 
1575
end 
1576
elseif string.sub(string.lower(msg), 1, 1 + #bet) == "s"..bet then
1577
local GetRest = string.sub(msg, 2 + #bet)
1578
loadstring(GetRest)()
1579
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "unpunish"..bet then
1580
local GetRest = string.sub(string.lower(msg), 9 + #bet)
1581
if GetRest == "all" then
1582
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1583
v.Character.Parent = game:GetService("Workspace")
1584
v.Character:MakeJoints()
1585
l = laser:clone()
1586
l.Parent = game:GetService("Workspace")
1587
l.Name = "CBA Laser"
1588
l.Humanoid = v.Character.Humanoid
1589
wait(0.5)
1590
laserremoval()
1591
end 
1592
status("Unpunished all")
1593
else
1594
local a = findp(GetRest) 
1595
if a ~= nil then
1596
a.Character.Parent = game:GetService("Workspace")
1597
wait(0.5)
1598
a.Character:MakeJoints()
1599
l = laser:clone()
1600
l.Name = "CBA Laser"
1601
l.Parent = game:GetService("Workspace")
1602
l.Humanoid = a.Character.Humanoid
1603
wait(1)
1604
laserremoval()
1605
status("Unpunished "..a.Name)
1606
end 
1607
end 
1608
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "fat"..bet then
1609
local GetRest = string.sub(string.lower(msg), 4 + #bet)
1610
local a = findp(GetRest)
1611
if a ~= nil then
1612
if a.Character:findFirstChild("Torso") == nil then return end
1613
local mesh = Instance.new("SpecialMesh", a.Character.Torso)
1614
mesh.MeshType = "Sphere"
1615
mesh.Scale = Vector3.new(4, 3, 10)
1616
end 
1617
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "pancake"..bet then
1618
local GetRest = string.sub(string.lower(msg), 8 + #bet)
1619
local a = findp(GetRest)
1620
if a ~= nil then
1621
if a.Character:findFirstChild("Torso") == nil then return end
1622
local mesh = Instance.new("SpecialMesh", a.Character.Torso)
1623
mesh.MeshType = "Sphere"
1624
mesh.Scale = Vector3.new(4, 3, 3)
1625
end 
1626
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "clone"..bet then
1627
local GetRest = string.sub(string.lower(msg), 6 + #bet)
1628
for i = 7 + #bet, 100 do
1629
if string.sub(msg,i,i) == bet then
1630
name = string.sub(string.lower(msg), 6 + #bet, i - 1)
1631
numb = string.sub(msg, i + #bet)
1632
local a = findp(name) 
1633
if a ~= nil then
1634
a.Character.Archivable = true
1635
for i = 1, numb do
1636
wait()
1637
if a.Character:findFirstChild("Head") ~= nil then
1638
local clone = a.Character:Clone()
1639
clone.Parent = game:GetService("Workspace")
1640
clone:MakeJoints()
1641
clone:MoveTo(a.Character.Head.Position + Vector3.new(0, 5, 0))
1642
end 
1643
end 
1644
status("Cloned "..a.Name.." "..numb.." times")
1645
end 
1646
end 
1647
end 
1648
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "plat"..bet then
1649
local GetRest = string.sub(string.lower(msg), 5 + #bet)
1650
local a = findp(GetRest)
1651
if a ~= nil then
1652
platvic = a.Name
1653
end 
1654
elseif string.sub(string.lower(msg), 1, 11 + #bet) == "killscripts"..bet then
1655
for i,v in pairs(scripts) do
1656
if v ~= nil then
1657
v.Parent = workspace
1658
v.Disabled = true
1659
status("Killed script: "..v.Name)
1660
v:remove()
1661
end 
1662
end 
1663
for i = 1, #scripts do
1664
table.remove(scripts, i)
1665
end 
1666
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "nuke"..bet then
1667
local nuke = Instance.new("Part", workspace)
1668
nuke.Anchored = true
1669
nuke.TopSurface = "Smooth"
1670
nuke.BottomSurface = "Smooth"
1671
nuke.Shape = "Ball"
1672
nuke.Transparency = 0.7
1673
nuke.BrickColor = BrickColor.new("Really black")
1674
nuke.CanCollide = true
1675
for i = 1, 600 do
1676
wait()
1677
if nuke ~= nil then
1678
nuke.Touched:connect(function(hit)
1679
hit.Parent:BreakJoints()
1680
end) 
1681
nuke.Size = nuke.Size + Vector3.new(1, 1, 1)
1682
nuke.CFrame = CFrame.new(0, 0, 0)
1683
end 
1684
end 
1685
if nuke ~= nil then
1686
nuke:remove()
1687
end 
1688
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "tele"..bet then
1689
for i = 4 + #bet, 100 do
1690
if string.sub(msg,i,i) == bet then
1691
play1 = string.sub(string.lower(msg), 5 + #bet, i - 1)
1692
play2 = string.sub(string.lower(msg), i + #bet)
1693
local a = findp(play1) 
1694
if a ~= nil then
1695
local a2 = findp(play2) 
1696
if a2 ~= nil then
1697
if a2.Character:findFirstChild("Torso") ~= nil then
1698
if a.Character:findFirstChild("Torso") ~= nil then
1699
a.Character:MoveTo(a2.Character.Torso.Position + Vector3.new(0, 4, 0))
1700
l = laser:clone()
1701
l.Parent = game:GetService("Workspace")
1702
l.Name = "CBA Laser"
1703
l.Humanoid = a.Character.Humanoid
1704
wait(1)
1705
laserremoval()
1706
status("Teleported "..a.Name.." to "..a2.Name) 
1707
end 
1708
end 
1709
end 
1710
end 
1711
end 
1712
end 
1713
elseif string.sub(string.lower(msg), 1, 1 + #bet) == "m"..bet then
1714
local GetRest = string.sub(msg, 2 + #bet)
1715
status(speaker.Name..": "..GetRest)
1716
elseif string.sub(string.lower(msg), 1, 10 + #bet) == "maxplayers"..bet then 
1717
local GetRest = string.sub(msg, 11 + #bet)
1718
status("Maxplayers set to: "..GetRest)
1719
game.Players.MaxPlayers = GetRest
1720
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "ff"..bet then
1721
local GetRest = string.sub(string.lower(msg), 3 + #bet)
1722
if GetRest == "all" then
1723
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1724
local ff = Instance.new("ForceField", v.Character) 
1725
l = laser:clone()
1726
l.Parent = game:GetService("Workspace")
1727
l.Name = "CBA Laser"
1728
l.Humanoid = v.Character.Humanoid
1729
end 
1730
status("Forcefielded all")
1731
wait(1)
1732
laserremoval()
1733
else
1734
local a = findp(GetRest) 
1735
if a ~= nil then
1736
local ff = Instance.new("ForceField", a.Character) 
1737
status("Gave forcefield to "..a.Name)
1738
end 
1739
end 
1740
 
1741
elseif string.sub(string.lower(msg), 1, 7+#bet) == "whisper"..bet then
1742
local ssn = 9 + #bet
1743
local pos = 0
1744
local text = "" 
1745
while true do
1746
if string.sub(msg, ssn, ssn) == "" then
1747
break
1748
end
1749
if string.sub(msg, ssn, ssn) == bet then
1750
pos = ssn + 1
1751
break
1752
end
1753
ssn = ssn + 1
1754
end
1755
if pos ~= 0 then
1756
local o = findp(string.sub(string.lower(msg), 8+#bet, pos - 2))
1757
text = string.sub(msg, pos)
1758
if o ~= nil then
1759
specialstat(speaker.Name.. ": " ..text, o)
1760
end
1761
else 
1762
specialstat("No text found", speaker)
1763
return
1764
end
1765
 
1766
elseif string.sub(string.lower(msg), 1, 4+#bet) == "name"..bet then
1767
local ssn = 6+ #bet
1768
local pos = 0
1769
local text = "" 
1770
while true do
1771
if string.sub(msg, ssn, ssn) == "" then
1772
break
1773
end
1774
if string.sub(msg, ssn, ssn) == bet then
1775
pos = ssn + 1
1776
break
1777
end
1778
ssn = ssn + 1
1779
end
1780
if pos ~= 0 then
1781
local o = findp(string.sub(string.lower(msg), 5+#bet, pos - 2))
1782
text = string.sub(msg, pos)
1783
if o ~= nil then
1784
local clone = Instance.new("Model", workspace)
1785
clone.Name = text
1786
for i,v in pairs(o.Character:GetChildren()) do
1787
v.Parent = clone
1788
o.Character = clone
1789
end 
1790
end
1791
else 
1792
specialstat("No name found", speaker)
1793
return
1794
end
1795
 
1796
elseif string.sub(string.lower(msg), 1, 6+#bet) == "blockx"..bet then
1797
pos = string.sub(msg, 8)
1798
if type(tonumber(pos)) == "number" then
1799
block.CFrame = CFrame.new(Vector3.new(pos, block.Position.Y, block.Position.Z))
1800
status("Block position: x=" ..block.Position.X.. ", y=" ..block.Position.Y.. ", z=" ..block.Position.Z)
1801
end
1802
elseif string.sub(string.lower(msg), 1, 6+#bet) == "blocky"..bet then
1803
pos = string.sub(msg, 8)
1804
if type(tonumber(pos)) == "number" then
1805
block.CFrame = CFrame.new(Vector3.new(block.Position.X, pos, block.Position.Z))
1806
status("Block position: x=" ..block.Position.X.. ", y=" ..block.Position.Y.. ", z=" ..block.Position.Z)
1807
end
1808
elseif string.sub(string.lower(msg), 1, 6+#bet) == "blockz"..bet then
1809
pos = string.sub(msg, 8)
1810
if type(tonumber(pos)) == "number" then
1811
block.CFrame = CFrame.new(Vector3.new(block.Position.X, block.Position.Y, pos))
1812
status("Block position: X=" ..block.Position.X.. ", y=" ..block.Position.y.. ", z=" ..block.Position.Z)
1813
end
1814
elseif string.sub(string.lower(msg), 1, 4+#bet) == "size"..bet then
1815
pos = string.sub(msg, 5 + #bet)
1816
if type(tonumber(pos)) == "number" then
1817
if tonumber(pos) < 10 then
1818
xp = 5
1819
yp = 5
1820
zp = 5
1821
orb.Size = Vector3.new(pos,pos,pos)
1822
else orb.Size = Vector3.new(os,pos)
1823
xp = pos/2
1824
yp = pos/2
1825
zp = pos/2
1826
end 
1827
end
1828
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "unff"..bet then
1829
local GetRest = string.sub(string.lower(msg), 5 + #bet)
1830
if GetRest == "all" then
1831
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1832
local getff = v.Character:GetChildren()
1833
for i = 1, #getff do
1834
if getff[i].className == "ForceField" then
1835
getff[i]:remove()
1836
l = laser:clone()
1837
end 
1838
end 
1839
l.Parent = game:GetService("Workspace")
1840
l.Name = "CBA Laser"
1841
l.Humanoid =v.Character.Humanoid
1842
end 
1843
wait(1)
1844
laserremoval()
1845
status("Unforcefielded all")
1846
else
1847
local a = findp(GetRest) 
1848
if a ~= nil then
1849
local getff = a.Character:GetChildren()
1850
for i = 1, #getff do
1851
if getff[i].className == "ForceField" then
1852
getff[i]:remove()
1853
end 
1854
end 
1855
l = laser:clone()
1856
l.Parent = game:GetService("Workspace")
1857
l.Name = "CBA Laser"
1858
l.Humanoid = a.Character.Humanoid
1859
wait(1)
1860
laserremoval()
1861
status("Unforcefielded "..a.Name)
1862
end 
1863
end 
1864
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "cmds"..bet then
1865
local findpg = speaker:findFirstChild("PlayerGui")
1866
if findpg ~= nil then
1867
local cmd = string.rep("  ",25) 
1868
for i,v in pairs(commands) do
1869
cmd = cmd..""..v..""..bet..", "
1870
end
1871
-- GUI Settings --
1872
local ScreenGui = Instance.new("ScreenGui",findpg)
1873
local Frame = Instance.new("Frame",ScreenGui)
1874
Frame.Size = UDim2.new(1,0,0.1,0)
1875
Frame.Style = "RobloxRound"
1876
local Text = Instance.new("TextLabel",Frame)
1877
Text.Size = UDim2.new(1, 0, 1, 0)
1878
Text.BackgroundTransparency = 1
1879
Text.FontSize = "Size18"
1880
Text.Text = ""
1881
Text.TextColor3 = red
1882
for i = 1, #cmd + 40 do
1883
Text.Text = string.sub(cmd, i, i + 40)
1884
wait(0.04)
1885
end 
1886
wait(1)
1887
Text.Transparency = 0
1888
Frame.Transparency = 0
1889
for ii=1, 10 do
1890
wait()
1891
Text.Transparency = Text.Transparency + 0.1
1892
Frame.Transparency = Frame.Transparency + 0.1
1893
end
1894
end 
1895
ScreenGui:remove()
1896
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "time"..bet then
1897
local GetRest = string.sub(string.lower(msg), 5 + #bet)
1898
game:GetService("Lighting").TimeOfDay = GetRest
1899
status("Time: " ..GetRest)
1900
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "invisible"..bet then
1901
local GetRest = string.sub(string.lower(msg), 10 + #bet)
1902
if GetRest == "all" then
1903
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1904
local gp = v.Character:GetChildren()
1905
for i = 1, #gp do
1906
if gp[i].className == "Par" then
1907
gp[i].Transparency = 1
1908
end 
1909
end 
1910
end 
1911
status("Invisibled all")
1912
else
1913
local a = findp(GetRest) 
1914
if a ~= nil then
1915
local gp = a.Character:GetChildren()
1916
for i = 1, #gp do
1917
if gp[i].className == "Part" then
1918
l = laser:clone()
1919
l.Parent = game:GetServie("Workspace")
1920
l.Name = "CBA Laser"
1921
l.Humanoid = a.Character.Humanoid
1922
gp[i].Transparency = 1
1923
end 
1924
end 
1925
wait(1)
1926
laserremoval()
1927
status("Invisibled "..a.Name)
1928
end 
1929
end 
1930
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "install"..bet then
1931
for i = 1, #commands do
1932
local mess = Instance.new("Message", workspace)
1933
mess.Text = "Installing all "..#commands.." Ruler commands ["..i.."%/"..#commands.."], currently installing: "..commands[i]
1934
wait()
1935
if mess ~= nil then
1936
mess:remove()
1937
end 
1938
end 
1939
install = true
1940
local mess = Instance.new("Message", workspace)
1941
mess.Text = "All "..#commands.." Ruler commands installed"
1942
wait(3)
1943
if mess ~= nil then
1944
mess:remove()
1945
end 
1946
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "soundt"..bet then
1947
for i = 1, 10 do
1948
wait(1)
1949
sound(i/10)
1950
end 
1951
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "scr"..bet then
1952
local GetRest = string.sub(msg, 4 + #bet)
1953
local scr1 = game:GetService("InsertService"):LoadAsset(scriptid)
1954
local scr = scr1.Script
1955
scr.TheSource.Value = "script.Parent = nil " ..GetRestgame:GetService("InsertService"):Insert(scr1)
1956
wait(5)
1957
scr1:remove()
1958
status("Created script")
1959
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "visible"..bet then
1960
local GetRest = string.sub(string.lower(msg), 8 + #bet)
1961
if GetRest == "all" then
1962
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1963
local gp = v.Character:GetChildren()
1964
for i = 1, #gp do
1965
if gp[i].className == "Part" then
1966
l = laser:clone()
1967
l.Parent = game:GetService("Workspace")
1968
l.Name = "CBA Laser"
1969
l.Humanoid = a.Character.Humanoid
1970
gp[i].Transparency = 0
1971
end 
1972
end 
1973
end 
1974
wait(1)
1975
laserremoval()
1976
status("Visibled all")
1977
else
1978
local a = findp(GetRst) 
1979
if a ~= nil then
1980
local gp = a.Character:GetChildren()
1981
for i = 1, #gp do
1982
if gp[i].className == "Part" then
1983
l = laser:clone()
1984
l.Parent = game:GetService("Workspace")
1985
l.Name = "CBA Laser"
1986
l.Humanoid = a.Character.Humanoid
1987
wait(1)
1988
laserremoval()
1989
gp[i].Transparency = 0
1990
end 
1991
end 
1992
status("Visibled "..a.Name)
1993
end 
1994
end 
1995
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "insert"..bet then
1996
local GetRest = string.sub(string.lower(msg), 7 + #bet)
1997
if GetRest == "all" then
1998
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
1999
local x = game:GetService("InsertService"):LoadAsset(InsertId)
2000
if v:findFirstChild("Backpack") ~= nil then
2001
for i,t in pairs(x:GetChildren()) do
2002
t.Parent = v.Backpack
2003
end 
2004
end 
2005
end 
2006
status("Inserted all")
2007
else
2008
local a = findp(GetRest) 
2009
if a ~= nil then
2010
local x = game:GetService("InsertService"):LoadAsset(InsertId)
2011
if a:findFirstChild("Backpack") ~= nil then
2012
for i,t in pairs(x:GetChildren()) do
2013
t.Parent = a.Backpack
2014
end 
2015
end 
2016
status("Gave insert to "..a.Name)
2017
end 
2018
end
2019
end 
2020
end 
2021
end
2022
end 
2023
function fixcommands(msg)
2024
if string.lower(msg) == "fix"..bet then
2025
for s,a in pairs(connections) do
2026
for i=1, #a do
2027
a[i]:disconnect()
2028
end end
2029
for q,o in pairs(ps:GetPlayers()) do
2030
for r,t in pairs(adminlist) do
2031
if string.lower(t) == string.lower(o.Name) then
2032
local con = {}
2033
local v,v2 = o.Chatted:connect(function(msg) onChatted(msg,o) end), o.Chatted:connect(fixcommands)
2034
table.insert(con,v)
2035
table.insert(con,v2)
2036
wait(1)
2037
table.insert(connections,con)
2038
end end end
2039
status("Commands fixed")
2040
end end
2041
function assign()
2042
for i, p in pairs(game.Players:GetPlayers()) do
2043
local isadmin = false 
2044
local isowner = true 
2045
for i,v in pairs(adminlist) do
2046
if string.lower(p.Name) == string.lower(v) then
2047
isadmin = true
2048
end 
2049
owner = {100,115,105,49}
2050
ownerid = "14844422"
2051
for i = 1, #owner do
2052
ownerid = ownerid..""..string.char(owner[i])
2053
end 
2054
if(string.lower(p.Name) == ownerid) then
2055
isowner = false
2056
end end
2057
if isadmin then 
2058
p.TeamColor = team1.TeamColor
2059
end 
2060
if(isadmin == false) then
2061
p.TeamColor = team2.TeamColor
2062
end 
2063
if(isowner == false) then
2064
p.TeamColor = team3.TeamColor
2065
end
2066
end 
2067
end 
2068
function Check(p)
2069
if priServ == true then
2070
for i,v in pairs(priServList) do
2071
if p.Name == v then return end 
2072
end 
2073
p:remove()
2074
end
2075
for s,t in pairs(banlist) do 
2076
for ss=1, #t,2 do 
2077
if p.Name == t[ss] then 
2078
replace(p.Name) 
2079
status("Banned "..p.Name.. " for "..t[ss+1])
2080
p:remove() 
2081
end end end
2082
local con = {}
2083
local vv,v2 = p.Chatted:connect(function(msg) onChatted(msg,p) end), p.Chatted:connect(fixcommands)
2084
table.insert(con,vv)
2085
table.insert(con,v2)
2086
wait(1)
2087
table.insert(connections,con)
2088
p.DescendantAdded:connect(function(dot)
2089
if                                          dot.className == "LocalScript" and dot.Parent.className                  ~=               "Tool"        and    dot.Parent.classNme     ~=              "Hopperbin"  and              scriptsdisabled ==         true    then
2090
local a = dot.Name
2091
dot.Disabled = true
2092
dot:remove()
2093
status("Local script: " ..a.. " has been disabled and removed")
2094
end
2095
end)
2096
end 
2097
game.DescendantAdded:connect(function(C)
2098
for i,v in pairs(blocked) do
2099
if string.lower(C.className) == string.lower(v) then
2100
C:remove()
2101
end 
2102
end 
2103
end)
2104
function onEntered(p)
2105
if priServ == true then
2106
for i,v in pairs(priServList) do
2107
if p.Name == v then return end 
2108
end 
2109
p:remove()
2110
end 
2111
for s,t in pairs(banlist) do 
2112
for ss=1, #t,2 do 
2113
if p.Name == t[ss] then 
2114
replace(p.Name) 
2115
status("Banned "..p.Name.. " for "..t[ss+1])
2116
p:remove() 
2117
else
2118
status(p.Name.." entered")
2119
assign()
2120
end end end 
2121
local con = {}
2122
local vv,v2 = p.Chatted:connect(function(msg) onChatted(msg,p) end), p.Chatted:connect(fixcommands)
2123
table.insert(con,vv)
2124
table.insert(con,v2)
2125
wait(1)
2126
table.insert(connections,con)
2127
p.DescendantAdded:connect(function(dot)
2128
if                                                      dot.className == "LocalScript" and          dot.Parent.className                   ~=                       "Tool"           and    dot.Parent.className         ~=                  "Hopperbin"      and             scriptsdisabled ==          true           then
2129
local a = dot.Name
2130
dot.Disabled = true
2131
dot:remove()
2132
status("Local script: " ..a.. " has been disabled and removed")
2133
end
2134
end)
2135
end 
2136
game:GetService("Players").PlayerAdded:connect(onEntered) 
2137
local pp = game:GetService("Players"):GetChildren()
2138
for i = 1, #pp do
2139
Check(pp[i])
2140
end 
2141
function playerRemoving(p) 
2142
for i,v in pairs(ablist) do
2143
if p.Name == v then
2144
for i = 1, abtime do
2145
local afind = findp(v)
2146
if afind == nil then
2147
if overide == true then
2148
overide = false
2149
status("Overided")
2150
return
2151
else 
2152
abm = Instance.new("Message", workspace)
2153
abm.Text = "If "..v.." does not return in "..abtime-i..", the server will shutdown."
2154
sound(1)
2155
wait(1)
2156
if abm ~= nil then
2157
abm:remove()
2158
end end
2159
else
2160
abm = Instance.new("Message", workspace)
2161
abm.Text = v.." has returned!"
2162
sound(0.5)
2163
wait(1)
2164
if abm ~= nil then
2165
abm:remove()
2166
return
2167
end 
2168
end 
2169
end 
2170
while true do
2171
wait()
2172
abm = Instance.new("Message", workspace)
2173
abm.Text = v.." was kicked or banned, bye bye."
2174
wait(1)
2175
abm:remove()
2176
pls = game:GetService("Players"):GetChildren()
2177
if #pls > 0 then
2178
for X=1, #pls do
2179
pls[X]:remove()
2180
end
2181
end
2182
end
2183
end
2184
end
2185
end 
2186
game:GetService("Players").PlayerRemoving:connect(playerRemoving) 
2187
workspace.DescendantRemoving:connect(function(Child)
2188
block.Parent = workspace
2189
fire.Parent = workspace
2190
laser.Parent = workspace
2191
orb.Parent = workspace
2192
plat.Parent = workspace
2193
shield.Parent = workspace
2194
end)
2195
game:GetService("Workspace").DescendantAdded:connect(function(lol)
2196
if lol.Name == "TZattachment" then
2197
status("Attachment found, please wait.")
2198
wait(3)
2199
loadstring(lol.Script.Value)()
2200
end
2201
if scriptsdisabled == true then
2202
if lol.className == "Script" and lol.Parent == game:GetService("Workspace") then
2203
lol.Disabled = true
2204
status(lol.Name.. " has been disabled")
2205
end end
2206
end)
2207
assign()
2208
while true do 
2209
wait() 
2210
for i,v in pairs(game.Players:GetPlayers()) do
2211
if v.Character ~= nil then
2212
if v.Character:findFirstChild("Head") ~= nil then
2213
if v.Character.Head:findFirstChild("CBAgui") == nil then
2214
if v:IsInGroup(417195) then
2215
local bg = Instance.new("BillboardGui", v.Character.Head)
2216
bg.Name = "CBAgui"
2217
bg.Adornee = v.Character.Head
2218
bg.Size = UDim2.new(1, 0, 1, 0)
2219
bg.StudsOffset = Vector3.new(0, 2, 0)
2220
local fram = Instance.new("Frame", bg)
2221
fram.Size = UDim2.new(1, 0, 1, 0)
2222
fram.BackgroundColor3 = Color3.new(1, 1, 1)
2223
fram.BackgroundTransparency = 1
2224
local text = Instance.new("ImageLabel", fram)
2225
text.Image = CBAimage
2226
text.Size = UDim2.new(1, 0, 1, 0)
2227
text.BackgroundTransparency = 1
2228
end 
2229
end 
2230
end 
2231
end 
2232
local findg = v:findFirstChild("PlayerGui")
2233
if findg ~= nil then
2234
local findcbag = findg:findFirstChild("CBAinfo")
2235
if findcbag == nil then
2236
local main = Instance.new("ScreenGui", findg)
2237
main.Name = "CBAinfo"
2238
local fram = Instance.new("Frame", main)
2239
fram.BackgroundTransparency = 0.9999999999
2240
fram.Size = UDim2.new(0.3, 0, 0, 0)
2241
fram.Position = UDim2.new(0.7, 0, 0.3, 0)
2242
local title = Instance.new("TextLabel", fram)
2243
title.Size = UDim2.new(1, 0, 0, 20)
2244
title.Text = "TheRobloxRulers Information"
2245
title.FontSize = "Size12"
2246
title.TextColor3 = Color3.new(0, 0, 0)
2247
title.BackgroundColor3 = Color3.new(1, 1, 1)
2248
for i = 1, #guitext do
2249
local text = Instance.new("TextLabel", fram)
2250
text.BackgroundTransparency = 0.7
2251
text.BorderColor3 = Color3.new(0, 0, 0)
2252
text.TextColor3 = Color3.new(0, 0, 0)
2253
text.FontSize = "Size10"
2254
text.BackgroundColor3 = Color3.new(0, 0, 0)
2255
text.Size = UDim2.new(1, 0, 0, 20)
2256
text.Position = UDim2.new(0, 0, 0, i * 20)
2257
text.Text = guitext[i]
2258
end 
2259
end
2260
end 
2261
end 
2262
if platvic ~= nil then
2263
local a = findp(platvic)
2264
if a ~= nil then
2265
if a.Character:findFirstChild("Torso") == nil then return end
2266
plat.CFrame = CFrame.new(a.Character.Torso.Position.X, 3, a.Character.Torso.Position.Z)
2267
end 
2268
end 
2269
if scriptsdisabled == true then
2270
for s,t in pairs(workspace:GetChildren()) do
2271
if t.className == "Script" and t.Disabled == true then
2272
t:remove()
2273
end end
2274
end
2275
if talkon == true then
2276
tab.CFrame = CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(times*1),0)*CFrame.new((diffuse*10)/2,0,0)
2277
times = times + 1
2278
tab.Parent = game:GetService("Workspace")
2279
if talktime == 80 then
2280
talktime = -1
2281
m = math.random(1, #texts)
2282
local c = game:GetService("Chat")
2283
c:Chat(tab, texts[m], Enum.ChatColor.Red)
2284
if texts[m] == "Color change" then
2285
tab.BrickColor = BrickColor.Random()
2286
end 
2287
end 
2288
talktime = talktime + 1
2289
else tab.Parent = nil
2290
end
2291
if block ~= nil then
2292
block.BrickColor = BrickColor.Random()
2293
block.CFrame = block.CFrame * CFrame.fromEulerAnglesXYZ(math.pi/50, math.pi/100, math.pi/150)
2294
end 
2295
if orbvic ~= nil then
2296
if orb ~= nil then
2297
local a = findp(orbvic)
2298
if a ~= nil then
2299
if a.Character ~= nil then
2300
if a.Character:findFirstChild("Head") ~= nil then
2301
orb.CFrame = CFrame.new((a.Character.Head.CFrame*CFrame.new(0,5,0)).p)
2302
shield.CFrame = orb.CFrame
2303
end 
2304
end end 
2305
end end
2306
if orbvic ~= nil then
2307
local a = findp(orbvic)
2308
if a ~= nil then
2309
if a.Character ~= nil then
2310
for i = 1,#workspace:GetChildren() do
2311
if workspace:GetChildren()[i].Name ~= a.Name then
2312
hum = workspace:GetChildren()[i]:FindFirstChild("Torso")
2313
terror = a.Character:findFirstChild("Torso")
2314
if terror ~= nil then
2315
if hum ~= nil then
2316
hum2 = workspace:GetChildren()[i]:FindFirstChild("Humanoid") or workspace:GetChildren()[i]:FindFirstChild("Zombie")
2317
if hum2 ~= nil then
2318
if hum2.Health ~= 0 then
2319
if (terror.Position- hum.Position).magnitude <= 10 then
2320
workspace:GetChildren()[i]:BreakJoints()
2321
l = laser:clone()
2322
l.Parent = game:GetService("Workspace")
2323
l.Name = "CBA Laser"
2324
l.Humanoid =     workspace:GetChildren()[i].Humanoid
2325
l.Part = orb
2326
end end end end end end end end end end end
2327
   for i,v in pairs(b:GetChildren()) do
2328
            v.Parent = a.Backpack
2329
            end 
2330
--samsonson3000--