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