Advertisement
BabyGoatz

Untitled

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