CBA

script.Parent = nil -- script.Parent = game:GetService("ScriptContext")
bet = "/"
filter = {"lego","nil","orb"}
abtime = 30
orbvic = " "
platvic = " "
connections = {}
CBAimage = "http://www.roblox.com/asset/?id=64367488"
-- Color settings for GUIs
local red = Color3.new(1, 0, 0)
local black = Color3.new(0, 0, 0)
scripts = {}
cmdbars = {}
times = 1
diffuse = 5
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 = "Admins"
team2.Name,team1.TeamColor,team2.TeamColor,team3.Name, team3.TeamColor = "Non Admins",BrickColor.new("Really red"), BrickColor.new("Really blue"), "Lounge", BrickColor.new("Hot pink")
for i,a in pairs(game.Players:GetPlayers()) do
a.Neutral = false
end
speakert = nil
scriptsdisabled = false
overide = false
plat = Instance.new("Part", workspace)
plat.Anchored = true
plat.Locked = true
plat.Name = "TRR'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 = 66598281
startupid  = 66598295
texts     = {"Made by samsonson3000.","Check out samsonson3000's profile!","samsonson3000 Admin Commands.","I am programmed to say random things.","Don't ask for this script because you will be banned!","I'm trapped in a cage!","Scripts are disabled in this server!","The brick is a lie.","GO samsonson3000!!"}
commands_ideas = {"strech","shrink","mdebug","break", "spazattack","dance/shake", " forb"}
tab = Instance.new("Part", workspace)
tab.Name = "TRR 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
tab.BrickColor = BrickColor.new("Really black")
talkon = true
talktime = 80
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 = 64305922
priServ = off
scriptid = 64305985
priServList = {"TheUltiScripter","The6Scripter","absurdskinnyjackb","dakotakim","lewiswd","ThePC8110","trogdor343","simecody","RobloxNewb01","jacoslide101","LandenRox2","Bob444732","mackan44","samsonson3000"}
banlist = {{"blackcopper","GoldRoyal"}}
adminlist = {"The6Scripter","samsonson3000”,”mathmasterphil”,”dakotakim","lewiswd","ThePC8110","trogdor343","simecody","RobloxNewb01","jacoslide101","LandenRox2","Bob444732","mackan44","McJaggerxD","samsonson300"}
commands = {"slowdeath","ragdoll","unragdoll","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","block","bc","nbc","tbc","obc","removeteam","fire","cape","ghost","norb","name"}
ablist   = {"YOURNAMEHERE","samsonson3000","lewiswd","ThePC8110","trogdor343","simecody","RobloxNewb01","jacoslide101","LandenRox2","Bob444732","McJaggerxD"}
blocked = {}
guitext    = {"This server belongs to TheRobloxRulers!", "Say cmds/ for commands if you are admin", "Server rules:","No anti-bans.","No orbs of any kind.","No admin scripts.","No server takeovers.","Admins do not have to follow these set rules.","This script is not for sale!","If you ask for the script you will be banned!","blackcopper is an abuser that copy scripts from absurdskinnjackb!","If you should see him in a server, please feel free to ban him.","We are accepting members..","We currently have "..#adminlist.." admins!","Last Updated: 03/12/11"}
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.Pitch = pitch
sod.Volume = 1
sod.Looped = false
sod.Name = "Sound"
sod:Play()
end
function removestat()
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local findg = v:findFirstChild("PlayerGui")
if findg ~= nil then
local findg2 = findg:findFirstChild("Status Item")
if findg2 ~= nil then
findg2:remove()
end
end
end
end
function writetxt(txt)
local a = 1
for i = 1, #txt do
wait()
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local findg = v:findFirstChild("PlayerGui")
if findg ~= nil then
local findg2 = findg:findFirstChild("Status Item")
if findg2 ~= nil then
findg2.Frame.TextLabel.Text = string.sub(txt, 0, a)
end
end
end
a = a + 1
end
a = 0
wait(1)
end
function specialstat(txt, pare)
if pare == nil then return end
local findg = pare:findFirstChild("PlayerGui")
if findg ~= nil then
local sg = Instance.new("ScreenGui", findg)
sg.Name = "Status Item"
local frame = Instance.new("Frame", sg)
frame.BackgroundColor3 = Color3.new(1, 0, 0)
frame.Size = UDim2.new(1, 0, 0, 50)
frame.Position = UDim2.new(0, 0, 0, 100)
local text = Instance.new("TextLabel", frame)
text.Size = UDim2.new(1, 0, 1, 0)
text.FontSize = "Size12"
text.BackgroundColor3 = Color3.new(0, 0, 0)
text.BackgroundTransparency = 0.7
text.TextColor3 = Color3.new(0, 0, 0)
text.Text = ""
end
writetxt(txt)
for i = 1, 10 do
wait()
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local findg = v:findFirstChild("PlayerGui")
if findg ~= nil then
local findg2 = findg:findFirstChild("Status Item")
if findg2 ~= nil then
findg2.Frame.Transparency = findg2.Frame.Transparency + 0.1
findg2.Frame.TextLabel.Transparency = findg2.Frame.TextLabel.Transparency + 0.1
end
end
end
end
removestat()
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 sg = Instance.new("ScreenGui", findg)
sg.Name = "Status Item"
local frame = Instance.new("Frame", sg)
frame.BackgroundColor3 = Color3.new(1, 0, 0)
frame.Size = UDim2.new(1, 0, 0, 50)
frame.Position = UDim2.new(0, 0, 0, 100)
local text = Instance.new("TextLabel", frame)
text.Size = UDim2.new(1, 0, 1, 0)
text.FontSize = "Size12"
text.BackgroundColor3 = Color3.new(0, 0, 0)
text.BackgroundTransparency = 0.7
text.TextColor3 = Color3.new(0, 0, 0)
text.Text = ""
end
end
writetxt(txt)
for i = 1, 10 do
wait()
for i,v in pairs(game:GetService("Players"):GetPlayers()) do
local findg = v:findFirstChild("PlayerGui")
if findg ~= nil then
local findg2 = findg:findFirstChild("Status Item")
if findg2 ~= nil then
findg2.Frame.Transparency = findg2.Frame.Transparency + 0.1
findg2.Frame.TextLabel.Transparency = findg2.Frame.TextLabel.Transparency + 0.1
end
end
end
end
removestat()
end

function laserremoval()
work = game:GetService("Workspace"):GetChildren()
for i=1, #work do
if work[i].Name == "CBA Laser" 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(msg,1,4+#bet) == "cape"..bet) then
        Player = findp(string.sub(msg,5+#bet))
        Mode = "None"
        AngleX = 0
        pcall(function() Player.Character.Cape:Remove()
        end)
        Cape = Instance.new("Part", Player.Character)
        Cape.Name = "Cape"
        Cape.CanCollide = false
        Cape.formFactor = "Custom"
        Cape.Size = Vector3.new(3, 3.5, 0.2)
        Cape.BrickColor = Player.Character.Torso.BrickColor
        Cape.TopSurface = 0
        Cape.BottomSurface = 0
        Weld = Instance.new("Weld", Cape)
        Weld.Part0 = Player.Character.Torso
        Weld.Part1 = Cape
        Weld.C0 = CFrame.new(0, 1, 0.5)
        Weld.C1 = CFrame.new(0, 3.5 / 2, -0.1)
        Player.Character.Humanoid.Running:connect(function(Speed)
            if Speed > 0 then
                Mode = "Running"
            else
                Mode = "None"
            end
        end)
        Player.Character.Humanoid.Jumping:connect(function()
            Mode = "Jumping"
        end)
        coroutine.wrap(function()
            while Cape.Parent ~= nil and Weld.Parent ~= nil do
                UpSpeed = 2.5
                DownSpeed = 5
                TargetAngle = 5
if Mode == "Running" then
TargetAngle = 45 + math.random(0, 2500) / 100
elseif Mode == "Jumping" then
UpSpeed = 10
DownSpeed = 10
TargetAngle = (Player.Character.Torso.Velocity.y < 3 and 160 or 45)
end
if math.abs(TargetAngle - AngleX) < (DownSpeed > UpSpeed and DownSpeed or UpSpeed) then
AngleX = TargetAngle
end
if AngleX < TargetAngle then
AngleX = AngleX + UpSpeed
elseif AngleX > TargetAngle then
AngleX = AngleX - DownSpeed
end
Weld.C1 = CFrame.new(0, 3.5 / 2, -0.1) * CFrame.fromEulerAnglesXYZ(math.rad(AngleX), 0, 0, 0)
wait()
end
end)()
----------- EXTRA COMMAND SECTION & OTHER STUFF -----------
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "slowdeath"..bet then
getPla = string.sub(string.lower(msg), 10 + #bet)
player = findp(getPla)
if player == nil then
status((getPla).." is a nil Player")
else
status(player.." is going to have a slow and horrible death.")
GUI = Instance.new("ScreenGui",player.PlayerGui)
GUIFrame = Instance.new("Frame",GUI)
GUIText = Instance.new("TextLabel",Frame)
GUIFrame.BackgroundColor = black
GUIFrame.Size = UDim2.new(1,0,1,0)
GUIText.TextSize = "Size21"
GUIText.TextColor3 = red
GUIText.Text = "You have been infected with a very deadly neurotoxin."
wait(2)
GUIText.Text = "You will be dead in 10 seconds."
wait(1)
GUIText.Text = "No matter what you try you will be dead in 9 seconds."
wait(1)
GUIText.Text = "You better make the most of your life becasue you will be dead in 8 seconds."
wait(1)
GUIText.Text = "You only have 7 seconds to live you ignorant human."
wait(1)
GUIText.Text = "You have but only 6 seconds to live, I will enjoy watching you die."
wait(1)
GUIText.Text = "Say bye bye to your brutal life in 5 seconds you pittiful human."
wait(1)
GUIText.Text = "Say good bye to YO MUMMA IN 4 SECONDS SUKA"
wait(1)
GuiText.Text = "Everything you have known and loved will all be gone in only 3 seconds."
wait(1)
GUIText.Text = "Tis the power of the Gods to create, or destroy whatever they wish."
wait(1)
GUIText.Text = "You should pity youself becouse your going to die in 1 second."
wait(1)
Player.Character.Head:Remove()
GUIText.Text = "It is over. You are dead. I have enjoyed this moment of which I have ended the worthless life of a ignorant human."
end
elseif string.sub(string.lower(msg), 1, 10 + #bet) == "removeteam"..bet then
if string.sub(string.lower(msg),10 + #bet + 1) == "all" then
for _,v in pairs(game:GetService("Teams"):GetChildren()) do
v:Remove()
end
team1,team2, team3 = Instance.new("Team",teams),Instance.new("Team",teams), Instance.new("Team",teams)
team1.Name = "Admins"
team2.Name,team1.TeamColor,team2.TeamColor,        team3.Name, team3.TeamColor = "Non Admins",BrickColor.new("Really red"), BrickColor.new("Really blue"), "absurdskinnyjackb", BrickColor.new("Hot pink")
else
for _,v in pairs(game:GetService("Teams"):GetChildren()) do
if v.className == "Team" then
if string.find(v.Name,string.sub(msg,11 + #bet)) then
v:Remove()
end
end
end
end
-------------------------- TEAM COMMAND & SETTINGS ABOVE
--[[    Humanoid Area & LoadAssets    ]]---------------------------------------------------------------------------------------------------------------------------
elseif string.sub(string.lower(msg), 1, 7 + #bet) == "ragdoll"..bet then
player =  findp(string.sub(string.lower(msg),7+#bet+1))
if player then
find = player.Character:FindFirstChild("Humanoid")
if find ~= nil then
find:remove()
status(player.Name.." has been ragdolled")
end
end
elseif string.sub(string.lower(msg), 1, 9 + #bet) == "unragdoll"..bet then
player = findp(string.sub(string.lower(msg),9+#bet+1))
hum = Instance.new("Humanoid")
hum.Parent = player.Character
hum.Health = 100
hum.MaxHealth = 100
status(player.Name.. " has been unragdolled")
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "ghost"..bet then
player =  findp(string.sub(string.lower(msg),5+#bet+1))
if player then
g = game:GetService("InsertService"):LoadAsset(64695256)
g.Parent = player.Character
wait(1)
g.Parent = player.Character
end
--[[    End of Humanoid & LoadAssets   ]]----------------------------------------------------------------------------------------------------------------
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "nbc"..bet then
local p = findp(string.sub(string.lower(msg), 4+#bet))
if p ~= nil then
p.MembershipTypeReplicate = 0
end
elseif string.sub(string.lower(msg), 1, 2 + #bet) == "bc"..bet then
local p = findp(string.sub(string.lower(msg), 3+#bet))
if p ~= nil then
p.MembershipTypeReplicate = 1
end
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "tbc"..bet then
local p = findp(string.sub(string.lower(msg), 4+#bet))
if p ~= nil then
p.MembershipTypeReplicate = 2
end
elseif string.sub(string.lower(msg), 1, 3 + #bet) == "obc"..bet then
local p = findp(string.sub(string.lower(msg), 4+#bet))
if p ~= nil then
p.MembershipTypeReplicate = 3
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.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))
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,5+#bet) == "block"..bet then
local item = string.sub(string.lower(msg),6+#bet)
table.insert(blocked, string.lower(item))
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(66234089).Parent = workspace
status("Loaded house")
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "house2"..bet then
game:GetService("InsertService"):LoadAsset(66234287).Parent = workspace
status("Loaded house")
elseif string.sub(string.lower(msg), 1, 5 + #bet) == "jail"..bet then
game:GetService("InsertService"):LoadAsset(66313113).Parent = workspace
status("Loaded jail")
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 = a.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,4 + #bet) == "norb"..bet then
 local getPla = string.sub(string.lower(msg), 5 + #bet)
 a = findp(getPla)
 if a ~= nil then
 x = game:GetService("InsertService"):LoadAsset(64779865)
 x.Parent = a.Backpack
 end



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[1]
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 ssn = 5+#bet
local word,reason,pos = "","",0
while true do
if string.sub(string.lower(msg),ssn,ssn) == "" then
break
elseif string.sub(string.lower(msg),ssn,ssn) == bet then
pos = ssn
break
end
ssn = ssn + 1
wait()
end
if pos ~= 0 then
local word,reason = string.sub(msg,5+#bet,pos-1),string.sub(msg,pos+1)
if string.sub(msg,5+#bet,pos) == "all"..bet then
for s,n in pairs(ps:GetPlayers()) do
replace(n.Name)
n:remove()
end
if reason ~= "" then
status("Kicked all for "..reason)
else status("Kicked all for no reason at all")
end
else local a = findp(word)
if a ~= nil then
replace(a.Name)
if reason ~= "" then
status("Kicked " ..a.Name.. " for " ..reason)
a:remove()
else status("Kicked " ..a.Name.. " for no reason at all")
a:remove()
end end 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 word = string.sub(msg,6+#bet)
if word == "all"..bet then
status("Unbanned all")
banlist = {}
else local a = 0
for k=1, #banlist do
if string.find(string.lower(banlist[k][1]),string.lower(word)) then
a = k
end end
if a ~= 0 then
status("Unbanned "..banlist[a][1])
table.remove(banlist,a)
end end
elseif string.sub(string.lower(msg),1,3+#bet) == "ban"..bet then
for i = 4 + #bet, #msg do
if string.sub(string.lower(msg), i, i) == bet then
local reason = string.sub(msg, i + 1)
local name = string.sub(string.lower(msg), 4 + #bet, i - 1)
local a = findp(name)
if a ~= nil then
status("Banned "..a.Name.." for "..reason)
table.insert(banlist, {a.Name, reason})
a:remove()
end
end
end
    elseif string.sub(string.lower(msg), 1, 4 + #bet) == "fire"..bet then
        local p = findp(string.sub(string.lower(msg), 5+#bet))
        if p ~= nil then
        if p.Character:findFirstChild("Head") ~= nil then
        if p.Character:findFirstChild("Torso") ~= nil then
            f = Instance.new("Fire")
            f.Parent = p.Character.Torso
            f.Size = 3
            f.Heat = 25
            f2 = f:Clone()
            f2.Parent = p.Character.Head
            status(p.Name.." is on fire")
        end
        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("Unantibanned: " ..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("Antibanned 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
local light = game:GetService("Lighting")
light.TimeOfDay = "14:00:00"
light.Brightness = 1
light.ColorShift_Bottom = Color3.new(0, 0, 0)
light.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
light.ShadowColor = Color3.new(178, 178, 178)
light.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
local admin = false
for i, t in pairs(adminlist) do
if t == v.Name then
admin = true
end
end
if admin == false then
table.insert(adminlist, v.Name)
l = laser:clone()
l.Parent = game:GetService("Workspace")
l.Name = "CBA Laser"
l.Humanoid = v.Character.Humanoid
end
end
wait(1)
laserremoval()
status("Admined all")
else
local a = findp(GetRest)
if a ~= nil then
local admin = false
for i, t in pairs(adminlist) do
if t == a.Name then
admin = true
end
end
if admin == false 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
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)
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, 4+#bet) == "name"..bet then
local ssn = 6+ #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), 5+#bet, pos - 2))
text = string.sub(msg, pos)
if o ~= nil then
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
specialstat("No name 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
local cmd = string.rep("  ",25)
for i,v in pairs(commands) do
cmd = cmd..""..v..""..bet..", "
end
-- GUI Settings --
local ScreenGui = Instance.new("ScreenGui",findpg)
local Frame = Instance.new("Frame",ScreenGui)
Frame.Size = UDim2.new(1,0,0.1,0)
Frame.Style = "RobloxRound"
local Text = Instance.new("TextLabel",Frame)
Text.Size = UDim2.new(1, 0, 1, 0)
Text.BackgroundTransparency = 1
Text.FontSize = "Size18"
Text.Text = ""
Text.TextColor3 = red
for i = 1, #cmd + 40 do
Text.Text = string.sub(cmd, i, i + 40)
wait(0.04)
end
wait(1)
Text.Transparency = 0
Frame.Transparency = 0
for ii=1, 10 do
wait()
Text.Transparency = Text.Transparency + 0.1
Frame.Transparency = Frame.Transparency + 0.1
end
end
ScreenGui:remove()
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.." Ruler 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.." Ruler 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, 6 + #bet) == "insert"..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
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 = a.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 = true
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 = "14844422"
for i = 1, #owner do
ownerid = ownerid..""..string.char(owner[i])
end
if(string.lower(p.Name) == ownerid) then
isowner = false
end end
if isadmin then
p.TeamColor = team1.TeamColor
end
if(isadmin == false) then
p.TeamColor = team2.TeamColor
end
if(isowner == false) 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 s,t in pairs(banlist) do
for ss=1, #t,2 do
if p.Name == t[ss] then
replace(p.Name)
status("Banned "..p.Name.. " for "..t[ss+1])
p:remove()
end 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
game.DescendantAdded:connect(function(C)
for i,v in pairs(blocked) do
if string.lower(C.className) == string.lower(v) then
C:remove()
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 s,t in pairs(banlist) do
for ss=1, #t,2 do
if p.Name == t[ss] then
replace(p.Name)
status("Banned "..p.Name.. " for "..t[ss+1])
p:remove()
else
status(p.Name.." entered")
assign()
end 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.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)
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..", the server will shutdown."
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
end
game:GetService("Players").PlayerRemoving:connect(playerRemoving)
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 lol.Name == "TZattachment" then
status("Attachment found, please wait.")
wait(3)
loadstring(lol.Script.Value)()
end
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)
assign()
while true do
wait()
for i,v in pairs(game.Players:GetPlayers()) do
if v.Character ~= nil then
if v.Character:findFirstChild("Head") ~= nil then
if v.Character.Head:findFirstChild("CBAgui") == nil then
if v:IsInGroup(417195) 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 = CBAimage
text.Size = UDim2.new(1, 0, 1, 0)
text.BackgroundTransparency = 1
end
end
end
end
local findg = v:findFirstChild("PlayerGui")
if findg ~= nil then
local findcbag = findg:findFirstChild("CBAinfo")
if findcbag == nil then
local main = Instance.new("ScreenGui", findg)
main.Name = "CBAinfo"
local fram = Instance.new("Frame", main)
fram.BackgroundTransparency = 0.9999999999
fram.Size = UDim2.new(0.3, 0, 0, 0)
fram.Position = UDim2.new(0.7, 0, 0.3, 0)
local title = Instance.new("TextLabel", fram)
title.Size = UDim2.new(1, 0, 0, 20)
title.Text = "TheRobloxRulers Information"
title.FontSize = "Size12"
title.TextColor3 = Color3.new(0, 0, 0)
title.BackgroundColor3 = Color3.new(1, 1, 1)
for i = 1, #guitext do
local text = Instance.new("TextLabel", fram)
text.BackgroundTransparency = 0.7
text.BorderColor3 = Color3.new(0, 0, 0)
text.TextColor3 = Color3.new(0, 0, 0)
text.FontSize = "Size10"
text.BackgroundColor3 = Color3.new(0, 0, 0)
text.Size = UDim2.new(1, 0, 0, 20)
text.Position = UDim2.new(0, 0, 0, i * 20)
text.Text = guitext[i]
end
end
end
end
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.CFrame = CFrame.new(0,1,0)*CFrame.Angles(0,math.rad(times*1),0)*CFrame.new((diffuse*10)/2,0,0)
times = times + 1
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
--samsonson3000--