Advertisement
Balakyrie

CBA Admin

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