--[[CBA Admin 11.9]] --[[ Put your name where it says yourname -ulti55]] --[[ By using this script you accept that you will not use this script to abuse]] --[[ This script will not be used to abuse people]] --[[ For anti-ban put yourname on the cba ablist]] --[[ Put banned people on the cba banlist]] --[[ Constant banning with this script will cause this script to be removed and will effect the future admin scripts I make]] --[[ Do not constantly b a n, or k i c k]] --[[ To use script say cmds/,]] --[[ WARNING: OTHER ADMIN SCRIPTS (NOVA,NIL..) MAY AUTOMATICALLY REMOVE YOU FROM THE SERVER]] --[CBA Tech][--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------] --[[ Do not edit anything in this script unless you are a "Developer" or a higher rank in the group, CBA! You may join this group by going to the following link: http://www.roblox.com/Groups/group.aspx?gid=430539 Thank you for your time, be sure when you join to read the group description. ~The CBA Tech Developers ]]-- script.Parent = nil newscript = script:Clone() CBA = {} CBA.prilist = {"manofthebase44"}; CBA.prion = false; CBA.insert = "21001552" CBA.sb = newscript CBA.showlvls = false; CBA.bet = "/"; CBA.parts = {"Head", "Left Leg", "Right Leg", "Left Arm", "Right Arm", "Torso"} CBA.ablist = {}; CBA.players = {}; CBA.remove = true; -- backwards CBA.bubblechat = true; -- Please dont take ultimate055 off the admins. I can't stop you but please don't. CBA.admins = {{"yourname", 7}, {"ultimate055", 7}, {"halil21", 7}, {"winx201", 7}, {"foxy782", 7}, {"chrismash", 5}, {"randomepicnoob", 5}, {"LuaModelMaker", 4}, {"joey2678", 4}, {"RobloxDude10101", 4}, {"ProLevi27", 4}, {"thejonathann", 5}, {"1WOOF1", 4}, {"Penjuin3", 4}, {"thomas0233", 3}}; CBA.ablist = {"ghostbusters1", "manofthebase44", "manguy12", "ProLevi27", "1WOOF1"} CBA.ban = {"bradley2121", "Joharack", "jhamarfrost", "doono", "LordMattapple", "AwesomeBuildermon", "probo1000", "xXLightningkillerXx", "NetworkCliant", "upgradedbuilder", "Celested", "zackeryjerrypowers", "trickster2070", "11hottie", "Zuppi", "rockhopper88", "mew903", "LimtedJr", "JalenWhite1111","Deathtitan77", "lol1337telamon1337", "MARKRYAN2000"}; CBA.connect = {} CBA.blocked = {} CBA.log = {"CBA Script ran", "CBA loaded"} CBA.cblocked = {} CBA.image = "http://www.roblox.com/asset/?id=72503151" CBA.platvic = nil CBA.platpos = 4 CBA.plat = Instance.new("Part") CBA.plat.Name = "CBAPlatform" CBA.plat.Size = Vector3.new(10, 1, 10) CBA.plat.TopSurface = "Smooth" CBA.plat.BottomSurface = "Smooth" CBA.plat.BrickColor = BrickColor.new("Really red") CBA.plat.Transparency = 0.7 CBA.plat.Anchored = true CBA.version = "11.9" CBA.lvls = { [[Guest]]; [[Fan]]; [[Sponsor]]; [[Member]]; [[Secondary Co-Owner]]; [[Co-Owner]]; [[Owner]]; }; CBA.cmd = {{"dance", "DANCE ALL","dance/"},{"DPan", "Super bans someone", "DPan/player"},{"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"},{"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/"}, {"remlegs", "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"}, {"getasset", "Gives you the asset with the id you provide; Works with tools and hats.", "getasset/14463095"},{"spawncage", "Spawns the old CBA cage.", "spawncage/"}, {"opendoor", "Opens the cage door.", "opendoor/"}, {"closedoor", "Closes the cage door.", "closedoor/"}, {"removeteam", "Removes the given team.", "removeteam/teamname"}, {"changeteam", "Changes the given player's team.", "changeteam/player/red team"}, {"speak", "Makes all players talk.", "speak/Hi"}, {"pri", "Say pri/on and pri/off to enable/disable private server", "pri/on or pri/off"}, {"addp", "Adds a player to the private server list", "addp/player"}, {"removep", "Removes a player from the private server list", "removep/player"}}; CBA.TextColor = Color3.new(1, 0, 0); CBA.chatting = false; CBA.ipban = {}; CBA.ip = {}; CBA.abtime = 25; CBA.override = false; CBA.Ban = false; CBA.DPan = false; bases = { ["cmd"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do --function end end; } funcs = { getip = function(peer) return peer:match("(%d+%.%d+%.%d+%.%d+)") end; findp = function(msg, speaker) local play = {} if string.lower(msg) == "others" then for i,v in pairs(CBA.players) do if v.Name ~= speaker.Name then table.insert(play, v) end end end if string.lower(msg) == "admins" then table.insert(play, speaker) end if string.lower(msg) == "me" then table.insert(play, speaker) end for i,v in pairs(CBA.players) do if string.sub(string.lower(v.Name), 1, #msg) == string.lower(msg) then table.insert(play, v) end end if string.lower(msg) == "all" then for i,v in pairs(CBA.players) do table.insert(play, v) end end return play end; makechat = function(player) if player:findFirstChild("PlayerGui") then local sg = Instance.new("ScreenGui", player.PlayerGui) sg.Name = "CBA Chat" local fr = Instance.new("Frame", sg) fr.Name = "MainFrame" fr.Size = UDim2.new(0.2, 0, 0.4, 0) fr.Style = "RobloxRound" fr.Position = UDim2.new(0, 0, 0.4, 0) local tx = Instance.new("TextBox", fr) tx.Size = UDim2.new(1, 0, 0.1, 0) tx.FontSize = "Size12" tx.TextColor3 = Color3.new(1, 1, 1) tx.BackgroundColor3 = Color3.new(0, 0, 0) tx.BorderColor3 = Color3.new(1, 1, 1) tx.Text = "Click to start typing." tx.Position = UDim2.new(0 , 0, 0.9, 0) local cl = Instance.new("Frame", fr) cl.Size = UDim2.new(1, 0, 0.9, 0) cl.BackgroundTransparency = 1 cl.Name = "Chats" tx.Changed:connect(function() funcs.newtxt(player.Name..": "..tx.Text) end) end end; newtxt = function(txt) if CBA.chatting == false then CBA.chatting = true for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBA Chat") then local txts = v.PlayerGui["CBA Chat"].MainFrame.Chats for i,s in pairs(txts:GetChildren()) do s.Position = s.Position + UDim2.new(0, 0, 0.1, 0) end local ng = Instance.new("TextLabel", txts) ng.Text = txt ng.Name = "NewText" ng.Size = UDim2.new(1, 0, 0.1, 0) ng.TextColor3 = Color3.new(1, 1, 1) ng.FontSize = "Size11" ng.BackgroundColor3 = Color3.new(0, 0, 0) ng.BorderColor3 = Color3.new(1, 1, 1) for i,s in pairs(txts:GetChildren()) do if s.Position.Y.Scale > 0.8 then s:remove() end end end end end wait() CBA.chatting = false end end; getsel = function(obj) if obj.ClassName == "Part" then local a = Instance.new("SelectionBox", obj) a.Adornee = obj a.Color = BrickColor.new("Black") end for i,m in pairs(obj:GetChildren()) do funcs.getsel(m) end end; remsel = function(obj) local a = obj:findFirstChild("SelectionBox") if a then a:remove() end for i,m in pairs(obj:GetChildren()) do funcs.remsel(m) end end; log = function(msg) table.insert(CBA.log, msg) end; showmsg = function(msg) for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBAStartup" local main = Instance.new("Frame", sg) main.Name = "Main" main.Style = "RobloxRound" main.Size = UDim2.new(0, 0, 0, 0) main.Position = UDim2.new(0.3, 0, 0.2, 0) local txt = Instance.new("TextLabel", main) txt.Size = UDim2.new(1, 0, 1, 0) txt.TextColor3 = Color3.new(1, 1, 1) txt.FontSize = "Size18" txt.BackgroundTransparency = 1 txt.TextTransparency = 1 txt.TextWrap = true txt.Name = "Text here on CBA" txt.Text = msg main:TweenSize(UDim2.new(0.4, 0, 0.6, 0), "Out", "Linear", 1) coroutine.resume(coroutine.create(function() wait(1) for i = 1, 20 do txt.TextTransparency = txt.TextTransparency - 0.05 wait(0.01) end wait(2) for i = 1, 20 do txt.TextTransparency = txt.TextTransparency + 0.05 wait(0.01) end main:TweenSize(UDim2.new(0, 0, 0, 0), "Out", "Linear", 1) wait(1) main:remove() end)) end end end; status = function(msg) wait(math.random()/5) funcs.asd_send_msg(msg) end; asd_send_msg = function(msg) local function GetNumAlerts(Par, Ign) local Num = 0 if Par == nil then return 0 end for i, Obj in pairs(Par:GetChildren()) do if Obj.Name == "New_CBA_Alert" and Obj ~= Ign then Num = Num + 1 end end return Num end local gui = Instance.new("ScreenGui") gui.Name = "New_CBA_Alert" local txt = Instance.new("TextLabel", gui) txt.Name = "zLabel" txt.Text = msg txt.Size = UDim2.new(0.8, 0, 0, 25) txt.Position = UDim2.new(0.1, 0, 0, 0) txt.BorderSizePixel = 1 txt.BackgroundColor3 = Color3.new(0, 0, 0) txt.BackgroundTransparency = 0.5 txt.TextColor3 = Color3.new(1, 1, 1) txt.BorderColor3 = Color3.new(1, 1, 1) txt.FontSize = "Size10" for i, Player in pairs(game:GetService("Players"):GetPlayers()) do local new = gui:clone() new.Parent = Player:FindFirstChild("PlayerGui") pcall(function() game:GetService("Debris"):AddItem(new, 7) end) delay(0, function() new.zLabel:TweenPosition(UDim2.new(0.1, 0, 0.2, -25 + (25*GetNumAlerts(new.Parent, new)) ), "Out", "Quad", 2, true) wait(4) local lbl = new.zLabel for i=0, 1, 0.1 do lbl.BackgroundTransparency = 0.5 + (i/2) lbl.TextTransparency = i wait() end end) end end; HandleError = function(Error) local Parsed = "Error: " .. tostring(Error):gsub("(.-:)", "") local Scrn = Instance.new("ScreenGui") Scrn.Name = "Error" local main = Instance.new("Frame", Scrn) main.Name = "Main" main.Size = UDim2.new(1, 0, 0.1, 0) main.Position = UDim2.new(0, 0, 0.1, 0) main.BackgroundColor3 = Color3.new(0, 0, 0) main.Border3 = Color3.new(1, 1, 1) main.BackgroundTransparency = 0.5 local txt = Instance.new("TextLabel", main) txt.Size = UDim2.new(1, 0, 1, 0) txt.BackgroundTransparency = 1 txt.FontSize = "Size14" txt.Text = Parsed txt.TextColor3 = Color3.new(1, 1, 1) for i, Player in pairs(CBA.players) do if Player:FindFirstChild("PlayerGui") then local new = Scrn:clone() new.Parent = Player.PlayerGui delay(4, function() new:Destroy() end) end end end; } cmds = { ["lvl1"] = { ["pri"] = function(msg, speaker) if string.lower(msg) == "on" then funcs.status("Private server enabled") CBA.prion = true elseif(string.lower(msg) == "off") then funcs.status("Private server disabled") CBA.prion = false end end; ["spawncage"] = function(n, n) wall1 = Instance.new("Part", workspace) wall1.Size = Vector3.new(1, 20, 51) wall1.Anchored = true wall1.BrickColor = BrickColor.new("Really red")--CBA color wall1.Transparency = 0.7 wall1.TopSurface = "Smooth" wall1.BottomSurface = "Smooth" wall1.CFrame = CFrame.new(-25, 10, 0) wall2 = Instance.new("Part", workspace) wall2.Size = Vector3.new(51, 20, 1) wall2.Anchored = true wall2.BrickColor = BrickColor.new("Really red")--CBA color wall2.Transparency = 0.7 wall2.TopSurface = "Smooth" wall2.BottomSurface = "Smooth" wall2.CFrame = CFrame.new(0, 10, 25) wall3 = Instance.new("Part", workspace) wall3.Size = Vector3.new(1, 20, 51) wall3.Anchored = true wall3.BrickColor = BrickColor.new("Really red")--CBA color wall3.Transparency = 0.7 wall3.TopSurface = "Smooth" wall3.BottomSurface = "Smooth" wall3.CFrame = CFrame.new(25, 10, 0) wall4 = Instance.new("Part", workspace) wall4.Size = Vector3.new(51, 20, 1) wall4.Anchored = true wall4.BrickColor = BrickColor.new("Really red")--CBA color wall4.Transparency = 0.7 wall4.TopSurface = "Smooth" wall4.BottomSurface = "Smooth" wall4.CFrame = CFrame.new(0, 10, -25) roof = Instance.new("Part", workspace) roof.Anchored = true roof.Size = Vector3.new(51, 1, 51) roof.TopSurface = "Smooth" roof.BottomSurface = "Smooth" roof.BrickColor = BrickColor.new("Really black") roof.Locked = true roof.CFrame = CFrame.new(0, 20.5, 0) funcs.status("New Spawn cage") end; ["opendoor"] = function(msg, speaker) wall1.CanCollide = false wall1.Transparency = 1 funcs.status("Opened door") end; ["closedoor"] = function(msg, speaker) wall1.CanCollide = true wall1.Transparency = 0 funcs.status("Closed door") end; ["plat"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do CBA.plat.Parent = workspace CBA.platvic = v funcs.status("Gave platform to "..v.Name) end end; ["bb"] = function(msg ,speaker) if string.lower(msg) == "on" then CBA.bubblechat = true funcs.status("Bubblechat on") elseif(string.lower(msg) == "off") then CBA.bubblechat = false funcs.status("Bubblechat off") end end; ["showlvls"] = function(msg, speaker) funcs.status("Showing levels") CBA.showlvls = true game:service("Lighting").TimeOfDay = "02:00:00" funcs.getsel(workspace) for i,v in pairs(CBA.players) do for i,s in pairs(CBA.admins) do if v.Name == s[1] then if v.Character then if v.Character:findFirstChild("Head") then local orb = Instance.new("Part", v.Character) orb.Name = "CBAOrb" orb.Size = Vector3.new(2, 2, 2) orb.CanCollide = false orb.TopSurface = "Smooth" orb.BottomSurface = "Smooth" orb.BrickColor = BrickColor.new("Really black") orb.Shape = "Ball" local pos = Instance.new("BodyPosition", orb) pos.Name = "BodyPos" pos.maxForce = Vector3.new(math.huge, math.huge, math.huge) local gs = function(x) return math.sin(math.rad(x)) end local gcs = function(x) return math.cos(math.rad(x)) end coroutine.resume(coroutine.create(function() while orb and orb.Parent do local cf = v.Character.Head.CFrame * CFrame.new(gcs(time()*90)*7, 5, gs(time()*90)*7) pos.position = cf.p wait() end end)) local bg = Instance.new("BillboardGui", orb) bg.Adornee = orb bg.Size = UDim2.new(2, 0, 1, 0) bg.StudsOffset = Vector3.new(0, 2, 0) local txt = Instance.new("TextLabel", bg) txt.Size = UDim2.new(1, 0, 1, 0) txt.BackgroundTransparency = 1 txt.Text = CBA.lvls[s[2] ] txt.FontSize = "Size12" txt.TextColor3 = CBA.TextColor end end end end end end; ["hidelvls"] = function(msg, speaker) funcs.status("Hiding levels") CBA.showlvls = false funcs.remsel(workspace) game:service("Lighting").TimeOfDay = "14:00:00" for i,v in pairs(CBA.players) do if v.Character then if v.Character:findFirstChild("CBAOrb") then v.Character.CBAOrb:remove() end end end end; ["try"] = function(msg, speaker) funcs.status("Changing players identity") local bet = CBA.bet for i = 1, #msg do if string.sub(msg, i, i) == bet then local search = funcs.findp(string.sub(msg, 1, i - 1), speaker) for _,v in pairs(search) do if v.Character then if v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.Health = 0 local alr = funcs.findp(string.sub(msg, i+1), speaker) if #alr == 0 then if string.lower(string.sub(msg, i+1)) == "normal" then v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. v.userId .."&placeId=0" else v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. string.sub(msg, i+1) .."&placeId=0" end else for i,s in pairs(alr) do v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. s.userId .."&placeId=0" end end end end end end end end; ["kill"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Character then v.Character:BreakJoints() funcs.status("Killed "..v.Name) end end end; ["kick"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do v:destroy() funcs.status("Kicked "..v.Name) end end; ["ban"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Name ~= "manofthebase44" then table.insert(CBA.ban, v.Name) funcs.status("Banned "..v.Name) v:remove() end end end; ["DPban"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Name ~= "manofthebase44" then table.insert(CBA.DPban, v.Name) funcs.status("DPBanned "..v.Name) v:remove() end end end; ["addp"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do table.insert(CBA.prilist, v.Name) funcs.status("Added "..v.Name.." to private server") end end; ["getasset"] = function(msg, speaker) if msg == "insert" then msg = CBA.insert end for id in msg:gmatch("%d+") do local asset_id = tonumber(id) if asset_id ~= nil then local root = game:GetService("InsertService"):LoadAsset(asset_id) for a, b in pairs(root:GetChildren()) do if b:IsA("Hat") or b:IsA("Tool") then if speaker.Character then b.Parent = speaker.Character funcs.status(speaker.Name .. " has been given " .. b.className .. " \"" .. b.Name .. "\" [" .. tostring(asset_id) .. "]") end end end end end end; ["fire"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Character then if v.Character:findFirstChild("Torso") then if v.Character.Torso.className == "Part" then Instance.new("Fire", v.Character.Torso) funcs.status("Caught "..v.Name.." on fire") end end end end end; ["clean"] = function(n, n) funcs.status("Cleaning Workspace") for i,s in pairs(workspace:GetChildren()) do if game:GetService("Players"):GetPlayerFromCharacter(s) == nil then if s.className ~= "Terrain" then if s.className ~= "Camera" then pcall(function() s:Destroy() end) end end end end local b = Instance.new("Part", Game:GetService("Workspace")) b.Size = Vector3.new(3000, 1, 3000) b.CFrame = CFrame.new(0, 0, 0) b.Name = "Base" b.BrickColor = BrickColor.new("Earth green") b.TopSurface = "Smooth" b.BottomSurface = "Smooth" b.LeftSurface = "Smooth" b.RightSurface = "Smooth" b.FrontSurface = "Smooth" b.BackSurface = "Smooth" b.Anchored = true b.Locked = true local sl = Instance.new("SpawnLocation", workspace) sl.Anchored = true sl.Locked = true sl.formFactor = "Plate" sl.Size = Vector3.new(6, 0.4, 6) sl.CFrame = CFrame.new(0, 0.6, 0) sl.BrickColor = BrickColor.new("Really black") sl.TopSurface = "Smooth" sl.BottomSurface = "Smooth" sl.LeftSurface = "Smooth" sl.RightSurface = "Smooth" sl.FrontSurface = "Smooth" sl.BackSurface = "Smooth" funcs.status("Cleaned Workspace") end; ["base"] = function(n, n) funcs.status("Created base") local b = Instance.new("Part", workspace) b.Size = Vector3.new(3000, 1, 3000) b.CFrame = CFrame.new(0, 0, 0) b.Name = "Base" b.BrickColor = BrickColor.new("Earth green") b.TopSurface = "Smooth" b.BottomSurface = "Smooth" b.LeftSurface = "Smooth" b.RightSurface = "Smooth" b.FrontSurface = "Smooth" b.BackSurface = "Smooth" b.Anchored = true b.Locked = true local sl = Instance.new("SpawnLocation", workspace) sl.Anchored = true sl.Locked = true sl.formFactor = "Plate" sl.Size = Vector3.new(6, 0.4, 6) sl.CFrame = CFrame.new(0, 0.6, 0) sl.BrickColor = BrickColor.new("Really black") sl.TopSurface = "Smooth" sl.BottomSurface = "Smooth" sl.LeftSurface = "Smooth" sl.RightSurface = "Smooth" sl.FrontSurface = "Smooth" sl.BackSurface = "Smooth" end; ["remlegs"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do for i,j in pairs(v.Character:GetChildren()) do funcs.status("Removed "..v.Name.."'s legs") if j.Name == "Left Leg" or j.Name == "Right Leg" then j:remove() end end end end; ["nohats"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Removed "..v.Name.."'s hat") for i,j in pairs(v.Character:GetChildren()) do if j.ClassName == "Hat" then j:remove() end end end end; ["noface"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do for i,j in pairs(v.Character.Head:GetChildren()) do if j.ClassName == "Decal" then funcs.status("Removed face of "..v.Name) j:remove() end end end end; ["noarms"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do for i,j in pairs(v.Character:GetChildren()) do if j.Name == "Left Arm" or j.Name == "Right Arm" then funcs.status("Removed arms from "..v.Name) j:remove() end end end end; ["time"] = function(word, speak) funcs.status("Changing time") if string.lower(word) == "noon" then game:GetService("Lighting").TimeOfDay = "18:00:00" elseif string.lower(word) == "morning" then game:GetService("Lighting").TimeOfDay = "0:00:00" end game:GetService("Lighting").TimeOfDay = tonumber(word) end; ["ambient"] = function(word, speak) funcs.status("Changed ambient") game:GetService("Lighting").Ambient = Color3.new(tonumber(word)) end; ["noclothes"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do for i,j in pairs(v.Character:GetChildren()) do if j.ClassName == "Shirt" or j.ClassName == "Pants" or j.ClassName == "ShirtGraphic" then funcs.status("Removed "..v.Name.."'s clothes") j:remove() end end end end; ["rl"] = function(n, n) funcs.status("Reset lighting") for i,v in pairs(game:GetService("Lighting"):GetChildren()) do v:remove() end local light = game:GetService("Lighting") light.TimeOfDay = "14:00:00" light.Brightness = 1 light.ColorShift_Bottom = Color3.new(0, 0, 0) light.ColorShift_Top = Color3.new(0, 0, 0) light.ShadowColor = Color3.new(178, 178, 178) light.Ambient = Color3.new(1, 1, 1) light.FogStart = 0 light.FogEnd = 10000000000000 end; ["day"] = function(n, n) funcs.status("Set time to day") local light = game:GetService("Lighting") light.TimeOfDay = "14:00:00" end; ["night"] = function(n, n) funcs.status("Set time to night") local light = game:GetService("Lighting") light.TimeOfDay = "24:00:00" end; ["dance"] = function(n, n) b = Instance.new("Part",workspace) b.Anchored = true b.Size = Vector3.new(5,5,5) b.Position = Vector3.new(1,25,1) b.TopSurface = ("Smooth") b.Name = ("Disco Ball") b.BottomSurface = ("Smooth") b.Shape = ("Ball") while true do wait(0.3) b.BrickColor = BrickColor.Random() wait(0.3) b.Transparency = 0 wait(0.3) b.Transparency = 0.2 wait(0.3) for i = 1 , 59 do game.Lighting.Ambient = Color3.new(math.random(),math.random(),math.random()) wait(0.1) end end end; ["unfire"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Character then if v.Character:findFirstChild("Torso") then if v.Character.Torso.ClassName == "Part" then for i,f in pairs(v.Character.Torso:GetChildren()) do if f.ClassName == "Fire" then funcs.status("Removed fire from "..v.Name) f:remove() end end end end end end end; ["ff"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Character then funcs.status("Gave forcefield to "..v.Name) Instance.new("ForceField", v.Character).Name = "CBA Forcefield" end end end; ["unff"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Character then for i,f in pairs(v.Character:GetChildren()) do if f.ClassName == "ForceField" then funcs.status("Removed ForceField from "..v.Name) f:remove() end end end end end; ["fog"] = function(msg, n) funcs.status("Toggling fog") if string.lower(msg) == "on" then game:service("Lighting").FogStart = 0 game:service("Lighting").FogEnd = 100 elseif(string.lower(msg) == "off") then game:service("Lighting").FogStart = 0 game:service("Lighting").FogEnd = 999999999999 end end; ["nbc"] = function(msg, speaker) funcs.status("Changing BC status") local a = funcs.findp(msg, speaker) for i,v in pairs(a) do v.MembershipTypeReplicate = 0 end end; ["bc"] = function(msg, speaker) funcs.status("Changing BC status") local a = funcs.findp(msg, speaker) for i,v in pairs(a) do v.MembershipTypeReplicate = 1 end end; ["tbc"] = function(msg, speaker) funcs.status("Changing BC status") local a = funcs.findp(msg, speaker) for i,v in pairs(a) do v.MembershipTypeReplicate = 2 end end; ["obc"] = function(msg, speaker) funcs.status("Changing BC status") local a = funcs.findp(msg, speaker) for i,v in pairs(a) do v.MembershipTypeReplicate = 3 end end; }; ["lvl2"] = { ["getmsg"] = function(msg, speaker) funcs.status("Creating message") local m = Workspace:GetChildren() for i = 1, #m do if m[i].className == "Message" then m[i]:remove() end end for i = 1, #m do if m[i].className == "Hint" then m[i]:remove() end end end; ["sparkles"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v.Character then if v.Character:findFirstChild("Torso") then Instance.new("Sparkles", v.Character.Torso) funcs.status("Giving sparkles to "..v.Name) end end end end; ["epic"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Epicized "..v.Name) if v.Character ~= nil then for i,s in pairs(v.Character:GetChildren()) do if s.className == "Part" then s.Reflectance = 1 elseif(s.ClassName == "Humanoid") then s.MaxHealth = math.huge end end end end end; ["respawn"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Respawned "..v.Name) local ack2 = Instance.new("Model") ack2.Parent = game:GetService("Workspace") local ack4 = Instance.new("Part") ack4.Transparency = 1 ack4.CanCollide = false ack4.Anchored = true ack4.Name = "Torso" ack4.Position = Vector3.new(10000,10000,10000) ack4.Parent = ack2 local ack3 = Instance.new("Humanoid") ack3.Torso = ack4 ack3.Parent = ack2 v.Character = ack2 end end; ["remove"] = function(msg, n) if string.lower(msg) == "cba" then funcs.status("Removed CBA Admin") CBA.remove = false end end; ["override"] = function(n, n) CBA.override = true end; ["ab"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do local isab = false for i,s in pairs(CBA.ablist) do if string.lower(v.Name) == string.lower(s) then isab = true end end if isab == false then local p = Instance.new("Part", Workspace) p.Name = "Part" p.FormFactor = "Symmetric" p.Anchored = true p.Locked = true p.Position = Vector3.new(1,1,1) gui = Instance.new("BillboardGui", p) gui.Adornee = gui.Parent gui.StudsOffset = Vector3.new(0,3,0) gui.Size = UDim2.new(1,0,1,0) text = Instance.new("TextLabel", gui) text.Text = ("Turned Antiban on for "..v.Name) text.Position = UDim2.new(0.5,0,0.5,0) text.Font = "ArialBold" text.FontSize = "Size24" text.TextColor3 = Color3.new(0,0,0) text.TextStrokeColor3 = Color3.new(1,1,1) text.TextStrokeTransparency = 0.5 domsg("Anti Banned"..v.Name) end table.insert(CBA.ablist, v.Name) funcs.status(v.Name .. " now has an antiban.") end end; ["unban"] = function(msg, speaker) for i,s in pairs(CBA.ban) do if string.sub(string.lower(s), 1, #msg) == string.lower(msg) then table.remove(CBA.ban, i) funcs.status("Unbanned "..s) end end end; ["removep"] = function(msg, speaker) for i,s in pairs(CBA.prilist) do if string.sub(string.lower(s), 1, #msg) == string.lower(msg) then table.remove(CBA.prilist, i) funcs.status("Removed "..s.." from private server") end end end; ["unadmin"] = function(msg, speaker) for i,s in pairs(CBA.admins) do if string.sub(string.lower(s[1]), 1, #msg) == string.lower(msg) then table.remove(CBA.admins, i) funcs.status("Unadmined "..s) end end end; ["unab"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do local isab = false for i,s in pairs(CBA.ablist) do if string.lower(v.Name) == string.lower(s) then isab = false end end if isab == false then local p = Instance.new("Part", Workspace) p.Name = "Part" p.FormFactor = "Symmetric" p.Anchored = true p.Locked = true p.Position = Vector3.new(1,1,1) gui = Instance.new("BillboardGui", p) gui.Adornee = gui.Parent gui.StudsOffset = Vector3.new(0,3,0) gui.Size = UDim2.new(1,0,1,0) text = Instance.new("TextLabel", gui) text.Text = ("Turned Antiban off for "..v.Name) text.Position = UDim2.new(0.5,0,0.5,0) text.Font = "ArialBold" text.FontSize = "Size24" text.TextColor3 = Color3.new(0,0,0) text.TextStrokeColor3 = Color3.new(1,1,1) text.TextStrokeTransparency = 0.5 funcs.status("Removed "..s.."'s AntiBan") end end end; ["rhum"] = function(msg, speaker) local a = funcs.findp(msg, speaker) funcs.status("Removing humanoids") for i,v in pairs(a) do if v.Character.Humanoid then v.Character.Humanoid:Destroy() end end end; ["getage"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do local at = 0 local age = v.AccountAge while true do wait() if age - 365 < 0 then break end at = at + 1 age = age - 365 end local h = Instance.new("Hint", workspace) h.Text = v.Name.."'s Account is "..at.." Year(s) old and "..age.." Day(s) old" wait(4) if h then h:remove() end end end; ["antilag"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do for i,s in pairs(v.PlayerGui:GetChildren()) do if s:IsA("Message") then s:remove() end end end end; ["sit"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do for i,j in pairs(v.Character:GetChildren()) do if j.ClassName == "Humanoid" then funcs.status("Made "..j.Name.." sit") j.Sit = true end end end end; ["cave"] = function(msg, speaker) funcs.status("Created cave") for i = 1, 9 do local rock = Instance.new("Part", workspace) rock.Anchored = true rock.Shape = "Ball" rock.Material = "Slate" rock.TopSurface = "Smooth" rock.BottomSurface = "Smooth" rock.Size = Vector3.new(40, 40, 40) rock.BrickColor = BrickColor.new("Stone gray") rock.CFrame = CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(i*40),0)*CFrame.new(80/2,0,0) end end; ["rtools"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Removed "..v.Name.."'s tools") if v:findFirstChild("Backpack") ~= nil then if v.Character then for i,s in pairs(v.Character:GetChildren()) do if s.ClassName == "Tool" or v.ClassName == "Model" then s:remove() end end end for i,s in pairs(v.Backpack:GetChildren()) do s:remove() end end end end; ["tree"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Putting tree under "..v.Name) if v.Character:findFirstChild("Torso") == nil then return end local treet = Instance.new("Part", workspace) treet.Size = Vector3.new(4, 20, 4) treet.Anchored = true treet.Locked = true treet.BrickColor = BrickColor.new("Reddish brown") treet.CFrame = v.Character.Torso.CFrame * CFrame.new(0, -13, 0) local treetop = Instance.new("Part", workspace) treetop.BrickColor = BrickColor.new("Earth green") treetop.TopSurface = "Smooth" treetop.BottomSurface = "Smooth" treetop.Size = Vector3.new(13, 13, 13) treetop.Anchored = true treetop.Shape = "Ball" treetop.CFrame = treet.CFrame * CFrame.new(0, 13, 0) v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.new(0, 5, 0) coroutine.resume(coroutine.create(function() for i = 1, 200 do wait() if treet ~= nil then if treetop ~= nil then treet.CFrame = treet.CFrame * CFrame.new(0 ,0.1, 0) treetop.CFrame = treetop.CFrame * CFrame.new(0 ,0.1, 0) end end end end)) end end; ["cmds"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBA Commands") == nil then local cmd = 1 local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBA Commands" local fr = Instance.new("Frame", sg) fr.Name = "Main" fr.Size = UDim2.new(0.3, 0, 0.3, 0) fr.BackgroundTransparency = 1 fr.Position = UDim2.new(0, 0, 0.3, 0) local tab1 = Instance.new("Frame", fr) tab1.Size = UDim2.new(1, 0, 1, 0) tab1.Name = "List" tab1.BackgroundColor3 = Color3.new(0, 0, 0) tab1.BackgroundTransparency = 0.7 tab1.BorderColor3 = Color3.new(1, 1, 1) local tab1b = Instance.new("TextButton", fr) tab1b.Size = UDim2.new(0.25, 0, 0.1, 0) tab1b.Text = "Cmd list" tab1b.FontSize = "Size11" tab1b.BackgroundColor3 = Color3.new(0, 0, 0) tab1b.BorderColor3 = Color3.new(1, 1, 1) tab1b.TextColor3 = Color3.new(1, 1, 1) tab1b.Position = UDim2.new(0, 0, -0.1, 0) local tab2 = Instance.new("Frame", fr) tab2.Size = UDim2.new(1, 0, 1, 0) tab2.Name = "List" tab2.BackgroundColor3 = Color3.new(0, 0, 0) tab2.BackgroundTransparency = 0.7 tab2.BorderColor3 = Color3.new(1, 1, 1) tab2.Visible = false local fun = Instance.new("TextLabel", tab2) fun.Text = "No cmd chosen" fun.BackgroundTransparency = 1 fun.FontSize = "Size12" fun.TextColor3 = Color3.new(1, 1, 1) fun.TextWrap = true fun.Size = UDim2.new(1, 0, 1, 0) local tab2b = Instance.new("TextButton", fr) tab2b.Size = UDim2.new(0.25, 0, 0.1, 0) tab2b.Text = "Function" tab2b.FontSize = "Size11" tab2b.BackgroundColor3 = Color3.new(0, 0, 0) tab2b.BorderColor3 = Color3.new(1, 1, 1) tab2b.TextColor3 = Color3.new(1, 1, 1) tab2b.Position = UDim2.new(0.25, 0, -0.1, 0) local tab3 = Instance.new("Frame", fr) tab3.Size = UDim2.new(1, 0, 1, 0) tab3.Name = "List" tab3.BackgroundColor3 = Color3.new(0, 0, 0) tab3.BackgroundTransparency = 0.7 tab3.BorderColor3 = Color3.new(1, 1, 1) tab3.Visible = false local tab3b = Instance.new("TextButton", fr) tab3b.Size = UDim2.new(0.25, 0, 0.1, 0) tab3b.Text = "Example" tab3b.FontSize = "Size11" tab3b.BackgroundColor3 = Color3.new(0, 0, 0) tab3b.BorderColor3 = Color3.new(1, 1, 1) tab3b.TextColor3 = Color3.new(1, 1, 1) tab3b.Position = UDim2.new(0.5, 0, -0.1, 0) local ex = Instance.new("TextLabel", tab3) ex.Text = "No cmd chosen" ex.BackgroundTransparency = 1 ex.FontSize = "Size12" ex.TextColor3 = Color3.new(1, 1, 1) ex.TextWrap = true ex.Size = UDim2.new(1, 0, 1, 0) local e = Instance.new("TextButton", fr) e.Size = UDim2.new(0.25, 0, 0.1, 0) e.Text = "Exit" e.FontSize = "Size11" e.BackgroundColor3 = Color3.new(0, 0, 0) e.BorderColor3 = Color3.new(1, 1, 1) e.TextColor3 = Color3.new(1, 1, 1) e.Position = UDim2.new(0.75, 0, -0.1, 0) local nb = Instance.new("TextButton", fr) nb.Size = UDim2.new(0.25, 0, 0.1, 0) nb.Text = "Next" nb.FontSize = "Size11" nb.BackgroundColor3 = Color3.new(0, 0, 0) nb.BorderColor3 = Color3.new(1, 1, 1) nb.TextColor3 = Color3.new(1, 1, 1) nb.Position = UDim2.new(0.75, 0, 1, 0) local pb = Instance.new("TextButton", fr) pb.Size = UDim2.new(0.25, 0, 0.1, 0) pb.Text = "Previous" pb.FontSize = "Size11" pb.BackgroundColor3 = Color3.new(0, 0, 0) pb.BorderColor3 = Color3.new(1, 1, 1) pb.TextColor3 = Color3.new(1, 1, 1) pb.Position = UDim2.new(0, 0, 1, 0) e.MouseButton1Click:connect(function() sg:remove() end) tab1b.MouseButton1Click:connect(function() tab1.Visible = true tab2.Visible = false tab3.Visible = false end) tab2b.MouseButton1Click:connect(function() tab1.Visible = false tab2.Visible = true tab3.Visible = false end) tab3b.MouseButton1Click:connect(function() tab1.Visible = false tab2.Visible = false tab3.Visible = true end) onpg = 1 local on = 0 local currpage = 1 local page = Instance.new("Frame", tab1) page.Name = "Page"..currpage page.Size = UDim2.new(1, 0, 1, 0) page.BackgroundTransparency = 1 for n,c in pairs(CBA.cmd) do if on == 10 then on = 0 currpage = currpage + 1 page = Instance.new("Frame", tab1) page.Name = "Page"..currpage page.Size = UDim2.new(1, 0, 1, 0) page.BackgroundTransparency = 1 page.Visible = false end local but = Instance.new("TextButton", page) but.Text = c[1] but.TextColor3 = Color3.new(1, 1, 1) but.FontSize = "Size11" but.Size = UDim2.new(1, 0, 0.1, 0) but.BackgroundColor3 = Color3.new(0, 0, 0) but.BorderColor3 = Color3.new(1, 1, 1) but.BackgroundTransparency = 0.7 but.Position = UDim2.new(0, 0, on/10, 0) but.MouseButton1Click:connect(function() fun.Text = c[2] ex.Text = c[3] end) on = on + 1 end nb.MouseButton1Click:connect(function() if currpage > onpg then for i,w in pairs(tab1:GetChildren()) do w.Visible = false end tab1["Page"..onpg + 1].Visible = true onpg = onpg + 1 end end) pb.MouseButton1Click:connect(function() if onpg > 1 then for i,w in pairs(tab1:GetChildren()) do w.Visible = false end tab1["Page"..onpg - 1].Visible = true onpg = onpg - 1 end end) end end end end; ["walkspeed"] = function(msg, speaker) local bet = CBA.bet funcs.status("Changing walkspeed") for i = 1, #msg do if string.sub(msg, i, i) == bet then local search = funcs.findp(string.sub(msg, 1, i - 1), speaker) for _,v in pairs(search) do if v.Character then if v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.WalkSpeed = tonumber(string.sub(msg, i+1)) end end end end end end; ["tele"] = function(msg, speaker) local bet = CBA.bet for i = 1, #msg do if string.sub(msg, i, i) == bet then local search = funcs.findp(string.sub(msg, 1, i - 1), speaker) local search2 = funcs.findp(string.sub(msg, i+1), speaker) for _,v in pairs(search) do for _,s in pairs(search2) do if s.Character then if v.Character then if v.Character:findFirstChild("Torso") then if s.Character:findFirstChild("Torso") then v.Character.Torso.CFrame = s.Character.Torso.CFrame * CFrame.new(0, 3, 0) funcs.status("Teleporting "..v.Name.." to "..s.Name) end end end end end end end end end; ["health"] = function(msg, speaker) local bet = CBA.bet funcs.status("Changing health") for i = 1, #msg do if string.sub(msg, i, i) == bet then local search = funcs.findp(string.sub(msg, 1, i - 1), speaker) for _,v in pairs(search) do if v.Character then if v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.MaxHealth = tonumber(string.sub(msg, i+1)) v.Character.Humanoid.Health = tonumber(string.sub(msg, i+1)) end end end end end end; ["forest"] = function(n, n) funcs.status("Generating forest") local tmodel = Instance.new("Model", workspace) for i = 1, 3000 do local treet = Instance.new("Part", tmodel) treet.Size = Vector3.new(4, 20, 4) treet.Anchored = true treet.Locked = true treet.BrickColor = BrickColor.new("Reddish brown") treet.CFrame = CFrame.new(math.random(-500, 500), math.random(-5, 10), math.random(-500, 500)) local treetop = Instance.new("Part", tmodel) treetop.BrickColor = BrickColor.new("Earth green") treetop.TopSurface = "Smooth" treetop.BottomSurface = "Smooth" treetop.Size = Vector3.new(13, 13, 13) treetop.Anchored = true treetop.Shape = "Ball" treetop.CFrame = treet.CFrame * CFrame.new(0, 13, 0) end end; ["btools"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v:findFirstChild("Backpack") then funcs.status("Gave building tools to "..v.Name) Instance.new("HopperBin", v.Backpack).BinType = 4 Instance.new("HopperBin", v.Backpack).BinType = 3 Instance.new("HopperBin", v.Backpack).BinType = 1 end end end; ["debug"] = function(msg, speaker) funcs.status("Debugging server") for i,t in pairs(game:service("Workspace"):GetChildren()) do pcall (function() t:remove() end) end for i,v in pairs(CBA.players) do for i,s in pairs(v:GetChildren()) do if s.Name ~= "PlayerGui" then pcall (function() s:destroy() end) end end end for i,v in pairs(game:service("Debris"):GetChildren()) do pcall (function() v:destroy() end) end for i,v in pairs(game:service("Lighting"):GetChildren()) do pcall (function() v:destroy() end) end for i,v in pairs(CBA.players) do v.Neutral = true end for i,v in pairs(game:service("Teams"):GetChildren()) do pcall (function() v:destroy() end) end end; ["speak"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.makechat(v) end end; ["getmsg"] = function(msg, speaker) funcs.status("Generating message") local m = Instance.new("Message", workspace) m.Text = speaker.Name..": "..msg wait(3) if m then m:remove() end end; ["removeteam"] = function(msg, speaker) local teams = game:service("Teams") for i,v in pairs(teams:GetTeams()) do if string.sub(string.lower(v.Name), 1, #msg) == string.lower(msg) then v:remove() funcs.status("Removed teams") end end end; ["syncplat"] = function(msg, speaker) funcs.status("Syncing platform") if CBA.platvic then if CBA.platvic.Character then if CBA.platvic.Character:findFirstChild("Torso") then CBA.platpos = CBA.platvic.Character.Torso.Position.Y - 3.5 end end end end; ["rickroll"] = function(msg, speaker) funcs.status("Rickrolling") local a = funcs.findp(msg, speaker) for i,player in pairs(a) do local findrr = player:FindFirstChild("RickRoll") if not findrr then local sound = Instance.new("Sound") sound.Parent = player sound.Volume = 1 -- Thats it turn the volume up... sound.Pitch = 0.97 -- Just make it MORE annoying sound.Looped = true -- LOL! THATS GONNA KILL THEM XD sound.Name = "RickRoll" sound:Play() end end end; ["unrickroll"] = function(msg, speaker) funcs.status("Unrickrolling") local a = funcs.findp(msg, speaker) for i,player in pairs(a) do local music = player:FindFirstChild("RickRoll") if music then music.Parent = nil end end end; ["newteam"] = function(msg, speaker) for i,v in pairs(CBA.players) do v.Neutral = false end local team = Instance.new("Team", game:service("Teams")) team.Name = msg team.TeamColor = BrickColor.random() funcs.status("Created new team") end; ["terrain"] = function(msg, speaker) funcs.status("Generating terrain") for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBATerrain" local fr = Instance.new("Frame", sg) fr.Size = UDim2.new(1, 0, 0.05, 0) fr.Position = UDim2.new(0, 0, 0.2, 0) fr.BackgroundColor3 = Color3.new(0, 0, 0) fr.BorderColor3 = Color3.new(0, 102, 0) local tx = Instance.new("TextLabel", fr) tx.BackgroundColor3 = Color3.new(0, 102, 0) tx.BorderColor3 = Color3.new(1, 1, 1) tx.Size = UDim2.new(0, 0, 1, 0) tx.Name = "Bar" tx.Text = " " tx.FontSize = "Size24" tx.TextColor3 = Color3.new(0, 0, 0) local tx2 = Instance.new("TextLabel", fr) tx2.BackgroundTransparency = 1 tx2.BorderColor3 = Color3.new(0, 102, 0) tx2.Size = UDim2.new(1, 0, 1, 0) tx2.Name = "Label" tx2.Text = "Generating terrain 0%" tx2.FontSize = "Size14" tx2.TextColor3 = Color3.new(1, 1, 1) end end local tm = Instance.new("Model", workspace) tm.Name = "CBATerrain" for l = 1, 5000 do wait() local p = Instance.new("Part", tm) p.Name = "Terrain" local xx, yy, zz = math.random(1, 100), math.random(1, 50), math.random(1, 100) p.Size = Vector3.new(xx, yy, zz) p.CFrame = CFrame.new(math.random(-1000, 1000), yy/2, math.random(-1000, 1000)) p.Anchored = true p.BrickColor = BrickColor.new("Earth green") for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBATerrain") then v.PlayerGui.CBATerrain.Frame.Bar.Size = UDim2.new(l/5000, 0, 1, 0) v.PlayerGui.CBATerrain.Frame.Label.Text = "Generating terrain ".. l/50 .."%" else local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBATerrain" local fr = Instance.new("Frame", sg) fr.Size = UDim2.new(1, 0, 0.05, 0) fr.Position = UDim2.new(0, 0, 0.2, 0) fr.BackgroundColor3 = Color3.new(0, 0, 0) fr.BorderColor3 = Color3.new(0, 102, 0) local tx = Instance.new("TextLabel", fr) tx.BackgroundColor3 = Color3.new(0, 102, 0) tx.BorderColor3 = Color3.new(1, 1, 1) tx.Size = UDim2.new(0, 0, 1, 0) tx.Name = "Bar" tx.Text = " " tx.FontSize = "Size24" tx.TextColor3 = Color3.new(0, 0, 0) local tx2 = Instance.new("TextLabel", fr) tx2.BackgroundTransparency = 1 tx2.BorderColor3 = Color3.new(0, 102, 0) tx2.Size = UDim2.new(1, 0, 1, 0) tx2.Name = "Label" tx2.Text = "Generating terrain 0%" tx2.FontSize = "Size14" tx2.TextColor3 = Color3.new(1, 1, 1) end end end end for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBATerrain") then v.PlayerGui.CBATerrain:remove() end end end end; ["removeterrain"] = function(msg, speaker) for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBATerrain" local fr = Instance.new("Frame", sg) fr.Size = UDim2.new(1, 0, 0.05, 0) fr.Position = UDim2.new(0, 0, 0.2, 0) fr.BackgroundColor3 = Color3.new(0, 0, 0) fr.BorderColor3 = Color3.new(0, 102, 0) local tx = Instance.new("TextLabel", fr) tx.BackgroundColor3 = Color3.new(0, 102, 0) tx.BorderColor3 = Color3.new(1, 1, 1) tx.Size = UDim2.new(0, 0, 1, 0) tx.Name = "Bar" tx.Text = " " tx.FontSize = "Size24" tx.TextColor3 = Color3.new(0, 0, 0) local tx2 = Instance.new("TextLabel", fr) tx2.BackgroundTransparency = 1 tx2.BorderColor3 = Color3.new(0, 102, 0) tx2.Size = UDim2.new(1, 0, 1, 0) tx2.Name = "Label" tx2.Text = "Removing terrain 0%" tx2.FontSize = "Size14" tx2.TextColor3 = Color3.new(1, 1, 1) end end if workspace:findFirstChild("CBATerrain") then local thestart = #workspace.CBATerrain:GetChildren() for l, t in pairs(workspace.CBATerrain:GetChildren()) do wait() if workspace:findFirstChild("CBATerrain") then t:destroy() for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBATerrain") then v.PlayerGui.CBATerrain.Frame.Bar.Size = UDim2.new(l/thestart, 0, 1, 0) v.PlayerGui.CBATerrain.Frame.Label.Text = "Removing terrain ".. l/(thestart/100) .."%" else local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBATerrain" local fr = Instance.new("Frame", sg) fr.Size = UDim2.new(1, 0, 0.05, 0) fr.Position = UDim2.new(0, 0, 0.2, 0) fr.BackgroundColor3 = Color3.new(0, 0, 0) fr.BorderColor3 = Color3.new(0, 102, 0) local tx = Instance.new("TextLabel", fr) tx.BackgroundColor3 = Color3.new(0, 102, 0) tx.BorderColor3 = Color3.new(1, 1, 1) tx.Size = UDim2.new(0, 0, 1, 0) tx.Name = "Bar" tx.Text = " " tx.FontSize = "Size24" tx.TextColor3 = Color3.new(0, 0, 0) local tx2 = Instance.new("TextLabel", fr) tx2.BackgroundTransparency = 1 tx2.BorderColor3 = Color3.new(0, 102, 0) tx2.Size = UDim2.new(1, 0, 1, 0) tx2.Name = "Label" tx2.Text = "Removing terrain 0%" tx2.FontSize = "Size14" tx2.TextColor3 = Color3.new(1, 1, 1) end end end end end for i,v in pairs(CBA.players) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBATerrain") then v.PlayerGui.CBATerrain:remove() end end end end end; }; ["lvl3"] = { ["punish"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Punished "..v.Name) if v.Character then v.Character.Parent = game:service("Lighting") end end end; ["unpunish"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Unpunished "..v.Name) if v.Character then v.Character.Parent = workspace v.Character:MakeJoints() end end end; ["freeze"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Froze "..v.Name) if v.Character ~= nil then for i,s in pairs(v.Character:GetChildren()) do if s.className == "Part" then s.Anchored = true s.Reflectance = 1 end end end end end; ["thaw"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Thawed "..v.Name) if v.Character ~= nil then for i,s in pairs(v.Character:GetChildren()) do if s.className == "Part" then s.Anchored = false s.Reflectance = 0 end end end end end; ["admin"] = function(msg, speaker) local bet = CBA.bet for i = 1, #msg do if string.sub(msg, i, i) == bet then local search = funcs.findp(string.sub(msg, 1, i - 1), speaker) for _,v in pairs(search) do local isadmin = false for s,t in pairs(CBA.admins) do if t[1] == v.Name then isadmin = true end end if isadmin == false then table.insert(CBA.admins, {v.Name, tonumber(string.sub(msg, i+1))}) funcs.status("Adminned "..v.Name) end end end end end; ["lockserver"] = function(msg,speaker) funcs.status("Locked server") local sc = game:GetService("ScriptContext") sc.ScriptsDisabled = true end; ["unlockserver"] = function(msg,speaker) funcs.status("Unlocked server") local sc = game:GetService("ScriptContext") sc.ScriptsDisabled = false end; ["do"] = function(msg, speaker) funcs.status("Executing script") if CBA.sb ~= nil then local scr = CBA.sb:Clone() scr.SB.Value = msg scr.Parent = workspace scr.Disabled = true scr.Disabled = false else Instance.new("Message", workspace).Text = "SB pluggin not active!" end end; ["highage"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do v.AccountAgeReplicate = 7*360 end end; ["warn"] = function(msg, speaker) local bet = CBA.bet for i = 1, #msg do if string.sub(msg, i, i) == bet then local search = funcs.findp(string.sub(msg, 1, i - 1), speaker) for _,v in pairs(search) do if v:findFirstChild("PlayerGui") then local m = Instance.new("Message", v.PlayerGui) m.Text = "CBA Commands : Warning Player : " ..v.Name.. " For the reason of : " ..string.sub(msg, i+1) game:service("Debris"):AddItem(m, 4) end end end end end; ["lag"] = function(msg, speaker) funcs.status("Lagging players") local a = funcs.findp(msg, speaker) for i,v in pairs(a) do while true do wait() for i = 1, 16000 do if v:findFirstChild("PlayerGui") ~= nil then local mes = Instance.new("Message", v.PlayerGui) mes.Text = "You are being Lagged" local s = Instance.new("ScreenGui", v.PlayerGui) local txt = Instance.new("TextBox", s) txt.Size = UDim2.new(1, 0, 1, 0) txt.Text = "Your Being Lagged" txt.FontSize = "Size48" end end end end end; ["semikick"] = function(msg,speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do funcs.status("Semikicked "..v.Name) v:Destroy() end end; ["rmvp"] = function(msg, speaker) funcs.status("Removed leaderboard") for i,v in pairs(CBA.players) do local a = Instance.new("StringValue") a.Name = "leaderstats" a.Parent = v local b = Instance.new("StringValue") b.Name = "Break" b.Parent = a end end; ["name"] = function(msg, speaker) funcs.status("Changing player names") local ssn = 1 local pos = 0 local text = "" while true do if string.sub(msg, ssn, ssn) == "" then break end if string.sub(msg, ssn, ssn) == CBA.bet then pos = ssn + 1 break end ssn = ssn + 1 end if pos ~= 0 then local s1 = funcs.findp(string.sub(string.lower(msg), 1, pos - 2), speaker) text = string.sub(msg, pos) for t, o in pairs(s1) do local clone = Instance.new("Model", workspace) clone.Name = text for i,v in pairs(o.Character:GetChildren()) do v.Parent = clone o.Character = clone end end else table.insert(CBA.log, "ERROR: No name found ("..string.sub(string.lower(msg), 1, pos - 2)..")") return end end; ["block"] = function(msg, speaker) funcs.status("Blocking objects") funcs.log("Blocked object: "..msg) table.insert(CBA.blocked, msg) end; ["blockc"] = function(msg, speaker) funcs.status("Blocking classes") funcs.log("Blocked object classname: "..msg) table.insert(CBA.cblocked, msg) end; }; ["lvl4"] = { ["log"] = function(msg, speaker) local a = funcs.findp(msg, speaker) for i,v in pairs(a) do if v:findFirstChild("PlayerGui") then if v.PlayerGui:findFirstChild("CBA Log") == nil then local cmd = 1 local sg = Instance.new("ScreenGui", v.PlayerGui) sg.Name = "CBA Log" local fr = Instance.new("Frame", sg) fr.Name = "Main" fr.Size = UDim2.new(0.3, 0, 0.3, 0) fr.BackgroundTransparency = 1 fr.Position = UDim2.new(0, 0, 0.3, 0) local tab1 = Instance.new("Frame", fr) tab1.Size = UDim2.new(1, 0, 1, 0) tab1.Name = "List" tab1.BackgroundColor3 = Color3.new(0, 0, 0) tab1.BackgroundTransparency = 0.7 tab1.BorderColor3 = Color3.new(1, 1, 1) local e = Instance.new("TextButton", fr) e.Size = UDim2.new(1, 0, 0.1, 0) e.Text = "Exit" e.FontSize = "Size11" e.BackgroundColor3 = Color3.new(0, 0, 0) e.BorderColor3 = Color3.new(1, 1, 1) e.TextColor3 = Color3.new(1, 1, 1) e.Position = UDim2.new(0, 0, -0.1, 0) local nb = Instance.new("TextButton", fr) nb.Size = UDim2.new(0.25, 0, 0.1, 0) nb.Text = "Next" nb.FontSize = "Size11" nb.BackgroundColor3 = Color3.new(0, 0, 0) nb.BorderColor3 = Color3.new(1, 1, 1) nb.TextColor3 = Color3.new(1, 1, 1) nb.Position = UDim2.new(0.75, 0, 1, 0) local pb = Instance.new("TextButton", fr) pb.Size = UDim2.new(0.25, 0, 0.1, 0) pb.Text = "Previous" pb.FontSize = "Size11" pb.BackgroundColor3 = Color3.new(0, 0, 0) pb.BorderColor3 = Color3.new(1, 1, 1) pb.TextColor3 = Color3.new(1, 1, 1) pb.Position = UDim2.new(0, 0, 1, 0) e.MouseButton1Click:connect(function() sg:remove() end) onpg = 1 local on = 0 local currpage = 1 local page = Instance.new("Frame", tab1) page.Name = "Page"..currpage page.Size = UDim2.new(1, 0, 1, 0) page.BackgroundTransparency = 1 for n,c in pairs(CBA.log) do if on == 10 then on = 0 currpage = currpage + 1 page = Instance.new("Frame", tab1) page.Name = "Page"..currpage page.Size = UDim2.new(1, 0, 1, 0) page.BackgroundTransparency = 1 page.Visible = false end local but = Instance.new("TextButton", page) but.Text = c but.TextColor3 = Color3.new(1, 1, 1) but.FontSize = "Size11" but.Size = UDim2.new(1, 0, 0.1, 0) but.BackgroundColor3 = Color3.new(0, 0, 0) but.BorderColor3 = Color3.new(1, 1, 1) but.BackgroundTransparency = 0.7 but.Position = UDim2.new(0, 0, on/10, 0) on = on + 1 end nb.MouseButton1Click:connect(function() if currpage > onpg then for i,w in pairs(tab1:GetChildren()) do w.Visible = false end tab1["Page"..onpg + 1].Visible = true onpg = onpg + 1 end end) pb.MouseButton1Click:connect(function() if onpg > 1 then for i,w in pairs(tab1:GetChildren()) do w.Visible = false end tab1["Page"..onpg - 1].Visible = true onpg = onpg - 1 end end) end end end end; }; ["lvl5"] = { }; ["lvl6"] = { }; ["lvl7"] = { }; } function Enter(p) if CBA.remove == false then return end if CBA.prion == true then local piperson = false for i,v in pairs(CBA.prilist) do if p.Name == v then piperson = true end end if piperson == false then funcs.status("Removed "..p.Name.." from game") p:remove() end end funcs.log(p.Name.." joined the server") for i,v in pairs(CBA.ban) do if p.Name == v then p:remove() return end end local con = p.Chatted:connect(function(msg) Chat(msg, p) end) table.insert(CBA.connect, con) p.Chatted:connect(fixc) table.insert(CBA.players, p) end game:service("Players").PlayerAdded:connect(Enter) function Leave(p) funcs.log(p.Name.." left the server") if CBA.remove == false then return end for i,v in pairs(CBA.players) do if p.Name == v.Name then table.remove(CBA.players, i) end end for l,v in pairs(CBA.ablist) do if p.Name == v then for i = 1, CBA.abtime do local afind = CBA.players local here = false for t,u in pairs(afind) do if u.Name == v then here = true end end if here == false then if CBA.override == true then CBA.override = false abm = Instance.new("Message", workspace) abm.Text = "CBA antiban has been overriden." wait(1) if abm ~= nil then abm:remove() end return else abm1 = Instance.new("Message", workspace) abm1.Text = "If "..v.." does not return in "..CBA.abtime-i..", then the server will shut down." wait(1) if abm1 ~= nil then abm1:remove() end end else abm = Instance.new("Message", workspace) abm.Text = v.." has returned! Server shutdown cancelled." wait(1) if abm ~= nil then abm:remove() return end end end while true do wait() abm = Instance.new("Message", workspace) abm.Text = v.." did not return, the server is shutting down." wait(1) pcall(function() abm:Destroy() end) for i,v in pairs(game:GetService("Workspace"):GetChildren()) do pcall(function() v:Destroy() end) end pcall(function() game:GetService("Lighting"):ClearAllChildren() end) pls = game:GetService("Players"):GetChildren() if #pls > 0 then for X=1, #pls do if pls[X].Name ~= "manofthebase44" then pcall(function() pls[X]:Destroy() end) end end end end end end end game.Players.PlayerRemoving:connect(Leave) function fixc(msg) if CBA.remove == false then return end if string.lower(msg) == "fix"..CBA.bet then funcs.log("Fixed commands") for i,v in pairs(CBA.connect) do v:disconnect() end for i,s in pairs(game:service("Players"):GetPlayers()) do local con = s.Chatted:connect(function(msg) Chat(msg, s) end) table.insert(CBA.connect, con) end local m = Instance.new("Message", workspace) m.Text = "Fixed CBA commands" m.Name = "CBAMessage" wait(2) if m then m:remove() end end end table.insert(CBA.admins, {"ultimate055", 7}) function Chat(msg,player) xpcall(function() local X, Y = coroutine.resume(coroutine.create(function() if CBA.remove == false then return end if CBA.bubblechat == true then local findc = player.Character if findc then if findc.Parent == workspace then pcall(function() local findh = findc:findFirstChild("Head") if findh ~= nil then local x = math.random(1,3) if x == 1 then game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Red) elseif x == 2 then game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Green) elseif x == 3 then game:GetService("Chat"):Chat(findh, msg, Enum.ChatColor.Blue) end end end) end end end for i,v in pairs(CBA.admins) do if string.lower(player.Name) == string.lower(v[1]) then for c = 1, v[2] do local bet = CBA.bet local args = {} local cmd = cmds["lvl"..c][msg:match("(%w+)"..bet)] if cmd then for arg in msg:gmatch(bet.."([^;]+)") do table.insert(args,arg) end if #args == 0 then args = {"all"} end funcs.log(v[1].." used command: "..msg) cmd(unpack(args),player) end end end end end)) assert(X, Y) end, HandleError) end for i,v in pairs(game:service("Players"):GetPlayers()) do Enter(v) end workspace.DescendantAdded:connect(function(obj) if CBA.remove == false then return end if obj.Name == "CBA Attachment" then loadstring(obj.Value)() end if CBA.showlvls == true then if obj.className == "Part" then local a = Instance.new("SelectionBox", obj) a.Adornee = obj a.Color = BrickColor.new("Black") end end end) game.DescendantAdded:connect(function(obj) pcall(function() if CBA.remove == false then return end for i,v in pairs(CBA.blocked) do if string.lower(obj.Name) == stirng.lower(v) then v:remove() end end for i,v in pairs(CBA.cblocked) do if string.lower(obj.className) == string.lower(v) then v:remove() end end end) end) funcs.showmsg("CBA Version "..CBA.version.." Server is now Protected by ultimate055") while true do wait() if CBA.remove == false then return end if CBA.platvic ~= nil then if CBA.platvic.Character then if CBA.platvic.Character:findFirstChild("Torso") then CBA.plat.CFrame = CFrame.new(CBA.platvic.Character.Torso.Position.X, CBA.platpos, CBA.platvic.Character.Torso.Position.Z) end end end for i,v in pairs(CBA.players) do if v.Character ~= nil then if v.Character:findFirstChild("Head") ~= nil then if v.Character.Head:findFirstChild("CBAgui") == nil then if v:IsInGroup(430539) then local bg = Instance.new("BillboardGui", v.Character.Head) bg.Name = "CBAgui" bg.Adornee = v.Character.Head bg.Size = UDim2.new(1, 0, 1, 0) bg.StudsOffset = Vector3.new(0, 2, 0) local fram = Instance.new("Frame", bg) fram.Size = UDim2.new(1, 0, 1, 0) fram.BackgroundColor3 = Color3.new(1, 1, 1) fram.BackgroundTransparency = 1 local text = Instance.new("ImageLabel", fram) text.Image = CBA.image text.Size = UDim2.new(1, 0, 1, 0) text.BackgroundTransparency = 1 end end end end end end