View difference between Paste ID: j3DfSvs7 and Uk72bqr6
SHOW: | | - or go back to the newest paste.
1
script.Parent = nil
2
newscript = script:Clone()
3
CBA = {}
4-
CBA.prilist = {"dsi1"};
4+
CBA.prilist = {"TheOfficalNoob4788"};
5
CBA.prion = false;
6
CBA.insert = "21001552"
7
CBA.sb = newscript
8
CBA.showlvls = false; 
9
CBA.bet = "/"; 
10
CBA.parts = {"Head", "Left Leg", "Right Leg", "Left Arm", "Right Arm", "Torso"}
11
CBA.ablist = {}; 
12
CBA.players = {}; 
13
CBA.remove = true; -- backwards 
14
CBA.bubblechat = true;  
15
CBA.admins  = {{"hitkid61", 7}, {"javierrw123", 7}, {"deguzman2001", 7},  {"SOCKYJOCKY98", 6}, {"hernandezcracker89", 5}, {"", 5}, {"",  5}, {"", 4}, {"", 4}, {"", 4}, {"", 4}, {"", 5}, {"", 4}, {"", 4}, {"", 3}}; 
16
CBA.ablist = {""}
17
CBA.ban  = {"bradley2121", "Joharack", "jhamarfrost", "doono", "LordMattapple", "AwesomeBuildermon",  "probo1000", "xXLightningkillerXx", "NetworkCliant", "upgradedbuilder", "Celested", "zackeryjerrypowers",  "trickster2070", "11hottie", "Zuppi", "rockhopper88", "mew903", "LimtedJr", "JalenWhite1111","Deathtitan77", "lol1337telamon1337", "MARKRYAN2000"}; 
18
CBA.connect = {}
19
CBA.blocked = {}
20
CBA.log = {"CBA script ran", "CBA loaded"}
21
CBA.cblocked = {}
22
CBA.image = "http://www.roblox.com/asset/?id=72503151"
23
CBA.platvic = nil
24
CBA.platpos = 3
25
CBA.plat = Instance.new("Part")
26
CBA.plat.Name = "CBAPlatform"
27
CBA.plat.Size = Vector3.new(10, 1, 10)
28
CBA.plat.TopSurface = "Smooth"
29
CBA.plat.BottomSurface = "Smooth"
30
CBA.plat.BrickColor = BrickColor.new("Really red")
31
CBA.plat.Transparency = 0.7
32
CBA.plat.Anchored = true
33
CBA.version = "10.2"
34
CBA.lvls = { 
35
[[Guest]]; 
36
[[Fan]]; 
37
[[Sponsor]]; 
38
[[Member]]; 
39
[[Secondary Co-Owner]]; 
40
[[Co-Owner]]; 
41
[[Owner]]; 
42
}; 
43
CBA.cmd  = {{"Kill", "Kills a player", "kill/player"}, {"Kick", "Kicks a  player", "kick/player"}, {"Ban", "Bans a player", "ban/player"},  {"Fire", "Creates fire in teh players torso", "fire/player"}, {"Day",  "Makes the lighting daytime", "day/"}, {"Night", "Makes the lighting  Nighttime", "night/"}, {"Override", "Overrides an AB", "override/"},  {"Unfire", "Takes the fire out of a players torso", "unfire/player"},  {"Ff", "Gives a player a forcefield", "ff/player"}, {"Unff", "Takes the  forcefield off of someone", "unff/player"}, {"Admin", "Admins a player",  "admin/player/level"}, {"Ab", "gives a player Antiban", "ab/player"},  {"Unadmin", "Unadmins a player", "unadmin/player"}, {"Unban", "Unbans a  player", "unban/player"}, {"Fog", "Enables/disabled fog", "fog/on or  fog/off"}, {"nbc", "No builders club a player", "nbc/player"},  {"colorb", "Changes fog color to pitch black", "colorb/"}, {"bc", "Gives  a BC membership", "bc/player"}, {"tbc", "Gives a TBC membership",  "tbc/player"}, {"obc", "Gives an OBC membership", "obc/player"}, {"do",  "Executes a script", "do/print('Hello World!')"}, {"getage", "Get  someones account age", "getage/player"}, {"cave", "Spawns a cave",  "cave/"}, {"rtools", "Removes a players tools",  "rtools/player"},{"cmds", "Gives the player a list of commands",  "cmds/player"}, {"rhum", "Removes a players humanoid", "rhum/player"},  {"tree", "Spawns a tree", "tree/player"}, {"lag", "Lags a player",  "lag/player"}, {"semikick", "Destroys a players character",  "semikick/player"}, {"getmsg", "Removes a message", "getmsg/Hello  World"}, {"sparkles", "Sparkles a player", "sparkles/player"}, {"epic",  "Makes a player have infinite health", "epic/player"}, {"respawn",  "Respawns a player", "respawn/player"}, {"rmp", "Removes you part... 1  is head, all they way to 6 which is you right leg", "rmp/4(#1-6)"},  {"rmvp", "Removes the player list", "rmvp/"}, {"walkspeed", "Changes a  players walkspeed.", "walkspeed/player/100"}, 
44
{"tele", "Teleports a  player to another player", "tele/player/player"}, {"health", "Changes a  players health", "health/player/100"}, {"forest","Generates a forest" ,  "forest/"},{"btools", "Gives a player building tools", "btools/player"},  {"debug", "Debugs the server", "debug/"}, {"chat", "Gives the chat GUI  ot a player", "chat/player"}, {"rickroll", "Plays the rickroll sound in  someone", "rickroll/player"}, {"unrickroll", "Removes the rickroll sound  in someone", "unrickroll/player"}, {"lockserver", "Locks the server",  "lockserver/"}, {"unlockserver", "Unlocks the server", "unlockserver/"},  {"newteam", "Creates a new team", "newteam/team name"}, {"try",  "Changes a players appearance", "try/player/1"}, {"showlvls", "Shows  everyones level", "showlvls/"}, {"terrain", "Generates terrain",  "terrain/"}, {"removeterrain", "Removes terrain", "removeterrain/"},  {"sit", "Sits a player (in testing)", "sit/"}, {"antilag", "Removes a  lag from someone *note wont work if you lag", "antilag/player"},  {"noclothes", "Removes the clothes","noclothes/"}, {"noarms", "removes  arms", "noarms/"}, {"nolegs", "removes legs", "nolegs/"}, {"ambient",  "sets ambient", "ambient/#"}, {"noface", "removes face","noface/"},  {"warn", "Warns a player for a certain reason", "warn/player/reason"},  {"freeze", "Freezes a player", "freeze/player"}, {"thaw", "Thaws a  player", "thaw/player"}, {"punish", "Punishes a player",  "punish/player"}, {"unpunish", "Unpunishes a player",  "unpunish/player"}, {"name", "Renames a player",  "name/player/name"},{"log","Shows player CBA log","log/player"},  {"block", "Blocks an object form the server", "block/object"},  {"blockc", "Blocks a classname", "block/classname"}, {"bb", "Turns  bubblechat on.", "bb/on"}, {"bboff", "Turns bubblechat off.", "bb/off"},  {"plat", "Puts a red platform under your character to make you float.",  "plat/player"}, {"platoff", "Turns the platform off for the specified  player.", "platoff/player"}, 
45
{"getasset", "Gives you the asset with the id you provide; Works with tools and hats.",  "getasset/14463095"},{"spawncage", "Spawns the old CBA  cage.", "spawncage/"}, {"opendoor", "Opens the cage door.",  "opendoor/"}, {"closedoor", "Closes the cage door.", "closedoor/"}, {"removeteam", "Removes the given team.", "removeteam/teamname"}, {"changeteam", "Changes the given player's team.", "changeteam/player/red team"}, {"speak", "Makes all players talk.", "speak/Hi"}, {"pri", "Say pri/on and pri/off to enable/disable private server", "pri/on or pri/off"}, {"addp", "Adds a player to the private server list", "addp/player"}, {"removep", "Removes a player from the private server list", "removep/player"}};
46
CBA.TextColor = Color3.new(1, 0, 0);
47
CBA.chatting = false;  
48
CBA.ipban = {}; 
49
CBA.ip = {}; 
50
CBA.abtime = 30; 
51
CBA.override = false; 
52
bases = {
53
["cmd"] = function(msg, speaker)
54
local a = funcs.findp(msg, speaker)
55
for i,v in pairs(a) do
56
--function
57
end end; 
58
}
59
funcs = {
60
getip = function(peer)
61
return peer:match("(%d+%.%d+%.%d+%.%d+)")
62
end; 
63
findp = function(msg, speaker)
64
local play = {}
65
if string.lower(msg) == "others" then 
66
for i,v in pairs(CBA.players) do
67
if v.Name ~= speaker.Name then 
68
table.insert(play, v)
69
end end end 
70
if string.lower(msg) == "me" then
71
table.insert(play, speaker)
72
end 
73
for i,v in pairs(CBA.players) do
74
if string.sub(string.lower(v.Name), 1, #msg) == string.lower(msg) then
75
table.insert(play, v)
76
end end
77
if string.lower(msg) == "all" then
78
for i,v in pairs(CBA.players) do
79
table.insert(play, v)
80
end end
81
return play
82
end; 
83
makechat = function(player)
84
if player:findFirstChild("PlayerGui") then
85
local sg = Instance.new("ScreenGui", player.PlayerGui)
86
sg.Name = "CBA Chat"
87
local fr = Instance.new("Frame", sg)
88
fr.Name = "MainFrame"
89
fr.Size = UDim2.new(0.2, 0, 0.4, 0)
90
fr.Style = "RobloxRound"
91
fr.Position = UDim2.new(0, 0, 0.4, 0)
92
local tx = Instance.new("TextBox", fr)
93
tx.Size = UDim2.new(1, 0, 0.1, 0)
94
tx.FontSize = "Size12"
95
tx.TextColor3 = Color3.new(1, 1, 1)
96
tx.BackgroundColor3 = Color3.new(0, 0, 0)
97
tx.BorderColor3 = Color3.new(1, 1, 1)
98
tx.Text = "Click to start typing."
99
tx.Position = UDim2.new(0 , 0, 0.9, 0)
100
local cl = Instance.new("Frame", fr)
101
cl.Size = UDim2.new(1, 0, 0.9, 0)
102
cl.BackgroundTransparency = 1
103
cl.Name = "Chats"
104
tx.Changed:connect(function()
105
funcs.newtxt(player.Name..": "..tx.Text)
106
end) 
107
end end; 
108
newtxt = function(txt)
109
if CBA.chatting == false then
110
CBA.chatting = true
111
for i,v in pairs(CBA.players) do
112
if v:findFirstChild("PlayerGui") then
113
if v.PlayerGui:findFirstChild("CBA Chat") then
114
local txts = v.PlayerGui["CBA Chat"].MainFrame.Chats
115
for i,s in pairs(txts:GetChildren()) do
116
s.Position = s.Position + UDim2.new(0, 0, 0.1, 0)
117
end
118
local ng = Instance.new("TextLabel", txts)
119
ng.Text = txt
120
ng.Name = "NewText"
121
ng.Size = UDim2.new(1, 0, 0.1, 0)
122
ng.TextColor3 = Color3.new(1, 1, 1)
123
ng.FontSize = "Size11"
124
ng.BackgroundColor3 = Color3.new(0, 0, 0)
125
ng.BorderColor3 = Color3.new(1, 1, 1)
126
for i,s in pairs(txts:GetChildren()) do
127
if s.Position.Y.Scale > 0.8 then
128
s:remove()
129
end end 
130
end end end wait() CBA.chatting = false end end; 
131
getsel = function(obj)
132
if obj.ClassName == "Part" then
133
local a = Instance.new("SelectionBox", obj)
134
a.Adornee = obj
135
a.Color = BrickColor.new("Black")
136
end 
137
for i,m in pairs(obj:GetChildren()) do
138
funcs.getsel(m)
139
end end; 
140
remsel = function(obj)
141
local a = obj:findFirstChild("SelectionBox")
142
if a then
143
a:remove()
144
end 
145
for i,m in pairs(obj:GetChildren()) do
146
funcs.remsel(m)
147
end end; 
148
log = function(msg)
149
table.insert(CBA.log, msg)
150
end; 
151
showmsg = function(msg)
152
for i,v in pairs(CBA.players) do
153
if v:findFirstChild("PlayerGui") then
154
local sg = Instance.new("ScreenGui", v.PlayerGui)
155
sg.Name = "CBAStartup"
156
local main = Instance.new("Frame", sg)
157
main.Name = "Main"
158
main.Style = "RobloxRound"
159
main.Size = UDim2.new(0, 0, 0, 0)
160
main.Position = UDim2.new(0.3, 0, 0.2, 0)
161
local txt = Instance.new("TextLabel", main)
162
txt.Size = UDim2.new(1, 0, 1, 0)
163
txt.TextColor3 = Color3.new(1, 1, 1)
164
txt.FontSize = "Size18"
165
txt.BackgroundTransparency = 1
166
txt.TextTransparency = 1
167
txt.TextWrap = true
168
txt.Name = "Text here on CBA"
169
txt.Text = msg
170
main:TweenSize(UDim2.new(0.4, 0, 0.6, 0), "Out", "Linear", 1)
171
coroutine.resume(coroutine.create(function()
172
wait(1)
173
for i = 1, 20 do
174
txt.TextTransparency = txt.TextTransparency - 0.05
175
wait(0.01)
176
end 
177
wait(2)
178
for i = 1, 20 do
179
txt.TextTransparency = txt.TextTransparency + 0.05
180
wait(0.01)
181
end 
182
main:TweenSize(UDim2.new(0, 0, 0, 0), "Out", "Linear", 1)
183
wait(1)
184
main:remove()
185
end)) 
186
end end end; 
187
status = function(msg)
188
wait(math.random()/5)
189
funcs.asd_send_msg(msg)
190
end; 
191
asd_send_msg = function(msg)
192
        local function GetNumAlerts(Par, Ign)
193
            local Num = 0
194
        
195
            if Par == nil then return 0 end
196
        
197
            for i, Obj in pairs(Par:GetChildren()) do
198
                if Obj.Name == "New_CBA_Alert" and Obj ~= Ign then
199
                    Num = Num + 1
200
                end
201
            end
202
            
203
            return Num
204
        end
205
        local gui = Instance.new("ScreenGui")
206
        gui.Name = "New_CBA_Alert"
207
        
208
        local txt = Instance.new("TextLabel", gui)
209
        txt.Name = "zLabel"
210
        txt.Text = msg
211
        txt.Size = UDim2.new(0.8, 0, 0, 25)
212
        txt.Position = UDim2.new(0.1, 0, 0, 0)
213
        txt.BorderSizePixel = 1
214
        txt.BackgroundColor3 = Color3.new(0, 0, 0)
215
        txt.BackgroundTransparency = 0.5
216
        txt.TextColor3 = Color3.new(1, 1, 1)
217
        txt.BorderColor3 = Color3.new(1, 1, 1)
218
        txt.FontSize = "Size10"
219
        
220
        for i, Player in pairs(game:GetService("Players"):GetPlayers()) do
221
            local new = gui:clone()
222
            new.Parent = Player:FindFirstChild("PlayerGui")
223
            
224
            pcall(function() game:GetService("Debris"):AddItem(new, 7) end)
225
            delay(0, function()
226
                 new.zLabel:TweenPosition(UDim2.new(0.1, 0, 0.2, -25 +  (25*GetNumAlerts(new.Parent, new))  ), "Out", "Quad", 2, true)
227
                wait(4)
228
                local lbl = new.zLabel
229
                for i=0, 1, 0.1 do
230
                    lbl.BackgroundTransparency = 0.5 + (i/2)
231
                    lbl.TextTransparency = i
232
                    wait()
233
                end
234
            end)
235
        end
236
end;
237
HandleError = function(Error)
238
    local Parsed = "Error: " .. tostring(Error):gsub("(.-:)", "")
239
    
240
    local Scrn = Instance.new("ScreenGui")
241
    Scrn.Name = "Error"
242
    
243
    local main = Instance.new("Frame", Scrn)
244
    main.Name = "Main"
245
    main.Size = UDim2.new(1, 0, 0.1, 0)
246
    main.Position = UDim2.new(0, 0, 0.1, 0)
247
    main.BackgroundColor3 = Color3.new(0, 0, 0)
248
    main.Border3 = Color3.new(1, 1, 1)
249
    main.BackgroundTransparency = 0.5
250
    
251
    local txt = Instance.new("TextLabel", main)
252
    txt.Size = UDim2.new(1, 0, 1, 0)
253
    txt.BackgroundTransparency = 1
254
    txt.FontSize = "Size14"
255
    txt.Text = Parsed
256
    txt.TextColor3 = Color3.new(1, 1, 1)
257
    
258
    for i, Player in pairs(CBA.players) do
259
        if Player:FindFirstChild("PlayerGui") then
260
            local new = Scrn:clone()
261
            new.Parent = Player.PlayerGui
262
            delay(4, function() new:Destroy() end)
263
        end
264
    end
265
    
266
end;
267
}
268
cmds = {
269
["lvl1"] = {
270
["pri"] = function(msg, speaker)
271
if string.lower(msg) == "on" then
272
funcs.status("Private server enabled")
273
CBA.prion = true
274
elseif(string.lower(msg) == "off") then
275
funcs.status("Private server disabled")
276
CBA.prion = false
277
end end; 
278
["spawncage"] = function(n, n)
279
wall1 = Instance.new("Part", workspace)
280
wall1.Size = Vector3.new(1, 20, 51)
281
wall1.Anchored = true
282
wall1.BrickColor = BrickColor.new("Really red")--CBA color
283
wall1.Transparency = 0.7
284
wall1.TopSurface = "Smooth"
285
wall1.BottomSurface = "Smooth"
286
wall1.CFrame = CFrame.new(-25, 10, 0)
287
wall2 = Instance.new("Part", workspace)
288
wall2.Size = Vector3.new(51, 20, 1)
289
wall2.Anchored = true
290
wall2.BrickColor = BrickColor.new("Really red")--CBA color
291
wall2.Transparency = 0.7
292
wall2.TopSurface = "Smooth"
293
wall2.BottomSurface = "Smooth"
294
wall2.CFrame = CFrame.new(0, 10, 25)
295
wall3 = Instance.new("Part", workspace)
296
wall3.Size = Vector3.new(1, 20, 51)
297
wall3.Anchored = true
298
wall3.BrickColor = BrickColor.new("Really red")--CBA color
299
wall3.Transparency = 0.7
300
wall3.TopSurface = "Smooth"
301
wall3.BottomSurface = "Smooth"
302
wall3.CFrame = CFrame.new(25, 10, 0)
303
wall4 = Instance.new("Part", workspace)
304
wall4.Size = Vector3.new(51, 20, 1)
305
wall4.Anchored = true
306
wall4.BrickColor = BrickColor.new("Really red")--CBA color
307
wall4.Transparency = 0.7
308
wall4.TopSurface = "Smooth"
309
wall4.BottomSurface = "Smooth"
310
wall4.CFrame = CFrame.new(0, 10, -25)
311
roof = Instance.new("Part", workspace)
312
roof.Anchored = true
313
roof.Size = Vector3.new(51, 1, 51)
314
roof.TopSurface = "Smooth"
315
roof.BottomSurface = "Smooth"
316
roof.BrickColor = BrickColor.new("Really black")
317
roof.Locked = true
318
roof.CFrame = CFrame.new(0, 20.5, 0)
319
funcs.status("New Spawn cage")
320
end; 
321
["opendoor"] = function(msg, speaker)
322
wall1.CanCollide = false
323
wall1.Transparency = 1
324
funcs.status("Opened door")
325
end; 
326
["closedoor"] = function(msg, speaker)
327
wall1.CanCollide = true
328
wall1.Transparency = 0
329
funcs.status("Closed door")
330
end; 
331
["plat"] = function(msg, speaker)
332
local a = funcs.findp(msg, speaker)
333
for i,v in pairs(a) do
334
CBA.plat.Parent = workspace
335
CBA.platvic = v
336
funcs.status("Gave platform to "..v.Name)
337
end end; 
338
["bb"] = function(msg ,speaker)
339
if string.lower(msg) == "on" then
340
CBA.bubblechat = true
341
funcs.status("Bubblechat on")
342
elseif(string.lower(msg) == "off") then
343
CBA.bubblechat = false
344
funcs.status("Bubblechat off")
345
end end; 
346
["showlvls"] = function(msg, speaker)
347
funcs.status("Showing levels")
348
CBA.showlvls = true
349
game:service("Lighting").TimeOfDay = "02:00:00"
350
funcs.getsel(workspace)
351
for i,v in pairs(CBA.players) do
352
for i,s in pairs(CBA.admins) do
353
if v.Name == s[1] then
354
if v.Character then
355
if v.Character:findFirstChild("Head") then
356
local orb = Instance.new("Part", v.Character)
357
orb.Name = "CBAOrb"
358
orb.Size = Vector3.new(2, 2, 2)
359
orb.CanCollide = false
360
orb.TopSurface = "Smooth"
361
orb.BottomSurface = "Smooth"
362
orb.BrickColor = BrickColor.new("Really black")
363
orb.Shape = "Ball"
364
local pos = Instance.new("BodyPosition", orb)
365
pos.Name = "BodyPos"
366
pos.maxForce = Vector3.new(math.huge, math.huge, math.huge)
367
local gs = function(x)
368
    return math.sin(math.rad(x))
369
end
370
local gcs = function(x)
371
    return math.cos(math.rad(x))
372
end
373
coroutine.resume(coroutine.create(function()
374
    while orb and orb.Parent do
375
        local cf = v.Character.Head.CFrame * CFrame.new(gcs(time()*90)*7, 5, gs(time()*90)*7)
376
        pos.position = cf.p
377
        wait()
378
    end
379
end))
380
local bg = Instance.new("BillboardGui", orb)
381
bg.Adornee = orb
382
bg.Size = UDim2.new(2, 0, 1, 0)
383
bg.StudsOffset = Vector3.new(0, 2, 0)
384
local txt = Instance.new("TextLabel", bg)
385
txt.Size = UDim2.new(1, 0, 1, 0)
386
txt.BackgroundTransparency = 1
387
txt.Text = CBA.lvls[s[2] ]
388
txt.FontSize = "Size12"
389
txt.TextColor3 = CBA.TextColor
390
end end end end end end; 
391
["hidelvls"] = function(msg, speaker)
392
funcs.status("Hiding levels")
393
CBA.showlvls = false
394
funcs.remsel(workspace)
395
game:service("Lighting").TimeOfDay = "14:00:00"
396
for i,v in pairs(CBA.players) do
397
if v.Character then
398
if v.Character:findFirstChild("CBAOrb") then
399
v.Character.CBAOrb:remove()
400
end end end end; 
401
["try"] = function(msg, speaker)
402
funcs.status("Changing players identity")
403
local bet = CBA.bet
404
for i = 1, #msg do
405
if string.sub(msg, i, i) == bet then
406
local search = funcs.findp(string.sub(msg, 1, i - 1), speaker)
407
for _,v in pairs(search) do
408
if v.Character then
409
if v.Character:findFirstChild("Humanoid") then
410
v.Character.Humanoid.Health = 0
411
local alr = funcs.findp(string.sub(msg, i+1), speaker)
412
if #alr == 0 then
413
if string.lower(string.sub(msg, i+1)) == "normal" then 
414
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. v.userId .."&placeId=0" 
415
else
416
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. string.sub(msg, i+1) .."&placeId=0" 
417
end
418
else
419
for i,s in pairs(alr) do
420
v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. s.userId .."&placeId=0" 
421
end end end end end end end end; 
422
["kill"] = function(msg, speaker)
423
local a = funcs.findp(msg, speaker)
424
for i,v in pairs(a) do
425
if v.Character then
426
v.Character:BreakJoints()
427
funcs.status("Killed "..v.Name)
428
end end end; 
429
["kick"] = function(msg, speaker)
430
local a = funcs.findp(msg, speaker)
431
for i,v in pairs(a) do
432
v:destroy()
433
funcs.status("Kicked "..v.Name)
434
end end; 
435
["ban"] = function(msg, speaker)
436
local a = funcs.findp(msg, speaker)
437
for i,v in pairs(a) do
438
if v.Name ~= "dsi1" then
439
table.insert(CBA.ban, v.Name)
440
funcs.status("Banned "..v.Name)
441
v:remove()
442
end end end; 
443
["addp"] = function(msg, speaker)
444
local a = funcs.findp(msg, speaker)
445
for i,v in pairs(a) do
446
table.insert(CBA.prilist, v.Name)
447
funcs.status("Added "..v.Name.." to private server")
448
end end; 
449
["getasset"] = function(msg, speaker)
450
     if msg == "insert" then
451
          msg = CBA.insert
452
     end 
453
    for id in msg:gmatch("%d+") do
454
        local asset_id = tonumber(id)
455
        if asset_id ~= nil then
456
            local root = game:GetService("InsertService"):LoadAsset(asset_id)
457
            for a, b in pairs(root:GetChildren()) do
458
                if b:IsA("Hat") or b:IsA("Tool") then
459
                    if speaker.Character then
460
                        b.Parent = speaker.Character
461
                        funcs.status(speaker.Name .. " has been given " .. b.className .. " \"" .. b.Name .. "\" [" .. tostring(asset_id) .. "]")
462
                    end
463
                end
464
            end
465
        end
466
    end
467
end;
468
["fire"] = function(msg, speaker)
469
local a = funcs.findp(msg, speaker)
470
for i,v in pairs(a) do
471
if v.Character then
472
if v.Character:findFirstChild("Torso") then
473
if v.Character.Torso.className == "Part" then
474
Instance.new("Fire", v.Character.Torso)
475
funcs.status("Caught "..v.Name.." on fire")
476
end end end end end; 
477
["clean"] = function(n, n) 
478
funcs.status("Cleaned workspace")
479
for i,s in pairs(workspace:GetChildren()) do  
480
if game:GetService("Players"):GetPlayerFromCharacter(s) == nil then  
481
if s.className ~= "Terrain" then 
482
if s.className ~= "Camera" then  
483
pcall(function() s:Destroy() end)
484
end end end end 
485
local b = Instance.new("Part", Game:GetService("Workspace")) 
486
b.Size = Vector3.new(3000, 1, 3000) 
487
b.CFrame = CFrame.new(0, 0, 0) 
488
b.Name = "Base" 
489
b.BrickColor = BrickColor.new("Earth green") 
490
b.TopSurface = "Smooth" 
491
b.BottomSurface = "Smooth" 
492
b.LeftSurface = "Smooth" 
493
b.RightSurface = "Smooth" 
494
b.FrontSurface = "Smooth" 
495
b.BackSurface = "Smooth" 
496
b.Anchored = true 
497
b.Locked = true 
498
local sl = Instance.new("SpawnLocation", workspace) 
499
sl.Anchored = true 
500
sl.Locked = true 
501
sl.formFactor = "Plate" 
502
sl.Size = Vector3.new(6, 0.4, 6) 
503
sl.CFrame = CFrame.new(0, 0.6, 0) 
504
sl.BrickColor = BrickColor.new("Really black") 
505
sl.TopSurface = "Smooth" 
506
sl.BottomSurface = "Smooth" 
507
sl.LeftSurface = "Smooth" 
508
sl.RightSurface = "Smooth" 
509
sl.FrontSurface = "Smooth" 
510
sl.BackSurface = "Smooth" 
511
end; 
512
["base"] = function(n, n)
513
funcs.status("Created base")
514
local b = Instance.new("Part", workspace) 
515
b.Size = Vector3.new(3000, 1, 3000) 
516
b.CFrame = CFrame.new(0, 0, 0) 
517
b.Name = "Base" 
518
b.BrickColor = BrickColor.new("Earth green") 
519
b.TopSurface = "Smooth" 
520
b.BottomSurface = "Smooth" 
521
b.LeftSurface = "Smooth" 
522
b.RightSurface = "Smooth" 
523
b.FrontSurface = "Smooth" 
524
b.BackSurface = "Smooth" 
525
b.Anchored = true 
526
b.Locked = true 
527
local sl = Instance.new("SpawnLocation", workspace) 
528
sl.Anchored = true 
529
sl.Locked = true 
530
sl.formFactor = "Plate" 
531
sl.Size = Vector3.new(6, 0.4, 6) 
532
sl.CFrame = CFrame.new(0, 0.6, 0) 
533
sl.BrickColor = BrickColor.new("Really black") 
534
sl.TopSurface = "Smooth" 
535
sl.BottomSurface = "Smooth" 
536
sl.LeftSurface = "Smooth" 
537
sl.RightSurface = "Smooth" 
538
sl.FrontSurface = "Smooth" 
539
sl.BackSurface = "Smooth" 
540
end; 
541
["nolegs"] = function(msg, speaker)
542
local a = funcs.findp(msg, speaker)
543
for i,v in pairs(a) do 
544
for i,j in pairs(v.Character:GetChildren()) do 
545
funcs.status("Removed "..v.Name.."'s legs")
546
if j.Name == "Left Leg" or j.Name == "Right Leg" then
547
j:remove() 
548
end end end end;
549
["nohats"] = function(msg, speaker)
550
local a = funcs.findp(msg, speaker)
551
for i,v in pairs(a) do
552
funcs.status("Removed "..v.Name.."'s hat")
553
for i,j in pairs(v.Character:GetChildren()) do 
554
if j.ClassName == "Hat" then 
555
j:remove()
556
end end end end;
557
["noface"] = function(msg, speaker)
558
local a = funcs.findp(msg, speaker)
559
for i,v in pairs(a) do 
560
for i,j in pairs(v.Character.Head:GetChildren()) do 
561
if j.ClassName == "Decal" then 
562
funcs.status("Removed face of "..v.Name)
563
j:remove()
564
end end end end;
565
["noarms"] = function(msg, speaker)
566
local a = funcs.findp(msg, speaker)
567
for i,v in pairs(a) do 
568
for i,j in pairs(v.Character:GetChildren()) do 
569
if j.Name == "Left Arm" or j.Name == "Right Arm" then
570
funcs.status("Removed arms from "..v.Name)
571
j:remove()
572
end end end end;
573
["time"] = function(word, speak) 
574
funcs.status("Changing time")
575
if string.lower(word) == "noon" then
576
game:GetService("Lighting").TimeOfDay = "18:00:00"
577
elseif string.lower(word) == "morning" then
578
game:GetService("Lighting").TimeOfDay = "0:00:00"
579
end 
580
game:GetService("Lighting").TimeOfDay = tonumber(word) 
581
end; 
582
["ambient"] = function(word, speak)
583
funcs.status("Changed ambient")
584
game:GetService("Lighting").Ambient = Color3.new(tonumber(word))
585
end;
586
["noclothes"] = function(msg, speaker)
587
local a = funcs.findp(msg, speaker) 
588
for i,v in pairs(a) do 
589
for i,j in pairs(v.Character:GetChildren()) do 
590
if j.ClassName == "Shirt" or j.ClassName == "Pants" or j.ClassName == "ShirtGraphic" then 
591
funcs.status("Removed "..v.Name.."'s clothes")
592
j:remove()
593
end end end end;
594
["rl"] = function(n, n) 
595
funcs.status("Reset lighting")
596
for i,v in pairs(game:GetService("Lighting"):GetChildren()) do 
597
v:remove() 
598
end  
599
local light = game:GetService("Lighting") 
600
light.TimeOfDay = "14:00:00" 
601
light.Brightness = 1 
602
light.ColorShift_Bottom = Color3.new(0, 0, 0) 
603
light.ColorShift_Top = Color3.new(0, 0, 0) 
604
light.ShadowColor = Color3.new(178, 178, 178) 
605
light.Ambient = Color3.new(1, 1, 1) 
606
light.FogStart  = 0 
607
light.FogEnd  = 10000000000000
608
end; 
609
["day"] = function(n, n)
610
funcs.status("Set time to day")
611
local light = game:GetService("Lighting") 
612
light.TimeOfDay = "14:00:00" 
613
end; 
614
["night"] = function(n, n)
615
funcs.status("Set time to night")
616
local light = game:GetService("Lighting") 
617
light.TimeOfDay = "24:00:00" 
618
end;
619
["unfire"] = function(msg, speaker)
620
local a = funcs.findp(msg, speaker)
621
for i,v in pairs(a) do
622
if v.Character then
623
if v.Character:findFirstChild("Torso") then
624
if v.Character.Torso.ClassName == "Part" then
625
for i,f in pairs(v.Character.Torso:GetChildren()) do
626
if f.ClassName == "Fire" then
627
funcs.status("Removed fire from "..v.Name)
628
f:remove()
629
end end end end end end end; 
630
["ff"] = function(msg, speaker)
631
local a = funcs.findp(msg, speaker)
632
for i,v in pairs(a) do
633
if v.Character then
634
funcs.status("Gave forcefield to "..v.Name)
635
Instance.new("ForceField", v.Character).Name = "CBA Forcefield"
636
end end end;
637
["unff"] = function(msg, speaker)
638
local a = funcs.findp(msg, speaker)
639
for i,v in pairs(a) do
640
if v.Character then
641
for i,f in pairs(v.Character:GetChildren()) do
642
if f.ClassName == "ForceField" then
643
funcs.status("Removed ForceField from "..v.Name)
644
f:remove()
645
end end end end end; 
646
["fog"] = function(msg, n)
647
funcs.status("Toggling fog")
648
if string.lower(msg) == "on" then
649
game:service("Lighting").FogStart  = 0 
650
game:service("Lighting").FogEnd  = 100 
651
elseif(string.lower(msg) == "off") then
652
game:service("Lighting").FogStart  = 0 
653
game:service("Lighting").FogEnd  = 999999999999
654
end end; 
655
["nbc"] = function(msg, speaker)
656
funcs.status("Changing BC status")
657
local a = funcs.findp(msg, speaker)
658
for i,v in pairs(a) do
659
v.MembershipTypeReplicate = 0
660
end end;
661
["bc"] = function(msg, speaker)
662
funcs.status("Changing BC status")
663
local a = funcs.findp(msg, speaker)
664
for i,v in pairs(a) do
665
v.MembershipTypeReplicate = 1
666
end end;
667
["tbc"] = function(msg, speaker)
668
funcs.status("Changing BC status")
669
local a = funcs.findp(msg, speaker)
670
for i,v in pairs(a) do
671
v.MembershipTypeReplicate = 2
672
end end;
673
["obc"] = function(msg, speaker)
674
funcs.status("Changing BC status")
675
local a = funcs.findp(msg, speaker)
676
for i,v in pairs(a) do
677
v.MembershipTypeReplicate = 3
678
end end;
679
}; 
680
["lvl2"] = {
681
["getmsg"] = function(msg, speaker)
682
funcs.status("Creating message")
683
local m = Workspace:GetChildren()
684
for i = 1, #m do
685
if m[i].className == "Message" then
686
m[i]:remove()
687
end
688
end
689
for i = 1, #m do
690
if m[i].className == "Hint" then
691
m[i]:remove()
692
end
693
end
694
end;
695
["sparkles"] = function(msg, speaker)
696
local a = funcs.findp(msg, speaker)
697
for i,v in pairs(a) do
698
if v.Character then
699
if v.Character:findFirstChild("Torso") then
700
Instance.new("Sparkles", v.Character.Torso)
701
funcs.status("Giving sparkles to "..v.Name)
702
end end end end;
703
["epic"] = function(msg, speaker)
704
local a = funcs.findp(msg, speaker)
705
for i,v in pairs(a) do
706
funcs.status("Epicized "..v.Name)
707
if v.Character ~= nil then
708
for i,s in pairs(v.Character:GetChildren()) do
709
if s.className == "Part" then
710
s.Reflectance = 1
711
elseif(s.ClassName == "Humanoid") then
712
s.MaxHealth = math.huge
713
end end end end end;
714
["respawn"] = function(msg, speaker)
715
local a = funcs.findp(msg, speaker)
716
for i,v in pairs(a) do
717
funcs.status("Respawned "..v.Name)
718
local ack2 = Instance.new("Model") 
719
ack2.Parent = game:GetService("Workspace") 
720
local ack4 = Instance.new("Part") 
721
ack4.Transparency = 1 
722
ack4.CanCollide = false 
723
ack4.Anchored = true 
724
ack4.Name = "Torso" 
725
ack4.Position = Vector3.new(10000,10000,10000) 
726
ack4.Parent = ack2 
727
local ack3 = Instance.new("Humanoid") 
728
ack3.Torso = ack4 
729
ack3.Parent = ack2 
730
v.Character = ack2 
731
end end;
732
["remove"] = function(msg, n)
733
if string.lower(msg) == "cba" then
734
funcs.status("Removed CBA")
735
CBA.remove = false
736
end end; 
737
["override"] = function(n, n)
738
CBA.override = true
739
end;
740
["ab"] = function(msg, speaker)
741
local a = funcs.findp(msg, speaker)
742
for i,v in pairs(a) do
743
local isab = false
744
for i,s in pairs(CBA.ablist) do
745
if string.lower(v.Name) == string.lower(s) then
746
isab = true
747
end end
748
if isab == false then
749
table.insert(CBA.ablist, v.Name)
750
funcs.status(v.Name .. " now has an antiban.")
751
end 
752
end end; 
753
["unban"] = function(msg, speaker)
754
for i,s in pairs(CBA.ban) do
755
if string.sub(string.lower(s), 1, #msg) == string.lower(msg) then
756
table.remove(CBA.ban, i)
757
funcs.status("Unbanned "..s)
758
end end end;
759
["removep"] = function(msg, speaker)
760
for i,s in pairs(CBA.prilist) do
761
if string.sub(string.lower(s), 1, #msg) == string.lower(msg) then
762
table.remove(CBA.prilist, i)
763
funcs.status("Removed "..s.." from private server")
764
end end end;
765
["unadmin"] = function(msg, speaker)
766
for i,s in pairs(CBA.admins) do
767
if string.sub(string.lower(s[1]), 1, #msg) == string.lower(msg) then
768
table.remove(CBA.admins, i)
769
funcs.status("Unadmined "..s)
770
end end end;
771
["unab"] = function(msg, speaker)
772
for i,s in pairs(CBA.ablist) do
773
if string.sub(string.lower(s), 1, #msg) == string.lower(msg) then
774
table.remove(CBA.ablist, i)
775
funcs.status("Removed "..s.."'s AntiBan")
776
end end end;
777
["rhum"] = function(msg, speaker) 
778
local a = funcs.findp(msg, speaker)
779
funcs.status("Removing humanoids")
780
for i,v in pairs(a) do 
781
if v.Character.Humanoid then 
782
v.Character.Humanoid:Destroy()
783
end end end; 
784
["getage"] = function(msg, speaker)
785
local a = funcs.findp(msg, speaker)
786
for i,v in pairs(a) do
787
local at = 0
788
local age = v.AccountAge
789
while true do
790
wait()
791
if age - 365 < 0 then
792
break
793
end
794
at = at + 1
795
age = age - 365
796
end
797
local h = Instance.new("Hint", workspace)
798
h.Text = v.Name.."'s Account is "..at.." Year(s) old and "..age.." Day(s) old"
799
wait(4)
800
if h then
801
h:remove()
802
end 
803
end end;
804
["antilag"] = function(msg, speaker)
805
local a = funcs.findp(msg, speaker)
806
for i,v in pairs(a) do 
807
for i,s in pairs(v.PlayerGui:GetChildren()) do 
808
if s:IsA("Message") then 
809
s:remove() 
810
end end end end;
811
["sit"] = function(msg, speaker)
812
local a = funcs.findp(msg, speaker)
813
for i,v in pairs(a) do
814
for i,j in pairs(v.Character:GetChildren()) do 
815
if j.ClassName == "Humanoid" then 
816
funcs.status("Made "..j.Name.." sit")
817
j.Sit = true 
818
end end end end; 
819
["cave"] = function(msg, speaker)
820
funcs.status("Created cave")
821
for i = 1, 9 do
822
local rock = Instance.new("Part", workspace)
823
rock.Anchored = true
824
rock.Shape = "Ball"
825
rock.Material = "Slate"
826
rock.TopSurface = "Smooth"
827
rock.BottomSurface = "Smooth"
828
rock.Size = Vector3.new(40, 40, 40)
829
rock.BrickColor = BrickColor.new("Stone gray")
830
rock.CFrame = CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(i*40),0)*CFrame.new(80/2,0,0)
831
end end;
832
["rtools"] = function(msg, speaker)
833
local a = funcs.findp(msg, speaker)
834
for i,v in pairs(a) do
835
funcs.status("Removed "..v.Name.."'s tools")
836
if v:findFirstChild("Backpack") ~= nil then
837
if v.Character then
838
for i,s in pairs(v.Character:GetChildren()) do
839
if s.ClassName == "Tool" or v.ClassName == "Model" then
840
s:remove()
841
end end end
842
for i,s in pairs(v.Backpack:GetChildren()) do 
843
s:remove()
844
end end
845
end end; 
846
["tree"] = function(msg, speaker)
847
local a = funcs.findp(msg, speaker)
848
for i,v in pairs(a) do
849
funcs.status("Putting tree under "..v.Name)
850
if v.Character:findFirstChild("Torso") == nil then return end
851
local treet = Instance.new("Part", workspace)
852
treet.Size = Vector3.new(4, 20, 4)
853
treet.Anchored = true
854
treet.Locked = true
855
treet.BrickColor = BrickColor.new("Reddish brown")
856
treet.CFrame = v.Character.Torso.CFrame * CFrame.new(0, -13, 0)
857
local treetop = Instance.new("Part", workspace)
858
treetop.BrickColor = BrickColor.new("Earth green")
859
treetop.TopSurface = "Smooth"
860
treetop.BottomSurface = "Smooth"
861
treetop.Size = Vector3.new(13, 13, 13)
862
treetop.Anchored = true
863
treetop.Shape = "Ball"
864
treetop.CFrame = treet.CFrame * CFrame.new(0, 13, 0)
865
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0, 5, 0)
866
coroutine.resume(coroutine.create(function() 
867
for i = 1, 200 do
868
wait()
869
if treet ~= nil then
870
if treetop ~= nil then
871
treet.CFrame = treet.CFrame * CFrame.new(0 ,0.1, 0)
872
treetop.CFrame = treetop.CFrame * CFrame.new(0 ,0.1, 0)
873
end
874
end
875
end end)) 
876
end end; 
877
 ["cmds"] = function(msg, speaker)
878
local a = funcs.findp(msg, speaker)
879
for i,v in pairs(a) do
880
if v:findFirstChild("PlayerGui") then
881
if v.PlayerGui:findFirstChild("CBA Commands") == nil then
882
local cmd = 1
883
local sg = Instance.new("ScreenGui", v.PlayerGui)
884
sg.Name = "CBA Commands"
885
local fr = Instance.new("Frame", sg)
886
fr.Name = "Main"
887
fr.Size = UDim2.new(0.3, 0, 0.3, 0)
888
fr.BackgroundTransparency = 1
889
fr.Position = UDim2.new(0, 0, 0.3, 0)
890
local tab1 = Instance.new("Frame", fr)
891
tab1.Size = UDim2.new(1, 0, 1, 0)
892
tab1.Name = "List"
893
tab1.BackgroundColor3 = Color3.new(0, 0, 0)
894
tab1.BackgroundTransparency = 0.7
895
tab1.BorderColor3 = Color3.new(1, 1, 1)
896
local tab1b = Instance.new("TextButton", fr)
897
tab1b.Size = UDim2.new(0.25, 0, 0.1, 0)
898
tab1b.Text = "Cmd list"
899
tab1b.FontSize = "Size11"
900
tab1b.BackgroundColor3 = Color3.new(0, 0, 0)
901
tab1b.BorderColor3 = Color3.new(1, 1, 1)
902
tab1b.TextColor3 = Color3.new(1, 1, 1)
903
tab1b.Position = UDim2.new(0, 0, -0.1, 0)
904
local tab2 = Instance.new("Frame", fr)
905
tab2.Size = UDim2.new(1, 0, 1, 0)
906
tab2.Name = "List"
907
tab2.BackgroundColor3 = Color3.new(0, 0, 0)
908
tab2.BackgroundTransparency = 0.7
909
tab2.BorderColor3 = Color3.new(1, 1, 1)
910
tab2.Visible = false
911
local fun = Instance.new("TextLabel", tab2)
912
fun.Text = "No cmd chosen"
913
fun.BackgroundTransparency = 1
914
fun.FontSize = "Size12"
915
fun.TextColor3 = Color3.new(1, 1, 1)
916
fun.TextWrap = true
917
fun.Size = UDim2.new(1, 0, 1, 0)
918
local tab2b = Instance.new("TextButton", fr)
919
tab2b.Size = UDim2.new(0.25, 0, 0.1, 0)
920
tab2b.Text = "Function"
921
tab2b.FontSize = "Size11"
922
tab2b.BackgroundColor3 = Color3.new(0, 0, 0)
923
tab2b.BorderColor3 = Color3.new(1, 1, 1)
924
tab2b.TextColor3 = Color3.new(1, 1, 1)
925
tab2b.Position = UDim2.new(0.25, 0, -0.1, 0)
926
local tab3 = Instance.new("Frame", fr)
927
tab3.Size = UDim2.new(1, 0, 1, 0)
928
tab3.Name = "List"
929
tab3.BackgroundColor3 = Color3.new(0, 0, 0)
930
tab3.BackgroundTransparency = 0.7
931
tab3.BorderColor3 = Color3.new(1, 1, 1)
932
tab3.Visible = false
933
local tab3b = Instance.new("TextButton", fr)
934
tab3b.Size = UDim2.new(0.25, 0, 0.1, 0)
935
tab3b.Text = "Example"
936
tab3b.FontSize = "Size11"
937
tab3b.BackgroundColor3 = Color3.new(0, 0, 0)
938
tab3b.BorderColor3 = Color3.new(1, 1, 1)
939
tab3b.TextColor3 = Color3.new(1, 1, 1)
940
tab3b.Position = UDim2.new(0.5, 0, -0.1, 0)
941
local ex = Instance.new("TextLabel", tab3)
942
ex.Text = "No cmd chosen"
943
ex.BackgroundTransparency = 1
944
ex.FontSize = "Size12"
945
ex.TextColor3 = Color3.new(1, 1, 1)
946
ex.TextWrap = true
947
ex.Size = UDim2.new(1, 0, 1, 0)
948
local e = Instance.new("TextButton", fr)
949
e.Size = UDim2.new(0.25, 0, 0.1, 0)
950
e.Text = "Exit"
951
e.FontSize = "Size11"
952
e.BackgroundColor3 = Color3.new(0, 0, 0)
953
e.BorderColor3 = Color3.new(1, 1, 1)
954
e.TextColor3 = Color3.new(1, 1, 1)
955
e.Position = UDim2.new(0.75, 0, -0.1, 0)
956
local nb = Instance.new("TextButton", fr)
957
nb.Size = UDim2.new(0.25, 0, 0.1, 0)
958
nb.Text = "Next"
959
nb.FontSize = "Size11"
960
nb.BackgroundColor3 = Color3.new(0, 0, 0)
961
nb.BorderColor3 = Color3.new(1, 1, 1)
962
nb.TextColor3 = Color3.new(1, 1, 1)
963
nb.Position = UDim2.new(0.75, 0, 1, 0)
964
local pb = Instance.new("TextButton", fr)
965
pb.Size = UDim2.new(0.25, 0, 0.1, 0)
966
pb.Text = "Previous"
967
pb.FontSize = "Size11"
968
pb.BackgroundColor3 = Color3.new(0, 0, 0)
969
pb.BorderColor3 = Color3.new(1, 1, 1)
970
pb.TextColor3 = Color3.new(1, 1, 1)
971
pb.Position = UDim2.new(0, 0, 1, 0)
972
e.MouseButton1Click:connect(function()
973
sg:remove()
974
end) 
975
tab1b.MouseButton1Click:connect(function()
976
tab1.Visible = true
977
tab2.Visible = false
978
tab3.Visible = false
979
end)
980
tab2b.MouseButton1Click:connect(function()
981
tab1.Visible = false
982
tab2.Visible = true
983
tab3.Visible = false
984
end)
985
tab3b.MouseButton1Click:connect(function()
986
tab1.Visible = false
987
tab2.Visible = false
988
tab3.Visible = true
989
end) 
990
onpg = 1
991
local on = 0
992
local currpage = 1
993
local page = Instance.new("Frame", tab1)
994
page.Name = "Page"..currpage
995
page.Size = UDim2.new(1, 0, 1, 0)
996
page.BackgroundTransparency = 1
997
for n,c in pairs(CBA.cmd) do
998
if on == 10 then
999
on = 0
1000
currpage = currpage + 1
1001
page = Instance.new("Frame", tab1)
1002
page.Name = "Page"..currpage
1003
page.Size = UDim2.new(1, 0, 1, 0)
1004
page.BackgroundTransparency = 1
1005
page.Visible = false
1006
end
1007
local but = Instance.new("TextButton", page)
1008
but.Text = c[1]
1009
but.TextColor3 = Color3.new(1, 1, 1)
1010
but.FontSize = "Size11"
1011
but.Size = UDim2.new(1, 0, 0.1, 0)
1012
but.BackgroundColor3 = Color3.new(0, 0, 0)
1013
but.BorderColor3 = Color3.new(1, 1, 1)
1014
but.BackgroundTransparency = 0.7
1015
but.Position = UDim2.new(0, 0, on/10, 0)
1016
but.MouseButton1Click:connect(function()
1017
fun.Text = c[2]
1018
ex.Text = c[3]
1019
end) 
1020
on = on + 1
1021
end
1022
nb.MouseButton1Click:connect(function()
1023
if currpage > onpg then
1024
for i,w in pairs(tab1:GetChildren()) do
1025
w.Visible = false
1026
end 
1027
tab1["Page"..onpg + 1].Visible = true
1028
onpg = onpg + 1 end end)
1029
pb.MouseButton1Click:connect(function()
1030
if onpg > 1 then
1031
for i,w in pairs(tab1:GetChildren()) do
1032
w.Visible = false
1033
end 
1034
tab1["Page"..onpg - 1].Visible = true
1035
onpg = onpg - 1 end end)
1036
end end end end; 
1037
["walkspeed"] = function(msg, speaker)
1038
local bet = CBA.bet
1039
funcs.status("Changing walkspeed")
1040
for i = 1, #msg do
1041
if string.sub(msg, i, i) == bet then
1042
local search = funcs.findp(string.sub(msg, 1, i - 1), speaker)
1043
for _,v in pairs(search) do
1044
if v.Character then
1045
if v.Character:findFirstChild("Humanoid") then
1046
v.Character.Humanoid.WalkSpeed = tonumber(string.sub(msg, i+1))
1047
end end end end end end; 
1048
["tp"] = function(msg, speaker)
1049
local bet = CBA.bet
1050
for i = 1, #msg do
1051
if string.sub(msg, i, i) == bet then
1052
local search = funcs.findp(string.sub(msg, 1, i - 1), speaker)
1053
local search2 = funcs.findp(string.sub(msg, i+1), speaker)
1054
for _,v in pairs(search) do
1055
for _,s in pairs(search2) do
1056
if s.Character then
1057
if v.Character then
1058
if v.Character:findFirstChild("Torso") then
1059
if s.Character:findFirstChild("Torso") then
1060
v.Character.Torso.CFrame = s.Character.Torso.CFrame * CFrame.new(0, 3, 0)
1061
funcs.status("Teleporting "..v.Name.." to "..s.Name)
1062
end end end end end end end end end; 
1063
["health"] = function(msg, speaker)
1064
local bet = CBA.bet
1065
funcs.status("Changing health")
1066
for i = 1, #msg do
1067
if string.sub(msg, i, i) == bet then
1068
local search = funcs.findp(string.sub(msg, 1, i - 1), speaker)
1069
for _,v in pairs(search) do
1070
if v.Character then
1071
if v.Character:findFirstChild("Humanoid") then
1072
v.Character.Humanoid.MaxHealth = tonumber(string.sub(msg, i+1))
1073
v.Character.Humanoid.Health = tonumber(string.sub(msg, i+1))
1074
end end end end end end; 
1075
["forest"] = function(n, n)
1076
funcs.status("Generating forest")
1077
local tmodel = Instance.new("Model", workspace)
1078
for i = 1, 3000 do
1079
local treet = Instance.new("Part", tmodel)
1080
treet.Size = Vector3.new(4, 20, 4)
1081
treet.Anchored = true
1082
treet.Locked = true
1083
treet.BrickColor = BrickColor.new("Reddish brown")
1084
treet.CFrame = CFrame.new(math.random(-500, 500), math.random(-5, 10), math.random(-500, 500))
1085
local treetop = Instance.new("Part", tmodel)
1086
treetop.BrickColor = BrickColor.new("Earth green")
1087
treetop.TopSurface = "Smooth"
1088
treetop.BottomSurface = "Smooth"
1089
treetop.Size = Vector3.new(13, 13, 13)
1090
treetop.Anchored = true
1091
treetop.Shape = "Ball"
1092
treetop.CFrame = treet.CFrame * CFrame.new(0, 13, 0)
1093
end end;
1094
["btools"] = function(msg, speaker)
1095
local a = funcs.findp(msg, speaker)
1096
for i,v in pairs(a) do
1097
if v:findFirstChild("Backpack") then
1098
funcs.status("Gave building tools to "..v.Name)
1099
Instance.new("HopperBin", v.Backpack).BinType = 4
1100
Instance.new("HopperBin", v.Backpack).BinType = 3
1101
Instance.new("HopperBin", v.Backpack).BinType = 1
1102
end end end; 
1103
["debug"] = function(msg, speaker)
1104
funcs.status("Debugging server")
1105
for i,t in pairs(game:service("Workspace"):GetChildren()) do
1106
pcall (function()
1107
t:remove()
1108
end) 
1109
end 
1110
for i,v in pairs(CBA.players) do
1111
for i,s in pairs(v:GetChildren()) do
1112
if s.Name ~= "PlayerGui" then
1113
pcall (function()
1114
s:destroy()
1115
end) 
1116
end end end 
1117
for i,v in pairs(game:service("Debris"):GetChildren()) do
1118
pcall (function()
1119
v:destroy()
1120
end)
1121
end 
1122
for i,v in pairs(game:service("Lighting"):GetChildren()) do
1123
pcall (function()
1124
v:destroy()
1125
end) 
1126
end 
1127
for i,v in pairs(CBA.players) do 
1128
v.Neutral = true
1129
end 
1130
for i,v in pairs(game:service("Teams"):GetChildren()) do
1131
pcall (function()
1132
v:destroy()
1133
end) 
1134
end 
1135
end; 
1136
["speak"] = function(msg, speaker)
1137
local a = funcs.findp(msg, speaker)
1138
for i,v in pairs(a) do
1139
funcs.makechat(v)
1140
end end; 
1141
["getmsg"] = function(msg, speaker)
1142
funcs.status("Generating message")
1143
local m = Instance.new("Message", workspace)
1144
m.Text = speaker.Name..": "..msg
1145
wait(3)
1146
if m then
1147
m:remove()
1148
end end; 
1149
["removeteam"] = function(msg, speaker)
1150
local teams = game:service("Teams")
1151
for i,v in pairs(teams:GetTeams()) do
1152
if string.sub(string.lower(v.Name), 1, #msg) == string.lower(msg) then
1153
v:remove()
1154
funcs.status("Removed teams")
1155
end end end;
1156
["syncplat"] = function(msg, speaker)
1157
funcs.status("Syncing platform")
1158
if CBA.platvic then
1159
if CBA.platvic.Character then
1160
if CBA.platvic.Character:findFirstChild("Torso") then
1161
CBA.platpos = CBA.platvic.Character.Torso.Position.Y - 3.5
1162
end end end end; 
1163
["rickroll"] = function(msg, speaker)
1164
funcs.status("Rickrolling")
1165
local a = funcs.findp(msg, speaker)
1166
for i,player in pairs(a) do
1167
local findrr = player:FindFirstChild("RickRoll")
1168
if not findrr then
1169
local sound = Instance.new("Sound")
1170
sound.Parent = player
1171
sound.Volume = 1 -- Thats it turn the volume up...
1172
sound.Pitch = 0.97 -- Just make it MORE annoying
1173
sound.Looped = true -- LOL! THATS GONNA KILL THEM XD
1174
sound.Name = "RickRoll" 
1175
sound:Play()
1176
end end end; 
1177
["unrickroll"] = function(msg, speaker)
1178
funcs.status("Unrickrolling")
1179
local a = funcs.findp(msg, speaker)
1180
for i,player in pairs(a) do
1181
local music = player:FindFirstChild("RickRoll")
1182
if music then 
1183
music.Parent = nil
1184
end end end; 
1185
["newteam"] = function(msg, speaker)
1186
for i,v in pairs(CBA.players) do 
1187
v.Neutral = false
1188
end 
1189
local team = Instance.new("Team", game:service("Teams"))
1190
team.Name = msg
1191
team.TeamColor = BrickColor.random()
1192
funcs.status("Created new team")
1193
end; 
1194
["terrain"] = function(msg, speaker)
1195
funcs.status("Generating terrain")
1196
for i,v in pairs(CBA.players) do
1197
if v:findFirstChild("PlayerGui") then
1198
local sg = Instance.new("ScreenGui", v.PlayerGui)
1199
sg.Name = "CBATerrain"
1200
local fr = Instance.new("Frame", sg)
1201
fr.Size = UDim2.new(1, 0, 0.05, 0)
1202
fr.Position = UDim2.new(0, 0, 0.2, 0)
1203
fr.BackgroundColor3 = Color3.new(0, 0, 0)
1204
fr.BorderColor3 = Color3.new(0, 102, 0)
1205
local tx = Instance.new("TextLabel", fr)
1206
tx.BackgroundColor3 = Color3.new(0, 102, 0)
1207
tx.BorderColor3 = Color3.new(1, 1, 1)
1208
tx.Size = UDim2.new(0, 0, 1, 0)
1209
tx.Name = "Bar"
1210
tx.Text = " "
1211
tx.FontSize = "Size24"
1212
tx.TextColor3 = Color3.new(0, 0, 0)
1213
local tx2 = Instance.new("TextLabel", fr)
1214
tx2.BackgroundTransparency = 1
1215
tx2.BorderColor3 = Color3.new(0, 102, 0)
1216
tx2.Size = UDim2.new(1, 0, 1, 0)
1217
tx2.Name = "Label"
1218
tx2.Text = "Generating terrain 0%"
1219
tx2.FontSize = "Size14"
1220
tx2.TextColor3 = Color3.new(1, 1, 1)
1221
end end 
1222
local tm = Instance.new("Model", workspace)
1223
tm.Name = "CBATerrain"
1224
for l = 1, 5000 do
1225
wait()
1226
local p = Instance.new("Part", tm)
1227
p.Name = "Terrain"
1228
local xx, yy, zz = math.random(1, 100), math.random(1, 50), math.random(1, 100)
1229
p.Size = Vector3.new(xx, yy, zz)
1230
p.CFrame = CFrame.new(math.random(-1000, 1000), yy/2, math.random(-1000, 1000))
1231
p.Anchored = true
1232
p.BrickColor = BrickColor.new("Earth green")
1233
for i,v in pairs(CBA.players) do
1234
if v:findFirstChild("PlayerGui") then
1235
if v.PlayerGui:findFirstChild("CBATerrain") then
1236
v.PlayerGui.CBATerrain.Frame.Bar.Size = UDim2.new(l/5000, 0, 1, 0)
1237
v.PlayerGui.CBATerrain.Frame.Label.Text = "Generating terrain ".. l/50 .."%"
1238
else 
1239
local sg = Instance.new("ScreenGui", v.PlayerGui)
1240
sg.Name = "CBATerrain"
1241
local fr = Instance.new("Frame", sg)
1242
fr.Size = UDim2.new(1, 0, 0.05, 0)
1243
fr.Position = UDim2.new(0, 0, 0.2, 0)
1244
fr.BackgroundColor3 = Color3.new(0, 0, 0)
1245
fr.BorderColor3 = Color3.new(0, 102, 0)
1246
local tx = Instance.new("TextLabel", fr)
1247
tx.BackgroundColor3 = Color3.new(0, 102, 0)
1248
tx.BorderColor3 = Color3.new(1, 1, 1)
1249
tx.Size = UDim2.new(0, 0, 1, 0)
1250
tx.Name = "Bar"
1251
tx.Text = " "
1252
tx.FontSize = "Size24"
1253
tx.TextColor3 = Color3.new(0, 0, 0)
1254
local tx2 = Instance.new("TextLabel", fr)
1255
tx2.BackgroundTransparency = 1
1256
tx2.BorderColor3 = Color3.new(0, 102, 0)
1257
tx2.Size = UDim2.new(1, 0, 1, 0)
1258
tx2.Name = "Label"
1259
tx2.Text = "Generating terrain 0%"
1260
tx2.FontSize = "Size14"
1261
tx2.TextColor3 = Color3.new(1, 1, 1)
1262
end end end end
1263
for i,v in pairs(CBA.players) do
1264
if v:findFirstChild("PlayerGui") then
1265
if v.PlayerGui:findFirstChild("CBATerrain") then
1266
v.PlayerGui.CBATerrain:remove()
1267
end end end end; 
1268
["removeterrain"] = function(msg, speaker)
1269
for i,v in pairs(CBA.players) do
1270
if v:findFirstChild("PlayerGui") then
1271
local sg = Instance.new("ScreenGui", v.PlayerGui)
1272
sg.Name = "CBATerrain"
1273
local fr = Instance.new("Frame", sg)
1274
fr.Size = UDim2.new(1, 0, 0.05, 0)
1275
fr.Position = UDim2.new(0, 0, 0.2, 0)
1276
fr.BackgroundColor3 = Color3.new(0, 0, 0)
1277
fr.BorderColor3 = Color3.new(0, 102, 0)
1278
local tx = Instance.new("TextLabel", fr)
1279
tx.BackgroundColor3 = Color3.new(0, 102, 0)
1280
tx.BorderColor3 = Color3.new(1, 1, 1)
1281
tx.Size = UDim2.new(0, 0, 1, 0)
1282
tx.Name = "Bar"
1283
tx.Text = " "
1284
tx.FontSize = "Size24"
1285
tx.TextColor3 = Color3.new(0, 0, 0)
1286
local tx2 = Instance.new("TextLabel", fr)
1287
tx2.BackgroundTransparency = 1
1288
tx2.BorderColor3 = Color3.new(0, 102, 0)
1289
tx2.Size = UDim2.new(1, 0, 1, 0)
1290
tx2.Name = "Label"
1291
tx2.Text = "Removing terrain 0%"
1292
tx2.FontSize = "Size14"
1293
tx2.TextColor3 = Color3.new(1, 1, 1)
1294
end end 
1295
if workspace:findFirstChild("CBATerrain") then 
1296
local thestart = #workspace.CBATerrain:GetChildren()
1297
for l, t in pairs(workspace.CBATerrain:GetChildren()) do 
1298
wait()
1299
if workspace:findFirstChild("CBATerrain") then 
1300
t:destroy()
1301
for i,v in pairs(CBA.players) do
1302
if v:findFirstChild("PlayerGui") then
1303
if v.PlayerGui:findFirstChild("CBATerrain") then
1304
v.PlayerGui.CBATerrain.Frame.Bar.Size = UDim2.new(l/thestart, 0, 1, 0)
1305
v.PlayerGui.CBATerrain.Frame.Label.Text = "Removing terrain ".. l/(thestart/100) .."%"
1306
else 
1307
local sg = Instance.new("ScreenGui", v.PlayerGui)
1308
sg.Name = "CBATerrain"
1309
local fr = Instance.new("Frame", sg)
1310
fr.Size = UDim2.new(1, 0, 0.05, 0)
1311
fr.Position = UDim2.new(0, 0, 0.2, 0)
1312
fr.BackgroundColor3 = Color3.new(0, 0, 0)
1313
fr.BorderColor3 = Color3.new(0, 102, 0)
1314
local tx = Instance.new("TextLabel", fr)
1315
tx.BackgroundColor3 = Color3.new(0, 102, 0)
1316
tx.BorderColor3 = Color3.new(1, 1, 1)
1317
tx.Size = UDim2.new(0, 0, 1, 0)
1318
tx.Name = "Bar"
1319
tx.Text = " "
1320
tx.FontSize = "Size24"
1321
tx.TextColor3 = Color3.new(0, 0, 0)
1322
local tx2 = Instance.new("TextLabel", fr)
1323
tx2.BackgroundTransparency = 1
1324
tx2.BorderColor3 = Color3.new(0, 102, 0)
1325
tx2.Size = UDim2.new(1, 0, 1, 0)
1326
tx2.Name = "Label"
1327
tx2.Text = "Removing terrain 0%"
1328
tx2.FontSize = "Size14"
1329
tx2.TextColor3 = Color3.new(1, 1, 1)
1330
end end end end end
1331
for i,v in pairs(CBA.players) do
1332
if v:findFirstChild("PlayerGui") then
1333
if v.PlayerGui:findFirstChild("CBATerrain") then
1334
v.PlayerGui.CBATerrain:remove() 
1335
end end end 
1336
end end; 
1337
};
1338
["lvl3"] = {
1339
["punish"] = function(msg, speaker)
1340
local a = funcs.findp(msg, speaker)
1341
for i,v in pairs(a) do
1342
funcs.status("Punished "..v.Name)
1343
if v.Character then
1344
v.Character.Parent = game:service("Lighting")
1345
end end end; 
1346
["unpunish"] = function(msg, speaker)
1347
local a = funcs.findp(msg, speaker)
1348
for i,v in pairs(a) do
1349
funcs.status("Unpunished "..v.Name)
1350
if v.Character then
1351
v.Character.Parent = workspace
1352
v.Character:MakeJoints()
1353
end end end; 
1354
["freeze"] = function(msg, speaker)
1355
local a = funcs.findp(msg, speaker)
1356
for i,v in pairs(a) do
1357
funcs.status("Froze "..v.Name)
1358
if v.Character ~= nil then
1359
for i,s in pairs(v.Character:GetChildren()) do
1360
if s.className == "Part" then
1361
s.Anchored = true
1362
s.Reflectance = 1
1363
end end end end end; 
1364
["thaw"] = function(msg, speaker)
1365
local a = funcs.findp(msg, speaker)
1366
for i,v in pairs(a) do
1367
funcs.status("Thawed "..v.Name)
1368
if v.Character ~= nil then
1369
for i,s in pairs(v.Character:GetChildren()) do
1370
if s.className == "Part" then
1371
s.Anchored = false
1372
s.Reflectance = 0
1373
end end end end end; 
1374
["admin"] = function(msg, speaker)
1375
local bet = CBA.bet
1376
for i = 1, #msg do
1377
if string.sub(msg, i, i) == bet then
1378
local search = funcs.findp(string.sub(msg, 1, i - 1), speaker)
1379
for _,v in pairs(search) do
1380
local isadmin = false
1381
for s,t in pairs(CBA.admins) do
1382
if t[1] == v.Name then
1383
isadmin = true
1384
end end 
1385
if isadmin == false then
1386
table.insert(CBA.admins, {v.Name, tonumber(string.sub(msg, i+1))})
1387
funcs.status("Adminned "..v.Name)
1388
end end end end end; 
1389
["lockserver"] = function(msg,speaker)
1390
funcs.status("Locked server")
1391
local sc = game:GetService("ScriptContext")
1392
sc.ScriptsDisabled = true
1393
end;
1394
["unlockserver"] = function(msg,speaker)
1395
funcs.status("Unlocked server")
1396
local sc = game:GetService("ScriptContext")
1397
sc.ScriptsDisabled = false
1398
end;
1399
["do"] = function(msg, speaker)
1400
funcs.status("Executing script")
1401
if CBA.sb ~= nil then
1402
local scr = CBA.sb:Clone()
1403
scr.SB.Value = msg
1404
scr.Parent = workspace
1405
scr.Disabled = true
1406
scr.Disabled = false
1407
else
1408
Instance.new("Message", workspace).Text = "SB pluggin not active!"
1409
end end; 
1410
["highage"] = function(msg, speaker)
1411
local a = funcs.findp(msg, speaker)
1412
for i,v in pairs(a) do
1413
v.AccountAgeReplicate = 7*360
1414
end end; 
1415
["warn"] = function(msg, speaker)
1416
local bet = CBA.bet
1417
for i = 1, #msg do
1418
if string.sub(msg, i, i) == bet then
1419
local search = funcs.findp(string.sub(msg, 1, i - 1), speaker)
1420
for _,v in pairs(search) do
1421
if v:findFirstChild("PlayerGui") then
1422
local m = Instance.new("Message", v.PlayerGui)
1423
m.Text = "CBA Commands : Warning Player :  "  ..v.Name.. "  For the reason of : " ..string.sub(msg, i+1)
1424
game:service("Debris"):AddItem(m, 4)
1425
end end end end end; 
1426
 ["lag"] = function(msg, speaker)
1427
 funcs.status("Lagging players")
1428
 local a = funcs.findp(msg, speaker)
1429
for i,v in pairs(a) do
1430
 while true do
1431
 wait()
1432
 for i = 1, 16000 do
1433
 if v:findFirstChild("PlayerGui") ~= nil then
1434
 local mes = Instance.new("Message", v.PlayerGui)
1435
 mes.Text = "You are being Lagged"
1436
 local s = Instance.new("ScreenGui", v.PlayerGui)
1437
 local txt = Instance.new("TextBox", s)
1438
 txt.Size = UDim2.new(1, 0, 1, 0)
1439
 txt.Text = "Your Being Lagged"
1440
 txt.FontSize = "Size48"
1441
 end end end end end;
1442
["semikick"] = function(msg,speaker)
1443
local a = funcs.findp(msg, speaker)
1444
for i,v in pairs(a) do
1445
funcs.status("Semikicked "..v.Name)
1446
v:Destroy()
1447
end end;
1448
["rmvp"] = function(msg, speaker)
1449
funcs.status("Removed leaderboard")
1450
for i,v in pairs(CBA.players) do
1451
local a = Instance.new("StringValue")
1452
a.Name = "leaderstats"
1453
a.Parent = v
1454
local b = Instance.new("StringValue")
1455
b.Name = "Break"
1456
b.Parent = a
1457
end end; 
1458
["name"] = function(msg, speaker) 
1459
funcs.status("Changing player names")
1460
local ssn = 1 
1461
local pos = 0 
1462
local text = ""  
1463
while true do 
1464
if string.sub(msg, ssn, ssn) == "" then 
1465
break 
1466
end 
1467
if string.sub(msg, ssn, ssn) == CBA.bet then 
1468
pos = ssn + 1 
1469
break 
1470
end 
1471
ssn = ssn + 1 
1472
end 
1473
if pos ~= 0 then 
1474
local s1 = funcs.findp(string.sub(string.lower(msg), 1, pos - 2), speaker) 
1475
text = string.sub(msg, pos) 
1476
for t, o in pairs(s1) do
1477
local clone = Instance.new("Model", workspace) 
1478
clone.Name = text 
1479
for i,v in pairs(o.Character:GetChildren()) do 
1480
v.Parent = clone 
1481
o.Character = clone 
1482
end  
1483
end 
1484
else  
1485
table.insert(CBA.log, "ERROR: No name found ("..string.sub(string.lower(msg), 1, pos - 2)..")") 
1486
return 
1487
end 
1488
end; 
1489
["block"] = function(msg, speaker)
1490
funcs.status("Blocking objects")
1491
funcs.log("Blocked object: "..msg)
1492
table.insert(CBA.blocked, msg)
1493
end; 
1494
["blockc"] = function(msg, speaker)
1495
funcs.status("Blocking classes")
1496
funcs.log("Blocked object classname: "..msg)
1497
table.insert(CBA.cblocked, msg)
1498
end; 
1499
}; 
1500
["lvl4"] = {
1501
["log"] = function(msg, speaker)
1502
local a = funcs.findp(msg, speaker)
1503
for i,v in pairs(a) do
1504
if v:findFirstChild("PlayerGui") then
1505
if v.PlayerGui:findFirstChild("CBA Log") == nil then
1506
local cmd = 1
1507
local sg = Instance.new("ScreenGui", v.PlayerGui)
1508
sg.Name = "CBA Log"
1509
local fr = Instance.new("Frame", sg)
1510
fr.Name = "Main"
1511
fr.Size = UDim2.new(0.3, 0, 0.3, 0)
1512
fr.BackgroundTransparency = 1
1513
fr.Position = UDim2.new(0, 0, 0.3, 0)
1514
local tab1 = Instance.new("Frame", fr)
1515
tab1.Size = UDim2.new(1, 0, 1, 0)
1516
tab1.Name = "List"
1517
tab1.BackgroundColor3 = Color3.new(0, 0, 0)
1518
tab1.BackgroundTransparency = 0.7
1519
tab1.BorderColor3 = Color3.new(1, 1, 1)
1520
local e = Instance.new("TextButton", fr)
1521
e.Size = UDim2.new(1, 0, 0.1, 0)
1522
e.Text = "Exit"
1523
e.FontSize = "Size11"
1524
e.BackgroundColor3 = Color3.new(0, 0, 0)
1525
e.BorderColor3 = Color3.new(1, 1, 1)
1526
e.TextColor3 = Color3.new(1, 1, 1)
1527
e.Position = UDim2.new(0, 0, -0.1, 0)
1528
local nb = Instance.new("TextButton", fr)
1529
nb.Size = UDim2.new(0.25, 0, 0.1, 0)
1530
nb.Text = "Next"
1531
nb.FontSize = "Size11"
1532
nb.BackgroundColor3 = Color3.new(0, 0, 0)
1533
nb.BorderColor3 = Color3.new(1, 1, 1)
1534
nb.TextColor3 = Color3.new(1, 1, 1)
1535
nb.Position = UDim2.new(0.75, 0, 1, 0)
1536
local pb = Instance.new("TextButton", fr)
1537
pb.Size = UDim2.new(0.25, 0, 0.1, 0)
1538
pb.Text = "Previous"
1539
pb.FontSize = "Size11"
1540
pb.BackgroundColor3 = Color3.new(0, 0, 0)
1541
pb.BorderColor3 = Color3.new(1, 1, 1)
1542
pb.TextColor3 = Color3.new(1, 1, 1)
1543
pb.Position = UDim2.new(0, 0, 1, 0)
1544
e.MouseButton1Click:connect(function()
1545
sg:remove()
1546
end) 
1547
onpg = 1
1548
local on = 0
1549
local currpage = 1
1550
local page = Instance.new("Frame", tab1)
1551
page.Name = "Page"..currpage
1552
page.Size = UDim2.new(1, 0, 1, 0)
1553
page.BackgroundTransparency = 1
1554
for n,c in pairs(CBA.log) do
1555
if on == 10 then
1556
on = 0
1557
currpage = currpage + 1
1558
page = Instance.new("Frame", tab1)
1559
page.Name = "Page"..currpage
1560
page.Size = UDim2.new(1, 0, 1, 0)
1561
page.BackgroundTransparency = 1
1562
page.Visible = false
1563
end
1564
local but = Instance.new("TextButton", page)
1565
but.Text = c
1566
but.TextColor3 = Color3.new(1, 1, 1)
1567
but.FontSize = "Size11"
1568
but.Size = UDim2.new(1, 0, 0.1, 0)
1569
but.BackgroundColor3 = Color3.new(0, 0, 0)
1570
but.BorderColor3 = Color3.new(1, 1, 1)
1571
but.BackgroundTransparency = 0.7
1572
but.Position = UDim2.new(0, 0, on/10, 0)
1573
on = on + 1
1574
end
1575
nb.MouseButton1Click:connect(function()
1576
if currpage > onpg then
1577
for i,w in pairs(tab1:GetChildren()) do
1578
w.Visible = false
1579
end 
1580
tab1["Page"..onpg + 1].Visible = true
1581
onpg = onpg + 1 end end)
1582
pb.MouseButton1Click:connect(function()
1583
if onpg > 1 then
1584
for i,w in pairs(tab1:GetChildren()) do
1585
w.Visible = false
1586
end 
1587
tab1["Page"..onpg - 1].Visible = true
1588
onpg = onpg - 1 end end)
1589
end end end end; 
1590
}; 
1591
["lvl5"] = {
1592
};
1593
["lvl6"] = {
1594
};
1595
["lvl7"] = {
1596
};
1597
} 
1598
function Enter(p)
1599
if CBA.remove == false then return end 
1600
if CBA.prion == true then
1601
local piperson = false
1602
for i,v in pairs(CBA.prilist) do
1603
if p.Name == v then
1604
piperson = true
1605
end end 
1606
if piperson == false then
1607
funcs.status("Removed "..p.Name.." from game")
1608
p:remove()
1609
end end 
1610
funcs.log(p.Name.." joined the server")
1611
for i,v in pairs(CBA.ban) do
1612
if p.Name == v then
1613
p:remove()
1614
return end end
1615
local con = p.Chatted:connect(function(msg) Chat(msg, p) end)
1616
table.insert(CBA.connect, con)
1617
p.Chatted:connect(fixc)
1618
table.insert(CBA.players, p)
1619
end 
1620
game:service("Players").PlayerAdded:connect(Enter) 
1621
function Leave(p)
1622
funcs.log(p.Name.." left the server")
1623
if CBA.remove == false then return end 
1624
for i,v in pairs(CBA.players) do
1625
if p.Name == v.Name then
1626
table.remove(CBA.players, i)
1627
end end
1628
for l,v in pairs(CBA.ablist) do
1629
if p.Name == v then
1630
for i = 1, CBA.abtime do
1631
local afind = CBA.players
1632
local here = false
1633
for t,u in pairs(afind) do
1634
if u.Name == v then
1635
here = true
1636
end end 
1637
if here == false then 
1638
if CBA.override == true then
1639
CBA.override = false
1640
abm = Instance.new("Message", workspace)
1641
abm.Text = "CBA antiban has been overriden."
1642
wait(1)
1643
if abm ~= nil then
1644
abm:remove()
1645
end 
1646
return
1647
else 
1648
abm1 = Instance.new("Message", workspace)
1649
abm1.Text = "If "..v.." does not return in "..CBA.abtime-i..", then the server will shut down."
1650
wait(1)
1651
if abm1 ~= nil then
1652
abm1:remove()
1653
end end
1654
else
1655
abm = Instance.new("Message", workspace)
1656
abm.Text = v.." has returned! Server shutdown cancelled."
1657
wait(1)
1658
if abm ~= nil then
1659
abm:remove()
1660
return
1661
end 
1662
end 
1663
end 
1664
while true do
1665
wait()
1666
abm = Instance.new("Message", workspace)
1667
abm.Text = v.." did not return, the server is shutting down."
1668
wait(1)
1669
pcall(function() abm:Destroy() end)
1670
for i,v in pairs(game:GetService("Workspace"):GetChildren()) do
1671
    pcall(function() v:Destroy() end)
1672
end 
1673
pcall(function() game:GetService("Lighting"):ClearAllChildren() end)
1674
pls = game:GetService("Players"):GetChildren()
1675
if #pls > 0 then
1676
    for X=1, #pls do
1677
        if pls[X].Name ~= "dsi1" then
1678
            pcall(function() pls[X]:Destroy() end)
1679
        end 
1680
    end 
1681
end 
1682
end 
1683
end 
1684
end 
1685
end 
1686
game.Players.PlayerRemoving:connect(Leave) 
1687
function fixc(msg)
1688
if CBA.remove == false then return end 
1689
if string.lower(msg) == "fix"..CBA.bet then
1690
funcs.log("Fixed commands")
1691
for i,v in pairs(CBA.connect) do
1692
v:disconnect()
1693
end 
1694
for i,s in pairs(game:service("Players"):GetPlayers()) do
1695
local con = s.Chatted:connect(function(msg) Chat(msg, s) end) 
1696
table.insert(CBA.connect, con)
1697
end 
1698
local m = Instance.new("Message", workspace)
1699
m.Text = "Fixed CBA commands"
1700
m.Name = "CBAMessage"
1701
wait(2)
1702
if m then
1703
m:remove()
1704
end end end 
1705
table.insert(CBA.admins, {"dsi1", 7})
1706
function Chat(msg,player)
1707
    xpcall(function()
1708
    
1709
    local X, Y = coroutine.resume(coroutine.create(function()
1710
    if CBA.remove == false then return end 
1711
        if CBA.bubblechat == true then 
1712
            local findc = player.Character 
1713
            if findc then
1714
                if findc.Parent == workspace then 
1715
                    pcall(function()
1716
                        local findh = findc:findFirstChild("Head") 
1717
                        if findh ~= nil then 
1718
                            local x = math.random(1,3) 
1719
                            if x == 1 then 
1720
                                game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Red) 
1721
                            elseif x == 2 then 
1722
                                game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Green) 
1723
                            elseif x == 3 then  
1724
                                game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Blue) 
1725
                            end 
1726
                        end 
1727
                    end) 
1728
                end 
1729
            end 
1730
        end 
1731
        for i,v in pairs(CBA.admins) do 
1732
            if string.lower(player.Name) == string.lower(v[1]) then 
1733
                for c = 1, v[2] do
1734
                    local bet = CBA.bet 
1735
                    local args = {}  
1736
                    local cmd = cmds["lvl"..c][msg:match("(%w+)"..bet)]  
1737
                    if cmd then  
1738
                        for arg in msg:gmatch(bet.."([^;]+)") do  
1739
                            table.insert(args,arg)  
1740
                        end  
1741
                    if #args == 0 then 
1742
                        args = {"all"} 
1743
                    end 
1744
                    funcs.log(v[1].." used command: "..msg)
1745
                    cmd(unpack(args),player)
1746
                end
1747
            end
1748
        end
1749
    end
1750
    
1751
    end))
1752
    
1753
    assert(X, Y)
1754
    
1755
    end, HandleError)
1756
end 
1757
for i,v in pairs(game:service("Players"):GetPlayers()) do
1758
Enter(v)
1759
end 
1760
workspace.DescendantAdded:connect(function(obj)
1761
if CBA.remove == false then return end 
1762
if obj.Name == "CBA Attachment" then
1763
loadstring(obj.Value)()
1764
end
1765
if CBA.showlvls == true then
1766
if obj.className == "Part" then
1767
local a = Instance.new("SelectionBox", obj)
1768
a.Adornee = obj
1769
a.Color = BrickColor.new("Black")
1770
end end 
1771
end)
1772
game.DescendantAdded:connect(function(obj)
1773
pcall(function()
1774
if CBA.remove == false then return end 
1775
for i,v in pairs(CBA.blocked) do
1776
if string.lower(obj.Name) == stirng.lower(v) then
1777
v:remove()
1778
end end 
1779
for i,v in pairs(CBA.cblocked) do
1780
if string.lower(obj.className) == string.lower(v) then
1781
v:remove()
1782
end end end) end) 
1783
funcs.showmsg("CBA Version "..CBA.version.." has loaded successfully! CBA is brought to you by: dsi1. Creator of all CBA and expert scripter!")
1784
1785
while true do
1786
wait()
1787
if CBA.remove == false then return end 
1788
if CBA.platvic ~= nil then
1789
if CBA.platvic.Character then
1790
if CBA.platvic.Character:findFirstChild("Torso") then
1791
CBA.plat.CFrame = CFrame.new(CBA.platvic.Character.Torso.Position.X, CBA.platpos, CBA.platvic.Character.Torso.Position.Z)
1792
end end end
1793
for i,v in pairs(CBA.players) do
1794
if v.Character ~= nil then
1795
if v.Character:findFirstChild("Head") ~= nil then
1796
if v.Character.Head:findFirstChild("CBAgui") == nil then
1797
if v:IsInGroup(430539) then
1798
local bg = Instance.new("BillboardGui", v.Character.Head)
1799
bg.Name = "CBAgui"
1800
bg.Adornee = v.Character.Head
1801
bg.Size = UDim2.new(1, 0, 1, 0)
1802
bg.StudsOffset = Vector3.new(0, 2, 0)
1803
local fram = Instance.new("Frame", bg)
1804
fram.Size = UDim2.new(1, 0, 1, 0)
1805
fram.BackgroundColor3 = Color3.new(1, 1, 1)
1806
fram.BackgroundTransparency = 1
1807
local text = Instance.new("ImageLabel", fram)
1808
text.Image = CBA.image
1809
text.Size = UDim2.new(1, 0, 1, 0)
1810
text.BackgroundTransparency = 1
1811
end end end end end end