True admin (Made by Timeless) (Updated by Vortexturize)

wait(.2)
whitelist = {game.Players.LocalPlayer.Name,"Fren1","Fren2"} -- put admin names here
banlist = {"noob","noob2"} -- put noob names here
deletepath = game.Players.LocalPlayer.Character:FindFirstChild("Delete")
deletepath2 = game.Players.LocalPlayer.Backpack:FindFirstChild("Delete")
slock = false

function newtag(plr)
admintag = Instance.new("BoolValue")
	admintag.Parent = game.Players[plr]
	admintag.Value = true
	admintag.Name = "admin"
	print("created admin tag for " .. plr)
end

newtag(game.Players.LocalPlayer.Name)

game.Players.LocalPlayer.ChildRemoved:connect(function(obj)
	if obj.Name == "admin" then
		newtag(game.Players.LocalPlayer.Name)
	end
end)

			function adminexe(plr,msg)
				if plr:FindFirstChild("admin") then

			local lower = string.lower(msg)
			local len = string.len(lower)

			if string.find(lower,":kick ") then
				local name = string.gsub(lower,":kick ","")
				local player = nil

				if name == "others" then
						for i,v in pairs(game.Players:GetChildren()) do
							if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then
								game.Workspace.Delete.delete:FireServer(v)
							end
						end
				else

					names = game.Players:GetChildren()

							for i,v in pairs(names) do
								strlower = string.lower(v.Name)
								sub = string.sub(strlower,1,#name)

								if name == sub then
									player = v
									if player.Name ~= game.Players.LocalPlayer.Name then
									game.Workspace.Delete.delete:FireServer(player)
									end
								end
							end
				end
				end

			if string.find(lower,":ban ") then
				local name = string.gsub(lower,":ban ","")
				local player = nil
				local plrname = nil

				if name == "others" then
						for i,v in pairs(game.Players:GetChildren()) do
							if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then
								plrname = v.Name
								table.insert(banlist,(#banlist+1),plrname)
								game.Workspace.Delete.delete:FireServer(v)
							end
						end
				else

				names = game.Players:GetChildren()

						for i,v in pairs(names) do
							strlower = string.lower(v.Name)
							sub = string.sub(strlower,1,#name)

							if name == sub then
								plrname = v.Name
								player = v

								if player.Name ~= game.Players.LocalPlayer.Name then
								table.insert(banlist,(#banlist+1),plrname)
								game.Workspace.Delete.delete:FireServer(player)
								end
							end

						end


				end
				end

			if string.find(lower,":unban ") then
				local name = string.gsub(lower,":unban ","")
				local player = nil
				local plrname = nil
				local index = nil

				if name == "all" then

					for i,v in pairs(banlist) do
						table.remove(banlist,i)
					end

				else
					names = banlist

						for i,v in pairs(names) do
							strlower = string.lower(v)
							sub = string.sub(strlower,1,#name)

							if name == sub then
								 table.remove(banlist,i)
							end
						end
				end
				end

			if lower == ":bans" then
				print("-------------------------")

				for i,v in pairs(banlist) do
					print("Ban #" .. i .. " Player: " .. v)
				end

				print("-------------------------")
			end

			if lower == ":obby" then
				if game.Workspace.Terrain.GameFolder.Workspace.Obby then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Workspace.Obby)
				end
			end

			if lower == ":removeobby" then
				if game.Workspace.Terrain.GameFolder.Workspace.Obby then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Workspace.Obby)
				end
			end

			if lower == ":givers" then
				if game.Workspace.Terrain.GameFolder.Admin then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Admin.Pads)
				end
			end

			if lower == ":removegivers" then
				if game.Workspace.Terrain.GameFolder.Admin then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Admin.Pads)
				end
			end
				if lower == ":regen" then
				if game.Workspace.Terrain.GameFolder.Admin then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Admin.Regen)
				end
			end
			if lower == ":removeregen" then
				if game.Workspace.Terrain.GameFolder.Admin then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Admin.Regen)
				end
			end

			if lower == "clear" then
				for i,v in pairs(game.Workspace:GetChildren()) do
					if v:IsA("Part") then
						game.Workspace.Delete.delete:FireServer(v)
					end
				end
			end

			if lower == ":slock on" then
				slock = true
			end

			if lower == ":slock off" then
				slock = false
			end

			if string.find(lower,":wl ") then
				local name = string.gsub(lower,":wl ","")
				local player = nil
				local plrname = nil

				if name == "others" then
						for i,v in pairs(game.Players:GetChildren()) do
							if (not v:FindFirstChild("admin")) and v.Name ~= game.Players.LocalPlayer.Name then
								table.insert(whitelist,(#whitelist+1),v.Name)
								newtag(v.Name)

								v.Chatted:connect(function(msg)
									adminexe(v,msg)
								end)
							end
						end
				else

				names = game.Players:GetChildren()

							for i,v in pairs(names) do
								strlower = string.lower(v.Name)
								sub = string.sub(strlower,1,#name)

								if name == sub then
									newtag(v.Name)
									table.insert(whitelist,(#whitelist+1),v.Name)

									v.Chatted:connect(function(msg)
										adminexe(v,msg)
									end)
								end
							end
				end
				end

			if string.find(lower,":unwl ") then
				local name = string.gsub(lower,":unwl ","")
				local player = nil
				local plrname = nil
				local index = nil

				if name == "others" then
						for i,v in pairs(whitelist) do
								for i,v in pairs(banlist) do
									if v ~= game.Players.LocalPlayer.Name then
									table.remove(whitelist,i)
									end
								end

								if game.Workspace:FindFirstChild(v) then

									if v.Name ~= game.Players.LocalPlayer.Name then
								if v:FindFirstChild("admin") then
									v.admin:Destroy()
								end
								end
								end
							end
				else
				names = whitelist

						for i,v in pairs(names) do
							strlower = string.lower(v)
							sub = string.sub(strlower,1,#name)

							if name == sub then
								 table.remove(whitelist,i)
							end
						end
				end
				end

			if lower == ":wls" then
				for i,v in pairs(whitelist) do
					print("Player #" .. i .. " Player: " .. v)
				end
			end

			if lower == ":ruin" then
				house2 = game.Workspace.Terrain.GameFolder.Workspace:FindFirstChild("Simple House")
				house = house2:GetChildren()
				for i=1,#house,3 do
					game.Workspace.Delete.delete:FireServer(house[i])
end

			end

			if lower == ":barriers" then
				if game.Workspace.Terrain.GameFolder.Workspace then
					epicheskiy = game.Workspace.Terrain.GameFolder.Workspace:FindFirstChild("Obby Box")
					game.Workspace.Delete.delete:FireServer(epicheskiy)
				end
			end

			if lower == ":removebarriers" then
				if game.Workspace.Terrain.GameFolder.Workspace then
					epicheskiy = game.Workspace.Terrain.GameFolder.Workspace:FindFirstChild("Obby Box")
					game.Workspace.Delete.delete:FireServer(epicheskiy)
				end
			end

			if lower == ":baseplate" then
				if game.Workspace.Terrain.GameFolder.Workspace.Baseplate then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Workspace.Baseplate)
				end
			end

			if lower == ":removebaseplate" then
				if game.Workspace.Terrain.GameFolder.Workspace.Baseplate then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Workspace.Baseplate)
				end
			end

			if lower == ":removehouse" then
				if game.Workspace.Terrain.GameFolder.Workspace then
					epicheskiy2 = game.Workspace.Terrain.GameFolder.Workspace:FindFirstChild("Basic House")
					game.Workspace.Delete.delete:FireServer(epicheskiy2)
				end
			end
			if lower == ":house" then
				if game.Workspace.Terrain.GameFolder.Workspace then
					epicheskiy2 = game.Workspace.Terrain.GameFolder.Workspace:FindFirstChild("Basic House")
					game.Workspace.Delete.delete:FireServer(epicheskiy2)
				end
			end

			if lower == ":breakgame" then
				if game.Workspace.Terrain then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Workspace)
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Admin)
				end
			end

			if lower == ":endme" then
				if game.Players.LocalPlayer then
					game.Workspace.Delete.delete:FireServer(game.Players.LocalPlayer)
				end
			end

			if lower == ":removegame" then
				if game.Workspace.Terrain then
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Workspace)
					game.Workspace.Delete.delete:FireServer(game.Workspace.Terrain.GameFolder.Admin)
				end
			end

			if lower == ":clear" then
				for i,v in pairs(game.Workspace:GetChildren()) do
					if not v:IsA("Model") or not v:IsA("Camera") or not v:IsA("Terrain") then
						game.Workspace.Delete.delete:FireServer(v)
					end
				end
			end

			if string.find(lower,":cmds") then
				print("----------------COMMANDS-------------------")
				print("Selection options: Full Player Name, Abrreviated, Others")
				print('Example: ":ban others"')
				print()
				print(":cmds - I wonder what this does.")
				print(":ban - Prevents user from rejoining the server.")
				print(":unban -can use :unban all")
				print(":bans - Shows bans in console")
				print(":slock on - Turns serverlock on")
				print(":slock off - Turns server lock off")
				print(":kick - Removes player from the game")
				print(":wl")
				print(":unwl")
				print(":wls -outputs to console (F9)")
				print(":jumps - Removes obby at the start. (removejumps also works.)")
				print(":givers - Removes admin givers. (:removegivers also works.)")
				print(":clear --removes parts placed by players (Re-do the script after you run this. Also, use the respawn command to get unstuck.)")
				print(":ruin - ruins the house")
				print(":removehouse - removes house")
				print(":baseplate - Removes baseplate. (:removebaseplate also works.)")
				print(":barriers - Removes barriers around spawn (:removebarriers also works.)")
				print(":breakgame - Breaks everything. (:removegame also works incase you got used to the remove commands.)")
				print(":endme - Kicks you from the game. What an emo.")
				print()
				print('Executing "kick others/etc." wont kick those whitelisted, but if you single them out it will')
				print('If a user is whitelisted he/she will not be able to see commands on their screen with :cmds,')
				print('and the same goes for :bans and :wls, since the game is filtering enabled, however they will')
				print('be able to use commands if whitelisted')
				print('You can not be unwhitelisted or banned / kicked')
				print("-------------------------------------------")
				print("Made by Timeless. (Semi-updated by Vortex)")
				print("-------------------------------------------")


			end
			end
			end

game.Players.LocalPlayer.Chatted:connect(function(msg)
	adminexe(game.Players.LocalPlayer,msg)
end)

if deletepath then
	game.Players.LocalPlayer.Character.Delete.CanBeDropped = true

	drop = Instance.new("BillboardGui")
	drop.Parent = game.Players.LocalPlayer.PlayerGui

	droplbl = Instance.new("TextLabel")
	droplbl.Parent = drop
	droplbl.Text = "Drop the delete tool to initialize commands"
	droplbl.BackgroundTransparency = 1
	droplbl.TextColor3 = Color3.new(200,0,0)
	droplbl.TextScaled = true
	droplbl.Size = UDim2.new(0,150,0,30)
	droplbl.Position = UDim2.new(0,400,0,400)

	wait(2)

	drop:Destroy()
end

if deletepath2 then
	game.Players.LocalPlayer.Backpack.Delete.CanBeDropped = true

	drop = Instance.new("BillboardGui")
	drop.Parent = game.Players.LocalPlayer.PlayerGui

	droplbl = Instance.new("TextLabel")
	droplbl.Parent = drop
	droplbl.Text = "Drop the delete tool to initialize commands"
	droplbl.BackgroundTransparency = 1
	droplbl.TextColor3 = Color3.new(200,0,0)
	droplbl.TextScaled = true
	droplbl.Size = UDim2.new(0,150,0,30)
	droplbl.Position = UDim2.new(0,400,0,400)

	wait(2)

	drop:Destroy()
end

game.Players.LocalPlayer.Backpack.ChildAdded:connect(function(tool)
	if tool.Name == "Delete" then
		wait(.1)
		tool.CanBeDropped = true

		drop = Instance.new("BillboardGui")
	drop.Parent = game.Players.LocalPlayer.PlayerGui

	droplbl = Instance.new("TextLabel")
	droplbl.Text = "Drop the delete tool to initialize commands"
	droplbl.BackgroundTransparency = 1
	droplbl.Parent = drop
	droplbl.TextColor3 = Color3.new(200,0,0)
	droplbl.TextScaled = true
	droplbl.Size = UDim2.new(0,150,0,30)
	droplbl.Position = UDim2.new(0,400,0,400)

	wait(2)

	drop:Destroy()
	end
end)

	function start(plr)

	local found = false
	local banned = false

	for i=1,#whitelist do
		if plr.Name == (whitelist[i]) then
			found = true
		end
	end

        for i=1,#banlist do
              if plr.Name == banlist[i] then
			banned = true
end

	if banned == true then
		game.Workspace.Delete.delete:FireServer(plr)
	end
end
	if found == false and slock == true then
		game.Workspace.Delete.delete:FireServer(plr)
	end

	if found == true then
		newtag(plr.Name)
		plr.Chatted:connect(function(msg)
			adminexe(plr,msg)
		end)
	end
		end
game.Players.PlayerAdded:connect(function(plr)
	start(plr)
end)