Gui.Parent = game.CoreGui

local Banned  = {}
local Slock   = false
local destroy = workspace.GameService.DestroyIngredient
local Players = game:GetService('Players')
local LPlayer = Players.LocalPlayer

local Commands = {'ban Player',
   'kick Player',
   'destroyworkspace',
   'cmds',
   'cripple Player',
   'disable Player',
   'takeover',
   'fuckpizza',
   'kill Player',
   'slock',
   'unslock',
   'viewbans',
   'ruin',
   'shutdown',
   'btools',
   'end',
   'More To Be Added Soon!',
}

function Kick(Player)
   destroy:FireServer(Player, false)
   print('Kicked ' .. Player.Name)
end

function Ban(Player)
   table.insert(Banned, Player.Name)
   print('Banned ' .. Player.Name)
   Kick(Player)
end
Players.PlayerAdded:connect(function(plr)
   for i,v in pairs(Banned) do
       if v == plr.Name then
           Kick(plr)
           print('Banned Player ' .. plr.Name .. ' tried to join')
       end
   end
   if Slock then
       Kick(plr)
       print('Player ' .. plr.Name .. ' tried to join while slock was on')
   end
end)

function Get(Arg)
   local Found = {}
   if Arg:lower() == 'all' then
       for i,v in pairs(Players:GetPlayers()) do
           table.insert(Found, v.Name)
       end
   elseif Arg:lower() == 'others' then
       for i,v in pairs(Players:GetPlayers()) do
           if v.Name ~= LPlayer.Name then
               table.insert(Found, v.Name)
           end
       end
   elseif Arg:lower() == 'random' then
       table.insert(Found,Players:GetPlayers()[math.random(#Players:GetPlayers())].Name)
   else
       for i,v in pairs(Players:GetPlayers()) do
           if v.Name:lower():sub(1, #Arg) == Arg:lower() then
               table.insert(Found, v.Name)
           end
       end
   end
   return Found
end

local msg = Gui.Drag.CommandBar

Gui.Drag.Run.MouseButton1Down:connect(function()
   if msg.Text:lower():sub(1,5) == 'kick ' then
       for i,v in pairs(Get(msg.Text:lower():sub(6))) do
           Kick(Players:FindFirstChild(v))
       end
   elseif msg.Text:lower():sub(1,4) == 'ban ' then
       for i,v in pairs(Get(msg.Text:lower():sub(5))) do
           Ban(Players:FindFirstChild(v))
       end
   elseif msg.Text:lower() == 'destroyworkspace' then
       for i,v in pairs(workspace:GetDescendants()) do
           pcall(function()
               if v.Name ~= 'GameService' or v.Parent.Name ~= 'GameService' then
                   destroy:FireServer(v,false)
               end
           end)
       end
   elseif msg.Text:lower() == 'cmds' then
       Gui.Drag.CommandBar.Text = 'Press f9 to view commands'
       print(table.concat(Commands, ' | '))
   elseif msg.Text:lower():sub(1,8) == 'cripple ' then
       for i,v in pairs(Get(msg.Text:lower():sub(9))) do
           destroy:FireServer(Players:FindFirstChild(v).Character.HumanoidRootPart,false)
       end
   elseif msg.Text:lower():sub(1,8) == 'disable ' then
       for i,v in pairs(Get(msg.Text:lower():sub(9))) do
           destroy:FireServer(Players:FindFirstChild(v).Character.Humanoid,false)
       end
   elseif msg.Text:lower() == 'takeover' then
       for i, v in pairs(Players:GetPlayers()) do
           if v.TeamColor == game.Teams.Manager.TeamColor and v.Name ~= LPlayer.Name then
               Kick(v)
               LPlayer.Character:MoveTo(workspace.ManagerChair.Seat.Position)
           else
               LPlayer.Character:MoveTo(workspace.ManagerChair.Seat.Position)
           end
       end
   elseif msg.Text:lower() == 'fuckpizza' then
       for i,v in pairs(workspace:GetDescendants()) do
           if v.Name == 'Dough' or v.Parent.Name == 'Ingredients' then
               destroy:FireServer(v,false)
           end
       end
   elseif msg.Text:lower():sub(1,5) == 'kill ' then
       for i,v in pairs(Get(msg.text:lower():sub(6))) do
           destroy:FireServer(Players:FindFirstChild(v).Character.Head,true)
       end
       Gui.Drag.CommandBar.Text = 'This can take a while'
   elseif msg.Text:lower() == 'slock' then
       if not Slock then
           Slock = true
       else
           Gui.Drag.CommandBar.Text = 'Server Is Already Locked'
       end
   elseif msg.Text:lower() == 'unslock' then
       if Slock then
           Slock = false
       else
           Gui.Drag.CommandBar.Text = 'Server Is Not Locked'
       end
   elseif msg.Text:lower() == 'shutdown' then
       for i,v in pairs(Players:GetPlayers()) do
           if v.Name ~= LPlayer.Name then
               Kick(v)
           end
       end
       Kick(LPlayer)
   elseif msg.Text:lower() == 'ruin' then
       for i,v in pairs(game:GetDescendants()) do
           if v.Parent.Name ~= 'Players' then
               pcall(function()
                   destroy:FireServer(v,false)
               end)
           end
       end
   elseif msg.Text:lower() == 'viewbans' then
       print(table.concat(Banned, ' | '))
       Gui.Drag.CommandBar.Text = 'Press f9 to view bans'
   elseif msg.Text:lower() == 'btools' then
       for i,v in pairs(workspace:GetDescendants()) do
           pcall(function()
               v.Locked = false
           end)
       end
       local function OnClick()
           pcall(function()
               local target = LPlayer:GetMouse().Target
               destroy:FireServer(target,false)
               print('Destroyed ' .. target.Name)
           end)
       end
       local b = Instance.new('Tool', LPlayer.Backpack)
       b.RequiresHandle = false
       b.Activated:connect(OnClick)
   elseif msg.Text:lower() == 'end' then
       Gui:Destroy()
       if Slock then
           Slock = false
       end
       for i,v in pairs(Banned) do
           table.remove(Banned, i)
       end
   end
end)