Advertisement
Daniel_Jackson

CBA ADMIN

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