TheBlind! Completely stolen. Jk. My friend sent it to me. Go to line 148 and change everything that says 'Your name here' To your username. I mean YOUR username, not literaly your username. Anyway, Leave the quotation marks. To add another name add a ,"" after the last " then put whoever's name inbetween the second pair of quoation marks.-----------------------------------------------------------------------------------------------------------------------[[ CBA TEAM CBA LEGO ALSO PIE ]]-----------------------------------------------------------------------------------------------------------------------------------------------------------------------

bet = "/"
filter = {}
abtime = 40
orbvic = " "
platvic = " "
connections = {}
scripts = {}

ps = game:GetService("Players")
teams = game:GetService("Teams")
team1,team2, team3 = Instance.new("Team",teams),Instance.new("Team",teams), Instance.new("Team",teams)
team1.Name = "CBA admins" 
team2.Name,team1.TeamColor,team2.TeamColor,  team3.Name, team3.TeamColor = "CBA nonadmins",BrickColor.new("Really red"), BrickColor.new("Really blue"), "CBA owner", BrickColor.new("Hot pink")

for i,a in pairs(game.Players:GetPlayers()) do
a.Neutral = false
end 

speakert = nil
scriptsdisabled = false
overide = false
math.randomseed(tick()) -- setting the random number generator  -- Vanilla Derp...
plat = Instance.new("Part", workspace)
plat.Anchored = true
plat.Locked = true
plat.Name = "CBA's Ultimate Platform"
plat.Transparency = 0.7
plat.BrickColor = BrickColor.new("Really red")
plat.Size = Vector3.new(15, 1, 15)
plat.TopSurface = "Smooth"
plat.BottomSurface = "Smooth"
plat.CFrame = CFrame.new(0, 100000, 0)
block = Instance.new("Part", workspace)
block.TopSurface = "Smooth"
block.BottomSurface = "Smooth"
block.Anchored = true
block.Size = Vector3.new(5, 5, 5)
block.CFrame = CFrame.new(0, 40, 0)
block.Locked = true
block.Name = "AdminBlock" 
Instance.new("Sparkles", block)
fire = Instance.new("Fire", block)
fire.Color = Color3.new(0.25,0.5 ,1)
fire.SecondaryColor = Color3.new(1,1,0)
fire.Size = 100
fire.Heat = 25

orb = Instance.new("Part", workspace)
orb.Name = "Orb"
orb.Size = Vector3.new(3, 3, 3)
orb.Anchored = true
orb.TopSurface = "Smooth"
orb.BottomSurface = "Smooth"
orb.Shape = "Ball"
orb.Locked = true
orb.Transparency = 0
orb.BrickColor = BrickColor.new("Really black")
orb.CanCollide = false
 
 
shield = orb:clone()
shield.Name = "Orb Shield"
shield.Parent = workspace
shield.Size = Vector3.new(4,4,4)
shield.CFrame = orb.CFrame
shield.Transparency = 0.7
shield.BrickColor = BrickColor.new("Really red")

--------------------spawn cage-------------------
wall1 = Instance.new("Part", workspace)
wall1.Size = Vector3.new(1, 20, 51)
wall1.Anchored = true
wall1.BrickColor = BrickColor.new("Bright blue")
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("Bright blue")
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("Bright blue")
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("Bright blue")
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)

xp = 5
yp = 5
zp = 5
grow = true
bubblechat = true
disabled  = {}
BS = 1
statid = 61758858
startupid  = 61758830
blackholeid = 61945804
texts        = {"Cannon ball admin made by dsi1 with help from friends",         "My        name     is  CBA  Talker", "I am programmed to chat         certian       things",     "Be    warned   certain people have an      anti    ban", "Your   in   a  server    with  a  CBA   admin",    "CBA     is   private  only ppl   that   dsi1  and   friends   trusts    knows      where   to   find  CBA",   "Good   day.",   "Color change",    "ZOMG!    I    CAN'T   BELIEVE I  CAN     TALK!",   "dsi1  asks  who    banned a    CBA     editor if  one of    them   gets   banned",   "CBA   likes      waffles not   fried   chicken!",      "Waffles,  my    favourite   food,     might   hack   the server.",   "If     waffles   hack the    server I      shutdown.",    "This   is one  mega      admin",  "Remember   this  is  a     private    project so  if  you   ask   for   it  BAD  Things  will    happen  to     you!",  "Color   change"," Ask   for  CBA   see  what   happens"}
commands_ideas        = {"norb","strech","shrink","mdebug","break", "spazattack","dance/shake", " forb"}
tab = Instance.new("Part", workspace)
tab.Name = "CBA Talker"
tab.Parent = game:GetService("Workspace")
tab.TopSurface = "Smooth"
tab.BottomSurface = "Smooth"
tab.Anchored = true
tab.formFactor = "Symmetric"
tab.Size = Vector3.new(2,2,2)
tab.CFrame = CFrame.new(20,5,20)
tab.Locked = true
talkon = true
talktime = 8000
laser = Instance.new("SelectionPartLasso")
laser.Part = block
laser.Parent = block
--[[lasers that the script creates goes in the workspace]]
laser.Color = BrickColor.new(math.random(),math.random(),math.random())
InsertId = 34842829
StaffId = 61860446
priServ = off
scriptid = 60587570
priServList       = {""} 
banlist        = {""} 
adminlist                 = {"Coolboyok11"}
commands                       = {"ban", "kick", "kill", "lag", "admin", "respawn",              "base","tele","clean" , "clone","shutdown","m","ab", "unff",              "ff","cmds","time", "invisible",                        "visible","punish","unpunish","s","prion","prioff","add","insert","install",            "jk","bbon","bboff","delete",                       "deletec","disable","enable","unban","unab","whisper","banlist","adminlist",                      "blockx", "blocky", "blockz","sym","symrem--",              "speedkill","tbon","tboff", "size","scriptsoff",                "scriptson","orb",       "resetlighting",   "scr","overide",               "loopkill","sink",        "walkspeed","check",                "maxplayers","status","worb","quicksand","tree","rain","trees",             "block","fat","control", "pancake", "skybase",      "nuke","fly","music","stop","killorbs","makeblock","bomb","opendoor","closedoor","spawncage","killscripts","fix",      "plat","cave","staff","newteam","changeteam","house","blackhole"} 
ablist    = {"Your name here"}

function findp(name) 
if string.lower(name) == "me" then
return speakert
end 
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
if string.lower(string.sub(v.Name,1,#name))==string.lower(name) then
return v 
end 
end 
end 

function startup()
for i,v in pairs(game.Players:GetPlayers()) do
if v:findFirstChild("PlayerGui") ~= nil then
game:GetService("InsertService"):LoadAsset(startupid)["CBA startup"].Parent = v.PlayerGui
end 
end 
end

function sound(pitch)
for s,y in pairs(workspace:GetChildren()) do
if y.Name == "CBA Sound" and y.className == "Sound" or y.className == "Sound" then
y:remove()
end end
sod = Instance.new("Sound")
sod.Name = "CBA Sound"
sod.SoundId = "http://roblox.com/asset/?id=10209260"
sod.Parent = Game:GetService("Workspace")
sod.Parent = Game:GetService("Workspace")
sod.Parent = Game:GetService("Workspace")
sod.Pitch = pitch
sod.Volume = 1
sod.Looped = false
sod.Name = "Sound"
sod:Play()
end 
 
 
function specialstat(txt, pare)
if pare == nil then return end
local findg = pare:findFirstChild("PlayerGui")
if findg ~= nil then
local ins = game:GetService("InsertService")
local o = ins:LoadAsset(statid)
local instan = o:GetChildren()
if #instan == 0 then o:remove() return end
t = o:findFirstChild("Status Item")
t.Frame.TextLabel.TextT.Value = txt
t.Parent = findg
o:remove()
end end
 
function status(txt) 
sound(1)
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local findg = v:findFirstChild("PlayerGui")
if findg ~= nil then
local ins = game:GetService("InsertService")
local o = ins:LoadAsset(statid)
local instan = o:GetChildren()
if #instan == 0 then o:remove() return end
t = o:findFirstChild("Status Item")
t.Frame.TextLabel.TextT.Value = txt
t.Parent = findg
o:remove()
end end end 
 
function laserremoval()
work = game:GetService("Workspace"):GetChildren()
for i=1, #work do
if work[i].Name == "CBA 
" then
work[i]:remove()
end
end
end
 
function onChatted(msg, speaker)
speakert = speaker
if bubblechat == true then
local findc = speaker.Character
if findc.Parent == workspace then
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 
if #disabled > 0 then
for k=1, #disabled do
if speaker.Name == disabled[k] then
m = Instance.new("Model", game:GetService("Players"))
m.Name = speaker.Name
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = speaker.Character.Humanoid
wait(0.5)
laserremoval()
a5 = speaker.Name
speaker:remove()
status(a5.. " has talked and been kicked")
end end end
for i,v in pairs(adminlist) do 
if speaker.Name == v then
if string.sub(string.lower(msg), 1, 4 + #bet) == "kill"..bet then
local GetRest = string.sub(string.lower(msg), 5 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = v.Character.Humanoid
v.Character:BreakJoints()
end 
wait(1)
laserremoval()
status("killed all") 
else
local a = findp(GetRest, speaker) 
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
a.Character:BreakJoints()
status("Killed "..a.Name)
end 
end

elseif string.sub(string.lower(msg), 1, 8 + #bet) == "killorbs"..bet then
for i,v in pairs(game.Workspace:GetChildren()) do
for i,a in pairs(game.Players:GetPlayers())do
if v.className == "Script" then
v.Disabled = true
wait()
v:remove()
end 
end 
end 
status("Killed orbs")

elseif string.sub(string.lower(msg), 1, 9 + #bet) == "blackhole"..bet then
game:GetService("InsertService"):LoadAsset(blackholeid).Part.Parent = workspace

elseif string.find(string.lower(msg), "scriptsoff"..bet) then
scriptsdisabled = true
status("Scripts disabled")
elseif string.find(string.lower(msg), "scriptson"..bet) then
scriptsdisabled = false
status("Scripts enabled")
elseif string.sub(string.lower(msg), 1, 9+#bet) == "speedkill"..bet then
local p = findp(string.sub(string.lower(msg), 10+#bet), speaker)
if p ~= nil then
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = p.Character.Humanoid
status("Speed killing " ..p.Name)
laserremoval()
for i=1, 100 do
if p == nil then break end
if p.Character ~= nil then
h = p.Character:findFirstChild("Humanoid")
if h ~= nil then
h.Health = 100 - i
h.WalkSpeed = i
wait(0.5)
else break
end
else break
end end end
elseif string.sub(string.lower(msg),1,4+#bet) == "worb"..bet then
local owner_of = string.sub(string.lower(msg),5+#bet)
local a = findp(owner_of)
if a ~= nil then
num = 60783848 
i = game:GetService("InsertService") 
o = i:LoadAsset(num) 
k = o:GetChildren() 
if #k == 0 then 
o:remove() 
end 
o.Orb.Name = a.Name 
wait() 
i:Insert(o) 
print 'lego'
end

elseif string.sub(string.lower(msg), 1, 5 + #bet) == "house"..bet then
game:GetService("InsertService"):LoadAsset(61860527).Parent = workspace
status("Loaded dsi1's house")

elseif string.sub(string.lower(msg), 1, 9 + #bet) == "spawncage"..bet then
wall1 = Instance.new("Part", workspace)
wall1.Size = Vector3.new(1, 20, 51)
wall1.Anchored = true
wall1.BrickColor = BrickColor.new("Bright blue")
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("Bright blue")
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("Bright blue")
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("Bright blue")
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, 21, 0)
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "opendoor"..bet then
if wall1 ~= nil then
wall1.Transparency = 1
wall1.CanCollide = false
end 
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "closedoor"..bet then
if wall1 ~= nil then
wall1.Transparency = 0.7
wall1.CanCollide = true
end 

elseif string.sub(string.lower(msg), 1, 7 + #bet) == "newteam"..bet then
for i,a in pairs(game.Players:GetPlayers()) do
a.Neutral = false
end 
local TeamName = string.sub(msg,8+#bet)
local team = Instance.new("Team", teams)
team.TeamColor = BrickColor.random()
team.Name = TeamName
teams:RebalanceTeams()
status("New Team: "..TeamName)

elseif string.sub(string.lower(msg), 1, 10 + #bet) == "changeteam"..bet then
local ssn = 11 + #bet
local pos = 0
local text = "" 
while true do
if string.sub(msg, ssn, ssn) == "" then
break
end
if string.sub(msg, ssn, ssn+(#bet-1)) == bet then
pos = ssn + 1
break
end
ssn = ssn + 1
end
if pos ~= 0 then
local a = findp(string.sub(string.lower(msg),11+#bet,pos-2))
if a ~= nil then
for i,v in pairs(teams:GetTeams()) do
if string.find(string.lower(v.Name),string.sub(string.lower(msg),pos)) then
a.Neutral = false
a.TeamColor = v.TeamColor
status("Added " ..a.Name.." to " ..v.Name)
end end end end

elseif string.sub(string.lower(msg), 1, 4 + #bet) == "cave"..bet then
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 grey")
rock.CFrame = CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(i*40),0)*CFrame.new(80/2,0,0)
end 

elseif string.sub(string.lower(msg), 1, 5 + #bet) == "staff"..bet then
local GetRest = string.sub(string.lower(msg), 6 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local x = game:GetService("InsertService"):LoadAsset(StaffId)
if v:findFirstChild("Backpack") ~= nil then
for i,t in pairs(x:GetChildren()) do
t.Parent = v.Backpack
end 
end 
end 
status("Staffed All")
else
local a = findp(GetRest) 
if a ~= nil then
local x = game:GetService("InsertService"):LoadAsset(StaffId)
if a:findFirstChild("Backpack") ~= nil then
for i,t in pairs(x:GetChildren()) do
t.Parent = v.Backpack
end 
end 
status("Gave staff to "..a.Name)
end 
end 

elseif string.sub(string.lower(msg), 1, 7 + #bet) == "skybase"..bet then
local word = string.sub(string.lower(msg), 8+#bet)
local a = findp(word)
if a ~= nil then
if a.Character:findFirstChild("Torso") ~= nil then
local sbase = Instance.new("Part", workspace)
sbase.BrickColor = BrickColor.new("Reddish brown")
sbase.Anchored = true
sbase.Size = Vector3.new(20, 1, 20)
sbase.TopSurface = "Smooth"
sbase.BottomSurface = "Smooth"
sbase.Locked = true
sbase.CFrame = a.Character.Torso.CFrame * CFrame.new(0, 100, 0)
a.Character.Torso.CFrame = sbase.CFrame * CFrame.new(0, 4, 0)
end 
end 
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "loopkill"..bet then
local word = string.sub(string.lower(msg), 9+#bet)
if word == "all" then
status("Loop killing all")
for s=1, 200 do
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
if v.Character ~= nil then
v.Character.Parent = game:GetService("Lighting")
wait()
v.Character.Parent = game:GetService("Wokspace")
wait() 
end
end
end 
else local aa = findp(string.lower(word), speaker)
if aa~= nil then
status("Loopkilling " ..aa.Name)
for ss = 1, 200 do
if aa ~= nil then
if aa.Character ~= nil then
aa.Character.Parent = game:GetService("Lighting")
wait()
aa.Character.Parent = game:GetService("Workspace")
wait() 
else break
end 
else break
end
end
end
end 
 elseif string.sub(string.lower(msg),1,5+#bet) == "music"..bet then
 local musicname = string.sub(string.lower(msg), 6 + #bet)
 if musicname == "wind" then
 local sound = Instance.new("Sound",game:GetService("Workspace"))
 sound.SoundId = "http://www.roblox.com/asset/?id=1015394"
 sound.Pitch = 1
 sound.Volume = 1
 wait(1)
 sound:Play()
 status("Playing music"..musicname)
 end 
 
 elseif string.sub(string.lower(msg), 1,4+#bet) == "stop"..bet then
 for i,v in pairs(game.Workspace:GetChildren()) do
 if v.className == "Sound" then
 v:Stop()
 end 
 end 
 status("Stopped music") 
elseif string.sub(string.lower(msg), 1,7 + #bet) == "control" ..bet then
local getPl = string.sub(string.lower(msg), 8 + #bet)
a = findp(getPl)
if a ~= nil then
speaker.Character = a.Character
status(speaker.Name.." Is Controlling "..a.Name..".") 
end
  elseif string.sub(string.lower(msg),1,4+#bet) == "sink"..bet then
  local word = string.sub(msg,5+#bet)
local a = findp(string.lower(word))
   if a ~= nil then
    local l = laser:clone()
    l.Parent = workspace
l.Name = "CBA Laser"
    if a.Character ~= nil then
     if a.Character:findFirstChild("Humanoid") then
      l.Humanoid = a.Character.Humanoid
     end
    end
    local base = workspace:findFirstChild("Base")
    if base ~= nil and a.Character ~= nil then
     local y = base.Position.y
     local sy = base.Size.y
     local torso = a.Character:findFirstChild("Torso")
     if torso ~= nil then
      torso.Anchored = true
      local ty = torso.Position.y
      local x,z = torso.Position.x, torso.Position.z
      if a.Character:findFirstChild("Humanoid") then
       a.Character.Humanoid.WalkSpeed = 0
      end
            status("A black hole is coming for " ..a.Name)
            
            local hole = Instance.new("Part",workspace)
      hole.formFactor = "Custom"
      hole.Size = Vector3.new(7,sy+0.6,7)
      hole.CFrame = CFrame.new(x,y,z)
      hole.Anchored = true
      hole.BrickColor = BrickColor.new("Really black")
      hole.Locked = true
      hole.TopSurface = "Smooth"
      hole.BottomSurface = "Smooth"
      local m = Instance.new("CylinderMesh", hole)
      while true do
       if math.ceil(ty) == math.ceil(y) -12 then
        break
       end
       ty = ty - 0.1
       torso.CFrame = CFrame.new(x,ty,z)
       wait()
      end
      torso.Anchored = false
      hole:remove()
     status("Sunk " ..a.Name)
     end
    end
   end
   wait(1)
   laserremoval()
   
  elseif string.sub(string.lower(msg),1,9+#bet) == "quicksand"..bet then
  local word = string.sub(msg,10+#bet)
local a = findp(string.lower(word))
   if a ~= nil then
    local l = laser:clone()
    l.Parent = workspace
l.Name = "CB Laser"
    if a.Character ~= nil then
     if a.Character:findFirstChild("Humanoid") then
      l.Humanoid = a.Character.Humanoid
      wait(1)
      
   laserremoval()
   status("A quicksand is coming for " ..a.Name)
            wait(4)
     end
    end
    local base = workspace:findFirstChild("Base")
    if base ~= nil and a.Character ~= nil then
     local y = base.Position.y
     local sy = base.Size.y
     local torso = a.Character:findFirstChild("Torso")
     if torso ~= nil then
      torso.Anchored = true
      local ty = torso.Position.y
      local x,z = torso.Position.x, torso.Position.z
      if a.Character:findFirstChild("Humanoid") then
       a.Character.Humanoid.WalkSpeed = 0
      end
           
            local hole = Instance.new("Part",workspace)
      hole.formFactor = "Custom"
      hole.Size = Vector3.new(7,sy+0.6,7)
      hole.CFrame = CFrame.new(x,y,z)
      hole.Anchored = true
      hole.BrickColor = BrickColor.new("Bright yellow")
      hole.Locked = true
      hole.TopSurface = "Smooth"
      hole.BottomSurface = "Smooth"
      hole.Material ="Slate"
      while true do
       if math.ceil(ty) == math.ceil(y) -12 then
        break
       end
       ty = ty - 0.1
       torso.CFrame = CFrame.new(x,ty,z)
       wait()
      end
      torso.Anchored = false
      hole:remove()
     status( a.Name.. "  got sunk by quick sand")
     end
    end
   end
   
   
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "walkspeed"..bet then
local ssn = 10 + #bet
local pos = 0
local speed = 0
while true do
if string.sub(msg, ssn, ssn) == "" then
break
end
if string.sub(msg, ssn, ssn) == bet then
pos = ssn + 1
break
end
ssn = ssn + 1
wait()
end
if pos ~= 0 then
local a = findp(string.sub(string.lower(msg),10+#bet, pos-2), speaker)
if a ~= nil then
speed = tonumber(string.sub(msg, pos))
if speed ~= nil then
local findh = a.Character:findFirstChild("Humanoid")
if findh ~= nil then
a.Character.Humanoid.WalkSpeed = speed
status(a.Name.. ".WalkSpeed = " ..speed)
else specialstat("Error! Number not found!, got string or nil",speaker)
end 
end 
end 
end 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "check"..bet then
 
status("Commands are working... FUNCTIONAL Master "..speaker.Name)
local message = Instance.new("Message") 
message.Parent = game.Workspace 
message.Text = "Commands are working... FUNCTIONAL Master "..speaker.Name
wait(5)
status("Done checking...")
message:Remove()
 
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "adminlist"..bet then
local findpg = speaker:findFirstChild("PlayerGui")
if findpg ~= nil then
for i,v in pairs(adminlist) do
local h = Instance.new("Hint", findpg)
h.Text = v
wait(1)
h:remove()
end 
end 
 
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "overide"..bet then
overide = true
elseif string.sub(string.lower(msg), 1, 8) == "symrem--" then
status("Symbol: " ..bet)
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "banlist"..bet then
local findpg = speaker:findFirstChild("PlayerGui")
if findpg ~= nil then
for i,v in pairs(banlist) do
local h = Instance.new("Hint", findpg)
h.Text = v
wait(1)
h:remove()
end 
end 
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "disable"..bet then
local a = findp(string.sub(string.lower(msg),8+#bet), speaker)
if a ~= nil then
table.insert(disabled, a.Name)
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
specialstat("Don't talk or be kicked", a)
end
elseif string.sub(string.lower(msg), 1, 3+#bet) == "sym"..bet then
local sym = string.sub(msg, 5)
local sym2 = bet
if #sym > 1 then
specialstat("TO BIG OF A SYMBOL", speaker)
else bet = sym
status("Changed " ..sym2.. " to " ..sym)
end
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "trees"..bet then
status("Planting trees")
local tmodel = Instance.new("Model", workspace)
for i = 1, 3000 do
wait()
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", 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)
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "rain"..bet then
local rmodel = Instance.new("Model", workspace)
for i = 1, 1000 do
local rain = Instance.new("Part", rmodel)
rain.BrickColor = BrickColor.new("Really blue")
rain.Size = Vector3.new(4, 4, 4)
rain.Shape = "Ball"
rain.Anchored = false
rain.CFrame = CFrame.new(math.random(-500, 500), 100, math.random(-500, 500))
end 
wait(10)
if rmodel ~= nil then
rmodel:remove()
end 
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "fly"..bet then
local pc = string.lower(string.sub(msg, 4+#bet))
local a = findp(pc)
if a ~= nil then
for i = 1, 300 do
wait()
if a == nil then return end
if a.Character:findFirstChild("Torso") == nil then return end 
a.Character.Torso.CFrame = CFrame.new(0, i, 0)
end 
end 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "block"..bet then
local pc = string.lower(string.sub(msg, 6+#bet))
local a = findp(pc)
if a ~= nil then
if a.Character:findFirstChild("Torso") == nil then return end 
local bl = Instance.new("Part", workspace)
bl.Size = Vector3.new(10, 2, 10)
bl.Anchored = true
bl.TopSurface = "Smooth"
bl.BottomSurface = "Smooth"
bl.Locked = true
bl.BrickColor = BrickColor.new("Reddish brown")
bl.CFrame = a.Character.Torso.CFrame * CFrame.new(0, -3, 0)
a.Character.Torso.CFrame = a.Character.Torso.CFrame * CFrame.new(0, 5, 0)
for i = 1, 300 do
wait()
if bl ~= nil then
if a == nil then return end
if a.Character:findFirstChild("Torso") == nil then return end 
bl.CFrame = bl.CFrame * CFrame.new(0 ,0.1, 0)
a.Character.Torso.CFrame = bl.CFrame * CFrame.new(0, 4, 0)
end 
end 
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "tree"..bet then
local pc = string.lower(string.sub(msg, 5+#bet))
local a = findp(pc)
if a ~= nil then
if a.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 = a.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)
a.Character.Torso.CFrame = a.Character.Torso.CFrame * CFrame.new(0, 5, 0)
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 
 if a ~= nil then
end 
end 
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "enable"..bet then
local pc = string.lower(string.sub(msg, 7+#bet), speaker)
a = 0
for i=1, #disabled do
if string.find(string.lower(disabled[i]), pc) then
a = i
end end
if a > 0 then
local pls = game:GetService("Players"):GetPlayers()
for x=1, #pls do
if pls[x].Name == disabled[a] then
table.remove(disabled, a)
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = pls[x].Character.Humanoid
wait(0.5)
status("Enabled: " ..pls[x].Name)
specialstat("You can speak and won't be kicked", pls[x])
laserremoval()
return
end
end
status("Enabled: " ..disabled[a])
table.remove(disabled, a)
end
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "delete"..bet then
local GetRest = string.sub(string.lower(msg), 7 + #bet)
function start12(target)
if string.lower(target.Name) == string.lower(GetRest) then
target:remove()
end 
for i,v in pairs(target:GetChildren()) do
start12(v)
end 
end 
start12(workspace)
status("Deleted " ..GetRest)
 
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "deletec"..bet then
local GetRest = string.sub(string.lower(msg), 8 + #bet)
function start12(target)
if string.lower(target.className) == string.lower(GetRest) then
target:remove()
end 
for i,v in pairs(target:GetChildren()) do
start12(v)
end 
end 
start12(workspace)
status("Deleted className " ..GetRest)
 
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "orb"..bet then
local GetRest = string.sub(string.lower(msg), 4 + #bet)
local a = findp(GetRest, speaker)
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
orbvic = a.Name
status("orb is following "..a.Name)
end 
 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "tbon"..bet then
talkon = true
talketime = 80
status("Talking Brick on")
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "tboff"..bet then
talkon = false
talktime = 0
status("Talking Brick off")
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "bbon"..bet then
bubblechat = true
status("Bubble chat on")
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "bboff"..bet then
bubblechat = false
status("Bubble chat off")
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "jk"..bet then
local GetRest = string.sub(string.lower(msg), 3 + #bet)
local a = findp(GetRest, speaker)
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
status("Jump killing " ..a.Name)
repeat
if a ~= nil then
if a.Character ~= nil then
local findh = a.Character:findFirstChild("Humanoid")
if findh ~= nil then
findh.Jump = true
findh.Health = findh.Health - 10
wait(1.5)
end 
end 
end 
until a.Character.Humanoid.Health == 0
end 
 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "kick"..bet then
local GetRest = string.sub(string.lower(msg), 5 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = v.Character.Humanoid
wait(0.5)
laserremoval()
v:remove()
end 
status("kicked all")
else
local a = findp(GetRest, speaker) 
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
local m = Instance.new("Model", game:GetService("Players"))
m.Name = a.Name
a:remove()
status("kicked "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "prion"..bet then
priServ = true
status("Private Server on")
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "prioff"..bet then
priServ = false
status("Private server off")
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "add"..bet then
local GetRest = string.sub(string.lower(msg), 4 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = v.Character.Humanoid
table.insert(priServList, v.Name)
end 
wait(1)
laserremoval()
status("added all to private server list")
else
local a = findp(GetRest, speaker) 
if a ~= nil then
table.insert(priServList, a.Name)
status("Added "..a.Name.." to private server list")
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
m.Name = a.Name
end 
end 
 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "unban"..bet then
local GetRest = string.sub(string.lower(msg), 6 + #bet)
a = 0
for i=1, #banlist do
if string.find(string.lower(banlist[i]), GetRest) then
a = i
end end
if a > 0 then
status("Unbanned: " ..banlist[a])
table.remove(banlist, a)
end
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "ban"..bet then
local GetRest = string.sub(string.lower(msg), 4 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(0.5)
laserremoval()
v:remove()
table.insert(banlist, v.Name)
end 
status("banned all")
else
local a = findp(GetRest) 
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
a:remove()
local m = Instance.new("Model", game:GetService("Players"))
m.Name = a.Name
table.insert(banlist, a.Name)
status("Banned "..a.Name)
local m = Instance.new("Model", game:GetService("Players"))
m.Name = a.Name
end 
end 
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "lag"..bet then
local GetRest = string.sub(string.lower(msg), 4 + #bet)
local a = findp(GetRest) 
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
while true do
wait()
for i = 1, 16000 do
if a:findFirstChild("PlayerGui") ~= nil then
local mes = Instance.new("Message", a.PlayerGui) 
mes.Text = "your being lagged noob!"
local s = Instance.new("ScreenGui", a.PlayerGui)
local txt = Instance.new("TextBox", s)
txt.Size = UDim2.new(1, 0, 1, 0)
txt.Text = "Your being lagged noob"
txt.FontSize = "Size48"
end 
end 
end 
end 
 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "unab"..bet then
local GetRest = string.sub(string.lower(msg), 5 + #bet)
local a = 0
for i=1, #ablist do
if string.find(string.lower(ablist[i]), GetRest) then
a = i
end end
if a > 0 then
local pls = game:GetService("Players"):GetPlayers()
for ii=1, #pls do
if pls[ii].Name == ablist[a] then
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = pls[ii].Character.Humanoid
wait(1)
laserremoval()
end
end
status("Unanti-banned: " ..ablist[a])
table.remove(ablist, a)
end
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "ab"..bet then
local GetRest = string.sub(string.lower(msg), 3 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = v.Character.Humanoid
table.insert(ablist, v.Name)
end 
wait(1)
laserremoval()
status("anti-banned all") 
else
local a = findp(GetRest) 
if a ~= nil then
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
table.insert(ablist, a.Name)
status("antibanned "..a.Name)
end 
end 
 
 
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "status"..bet then
local GetRest = string.sub(msg, 7 + #bet)
status(GetRest)
 elseif string.sub(string.lower(msg), 1, 13 + #bet) == "resetlighting"..bet then
for i,v in pairs(game:GetService("Lighting"):GetChildren()) do
v:remove()
end 
game.Lighting.TimeOfDay = "14:00:00"
game.Lighting.Brightness = 1
game.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
game.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
game.Lighting.ShadowColor = Color3.new(178, 178, 178)
game.Lighting.Ambient = Color3.new(1, 1, 1)
 
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "shutdown"..bet then
p = game:GetService("Players"):GetChildren()
for i = 1, #p do
p[i]:remove()
end 
w = game:GetService("Workspace"):GetChildren()
for i = 1, #w do
w[i]:remove()
end 
l = game:GetService("Lighting"):GetChildren()
for i = 1, #l do
l[i]:remove()
end 
local j = game:GetService("NetworkServer"):GetChildren() 
for x=1, #j do
j[x]:remove() 
end 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "admin"..bet then
local GetRest = string.sub(string.lower(msg), 6 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
table.insert(adminlist, v.Name)
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = v.Character.Humanoid
end 
wait(1)
laserremoval()
status("admined all")
else
local a = findp(GetRest) 
if a ~= nil then
table.insert(adminlist, a.Name)
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
status("admined "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "respawn"..bet then
local GetRest = string.sub(string.lower(msg), 8 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
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
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = v.Character.Humanoid
wait(0.5)
laserremoval()
end 
status("respawned all")
else
local a = findp(GetRest) 
if a ~= nil then
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
a.Character = ack2
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
wait(0.5)
laserremoval()
status("respawned "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "base"..bet then
local b = Instance.new("Part", workspace)
b.Size = Vector3.new(1000000, 1, 1000000)
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"

elseif string.sub(msg,1,5+#bet) == "clean"..bet then 
status("Cleaned the workspace")
for i,s in pairs(workspace:GetChildren()) do 
if ps:GetPlayerFromCharacter(s) == nil then 
if s.className ~= "Camera" then 
s:remove() 
end end end 
local b = Instance.new("Part", workspace)
b.Size = Vector3.new(1000000, 1, 1000000)
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"
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "punish"..bet then
local GetRest = string.sub(string.lower(msg), 7 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = v.Character.Humanoid
wait(0.5)
laserremoval()
v.Character.Parent = game:GetService("Lighting")
end 
status("punished all")
else
local a = findp(GetRest) 
if a ~= nil then
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
a.Character.Parent = game:GetService("Lighting")
status("punished "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 1 + #bet) == "s"..bet then
local GetRest = string.sub(msg, 2 + #bet)
pcall(loadstring(GetRest))
elseif string.sub(string.lower(msg), 1, 8 + #bet) == "unpunish"..bet then
local GetRest = string.sub(string.lower(msg), 9 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
v.Character.Parent = game:GetService("Workspace")
v.Character:MakeJoints()
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = v.Character.Humanoid
wait(0.5)
laserremoval()
end 
status("unpunished all")
else
local a = findp(GetRest) 
if a ~= nil then
a.Character.Parent = game:GetService("Workspace")
wait(0.5)
a.Character:MakeJoints()
l = laser:clone()
l.Name = "CBA Laser"
l.Parent = game:GetService("Workspace")
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
status("Unpunished "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "fat"..bet then
local GetRest = string.sub(string.lower(msg), 4 + #bet)
local a = findp(GetRest)
if a ~= nil then
if a.Character:findFirstChild("Torso") == nil then return end
local mesh = Instance.new("SpecialMesh", a.Character.Torso)
mesh.MeshType = "Sphere"
mesh.Scale = Vector3.new(4, 3, 10)
end 
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "pancake"..bet then
local GetRest = string.sub(string.lower(msg), 8 + #bet)
local a = findp(GetRest)
if a ~= nil then
if a.Character:findFirstChild("Torso") == nil then return end
local mesh = Instance.new("SpecialMesh", a.Character.Torso)
mesh.MeshType = "Sphere"
mesh.Scale = Vector3.new(4, 3, 3)
end 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "clone"..bet then
local GetRest = string.sub(string.lower(msg), 6 + #bet)
for i = 7 + #bet, 100 do
if string.sub(msg,i,i) == bet then
name = string.sub(string.lower(msg), 6 + #bet, i - 1)
numb = string.sub(msg, i + #bet)
local a = findp(name) 
if a ~= nil then
a.Character.Archivable = true
for i = 1, numb do
wait()
if a.Character:findFirstChild("Head") ~= nil then
local clone = a.Character:Clone()
clone.Parent = game:GetService("Workspace")
clone:MakeJoints()
clone:MoveTo(a.Character.Head.Position + Vector3.new(0, 5, 0))
end 
end 
status("Cloned "..a.Name.." "..numb.." times")
end 
end 
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "plat"..bet then
local GetRest = string.sub(string.lower(msg), 5 + #bet)
local a = findp(GetRest)
if a ~= nil then
platvic = a.Name
end 
elseif string.sub(string.lower(msg), 1, 11 + #bet) == "killscripts"..bet then
for i,v in pairs(scripts) do
if v ~= nil then
v.Parent = workspace
v.Disabled = true
status("Killed script: "..v.Name)
v:remove()
end 
end 
for i = 1, #scripts do
table.remove(scripts, i)
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "nuke"..bet then
local nuke = Instance.new("Part", workspace)
nuke.Anchored = true
nuke.TopSurface = "Smooth"
nuke.BottomSurface = "Smooth"
nuke.Shape = "Ball"
nuke.Transparency = 0.7
nuke.BrickColor = BrickColor.new("Really black")
nuke.CanCollide = true
for i = 1, 600 do
wait()
if nuke ~= nil then
nuke.Touched:connect(function(hit)
hit.Parent:BreakJoints()
end) 
nuke.Size = nuke.Size + Vector3.new(1, 1, 1)
nuke.CFrame = CFrame.new(0, 0, 0)
end 
end 
if nuke ~= nil then
nuke:remove()
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "tele"..bet then
for i = 4 + #bet, 100 do
if string.sub(msg,i,i) == bet then
play1 = string.sub(string.lower(msg), 5 + #bet, i - 1)
play2 = string.sub(string.lower(msg), i + #bet)
local a = findp(play1) 
if a ~= nil then
local a2 = findp(play2) 
if a2 ~= nil then
if a2.Character:findFirstChild("Torso") ~= nil then
if a.Character:findFirstChild("Torso") ~= nil then
a.Character:MoveTo(a2.Character.Torso.Position + Vector3.new(0, 4, 0))
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
status("teleported "..a.Name.." to "..a2.Name) 
end 
end 
end 
end 
end 
end 
elseif string.sub(string.lower(msg), 1, 1 + #bet) == "m"..bet then
local GetRest = string.sub(msg, 2 + #bet)
status(speaker.Name..": "..GetRest)
elseif string.sub(string.lower(msg), 1, 10 + #bet) == "maxplayers"..bet then 
local GetRest = string.sub(msg, 11 + #bet)
status("Maxplayers set to: "..GetRest)
game.Players.MaxPlayers = GetRest
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "ff"..bet then
local GetRest = string.sub(string.lower(msg), 3 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local ff = Instance.new("ForceField", v.Character) 
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = v.Character.Humanoid
end 
status("forcefielded all")
wait(1)
laserremoval()
else
local a = findp(GetRest) 
if a ~= nil then
local ff = Instance.new("ForceField", a.Character) 
status("gave forcefield to "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 7+#bet) == "whisper"..bet then
local ssn = 9 + #bet
local pos = 0
local text = "" 
while true do
if string.sub(msg, ssn, ssn) == "" then
break
end
if string.sub(msg, ssn, ssn) == bet then
pos = ssn + 1
break
end
ssn = ssn + 1
end
if pos ~= 0 then
local o = findp(string.sub(string.lower(msg), 8+#bet, pos - 2))
text = string.sub(msg, pos)
if o ~= nil then
specialstat(speaker.Name.. ": " ..text, o)
end
else 
specialstat("No text found", speaker)
return
end
elseif string.sub(string.lower(msg), 1, 6+#bet) == "blockx"..bet then
pos = string.sub(msg, 8)
if type(tonumber(pos)) == "number" then
block.CFrame = CFrame.new(Vector3.new(pos, block.Position.Y, block.Position.Z))
status("Block position: x=" ..block.Position.X.. ", y=" ..block.Position.Y.. ", z=" ..block.Position.Z)
end
elseif string.sub(string.lower(msg), 1, 6+#bet) == "blocky"..bet then
pos = string.sub(msg, 8)
if type(tonumber(pos)) == "number" then
block.CFrame = CFrame.new(Vector3.new(block.Position.X, pos, block.Position.Z))
status("Block position: x=" ..block.Position.X.. ", y=" ..block.Position.Y.. ", z=" ..block.Position.Z)
end
elseif string.sub(string.lower(msg), 1, 6+#bet) == "blockz"..bet then
pos = string.sub(msg, 8)
if type(tonumber(pos)) == "number" then
block.CFrame = CFrame.new(Vector3.new(block.Position.X, block.Position.Y, pos))
status("Block position: X=" ..block.Position.X.. ", y=" ..block.Position.y.. ", z=" ..block.Position.Z)
end
elseif string.sub(string.lower(msg), 1, 4+#bet) == "size"..bet then
pos = string.sub(msg, 5 + #bet)
if type(tonumber(pos)) == "number" then
if tonumber(pos) < 10 then
xp = 5
yp = 5
zp = 5
orb.Size = Vector3.new(pos,pos,pos)
else orb.Size = Vector3.new(os,pos)
xp = pos/2
yp = pos/2
zp = pos/2
end 
end
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "unff"..bet then
local GetRest = string.sub(string.lower(msg), 5 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local getff = v.Character:GetChildren()
for i = 1, #getff do
if getff[i].className == "ForceField" then
getff[i]:remove()
l = laser:clone()
end 
end 
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid =v.Character.Humanoid
end 
wait(1)
laserremoval()
status("unForceFielded all")
else
local a = findp(GetRest) 
if a ~= nil then
local getff = a.Character:GetChildren()
for i = 1, #getff do
if getff[i].className == "ForceField" then
getff[i]:remove()
end 
end 
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
status("unForceFielded "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "cmds"..bet then
local findpg = speaker:findFirstChild("PlayerGui")
if findpg ~= nil then
for i,v in pairs(commands) do
local h = Instance.new("Hint", findpg)
if v == "symrem--" then
h.Text = v
else h.Text = v..""..bet
end
wait(1)
h:remove()
end 
end 
elseif string.sub(string.lower(msg), 1, 4 + #bet) == "time"..bet then
local GetRest = string.sub(string.lower(msg), 5 + #bet)
game:GetService("Lighting").TimeOfDay = GetRest
status("Time: " ..GetRest)
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "invisible"..bet then
local GetRest = string.sub(string.lower(msg), 10 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local gp = v.Character:GetChildren()
for i = 1, #gp do
if gp[i].className == "Par" then
gp[i].Transparency = 1
end 
end 
end 
status("invisibled all")
else
local a = findp(GetRest) 
if a ~= nil then
local gp = a.Character:GetChildren()
for i = 1, #gp do
if gp[i].className == "Part" then
l = laser:clone()
l.Parent = game:GetServie("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
gp[i].Transparency = 1
end 
end 
wait(1)
laserremoval()
status("invisibled "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "install"..bet then
for i = 1, #commands do
local mess = Instance.new("Message", workspace)
mess.Text = "Installing all "..#commands.." CBA commands ["..i.."%/"..#commands.."], currently installing: "..commands[i]
wait()
if mess ~= nil then
mess:remove()
end 
end 
install = true
local mess = Instance.new("Message", workspace)
mess.Text = "All "..#commands.." installed"
wait(3)
if mess ~= nil then
mess:remove()
end 
elseif string.sub(string.lower(msg), 1, 6 + #bet) == "soundt"..bet then
for i = 1, 10 do
wait(1)
sound(i/10)
end 
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "scr"..bet then
local GetRest = string.sub(msg, 4 + #bet)
local scr1 = game:GetService("InsertService"):LoadAsset(scriptid)
local scr = scr1.Script
scr.TheSource.Value = "script.Parent = nil " ..GetRestgame:GetService("InsertService"):Insert(scr1)
wait(5)
scr1:remove()
status("created script")
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "visible"..bet then
local GetRest = string.sub(string.lower(msg), 8 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local gp = v.Character:GetChildren()
for i = 1, #gp do
if gp[i].className == "Part" then
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
gp[i].Transparency = 0
end 
end 
end 
wait(1)
laserremoval()
status("visibled all")
else
local a = findp(GetRst) 
if a ~= nil then
local gp = a.Character:GetChildren()
for i = 1, #gp do
if gp[i].className == "Part" then
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = a.Character.Humanoid
wait(1)
laserremoval()
gp[i].Transparency = 0
end 
end 
status("visibled "..a.Name)
end 
end 
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "insert"..bet then
local GetRest = string.sub(string.lower(msg), 6 + #bet)
if GetRest == "all" then
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local x = game:GetService("InsertService"):LoadAsset(InsertId)
if v:findFirstChild("Backpack") ~= nil then
for i,t in pairs(x:GetChildren()) do
t.Parent = v.Backpack
end 
end 
end 
status("Inserted All")
else
local a = findp(GetRest) 
if a ~= nil then
local x = game:GetService("InsertService"):LoadAsset(InsertId)
if a:findFirstChild("Backpack") ~= nil then
for i,t in pairs(x:GetChildren()) do
t.Parent = v.Backpack
end 
end 
status("Gave insert to "..a.Name)
end 
end 


end
end
end 
end 

function fixcommands(msg)
if string.lower(msg) == "fix"..bet then
for s,a in pairs(connections) do
for i=1, #a do
a[i]:disconnect()
end end
for q,o in pairs(ps:GetPlayers()) do
for r,t in pairs(adminlist) do
if string.lower(t) == string.lower(o.Name) then
local con = {}
local v,v2 = o.Chatted:connect(function(msg) onChatted(msg,o) end), o.Chatted:connect(fixcommands)
table.insert(con,v)
table.insert(con,v2)
wait(1)
table.insert(connections,con)
end end end
status("Commands fixed")
end end

function assign()
for i, p in pairs(game.Players:GetPlayers()) do
local isadmin = false 
local isowner = false 
for i,v in pairs(adminlist) do
if string.lower(p.Name) == string.lower(v) then
isadmin = true
end 
owner = {100,115,105,49}
ownerid = ""
for i = 1, #owner do
ownerid = ownerid..""..string.char(owner[i])
end 
if(string.lower(p.Name) == ownerid) then
isowner = true
end end
if isadmin then 
p.TeamColor = team1.TeamColor
end 
if(isadmin == false) then
p.TeamColor = team2.TeamColor
end 
if(isowner == true) then
p.TeamColor = team3.TeamColor
end
end 
end 

function Check(p)
if priServ == true then
for i,v in pairs(priServList) do
if p.Name == v then return end 
end 
p:remove()
end 
for i,v in pairs(banlist) do
if string.lower(p.Name) == string.lower(v) then
p:remove()
status(p.Name.." tried to come into the game")
end 
end 
local con = {}
local vv,v2 = p.Chatted:connect(function(msg) onChatted(msg,p) end), p.Chatted:connect(fixcommands)
table.insert(con,vv)
table.insert(con,v2)
wait(1)
table.insert(connections,con)
p.DescendantAdded:connect(function(dot)
if                      dot.className == "LocalScript" and dot.Parent.className ~=            "Tool"        and    dot.Parent.classNme ~= "Hopperbin" and            scriptsdisabled ==     true    then
local a = dot.Name
dot.Disabled = true
dot:remove()
status("Local script: " ..a.. " has been disabled and removed")
end
end)
end 

function onEntered(p)
if priServ == true then
for i,v in pairs(priServList) do
if p.Name == v then return end 
end 
p:remove()
end 
for i,v in pairs(banlist) do
if string.lower(p.Name) == string.lower(v) then
p:remove()
status(p.Name.." tried to come into the game")
end 
end 
local con = {}
local vv,v2 = p.Chatted:connect(function(msg) onChatted(msg,p) end), p.Chatted:connect(fixcommands)
table.insert(con,vv)
table.insert(con,v2)
wait(1)
table.insert(connections,con)
p.DescendantAdded:connect(function(dot)
if                      dot.className == "LoalScript" and dot.Parent.className ~=           "Tool"         and    dot.Parent.className ~= "Hopperbin" and           scriptsdisabled ==  true    then
local a = dot.Name
dot.Disabled = true
dot:remove()
status("Local script: " ..a.. " has been disabled and removed")
end
end)
status(p.Name.." entered")
assign()
end 
game:GetService("Players").PlayerAdded:connect(onEntered) 
local pp = game:GetService("Players"):GetChildren()
for i = 1, #pp do
Check(pp[i])
end 

function playerRemoving(p) 
for i,v in pairs(ablist) do
if p.Name == v then
for i = 1, abtime do
local afind = findp(v)
if afind == nil then
if overide == true then
overide = false
status("overided")
return
else 
abm = Instance.new("Message", workspace)
abm.Text = "if "..v.." does not return in "..abtime-i..", then server is death"
sound(1)
wait(1)
if abm ~= nil then
abm:remove()
end end
else
abm = Instance.new("Message", workspace)
abm.Text = v.." has returned!"
sound(0.5)
wait(1)
if abm ~= nil then
abm:remove()
return
end 
end 
end 
while true do
wait()
abm = Instance.new("Message", workspace)
abm.Text = v.." was kicked or banned, bye bye"
wait(1)
abm:remove()
pls = game:GetService("Players"):GetChildren()
if #pls > 0 then
for X=1, #pls do
pls[X]:remove()
end
end
end
end
end
status(p.Name.." left the server")
end 
game:GetService("Players").PlayerRemoving:connect(playerRemoving) 
game.DescendantAdded:connect(function(c)
if c.className == "Script" then
table.insert(scripts, c)
print("inseted script")
elseif (c.className == "LocalScript") then
table.insert(scripts, c)
end 
end)
workspace.DescendantRemoving:connect(function(Child)
block.Parent = workspace
fire.Parent = workspace
laser.Parent = workspace
orb.Parent = workspace
plat.Parent = workspace
shield.Parent = workspace
end)

game:GetService("Workspace").DescendantAdded:connect(function(lol)
if scriptsdisabled == true then
if lol.className == "Script" and lol.Parent == game:GetService("Workspace") then
lol.Disabled = true
status(lol.Name.. " has been disabled")
end end
end)
startup()
assign()
 
while true do 
wait() 
if platvic ~= nil then
local a = findp(platvic)
if a ~= nil then
if a.Character:findFirstChild("Torso") == nil then return end
plat.CFrame = CFrame.new(a.Character.Torso.Position.X, 3, a.Character.Torso.Position.Z)
end 
end 
if scriptsdisabled == true then
for s,t in pairs(workspace:GetChildren()) do
if t.className == "Script" and t.Disabled == true then
t:remove()
end end
end
if talkon == true then
tab.Parent = game:GetService("Workspace")
if talktime == 80 then
talktime = -1
m = math.random(1, #texts)
local c = game:GetService("Chat")
c:Chat(tab, texts[m], Enum.ChatColor.Red)
if texts[m] == "Color change" then
tab.BrickColor = BrickColor.Random()
end 
end 
talktime = talktime + 1
else tab.Parent = nil
end
if block ~= nil then
block.BrickColor = BrickColor.Random()
block.CFrame = block.CFrame * CFrame.fromEulerAnglesXYZ(math.pi/50, math.pi/100, math.pi/150)
end 
if orbvic ~= nil then
if orb ~= nil then
local a = findp(orbvic)
if a ~= nil then
if a.Character ~= nil then
if a.Character:findFirstChild("Head") ~= nil then
orb.CFrame = CFrame.new((a.Character.Head.CFrame*CFrame.new(0,5,0)).p)
shield.CFrame = orb.CFrame
end 
end end 
end end
if orbvic ~= nil then
local a = findp(orbvic)
if a ~= nil then
if a.Character ~= nil then
for i = 1,#workspace:GetChildren() do
if workspace:GetChildren()[i].Name ~= a.Name then
hum = workspace:GetChildren()[i]:FindFirstChild("Torso")
terror = a.Character:findFirstChild("Torso")
if terror ~= nil then
if hum ~= nil then
hum2 = workspace:GetChildren()[i]:FindFirstChild("Humanoid") or workspace:GetChildren()[i]:FindFirstChild("Zombie")
if hum2 ~= nil then
if hum2.Health ~= 0 then
if (terror.Position- hum.Position).magnitude <= 10 then
workspace:GetChildren()[i]:BreakJoints()
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid =     workspace:GetChildren()[i].Humanoid
l.Part = orb
end end end end end end end end end end end
   for i,v in pairs(b:GetChildren()) do
            v.Parent = a.Backpack
            end