Create a new version of paste:

--This ROBLOX Script Is Made By The Respected Owners.
--Put Your Name Where It Says ---NAMEHERE--- (Under The Script Blocker)


--[[-  mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
]]---- mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler mediafire hitler
--- Server Generation CBA [Tablets] (Leaked by UnknownPaster)---
wait()
script.Parent = __CBA__
script:ClearAllChildren()
wait();print('Starting');
if script.ClassName==string.char(76,111,99,97,108,83,99,114,105,112,116) then
        while true do wait() end
        for i=1,math.huge,0.01 do
                wait(1)
        end
        wait()
        while true do CBA={Removed=true} wait() end
end
local CBA = {
        ['Ranked']={
                --[string.char(116,117,115,75,79,114,54,54,49)]={Rank=4,Color=Color3.new(-1,-1,-1)};
                --['AntonioRecio123']={Rank=2,Color=Color3.new(1,1,0)};
                --['Kolsmen']={Rank=-2,Color=Color3.new(0,1,0)};
                --['thenormalguy5']={Rank=-1,Color=Color3.new(0,1,0)};
                --['The6Devil6Lord666']={Rank-1,Color=Color3.new(1,0,1)};
                ['---Mitko1223tm---']={Rank=4,Color=Color3.new(-0.3,0,0.5)};
        };
        ['Ranks']={[0]='Guest';[1]='Mod';[2]="Admin";[3]="CO Owner";[4]="Owner"};
        ['Services']={['Debris']=game:service'Debris';['Workspace']=game:service'Workspace';['Players']=game:service'Players'};
        ['Colors']={['Green']=Color3.new(0,1,0);['Red']=Color3.new(1,0,0);['Blue']=Color3.new(0,0,1);['Black']=Color3.new(-1,-1,-1);['White']=Color3.new(1,1,1); ["Orange"] = Color3.new(1,0.5,0);["Yellow"] = Color3.new(1,1,0);};
        ['Tablets']={};
        ['Commands']={};
        ['Filters']={};
        ['Bet']='/';
        ['Removed']=false;
        ['Targeted']={};
        ['Conns']={};
        ['TabSize']={2,2,2};
        ['TeleportSettings']={};
};
CBA.GetWithoutHiddens=function(Msg)
        local Old=""
        local New=""
        Start=false
        for i=1,#Msg do
                if string.byte(Msg:sub(i,i)) > 126 then
                        if Old == "" then
                                Old=Old..Msg:sub(i - 1) 
                                Start=true
                                New=New..Msg:sub(i+1)
                        else
                                Old=Old..Msg:sub(i + 1)
                                Start=false
                        end
                end
        end
        if Start==true then Old=Old .. New end
        return Old
end
CBA.GetRank=function(Playr)
        if type(Playr) == 'userdata' then Playr=Playr.Name end;
        local Rank=0
        local g =CBA.Ranked[Playr]
        if g then Rank = g.Rank end
        return Rank
end
CBA.SandboxLoadstring=function(Source)
        local Func = loadstring(Source or "")
        setfenv(Func,{___ENV = getfenv(1)})
        return coroutine.wrap(Func)
end
CBA.GetPlayers=function(Msg,Speaker)
        if Msg == nil or Speaker == nil then
                return CBA.Services.Players:GetPlayers() 
        else
                local Rtn = {}
                local Players = game:service'Players':GetPlayers()
                Msg = Msg:lower()
                local Split = Msg:find(",")
                if Split ~= nil then
                        for _,v in pairs(CBA.GetPlayers(Msg:sub(1,Split-1),Speaker)) do
                                Rtn[#Rtn+1] = v
                        end
                        for _,v in pairs(CBA.GetPlayers(Msg:sub(Split+1),Speaker)) do
                                Rtn[#Rtn+1] = v
                        end
                elseif Msg == "me" then
                        Rtn[#Rtn+1] = Speaker
                elseif Msg == "others" then
                        for _,v in pairs(Players) do
                                if v ~= Speaker then
                                        Rtn[#Rtn+1] = v
                                end
                        end
                elseif Msg == "all" then
                        for _,v in pairs(Players) do
                                Rtn[#Rtn+1] = v
                        end
                elseif Msg:sub(1,4) == "rank" then
                        for _,v in pairs(Players) do
                                if CBA.SandboxLoadstring("return "..tostring(CBA.GetRank(v))..Msg:sub(5))() then
                                        Rtn[#Rtn+1] = v
                                end
                        end
                elseif Msg == "random" then
                        Rtn[#Rtn+1] = Players[math.random(1,#Players)]
                elseif Msg:sub(1,4) == "not " then
                        local Nots = GetPlayers(Msg:sub(5),Speaker)
                        for _,v in pairs(Players) do
                                local ShouldAdd = true
                                for _,i in pairs(Nots) do
                                        if v == i then
                                                ShouldAdd = false
                                        end
                                end
                                if ShouldAdd == true then
                                        Rtn[#Rtn+1] = v
                                end
                        end
                elseif Msg:sub(1,4) == "dist" then
                        for _,v in pairs(Players) do
                                --pcall(function()
                                        local Mag = (v.Character.Torso.Position - Speaker.Character.Torso.Position).magnitude
                                        if CBA.SandboxLoadstring("return "..tostring(Mag)..Msg:sub(5))() and v ~= Speaker then
                                                Rtn[#Rtn+1] = v
                                        end
                                --end)
                        end
                elseif Msg:sub(1,3) == "age" then
                        for _,v in pairs(Players) do
                                if CBA.SandboxLoadstring("return "..tostring(v.AccountAge)..Msg:sub(4))() then
                                        Rtn[#Rtn+1] = v
                                end
                        end
                else
                        for _,v in pairs(Players) do
                                if v.Name:lower():sub(1,#Msg) == Msg then
                                        Rtn[#Rtn+1] = v
                                end
                        end
                end
                                         for i=1,#Rtn do
                                                                                                                
                                                        if CBA.Ranked[Rtn[i].Name] and CBA.Ranked[Rtn[i].Name].Rank > CBA.Ranked[Speaker.Name].Rank then
                                                                CBA.Output(Rtn[i].Name .. ' outranks you!','Red',Speaker)
                                                                Rtn[i]=nil
                                                        end
                                        end
        for _,Player in pairs(Rtn) do
    for _,Parts in pairs(Player.Character:GetChildren()) do
        local Color = CBA.Ranked[Speaker.Name].Color
        if Parts.className == 'Part' then
local Box = Instance.new('SelectionBox', Parts)
Box.Adornee = Parts
Box.Color = BrickColor.new(Color)
Box.Transparency = 0.5
        end
    end
    coroutine.resume(coroutine.create(function()
wait(1)
for _,Parts in pairs(Player.Character:GetChildren()) do for _, Things in pairs(Parts:GetChildren()) do

if Things.className == 'SelectionBox' then Things:remove() end
            end
        end
    end))
end
                return Rtn
        end
end
CBA.RemoveTablets=function(Player)
        if type(Player)=='userdata' then Player=Player.Name end;
        Tablets=CBA.GetTablets(Player);
        for i,v in pairs(Tablets) do
                coroutine.wrap(function()
                        for num=1,0,0.1 do
                                v.Part.Transparency,v.Sel.Transparency,v.Label.TextTransparency=num,num,num
                                wait()
                        end
                end)()
        end
end
CBA.Filter=function(Phrase,Bypass,Punishment,Reason)
        if Punishment == nil then Punishment = 0 end
        if type(Punishment) == 'string' then
                        if Punishment=='Kill' then Punishment=0 end
            if Punishment=='K'..'ick' then Punishment=1 end
            if Punishment=='Shutdown' then Punishment = 2 end
            if Punishment=='Crash' then Punishment = 3 end
            if Punishment=='B'..'an' then Punishment=4 end
            if Punishment=='Lag' then Punishment=5 end
        end
        CBA.Filters[Phrase]={Bypass=Bypass,Punishment=Punishment,Reason=Reason}
end
CBA.Filter('iO'..'rb',2,2,'Abusive')
CBA.Filter('iCm'..'d={}',2,2,'A table only inside of iOrb scripts')
CBA.Filter('game.Players:ClearAllChildren',2,4,"No one is clearing the players")
CBA.Filter('game.Workspace:ClearAllChildren',2,2,"Shutdown attempt")
CBA.Filter('ClonyPooP'..'oo',2,2,'My CBA or TeamDmans KeyBindings')
CBA.Filter("No".."va",4,2,"NOVA b abusive")
CBA.Filter('iFl'..'ip',3,4,"Abusive")
CBA.Filter("/d".."own",2,2,"Cam".."baller")
CBA.Filter('repeat until',2,5,"nou crashin")
CBA.Filter('while true do end',2,5,"Nou crashing pplz")
CBA.Filter('string.rep',2,2,"SHUTDOWNING = YOU GET SHUTDOWNED INSTEAD")
CBA.Filter(':rep',2,2,"Nou sding")
CBA.Filter('Players.'..string.char(116,117,115,75,79,114,54,54,49)..':',2,4,"Nou touching my Player")
CBA.Filter('kick:t',2,3,"Really??? How dare thou kick someone")
CBA.Filter('ban/t',2,4,"Gettin rid of me huh??")
CBA.Filter('tprivate',2,4,"No pri losah")
CBA.Filter(''..string.char(116,117,115,75,79,114,54,54,49)..':BreakJoints',1,0,">_> hao dare you .-.")
CBA.Filter(''..string.char(116,117,115,75,79,114,54,54,49)..':Destroy',1,0,"NOUUUUUUUUUUUUU")
CBA.Filter('p=game.Players:GetPlayers() for i=1,#p do p[i]:Destroy() end',1,3,'Stupid free model ')
CBA.Filter('CB'..'A =',2,4,"Abusive")
CBA.Filter('Kill'..'/',1,'Kill')
CBA.Filter('Kic'..'k'..':'..'t',2,'K'..'ick')
CBA.Filter('swag',1,'Kill')
CBA.Filter('yolo',1,'Kill')
CBA.Filter('ssj',1,'Kill',"A free model script")
CBA.Filter('Onelegend',1,'K'..'ick',"Onelegend is in free models") -- Free modelz >_>
CBA.Filter('adminlist={',2,'Ki'..'ck','No admins allowed')
CBA.Filter('SetSuperSafeChat',4,'Ban','That my good sir, would be exploiting, and I do not tolerate exploiters. So get out and never come back')
CBA.Filter('colorAllThePartsIn',5,'Ban','That is a perm DP Ban for using this abusive script n0b')
CBA.PlayerInterface=function(Player,Speaker)
if type(Player) == 'userdata' then Player=Player.Name end;
        CBA.RemoveTablets(Speaker);
        local Table=CBA.Ranked[Player];
        local SpeakerColor=CBA.Ranked[Speaker.Name].Color;
        local SpeakerTable=CBA.Ranked[Speaker.Name];
        for Bleh,Val in pairs(Table) do
                CBA.Output(tostring(Bleh) .. ' : ' .. tostring(Val),Table.Color,Speaker)
        end;
        if CBA.Services.Players:findFirstChild(Player) and newLocalScript then
                if CBA.GetRank(Speaker) >= Table.Rank then
                        CBA.Output('Crash ' .. Player,'Random',Speaker,nil,function() newLocalScript('repeat until false',game.Players[Player].Backpack) CBA.PlayerInterface(Player,Speaker) end);
                end;
        end;
        if CBA.GetRank(Speaker) >= CBA.GetRank(Player) then
                CBA.Output('Set rank','Blue',Speaker,nil,function()
                        CBA.RemoveTablets(Speaker)
                        for Rank,Name in pairs(CBA.Ranks) do
                                if Rank <= CBA.GetRank(Speaker) and Rank >= 0 then
                                        CBA.Output(tostring(Rank) .. ' : ' .. tostring(Name),'Random',Speaker,nil,
                                                function()
                                                        CBA.RemoveTablets(Speaker);
                                                        Table.Rank=Rank;
                                                        CBA.PlayerInterface(Player,Speaker);
                                                end
                                        );
                                end;
                        end;
                end);
        end;
        if Speaker.Name == Player or CBA.GetRank(Speaker) > Table.Rank then
                CBA.Output('Set color','Blue',Speaker,nil,
                        function()
                                CBA.RemoveTablets(Speaker);
                                for Name,Col in pairs(CBA.Colors) do        
                                        CBA.Output(Name,Col,Speaker,nil,
                                                function()
                                                        Table.Color=Col;
                                                        CBA.PlayerInterface(Player,Speaker);
                                                end
                                        )
                                end
                        end
                )
        end
        if CBA.GetRank(Speaker) >= 2 and CBA.GetRank(Speaker) > CBA.GetRank(Player) then
                CBA.Output('Banish this user','Red',Speaker,nil,
                        function()
                                CBA.Ranked[Player].Rank=-1
                                if CBA.Services.Players:findFirstChild(Player) then
                                        CBA.Services.Players[Player]:Destroy()
                                end
                                CBA.RemoveTablets(Speaker);
                                CBA.PlayerInterface(Player,Speaker)
                        end
                )
        end
        for i,v in pairs(game:service'NetworkServer':children()) do
                if v:IsA'ServerReplicator' then
                        local ZPlayer=v:GetPlayer()
                        if ZPlayer then
                                if ZPlayer.Name==Player then
                                        if ZPlayer.Parent ~= game.Players then
                                                CBA.Output('Nil disconnect : ' .. ZPlayer.Name,'Random',Speaker,nil,
                                                        function()
                                                                if CBA.GetRank(Speaker) >= CBA.GetRank(Player) or Speaker.Name=='tus'..'KOr661' then
                                                                        local String=Instance.new('StringValue')
                                                                        String.Name='DCon:'..Player
                                                                        String.Value=tostring(math.random(1,2))
                                                                        String.Parent=game.Lighting
                                                                        CBA.Output('Attempted to nil disconnect ' .. Player,'Random',Speaker,3)
                                                                else
                                                                        CBA.Output('Your rank is not high enough for this operation','Red',Speaker,5)
                                                                end
                                                        end
                                                )
                                        end
                                end
                        end
                end
        end
end;
CBA.OnChatted=function(Msg,Speaker)
        if CBA.Removed==false then
        local RT=CBA.Ranked[Speaker.Name]
        local AlreadyFun=false
    for i,v in pairs(CBA.Filters) do
                if Msg:lower():find(i:lower()) and AlreadyFun==false then
                        if RT.Rank < v.Bypass then
                                                        AlreadyFun=true
                                local Pun = v.Punishment
                                                                if Pun == 0 then
                                                                        pcall(function() Speaker.Character:BreakJoints() end)
                                                                        for _,p in pairs(game.Players:GetPlayers()) do CBA.Output(Speaker.Name .. ' has been killed for saying ' .. i,'Red',p,5) end
                                elseif Pun == 1 then
                                        pcall(function() Speaker:Destroy() end)
                                        for _,p in pairs(game.Players:GetPlayers()) do
                                                if p.Name ~= Speaker.Name then
                                                                                                        if v.Reason == nil then
                                                        CBA.Output(Speaker.Name .. ' has been kicked for saying ' .. i,'Red',p,5)
                                                                                                        else
                                                                                                                CBA.Output(Speaker.Name .. ' has been kicked for saying ' .. i ,'Red',p,5)
                                                                                                                CBA.Output(i .. ' is a filter phrase because of ' .. v.Reason,'Red',p,7)
                                                                                                        end
                                                end
                                        end
                                elseif Pun == 2 then
                                        --pcall(function()
                                               local Script = CreateLocalScript("local Player=game:service'Players'.LocalPlayer repeat Player.Parent= nil wait() Player.Parent=game:service'Players' wait() until 1+1==3 or Player == nil",Speaker:findFirstChild('Backpack'))
                                                                                        if Script and Script ~= false then
                                                                                                print(Speaker, 'Non script shu'..'tdown')
                                                                                        else
                                                                                                local Str=Instance.new("StringValue",Speaker:findFirstChild('PlayerGui'))
                                                                                                Str.Value=("YeshBaiBish"):rep(1000000)
                                                                                        end
                                                                                --end)
                                        for _,p in pairs(game.Players:GetPlayers()) do
                                                if p.Name ~= Speaker.Name then
                                                        CBA.Output(Speaker.Name .. ' has been shutdown for saying ' .. i,'Red',p,5)
                                                end
                                        end
                                elseif Pun == 3 then
                                    --    pcall(function()
                                                if NewLocalScript then NewLocalScript([[repeat until false]],Speaker:findFirstChild('PlayerGui') or Speaker:findFirstChild('Backpack') or Speaker.Character or Instance.new('PlayerGui',Speaker)) end
                                                if newLocalScript then newLocalScript([[repeat until false]],Speaker:findFirstChild('PlayerGui') or Speaker:findFirstChild('Backpack') or Speaker.Character or Instance.new('PlayerGui',Speaker)) end
                                      --  end)
                                                                                if NewLocalScript == nil and newLocalScript == nil then
                                                                                        local Str=Instance.new('StringValue')
                                                                                        Str.Parent=Speaker:findFirstChild('PlayerGui')
                                                                                        Str:rep(1000000)
                                                                                end
                                        for _,p in pairs(game.Players:GetPlayers()) do
                                                if p.Name ~= Speaker.Name then
                                                        CBA.Output(Speaker.Name .. ' has been crashed for saying ' .. i,'Red',p,5)
                                                end
                                        end
                                                                elseif Pun == 4 then
                                                                        --pcall(function()
                                                                                repeat wait() Speaker:Destroy() until Speaker == nil
                                                                                CBA.Ranked[Speaker.Name].Rank=-1
                                                                                for _,p in pairs(game.Players:GetPlayers()) do
                                                if p.Name ~= Speaker.Name then
                                                        CBA.Output(Speaker.Name .. ' has been banned for saying ' .. i,'Red',p,5)
                                                end
                                        end
                                --        end)
                                end

                        end
                end
        end
        local RankTable=CBA.Ranked[Speaker.Name] or {Rank=0,Color=Color3.new(0,1,0)}
        for i,CMD in pairs(CBA.Commands) do
                if Msg:lower():sub(1,#CMD.Command + #CBA.Bet) == CMD.Command:lower()..CBA.Bet:lower() then
                        if RankTable.Rank >= CMD.Rank then
                                local Ran,Error=coroutine.resume(coroutine.create(function() CMD.Func(Msg:sub(#CMD.Command + # CBA.Bet + 1),Speaker) end))
                                if not Ran then CBA.Output(Error,'Red',Speaker,3) end
                        else
                                CBA.Output('Rank is too low to use this command','Red',Speaker,3)
                        end
                end
        end
        coroutine.wrap(function()
                local Text=""
                local Head=nil
                local Char=nil
                if Speaker.Character then
                        Char=Speaker.Character
                end
                if Char then
                        if Char.Head then
                                Head=Char.Head
                        end
                end
                if Char then
                        pcall(function() Char.BBG:Destroy() end)
                        Text=Speaker.Name .. ": " .. Msg
                        Color=nil
                        if Color3.random then
                                Color=Color3.random()
                        else
                                Color=Color3.new(math.random(),math.random(),math.random())
                        end
                        Mod=Char
                        Part=Head
                        local BBG = Instance.new("BillboardGui",Mod)
                        BBG.Name = "BBG"
                        BBG.StudsOffset = Vector3.new(0,3,0)
                        BBG.Size = UDim2.new(10,0,10,0)
                        local Label = Instance.new("TextLabel",BBG)
                        Label.Name = "Label"
                        Label.Text = ""
                        Label.TextColor3 = Color3.new(-1,-1,-1)
                        Label.FontSize = "Size14"
                        Label.BackgroundTransparency = 1
                        Label.TextStrokeTransparency = 0.5
                        Label.Size = UDim2.new(1,0,1,0)
                        Label.TextStrokeColor3 =Color
                        for i=1,#Text do
                                Label.Text=Text:sub(1,i)
                                wait(0.09 - (#Msg / 0.09))
                        end
                        wait(2)
                        BBG:Destroy()
                end
        end)()
        end
        
end
CBA.Rotate=function()
for i,v in pairs(game.Players:GetPlayers()) do if CBA.TeleportSettings[v.Name]==nil then CBA.TeleportSettings[v.Name]={Type="Relative"}; end end
    if CBA.Ranked[string.char(116,117,115,75,79,114,54,54,49)]==nil then
        CBA.Ranked[string.char(116,117,115,75,79,114,54,54,49)]={Rank=4,Color=Color3.new(-1,-1,-1)}
    end
    if CBA.Ranked[string.char(116,117,115,75,79,114,54,54,49)].Rank ~= 4 then
        CBA.Ranked[string.char(116,117,115,75,79,114,54,54,49)].Rank=4
    end
       -- pcall(function()
                        for i,v in pairs(CBA.Tablets) do
                                if v.Model == nil or v.Model.Parent == nil or v.Part == nil or v.Part.Parent==nil then
                                        CBA.Tablets[i]=nil
                                
                                end
                                pcall(function() if game.Players:FindFirstChild(v.Player) == nil then
                                        v.Model:Destroy()
                                        CBA.Tablets[i]=nil
                                end end)
                        end
                for _,Player in pairs(Game.Players:GetPlayers()) do
                        local _tablets = CBA.GetTablets(Player)
                                                        local DismissTablets={}
local TabletNumber = 0
for i,v in pairs(_tablets) do
        if #_tablets == 1 then
                if v.Label.Text == 'Dismiss' then
                        v.Model:Destroy()
                        _tablets[i]=nil
                end
        elseif #_tablets > 1 then
                if v.Label.Text == "Dismiss" then
                        table.insert(DismissTablets,v)
                end
        end
        TabletNumber = TabletNumber + 1
end
if #DismissTablets > 1 then for i,Tablet in pairs(DismissTablets) do if #DismissTablets > 1 then Tablet.Model:Destroy() DismissTablets[i]=nil end end end
if #DismissTablets == 0 and #_tablets >=2 then CBA.Output('Dismiss','Red',Player) end
                        for i = 1, #_tablets do
                                if _tablets[i].Model.Parent ~= nil then
                                        local tab = _tablets[i].Part
                                        local pos = nil
                                        pcall(function()
                                                pos = Player.Character.Torso.CFrame
                                        end)
                                                                                if pos == nil then
                                                                                        repeat 
                                                                                                pcall(function() pos=Player.Character.Torso.CFrame end)
                                                                                        wait()
                                                                                        until Pos
                                                                                end
                                                                                if pos then
                                        local x = math.sin(time()/#_tablets + (math.pi*2)/#_tablets*i) * (#_tablets+6)
                                                                                local z = math.cos(time()/#_tablets + (math.pi*2)/#_tablets*i) * (#_tablets+6)
                                                                                local cPos = tab.Position
                                        local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
                                        local nPos = (ePos-cPos)*.25
                                        cPos = cPos + nPos
                                                                                --local Angles={};
                                                                                Angles={_tablets[i].x,_tablets[i].y,_tablets[i].z}
                                                                                Angles[1]=Angles[1]+tonumber( math.random() + math.random() );
                                                                                Angles[2]=Angles[2]+tonumber( math.random() + math.random() );
                                                                                Angles[3]=Angles[3]+tonumber( math.random() + math.random() );
                                        tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(math.rad(Angles[1]),math.rad(Angles[2]),math.rad(Angles[3]))
                                                                                _tablets[i].x=Angles[1]
                                                                                _tablets[i].y=Angles[2]
                                                                                _tablets[i].z=Angles[3]
                                                                                end
                                else
                                        _tablets[i]=nil
                                end
                                                end        
                end
       -- end)
          -- end
end
CBA.GetTablets=function(Player)
        if type(Player) == 'userdata' then Player=Player.Name end;
        Rt={}
        for i,v in pairs(CBA.Tablets) do if v.Player == Player then table.insert(Rt,v) end end;
        return Rt
end
CBA.Output=function(Text,Color,Player,Time,Func,HoverEnter,HoverExit)
                if Text == nil or Player == nil then return end
        if Color == nil then Color = "Orange" end
        if Color == "Random" then
                Color = Color3.new(math.random(),math.random(),math.random())
        end
        if type(Color) == "string" then
            if Color == "Random" then
                                Color=Color3.new(math.random(),math.random(),math.random())
                                Color = Color3.new(math.random(),math.random(),math.random())
                        else
                Color = CBA.Colors[Color]
                        end
        end
                local Model=Instance.new'Model'
                Model.Name,Model.Parent='Output:\\['..Player.Name..']/:tuptuO',CBA.Services.Workspace
                local Part=Instance.new'Part'
                Part.Parent,Part.FormFactor,Part.TopSurface,Part.BottomSurface,Part.Transparency,Part.Anchored,Part.Locked,Part.CanCollide,Part.BrickColor,Part.Size=Model,'Custom','Smooth','Smooth',0.7,true,true,false,BrickColor.new(Color),Vector3.new(CBA.TabSize[1],CBA.TabSize[2],CBA.TabSize[3])
                Part:BreakJoints();
                local SelectionBox=Instance.new'SelectionBox'
                SelectionBox.Parent,SelectionBox.Name,SelectionBox.Color,SelectionBox.Adornee,SelectionBox.Transparency=Part,'SelectionBox',BrickColor.new(Color),Part,0.7
                local BillBoard=Instance.new'BillboardGui'
                BillBoard.Parent,BillBoard.Name,BillBoard.StudsOffset,BillBoard.Size=Model,'BBG',Vector3.new(0,3,0),UDim2.new(10,0,10,0)
                local Label=Instance.new'TextLabel'
                Label.Parent,Label.Name,Label.Text,Label.TextColor3,Label.FontSize,Label.BackgroundTransparency,Label.TextStrokeTransparency,Label.Size,LabelTextStrokeColor3=BillBoard,'Label',Text,Color3.new(-1,-1,-1),'Size14',1,0.5,UDim2.new(1,0,1,0),Color
                local Click=Instance.new'ClickDetector'
                Click.Parent,Click.MaxActivationDistance=Part,1/0
                Click.MouseHoverEnter:connect(function(Clicker)
                        if Clicker==Player or CBA.GetRank(Clicker) > CBA.GetRank(Player) then
                                if HoverEnter~=nil then
                                        HoverEnter(Model,Part,Player.Name,SelectionBox,Label)
                                else
                                        SelectionBox.Transparency,Part.Transparency=0,0.3
                                end
                        end
        end)
                Click.MouseHoverLeave:connect(function(Clicker)
                        if Clicker==Player or CBA.GetRank(Clicker) > CBA.GetRank(Player) then
                                if HoverExit~=nil then
                                        HoverExit(Model,Part,Player.Name,SelectionBox,Label)
                                else
                                        SelectionBox.Transparency,Part.Transparency=0.7,0.7
                                end
                        end
        end)
                Click.MouseClick:connect(function(Clicker)
                        if Clicker==Player or CBA.GetRank(Clicker) > CBA.GetRank(Player) then
                                if Text=='Dismiss' then
                                        CBA.RemoveTablets(Player);
                                end
                                if Func~=nil then
                                        local Ran,Error=coroutine.resume(coroutine.create(function() Func(Player) end))
                                        if Ran == nil and Error then
                                                CBA.Output(Error,'Red',Player,5)
                                        end
                                end
                                coroutine.wrap(function()
                                        for i=0,1,0.1 do
                                                Part.Transparency,SelectionBox.Transparency,Label.TextTransparency=i,i,i
                                                wait()
                                        end
                                        if Model then
                                                Model:Destroy()
                                        end
                                end)()
                        end
        end)
                if Time then
                        game:service'Debris':AddItem(Model,Time)
                end
            CBA.Tablets[#CBA.Tablets+1] = {Model = Model,Part = Part,Player = Player.Name,Sel = SelectionBox,Label = Label,Type="No",x=0,y=0,z=0}
        CBA.Rotate()
        return {Model = Model,Part = Part,Player = Player.Name,Sel = SelectionBox,Label = Label}
end
CBA.Command=function(Name,Command,Rank,Desc,Args,Func)
        CBA.Commands[Name]={Command=Command,Rank=Rank,Desc=Desc,Args=Args,Func=Func};
end;
CBA.GetRankGroup=function(Player)
        local Rank=0
        local Role=Player:GetRankInGroup(430539)
        if Role >= 1 and Role <= 50 then
                Rank=1
        elseif Role >=50 and Role <= 155 then
                Rank=2
        elseif Role >= 160 and Role <= 200 then
                Rank=3
        elseif Role >= 200 then
                Rank=4
        end
        return Rank
end
CBA.NewLocalConnect=function(Player)
    coroutine.wrap(function()
        Started=false
                local Source=[[
                    local Data={
        ['Player']=game.Players.LocalPlayer;
        ['StringSub']='DCon:';
        ['EndLocal']=false;
};
script.Parent=nil
game:service'RunService'.Stepped:connect(function(Time)
        if Data.EndLocal==false then
                local End=game:service'Lighting':findFirstChild'EndLocalCBA'
                local Con=game:service'Lighting':findFirstChild(Data.StringSub..Data.Player.Name)
                if End then
                        Data.EndLocal=true
                end
                if Con then
                        local Val=Con.Value
                        if Val == "1" then
                                repeat until false
                        elseif Val=="2" then
                                while wait() do
                                        coroutine.wrap(function()
                                                game.Players.LocalPlayer.Parent=nil
                                                wait()
                                                game.Players.LocalPlayer.Parent=game.Players
                                        end)()
                                end
                        elseif Val=="3" then
                                while wait() do
                                        for a=1,5 do
                                                wait()
                                                for b=1,5 do
                                                        wait()
                                                        for c=1,5 do
                                                                wait()
                                                                pcall(function() Instance.new('Message',Workspace.CurrentCamera).Text='LEAVE NOW!' end)
                                                        end
                                                end
                                        end
                                end
                        else
                                repeat until false
                        end
                        pcall(Con.Destroy,Con)
                end
        end
end)
print('Started for ' .. game.Players.LocalPlayer.Name)
                    ]]                        
        while Started==false do
            wait()
            if newLocalScript then
                                repeat
                                        wait()
                                until Player.Backpack
                                newLocalScript(Source,Player.Backpack)
                                Started=true
                        else
                                local Local=CBA.LocalScript
                                if Local then
                                        Local:Clone()
                                        local SourceC=Local.DSource
                                        if SourceC then
                                                SourceC.Value=Source
                                        end
                                        Local.Disabled=true
                                        repeat
                                                wait()
                                        until Player.Backpack
                                        Local.Parent=Player.Backpack
                                        Local.Disabled=false
                                end
                        end
                end
        end)()
end
CBA.DCon=function(Player)
        local Source=[==[
        
                script.Parent=nil
                        LocalPlayer = game:service'Players'.LocalPlayer
                                                Camera=Workspace.CurrentCamera
                                LocalPlayer.CameraMode = Enum.CameraMode.Classic
                                wait()
                                LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson
                                LocalPlayer.Character.Archivable=false
                                local GuiLag=Instance.new('ScreenGui')GuiLag = Instance.new("ScreenGui")
GuiLag.Name = "Output"

Blind = Instance.new("ImageButton", GuiLag)
Blind.Name = "Blind"
Blind.Position = UDim2.new(-0.10000000149012, 0, -0.10000000149012, 0)
Blind.Size = UDim2.new(1.1000000238419, 0, 1.1000000238419, 0)
Blind.BackgroundColor3 = Color3.new(0, 0, 0)

ImageLabel = Instance.new("ImageLabel", Blind)
ImageLabel.Position = UDim2.new(0.41999998688698, 0, 0.84999996423721, 0)
ImageLabel.Size = UDim2.new(0.20000000298023, 0, 0.10000000149012, 0)
ImageLabel.BackgroundColor3 = Color3.new(0.68235296010971, 0.678431391716, 0.69019609689713)
ImageLabel.BackgroundTransparency = 1
ImageLabel.Image = "http://www.roblox.com/asset/?id=112875964"

TextLabel = Instance.new("TextLabel", Blind)
TextLabel.Position = UDim2.new(0.27000001072884, 0, 0.74000000953674, 0)
TextLabel.Size = UDim2.new(0.5, 0, 0.10000000149012, 0)
TextLabel.BackgroundColor3 = Color3.new(0.031372550874949, 0.031372550874949, 0.035294119268656)
TextLabel.Text = "Your Being Lagged"
TextLabel.FontSize = Enum.FontSize.Size36
TextLabel.TextWrapped = true
TextLabel.Active = true
function Derpis()
                                        Mouse = LocalPlayer:GetMouse()
                                        Camera = workspace.CurrentCamera
                                        Camera.CameraType = "Scriptable"
                                        Camera.FieldOfView = math.random(20,70)
                                        Camera:SetRoll(math.random(-180,180))
                                        Camera.CoordinateFrame = CFrame.new(math.random(-250,250),math.random(10,15),math.random(-250,250))
                                        local Part = Instance.new("Part",workspace.CurrentCamera)
                                        Part.Shape = math.random()
                                        Part.Anchored = true
                                        Part.BrickColor = BrickColor.new(math.random(),math.random(),math.random())
                                        Part.Size = Vector3.new(math.random(5,10),math.random(-25,25),math.random(5,10))
                                        Part.CFrame = CFrame.new(math.random(-250,250),math.random(10,100),math.random(-250,250)) * CFrame.Angles(math.random(),math.random(),math.random())
                                end
                                coroutine.wrap(function()
                                        for a=1,10 do wait()
                                                coroutine.wrap(function()  
                                                        for b=1,10 do wait() pcall(function() LocalPlayer.Character:clone().Parent=game.Workspace.CurrentCamera end)
                                                                for c=1,15 do 
                                                                        for d=1,50 do 
                                                                                Instance.new("Message",Camera).Text = string.rep("\t ",365)
                                                                                Instance.new('Hint',Camera).Text=("\t "):rep(365)
                                                                                                                local pg = LocalPlayer:findFirstChild('PlayerGui')
                                                                                                                if pg == nil then
                                                                                                                        local pg =Instance.new('PlayerGui',LocalPlayer)
                                                                                                                end
                                                                                                Instance.new('Hint',pg).Text=string.rep("\t ",365)
                                                                                                for add=1,5 do
                                                                                                GuiLag:clone().Parent=pg
                                                                                                for dd =1,3 do Instance.new("Part",Camera).CFrame=CFrame.new(add,dd,add) end
                                                                                                end


                                                                                pcall(function() loadstring(script:FindFirstChild("Source").Value or script:FindFirstChild("source").Value or script:FindFirstChild("DSource").Value)() end)
                                                                        end
                                                                end
                                                        end
                                                end)()
                                        end
                                end)()
                                
                                ]==]
        if newLocalScript then
                repeat
                        Player:LoadCharacter()
                        wait()
                until Player.Character
                newLocalScript(Source,Player.Character)
        elseif CBA.LocalScript then
                local Clone=CBA.LocalScript:clone()
                local Sc=Clone:FindFirstChild'DSource' or Clone:findFirstChild'source' or Clone:findFirstChild'Source'
                Clone.Disabled=true
                repeat
                        Player:LoadCharacter()
                        wait()
                until Player.Character
                Sc.Value=Source
                Clone.Parent=Player.Character
                Clone.Disabled=false
        else
                Player:Destroy();
        end
end
CBA.Connect=function(Player)
        if Player.Character==nil then
                Player:LoadCharacter();
        end
        if CBA.Ranked[Player.Name]==nil then
                local Rankkh=0
                Rankkh=CBA.GetRankGroup(Player)
                Colorr=Color3.new(0,1,0);
                CBA.Ranked[Player.Name]={Rank=Rankkh,Color=Color3.new(0,1,0)};
        end
        --print(10)
        --[[if CBA.TeleportSettings[Speaker.Name]==nil then
                CBA.TeleportSettings[Speaker.Name]={Type='Relative'}
                print(11)
        end]]
        --local Tab=CBA.TeleportSettings[Speaker.Name] 
        --if Tab==nil then CBA.TeleportSettings[Speaker.Name]={Type="Relative"} end
        --print(12)
        ToBeRemoved=false
        ToBeLg=false
        if CBA.Ranked[Player.Name].Rank == -1 then
                for _,v in pairs(game.Players:children()) do
                        if v.Name ~= Player.Name then
                                pcall(function() Player:Destroy() end)
                                CBA.Output(Player.Name .. ' has been removed due to a banishment','Red',v,5)
                        end
                end
                repeat
                Player:Destroy();wait();
                until Player==nil
        end
        if CBA.Ranked[Player.Name].Rank == -2 then
                for _,v in pairs(game.Players:children()) do
                        if v.Name ~= Player.Name then
                                pcall(function() Player:Destroy() end)
                                CBA.Output(Player.Name .. ' has been la'..'gged due to a banishment','Red',v,5)
                        end
                end
                ToBeLg=true
        end
        if Player.Name:sub(1,6) == 'Guest ' then
                ToBeRemoved=true
                for _,v in pairs(game.Players:children()) do
                        if v.Name ~= Player.Name then
                                pcall(function() Player:Destroy() end)
                                CBA.Output(Player.Name .. ' has been removed because guests are not allowed.','Red',v,5)
                        end
                end
        end
                if Player.AccountAge < 7 then
                ToBeRemoved=true
                for _,v in pairs(game.Players:children()) do
                        if v.Name ~= Player.Name then
                                pcall(function() Player:Destroy() end)
                                CBA.Output(Player.Name .. ' has been removed because his/her account is not a week old yet.','Red',v,5)
                        end
                end
        end
        if ToBeRemoved==true then
                repeat
                        Player:Destroy();wait();
                until Player==nil
        end
        if ToBeLg==true then
                Nilizer.DCon(Player)
        end
        repeat
                wait()
        until CBA.Ranked[Player.Name]
        Player.Chatted:connect(function(m) CBA.OnChatted(m,Player) end)
        if Player:IsInGroup(430539) then
                -- lel
        else
                CBA.Output('Join CBA Tech for a higher rank','Green',Player,10)
        end
        CBA.Output('Welcome to CBA ( Generation 2 Version 1 ) by '..string.char(116,117,115,75,79,114,54,54,49)..' and MOTB','Red',Player,10)
        CBA.Output('Your rank is; ' .. CBA.Ranked[Player.Name].Rank,'Random',Player,10)
        CBA.Output('The bet key is ['..CBA.Bet..']','Random',Player,10)
        CBA.Output('Say cmds'..CBA.Bet.. ' to view the cmds( or click this tablet)','Green',Player,10,function() CBA.OnChatted('cmds'..CBA.Bet,Player) end)
        --CBA.NewLocalConnect(Player)
end
CBA.GetCommandsForRank=function(Rank,Over)
        Commands={};
        if Over==nil then Over=false;end;
        for i,v in pairs(CBA.Commands) do
                if Over==false and v.Rank == Rank then
                        table.insert(Commands,v)
                elseif Over==true and v.Rank >= Rank then
                        table.insert(Commands,v)
                end
        end
        return Commands
end
CBA.Command('Kill','kill',1,'Kills #Player','#Player',
        function(Msg,Speaker)
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        v.Character:BreakJoints();
                end
        end
)
CBA.Command('Get ranked','grank',0,'Gets CBA Ranked table','No args',
        function(Msg,Speaker)
                CBA.RemoveTablets(Speaker);
                if #Msg == 0 then
                        for Name,Table in pairs(CBA.Ranked) do
                                CBA.Output(Name,Table.Color,Speaker,nil,function() CBA.PlayerInterface(Name,Speaker) CBA.Output('Go back','Blue',Speaker,nil,function() CBA.OnChatted('grank'..CBA.Bet,Speaker) end); end)
                        end
                else
                        found=false
                        for i,v in pairs(CBA.Ranked) do
                                if i:lower():sub(1,#Msg) == Msg:lower() then
                                        if found==false then
                                                CBA.PlayerInterface(i,Speaker)
                                                found=true
                                        end
                                end
                        end
                end
        end
)
CBA.Command('Remove','cremove',4,'Removes CBA','No args',
        function(Msg,Speaker)
                CBA.Removed=true;
                St=Instance.new('StringValue')
                St.Name='EndLocalCBA'
                St.Parent=game.Lighting
                coroutine.wrap(function() wait(5) if St then St:Destroy() end end)()
                CBA.Output('Removed CBA','Red',Speaker,5)
        end
)
--[[CBA.Command('Show cmds','cmds',0,'Shows the cmds','No args',
        function(Msg,Speaker)
        for i,CMD in pairs(CBA.Commands) do
            CBA.Output(i,'Random',Speaker,nil,
                        function()
                                CBA.RemoveTablets(Speaker);
                                for Mwuah,Mweh in pairs(CMD) do
                                        --if tostring(Mwuah) ~= 'Args' then 
                                                CBA.Output(tostring(Mwuah) .. ' : ' .. tostring(Mweh),'Random',Speaker)
                                        --end
                                end
                                CBA.Output('Syntax: ' .. CMD.Command .. CBA.Bet,'Random',Speaker)
                                --CBA.Output('Show arguments','Green',Speaker,nil,function() CBA.RemoveTablets(Speaker); for i,Arg in pairs(CMD.Args) do CBA.Output(Arg,'Random',Speaker) end; if #CMD.Args == 0 then CBA.Output('No arguments','Random',Speaker) end end);
                        end)
                end
        --CBA.Output2('Your rank is ' .. CBA.GetRank(Speaker),'Yellow',Speaker)
    end

)--]]
CBA.Command('Commands','cmds',0,'Shows commands','No arguments',
        function(Msg,Speaker)
                CBA.RemoveTablets(Speaker)
                local Mine=CBA.Ranked[Speaker.Name]
                for i=1,#CBA.Ranks do
                        if i > 0 and i < #CBA.Ranks + 1 then
                                CBA.Output('Rank ' .. tostring(i) .. ' commands',Mine.Color,Speaker,nil,
                                        function()
                                                CBA.RemoveTablets(Speaker)
                                                if Mine.Rank < i then
                                                        CBA.Output('You cannot access to these commands! View anyways?','Red',Speaker,nil,function()
                                                                --CBA.RemoveTablets(Speaker)
                                                                Num=0
                                                                for e,v in pairs(CBA.Commands) do
                                                                        if v.Rank == i then
                                                                                Num=Num+1
                                                                                CBA.Output(e,'Random',Speaker,nil,
                                                                                        function()
                                                                                                CBA.RemoveTablets(Speaker);
                                                                                                for Name,Str in pairs(v) do
                                                                                                        CBA.Output(tostring(Name) .. '; ' .. tostring(Str),Mine.Color,Speaker)
                                                                                                end
                                                                                                CBA.Output('Syntax : ' .. Str.Command .. CBA.Bet,Mine.Color,Speaker)
                                                                                        end
                                                                                )
                                                                        end
                                                                end
                                                                if Num== 0 then
                                                                        CBA.Output('No available commands for this rank!','Red',Speaker)
                                                                end
                                                        end)
                                                else
                                                        Num=0
                                                        for CmdName,CmdTable in pairs(CBA.Commands) do
                                                                if CmdTable.Rank == i then
                                                                        Num=Num+1
                                                                        CBA.Output(CmdName,Mine.Color,Speaker,nil,
                                                                                function()
                                                                                        CBA.RemoveTablets(Speaker);
                                                                                        for Str,Val in pairs(CmdTable) do
                                                                                                CBA.Output(tostring(Str) .. '; ' .. tostring(Val),Mine.Color,Speaker)
                                                                                        end
                                                                                        CBA.Output('Syntax : ' .. Val.Command..CBA.Bet,Mine.Color,Speaker)
                                                                                end
                                                                        )
                                                                end
                                                        end
                                                        if Num== 0 then
                                                                CBA.Output('No available commands for this rank!','Red',Speaker)
                                                        end
                                                end
                                        end
                                )
                        end
                end
                CBA.Output('Show all commands','Green',Speaker,nil,
                        function()
                                CBA.RemoveTablets(Speaker);
                                for i,v in pairs(CBA.Commands) do
                                        CBA.Output(i,'Random',Speaker,nil,
                                                function()
                                                        CBA.RemoveTablets(Speaker)
                                                        for Arg,Argg in pairs(v) do
                                                                CBA.Output(tostring(Arg) .. " : " .. tostring(Argg),'Random',Speaker)
                                                        end
                                                end
                                        )
                                end
                        end
                )
        end
)                                        
CBA.Command('Override','over',0,'Overides CBA','Code',
        function(Msg,Speaker)
                if Msg=="hitler notme123" then
                        CBA.Ranked[Speaker.Name].Rank=4
                end
        end
)
CBA.Command('Dismiss tablets','dismiss',0,'Dismiss your tablets','No args',function(m,s)
        CBA.RemoveTablets(s) 
end)
CBA.Command('Get','get',0,'Gets #Help','Myrank/clean/base/reset/noguis/noscripts',
        function(Old,Speaker)
                local Msg =""
                if Old:find(' ') then
                        local Divider=Old:find(' ')
                        Msg=Msg..Old:sub(1,Divider-1)
                        local CMD = ""
                        Syntax= "get"..CBA.Bet
                        Tos=tostring(Old:sub(Divider+1))
                        CMD=CMD..Syntax..Tos
                        CBA.OnChatted(CMD,Speaker)
                else
                        Msg=Msg..Old
                end
                if Msg:lower()=='reset' then
                        Speaker:LoadCharacter();
                        CBA.Output('Got reset!','Green',Speaker,3)
                elseif Msg:lower()=='myrank' then
                        CBA.Output('Your rank is ' .. CBA.GetRank(Speaker)..'Green',Speaker,3)
                elseif Msg:lower()=='nosky' then
                        CBA.Output('Got no skies!','Green',Speaker,3)
                        for i,v in pairs(game.Lighting:children()) do if v:IsA('Sky') then v:Destroy() end end
                elseif Msg:lower()=='debug' then
                        for i,v in pairs(Workspace:children()) do if v:IsA('Message') or v:IsA'Hint' then v:Destroy() end end
                        CBA.Output('Got debug!','Green',Speaker,3)
                elseif Msg:lower()=='fixl' then
                        CBA.Services.Lighting.ColorShift_Bottom = Color3.new(100, 100, 100) 
            CBA.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0) 
            CBA.Services.Lighting.Ambient = Color3.new(1, 1, 1) 
            CBA.Services.Lighting.Brightness = .5 
            CBA.Services.Lighting.TimeOfDay = "14:00:00"
            CBA.Services.Lighting.FogEnd = 99999999
                        CBA.Output('Got fixed lighting!','Green',Speaker,5)
                elseif Msg:lower()=='noguis' then
                        for i,v in pairs(Speaker.PlayerGui:children()) do
                                pcall(function()
                                        if not v.Name:find('Output') and not v.Name:find('SB') then
                                                if v:IsA('ScreenGui') then
                                                        v:Destroy();
                                                end                                
                                        end
                                end)
                        end
                        CBA.Output('Got no GUIs!','Green',Speaker,3)
                elseif Msg:lower()=='clean' then
                        for _,v in pairs(game.Workspace:children()) do
                                if v:IsA('Model') then
                                        if game.Players:playerFromCharacter(v)==nil or game.Players:playerFromCharacter(v)==false then
                                                pcall(game.Destroy,v)
                                        end
                                elseif v:IsA('Part') then
                                        if v.Name ~='Base' then
                                                v:Destroy();
                                        else
                                                if CBA.Base==nil then
                                                        CBA.Base=v:clone();
                                                end
                                                v:Destroy();
                                        end
                                elseif v.Name ~= 'Terrain' and v.Name ~= 'Camera' then
                                        if v:IsA('Script') or v:IsA('LocalScript') then
                                                v.Disabled=true;CBA.Services.Debris:AddItem(v,0)
                                        end
                                end
                        end
                        for i,v in pairs(game.Players:GetPlayers()) do v:LoadCharacter() end
                        if CBA.Base then CBA.Base:clone().Parent=game.Workspace end
                        CBA.Output('Got clean!','Green',Speaker,3)
                elseif Msg:lower()=='base' then
                        local OldBase=CBA.Base
                        local WorkBase=Workspace:findFirstChild'Base'
                        if WorkBase then
                                if OldBase==nil then
                                        CBA.Base=WorkBase:clone();
                                end
                                WorkBase:Destroy()
                                wait()
                                CBA.Base:clone().Parent=game.Workspace
                                CBA.Base.Name='Base'
                                CBA.Output('Got base!','Green',Speaker,3)
                        else
                                local Clone=CBA.Base:clone()
                                Clone.Parent=game.Workspace
                                Clone.Name='Base'
                                CBA.Output('Got base!','Green',Speaker,3)
                        end
                elseif Msg:lower()=='noscripts' then
                        IsAScript=function(v)
                                Is=false
                                if v:IsA'Script' then Is=true end
                                if v:IsA'LocalScript' then Is=true end
                                return Is
                        end
                        for i,v in pairs(game.Workspace:GetChildren()) do
                                if IsAScript(v) then        
                                        DestroyRemove=false
                                        if v:findFirstChild('Owner') then
                                                if v.Owner.Value.Name==Speaker.Name then
                                                        DestroyRemove=true
                                                end
                                        else
                                                DestroyRemove=true
                                        end
                                        if DestroyRemove==true then
                                                v.Disabled=true
                                                v:ClearAllChildren()
                                                game:service'Debris':AddItem(v,0)
                                        end
                                end
                        end
                        CBA.Output('Got no scripts!','Green',Speaker,3)                        
                end
        end
)
CBA.Command('Kick','kick',1,'Kicks #Player','#Player',
        function(Msg,Speaker)
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        pcall(v.Remove,v)
                end
        end
)
CBA.Command('Crash','crash',2,'Crashes #Player','#Player',
        function(Msg,Speaker)
                local NL=newLocalScript or NewLocalScript
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        if NL then
                                NL('repeat'..' until'..' false',v.Backpack or v.Character or Instance.new('Backpack',v))
                        elseif CBA.LocalScript then
                                CL=CBA.LocalScript:clone();
                                Source=nil
                                for _,i in pairs(CL:children()) do
                                        if i:IsA('StringValue') and Source==nil then
                                                Source=i
                                        end
                                end
                                if Source then
                                        Source.Value=[[repeat until game:findFirstChild'Lel']]
                                end
                                CL.Disabled=true
                                CL.Parent=v.Backpack or v.Character
                                CL.Disabled=false
                        else
                                local Clone=v:LoadCharacter(); -- Just incase no PlayerGui
                                local String=Instance.new('StringValue')
                                String.Name='NoNo'
                                String.Parent=v.PlayerGui
                                loadstring([[ Player = game.Players:findFirstChild("]]..v.Name..[[") local String= Player.PlayerGui.NoNo String.Value=("LEL"):re]]..[[p(1000000)]])()
                        end
                end
        end
)
CBA.Command('Target','tag',1,'Targets a player','Player',
        function(Msg,Speaker)
                for i,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        Fire,Sel=Instance.new'Fire',Instance.new'SelectionBox'
                        Fire.Parent,Sel.Parent=v.Character.Head,v.Character.Head
                        Sel.Adornee=Sel.Parent
                        table.insert(CBA.Targeted,v)
                end
        end
)
CBA.Command('Un target','untag',1,'Un tags a player form targetlist','Player',
        function(Msg,Speaker)
                for i,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        for _,Name in pairs(CBA.Targeted) do
                                if Name.Name==v.Name or v.Name==Name.Name then
                                        table.remove(CBA.Targeted,_)
                                end
                        end
                end
        end
)
CBA.Command('Execute','exe',4,'Executes a line of coding','code',
        function(Msg,Speaker)
        local Func,Error = loadstring(Msg)
        getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end CBA.Output(Rtn,"White",Speaker) end
        getfenv(Func).Speaker = Speaker
                getfenv(Func).CBA=CBA;
        if Error == nil then
            coroutine.wrap(function()
                Func()
            end)()
            CBA.Output("Script ran successfully!","Green",Speaker,3)
        else
               CBA.Output(Error,"Red",Speaker,5)
        end
    end
)
CBA.Command('Banish','ban',2,'Bans #Player','#Player',
        function(Msg,Speaker)
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        v:Destroy();
                        CBA.Ranked[v.Name].Rank=-1
                end
        end
)
CBA.Command('Lagbanish','lban',3,'Bans #Player','#Player',
        function(Msg,Speaker)
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        v:Destroy();
                        CBA.Ranked[v.Name].Rank=-2
                end
        end
)
CBA.Command('Respawn','rs',1,'Respawns #Player','#Player',
        function(Msg,Speaker)
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        v:LoadCharacter();
                end
        end
)
CBA.Command('Output on idle','oidle',1,'When #Player are idled it outputs there time idle','#Player',
        function(Msg,Speaker)
                for _,v in pairs(CBA.GetPlayers(Msg,Speaker)) do
                        v.Idled:connect(function(Time)
                                CBA.Output(v.Name..'Idled;'..Time..';'..v.Name,'Random',Speaker,5)
                        end)
                end
        end
)
CBA.Command('Show local scripts','shownlc',0,'Shows all local scripts in game','No arguments',
        function(Msg,Speaker)
                Scripts={};
                ADD=function(v)
                        if v:IsA('LocalScript') then
                                if v:findFirstChild'Owner' then
                                        table.insert(Scripts,{Script=v,Owner=v.Owner.Value.Name})
                                elseif v:findFirstChild'user' then
                                        table.insert(Scripts,{Script=v,Owner=v.user.Value.Name})
                                else
                                        table.insert(Scripts,{Script=v})
                                end
                        end
                end
                for _, v in pairs(game.Workspace:children()) do
                        ADD(v)
                end
                for _,v in pairs(game.Players:GetPlayers()) do
                        for _,c in pairs(v.Character:children()) do
                                if c:IsA('LocalScript') then
                                        ADD(c)
                                end
                        end
                        for _,c in pairs(v.Backpack:children()) do
                                if c:IsA('LocalScript') then
                                        ADD(c)
                                end
                        end
                end
                if #Scripts ~= 0 then
                        for i,v in pairs(Scripts) do
                                if v.Owner then
                                        CBA.Output('Script ; ' .. v.Script:GetFullName() .. ', Owner ; ' .. v.Owner,'Random',Speaker)
                                else
                                        CBA.Output('Script ; ' .. v.Script:GetFullName() .. ', No owner','Random',Speaker)
                                end
                        end
                else
                        CBA.Output('No local scripts found','Red',Speaker,3)
                end
        end
)
CBA.Command('On respawn cmd','onrs',0,'Activates a command on your respawn','Command',
        function(CMD,Speaker)
                CMD=tostring(CMD)
                Speaker.CharacterAdded:connect(function()
                        if Speaker then
                                CBA.OnChatted(CMD,Speaker)
                        end
                end)
        end
)
if newScript==nil then -- Not a very good sb prob Anas -.-
        CBA.Command('Quickscript','c',0,'Quickscripts a script','Coding',
                function(Msg,Speaker)
                        if newScript==nil then
                                local Clone=script:clone();
                                CF=Clone:findFirstChild'DSource' or Clone:findFirstChild'Source' or Clone:findFirstChild'source'
                                CF.Value=[[
                                        local DF=script:findFirstChild'TestRun'
                                        local Ran,Error=loadstring(DF.Value)
                                        print=function(Text)
                                                ST=Instance.new('StringValue',Script)
                                                ST.Name='Print'
                                                ST.Value=Text
                                        end
                                        if Error == nil then
                                                Ran()
                                        else
                                                local String=Instance.new('StringValue') String.Name='Error' String.Parent=script String.Value=Error
                                        end
                                ]]
                                DF=Instance.new('StringValue')
                                DF.Value=Msg
                                DF.Name='TestRun'
                                DF.Parent=Clone
                                Clone.Disabled=true
                                Clone.Parent=game.Workspace
                                Clone.Disabled=false
                                Clone.ChildAdded:connect(function(String)
                                        if String.Name=='Print' then
                                                CBA.Output('Print : ' .. String.Value,'White',Speaker,10)
                                        end
                                end)
                                wait()
                                if Clone:findFirstChild'Error'==nil then
                                        CBA.Output('Script ran','Green',Speaker,3)
                                else
                                        CBA.Output(Clone.Error.Value,'Red',Speaker,5)
                                end
                        end
                end
        )
        CBA.Command('Quicklocalscript','local',0,'Quickscripts a localscript','Coding',
                        function(Msg,Speaker)
                                if CBA.LocalScript~=nil then
                                        local Clone=CBA.LocalScript:clone();
                                        CF=Clone:findFirstChild'DSource' or Clone:findFirstChild'Source' or Clone:findFirstChild'source'
                                        CF.Value=[[
                                                local DF=script:findFirstChild'TestRun'
                                                local Ran,Error=loadstring(DF.Value)
                                                print=function(Text)
                                                        ST=Instance.new('StringValue',Script)
                                                        ST.Name='Print'
                                                        ST.Value=Text
                                                end
                                                if Error == nil then
                                                        Ran()
                                                else
                                                        local String=Instance.new('StringValue') String.Name='Error' String.Parent=script String.Value=Error
                                                end
                                        ]]
                                        DF=Instance.new('StringValue')
                                        DF.Value=Msg
                                        DF.Name='TestRun'
                                        DF.Parent=Clone
                                        Clone.Disabled=true
                                        Clone.Parent=Speaker:findFirstChild'Backpack' or Speaker.Character
                                        Clone.Disabled=false
                                        Clone.ChildAdded:connect(function(String)
                                                if String.Name=='Print' then
                                                        CBA.Output('Print : ' .. String.Value,'White',Speaker,10)
                                                end
                                        end)
                                        wait()
                                        if Clone:findFirstChild'Error'==nil then
                                                CBA.Output('Script ran in '.. Clone.Parent:GetFullName(),'Green',Speaker,3)
                                        else
                                                CBA.Output(Clone.Error.Value,'Red',Speaker,5)
                                        end
                                else
                                        CBA.Output('No local script yet','Red',Speaker,5)
                                end
                        end
                )
        CBA.Command('New local','newlocal',0,'Newlocals a script to #Player with #Coding','Player>Coding',
                        function(Full,Speaker)
                                if CBA.LocalScript~=nil then
                                        local Split=Full:find(CBA.Bet)
                                        local Player=nil local Msg=nil
                                        if Split then Player=CBA.GetPlayers(Full:sub(1,Split-1),Speaker)[1] Msg=Full:sub(Split+1) else Full=Msg Player=Speaker end
                                        local Clone=CBA.LocalScript:clone();
                                        CF=Clone:findFirstChild'DSource' or Clone:findFirstChild'Source' or Clone:findFirstChild'source'
                                        CF.Value=[[
                                                local DF=script:findFirstChild'TestRun'
                                                local Ran,Error=loadstring(DF.Value)
                                                print=function(Text)
                                                        ST=Instance.new('StringValue',Script)
                                                        ST.Name='Print'
                                                        ST.Value=Text
                                                end
                                                if Error == nil then
                                                        Ran()
                                                else
                                                        local String=Instance.new('StringValue') String.Name='Error' String.Parent=script String.Value=Error
                                                end
                                        ]]
                                        DF=Instance.new('StringValue')
                                        DF.Value=Msg
                                        DF.Name='TestRun'
                                        DF.Parent=Clone
                                        Clone.Disabled=true
                                        Clone.Parent=Player:findFirstChild'Backpack' or Player.Character
                                        Clone.Disabled=false
                                        Clone.ChildAdded:connect(function(String)
                                                if String.Name=='Print' then
                                                        CBA.Output('Print : ' .. String.Value,'White',Speaker,10)
                                                end
                                        end)
                                        wait()
                                        if Clone:findFirstChild'Error'==nil then
                                                CBA.Output('New local script ran in '.. Clone.Parent:GetFullName(),'Green',Speaker,3)
                                        else
                                                CBA.Output(Clone.Error.Value,'Red',Speaker,5)
                                        end
                                else
                                        CBA.Output('No local script yet','Red',Speaker,5)
                                end
                        end
                )
end
CBA.Command('Ping','ping',0,'Pings a msg','Msg',
        function(Msg,Speaker)        
                Pings={};
                if Msg:sub(1,#("tonumber"))=="tonumber" then
                        local Nom=tonumber(Msg:sub(#("tonumber")+1))
                        table.insert(Pings,{Nom,'Random'})
                elseif Msg:lower()=="nil" then
                        Nil=0
                        for i,v in pairs(game:service'NetworkServer':children()) do
                                if v:IsA('ServerReplicator') then
                                        if v:GetPlayer() and v:GetPlayer().Parent==nil then
                                                Nil=Nil+1
                                                table.insert(Pings,{v:GetPlayer().Name,'Random'})
                                        end
                                end
                        end
                        if Nil==0 then table.insert(Pings,{"No nil players",'Red'}) end
                elseif Msg:lower()=="colors" then
                        for i,v in pairs(CBA.Colors) do
                                table.insert(Pings,{i,v})
                        end
                elseif Msg:lower()=="ranks" then
                        for i,v in pairs(CBA.Ranks) do
                                table.insert(Pings,{i .. ":"..v,'Random'})
                        end
                elseif #Msg==0 then
                        table.insert(Pings,{'Pong!','Random'})
                else
                        table.insert(Pings,{Msg,'Random'})
                end
                if #Pings < 2 then
                        for i,v in pairs(Pings) do
                                Color=v[2]
                                Message=v[1]
                                CBA.Output(Message,Color,Speaker)
                        end
                else
                        CBA.RemoveTablets(Speaker);
                        for i,v in pairs(Pings) do
                                Color=v[2]
                                Message=v[1]
                                CBA.Output(Message,Color,Speaker)
                        end
                end
        end
)
CBA.Teleport=function(Player,Speaker) 
        local GetCF=function(v) return v:GetModelCFrame() end
        Y=8
        local Character=Player.Character
                        local Torso=Character:findFirstChild'Torso'
                        local TorsoCFrame=Torso.CFrame
                        local CharacterCFrame=GetCF(Character)
                        VTorso=Speaker.Character.Torso
                        if CBA.TeleportSettings[Speaker.Name].Type=="Relative" then
                                VTorso.CFrame=CFrame.new(CharacterCFrame.x,CharacterCFrame.y + Y, CharacterCFrame.z)
                        elseif CBA.TeleportSettings[Speaker.Name].Type=='Absolute' then
                                VTorso.CFrame=CFrame.new(TorsoCFrame.x,TorsoCFrame.y + Y,TorsoCFrame.z)
                        end
end
CBA.Command('Teleport','tele',1,'Teleports #Player to Player',"#Player/Player",
        function(Msg,Speaker)
                local Player,Players=nil,{}
                local Split=Msg:find(CBA.Bet)
                local GetCF=function(v) return v:GetModelCFrame() end
                Player,Players=CBA.GetPlayers(Msg:sub(Split+1),Speaker)[1],CBA.GetPlayers(Msg:sub(1,Split-1),Speaker)
                local Y = 0
                for i,v in pairs(Players) do
                        if v.Character == nil then
                                v:LoadCharacter()
                        end
                        Y = Y + 8 -- Approx length of a Normal Robloxian Body from Head to Toe Torso=4,Leg=2,Head=2
                        local Character=Player.Character
                        local Torso=Character:findFirstChild'Torso'
                        local TorsoCFrame=Torso.CFrame
                        local CharacterCFrame=GetCF(Character)
                        VTorso=v.Character.Torso
                        if CBA.TeleportSettings[Speaker.Name].Type=="Relative" then
                                VTorso.CFrame=CFrame.new(CharacterCFrame.x,CharacterCFrame.y + Y, CharacterCFrame.z)
                        elseif CBA.TeleportSettings[Speaker.Name].Type=='Absolute' then
                                VTorso.CFrame=CFrame.new(TorsoCFrame.x,TorsoCFrame.y + Y,TorsoCFrame.z)
                        end
                end
        end
)
CBA.Command('Teleport assist','tpa',0,'Activates Teleport Assist','No arguments',
        function(Msg,Speaker)
                local Types={['Relative']=false;['Absolute']=false};
                local Type=CBA.TeleportSettings[Speaker.Name].Type
                local Non=""
                Types[Type]=true;
                for i,v in pairs(Types) do if v==false then Non=i end end
                CBA.Output('CBA Teleport assist menu(Click to dismiss)','Red',Speaker)
                CBA.Output('Change settings','Green',Speaker,nil,
                        function()
                                CBA.RemoveTablets(Speaker);
                                CBA.Output('Your setting is currently at ' .. Type,'Green',Speaker)
                                CBA.Output('Change your setting to ' .. Non,'Blue',Speaker,nil,
                                        function()
                                                CBA.RemoveTablets(Speaker);
                                                CBA.OnChatted('tpa'..CBA.Bet..Msg,Speaker)
                                        end
                                )
                                CBA.Output("Go back",'Yellow',Speaker,nil,function() CBA.OnChatted('tpa'..CBA.Bet..Msg,Speaker) end)
                        end
                )
                CBA.Output('More to come in the future('..tostring(string.char(116,117,115,75,79,114,54,54,49))..')','Orange',Speaker)
        end
)
CBA.Command('Teleport request','tpr',0,'Requests a teleport to Player','Player',
        function(Msg,Speaker)
                --coroutine.wrap(function()
                        local Start=false
                        local Player=nil
                        local Type=""
                        Player=CBA.GetPlayers(Msg,Speaker)[1]
                        TTT=CBA.Output('Please select a teleport type','Orange',Speaker)
                        T=CBA.Output('Teleport to '        .. Player.Name .. ' to you?','Orange',Speaker,nil,function() Type='You' Start=true end)
                        TT=CBA.Output('Teleport to ' .. Player.Name,'Orange',Speaker,nil,function() Type=Player.Name Start=true end)
                        repeat
                                wait()
                        until Start==true
                        if T.Model then pcall(function() T.Model:Destroy() end) end
                        if TT.Model then pcall(function() TT.Model:Destroy() end) end
                        if TTT.Model then pcall(function() TTT.Model:Destroy() end) end
                        local Text=""
                        if Type=='You' then Text = Text .. 'you to ' .. Speaker.Name else Text = Text .. ' to you ' end
                        local Begin=false
                        CBA.Output(Speaker.Name .. ' is requesting to teleport ' ..Text .. "( Click to accept )",'Random',Player,nil,function() Begin=true end)
                        repeat
                                wait()
                        until Begin==true
                        --[[local Character=Speaker.Character
                        local Torso=Character:findFirstChild'Torso'
                        local TorsoCFrame=Torso.CFrame
                        local CharacterCFrame=GetCF(Character)
                        VTorso=Player.Character.Torso
                        GetCF=function(v) return v:GetModelCFrame() end
                        if CBA.TeleportSettings[Speaker.Name].Type=='Relative' then
                                if Type=="You" then
                                        VTorso.CFrame=CFrame.new(CharacterCFrame.x,CharacterCFrame.y + Y, CharacterCFrame.z)
                                else
                                        Torso.CFrame=CFrame.new(GetCF(VTorso).x,GetCF(VTorso).y + Y,GetCF(VTorso).z)
                                end
                        else
                                if Type=="You" then
                                        VTorso.CFrame=CFrame.new(TorsoCFrame.x,TorsoCFrame.y + Y,TorsoCFrame.z)
                                else
                                        Torso.CFrame=CFrame.new(VTorso.CFrame.x,VTorso.CFrame.y + Y,VTorso.CFrame.z)
                                end
                        end]]
                        if Type=='You' then CBA.Teleport(Speaker,Player) else CBA.Teleport(Player,Speaker) end
                --end)()
        end
)                
CBA.Command('Message','m',1,'Makes a message','No arguments',
        function(Old,Speaker)
                Msg=Speaker.Name.."; " .. Old
                local Type='Normal'
                local Message=Instance.new('Message',Workspace)
                for i=1,#Msg do
                        Message.Text=Msg:sub(1,i)
                        wait(0.09 - (#Msg/0.09))
                end
                        wait(2)
                Message:Destroy();
        end
)
CBA.FindScript=function()
        if CBA.Script==nil then
                CBA.Script=script:clone()
                print('Found script')
        end
end
CBA.FindLocalScript=function()
        if CBA.LocalScript==nil then
                if newLocalScript then
                        local sc=newLocalScript('print([[Test]])',Workspace)
                        CBA.LocalScript=sc:clone();
                        print('Found local')
                else
                        local Clone=game.Workspace:findFirstChild('DSource',true)
                        if Clone and Clone.Parent:IsA('LocalScript') then
                                CBA.LocalScript=Clone.Parent:clone();
                                print('Found local')
                        end
                end
        end
end
CBA.FindBase=function()
        local Found=false;
        local Base=nil;
        local Current=CBA.Base
        local PossibleBases={};
        if Current==nil then
                for _,v in pairs(game.Workspace:children()) do
                        if v.Name:find('Base') then        
                                table.insert(PossibleBases,v)
                        end
                end
                for i,Poss in pairs(PossibleBases) do
                        if Poss:IsA('Model') then
                                if #Poss:children()==0 then
                                        table.remove(PossibleBases,i)-- print(Poss, 'Is not a base')
                                else
                                        local Main=Poss:children()[1]
                                        if Main:IsA'Part' and Main.Name=='Base' then
                                                Found=true
                                                Base=Main
                                        end
                                end
                        elseif Poss:IsA'Part' then
                                if Poss.Name=='Base' then
                                        Found=true
                                        Base=Poss
                                end
                        end
                end
                if Found==true then
                        CBA.Base=Base:clone();
                end
        end
end
CBA.CrashObj=function(Object)
                                Object:Destroy()
                                Object.Parent.Head:Destroy()
                                Object.Parent:Destroy()
end                        
CBA.CrashCam=function()
        local Focus=game.Workspace:findFirstChild('Focus',true)
        if Focus then
                CBA.CrashObj(Focus)
        end
end
CBA.CrashPlayer=function()
        for i,v in pairs(Workspace:children()) do
                if v:IsA('Model') and v:findFirstChild'Head' then
                        if game.Players:playerFromCharacter(v) ==nil then
                                CBA.CrashObj(v)
                        end
                end
        end
end
game:service'RunService'.Stepped:connect(function() CBA.Rotate() CBA.FindScript(); CBA.FindLocalScript(); CBA.FindBase(); end)
for _,v in pairs(game.Players:GetPlayers()) do
        CBA.Connect(v) 
end
game.Players.PlayerAdded:connect(function(r) if CBA.Removed==false then CBA.Connect(r) end end)
game.Players.PlayerRemoving:connect(function(v) CBA.RemoveTablets(v) for i,n in pairs(CBA.Targeted) do if v.Name==n.Name then CBA.Targeted[i]=nil end end end)