Advertisement
V3rmLua33

Proxy Admin V4.3

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