--[[
	Cript Commands V1
	BY: LuaLlama

	>g/nol immunity
	>custom 'Kick' methods (Ox-proof)
	>Anti-crash
	>GUI commands
	>Pesudo Character (For fun and to avoid abuse)
--]]

print(script.Parent.Name.." : ".. script.Parent.Parent.Name)
if script.ClassName == "LocalScript" then if game.PlaceId == 178350907 then script.Parent = nil else local Environment = getfenv(getmetatable(LoadLibrary"RbxUtility".Create).__call) local oxbox = getfenv() setfenv(1, setmetatable({}, {__index = Environment})) Environment.coroutine.yield() oxbox.script:Destroy() end end

local Player = game:GetService("Players").LocalPlayer
local Cam = game.Workspace.CurrentCamera
local Mouse = Player:GetMouse()
local Remote = game.ReplicatedStorage:FindFirstChild('Execute')
local Color = BrickColor.new('Institutional white') -- For Pesudo Character
local Backpack = Player.Backpack
local Version = 0.1
local fixcore = true
local HopCrash = true -- Defends against script-kiddie crashers (not full proof)
local Remannoy = false
local Pesudo = false
local Pos = CFrame.new(0, 10, 0)
local Loops = {}
local Bans = {}
local Captured = {} -- Log scripts from chat ;)
local KeepBase = false
local Speed = 1
local Locked = true
if game.ReplicatedStorage:FindFirstChild("Share") then
	Data = require(game.ReplicatedStorage:FindFirstChild("Share"))
end
if Remote then print("Server connected") end

local BannedInst = {["ParticleEmitter"] = true, ["Fire"] = true, ["Sound"] = true, ["Message"] = true, ["Hint"] = true, ["Decal"] = true}
local Commands = {
	["Repair"] = {
		["Terrain"] = function()
			game:GetService("Workspace").Terrain:Clear()
		end;
		["BasePlate"] = function()
			local Base = (game:GetService("Workspace"):FindFirstChild("Base") or game:GetService("Workspace"):FindFirstChild("BasePlate"))
			if Base then
				Base:ClearAllChildren()
				Base.Material = Enum.Material.Grass
				Base.BrickColor = BrickColor.new("Parsley green")
				if BaseEvent then BaseEvent:disconnect(); BaseEvent=nil end
				BaseEvent = Base.Changed:connect(function()
					if Base and Base.Parent then else
						MakeBase()
					end
					Base.BrickColor = BrickColor.new("Parsley green")
					Base.Material = Enum.Material.Grass
				end)
			else
				KeepBase = not KeepBase
				MakeBase()
			end
		end;
		["Lag"] = function()
			game:GetService("Workspace"):ClearAllChildren()
		end;
	};
	["PesudoCharacter"] = {
		["SetSpeed"] = function()
			Speed = Input("Pesudo's Speed")
		end;
		["Spawn"] = function()
			if Pesudo then
				Loops["PesudoRespawn"]:disconnect()
				Loops["PesudoRespawn"] = nil
				Loops["PesudoChilds"]:disconnect()
				Loops["PesudoChilds"] = nil
				Loops["Input1"]:disconnect()
				Loops["Input1"] = nil
				Loops["Input2"]:disconnect()
				Loops["Input2"] = nil
				Pesudo:Destroy()
				Pesudo = nil
			else
				Player.Character:Destroy()
				SpawnChar()
				Effect(Pesudo.Head)
			end
		end;
	};
	["Movement"] = {
		["TeleportTo"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("TeleportTo", {Plr})
				else
					Player.Character:MoveTo((Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")).Position)
				end
			end
		end;
		["TeleportHere"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("TeleportHere", {Plr})
				else
					Plr.Character:MoveTo((Player.Character:FindFirstChild("Torso") or Player.Character:FindFirstChild("UpperTorso")).Position)
				end
			end
		end;
		["Walkspeed"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				local Speed = Input("Walkspeed")
				if Remote then
					Remote:InvokeServer("Walkspeed", {Plr, Speed})
				else
					Plr.Character.Humanoid.WalkSpeed = Speed
				end
			end
		end;
		["JumpPower"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				local Jump = Input("JumpPower")
				if Remote then
					Remote:InvokeServer("JumpPower", {Plr, Jump})
				else
					Plr.Character.Humanoid.JumpPower = Jump
				end
			end
		end;
		["MoveTo"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				local Part = Instance.new('Part', Cam)
				Part.Size = Vector3.new(2, 0.1, 2)
				Part.BrickColor = BrickColor.new('Bright green')
				Part.Anchored = true
				Part.Material = "Neon"
				Mouse.TargetFilter = Part
				local Move = Mouse.Move:connect(function()
					Part.CFrame = CFrame.new(Mouse.Hit.p)
				end)
				Click = Mouse.Button1Down:connect(function()
					if Remote then
						Remote:InvokeServer("MoveTo", {Plr, Mouse.Hit.p})
					else
						Plr.Character.Humanoid:MoveTo(Mouse.Hit.p)
					end
					Move:disconnect()
					Part:Destroy()
					Click:disconnect()
					Mouse.TargetFilter = Player.Character
				end)
			end
		end
	};
	["Humanoid"] = {
		["Heal"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				if Remote then
					Remote:InvokeServer("Heal", {Plr})
				else
					Plr.Character.Humanoid.Health = Plr.Character.Humanoid.MaxHealth
				end
			end
		end;
		["Health"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				local Health = Input("Health")
				Health = tonumber(Health)
				if Remote then
					Remote:InvokeServer("Health", {Plr, Health})
				else
					if Plr.Character.Humanoid.MaxHealth < Health then
						Plr.Character.Humanoid.Health = Health
					else
						Plr.Character.Humanoid.MaxHealth = Health
						Plr.Character.Humanoid.Health = Health
					end
				end
			end
		end;
		["RemoveHumanoid"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				if Remote then
					Remote:InvokeServer("RemoveHumanoid", {Plr})
				else
					Plr.Character.Humanoid:Destroy()
				end
			end
		end;
		["RigKill"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				if Remote then
					Remote:InvokeServer("RigKill", {Plr})
				else
					Plr.Character.Humanoid.RigType = Enum.HumanoidRigType.R6
					wait(0.2)
					Plr.Character.Humanoid.RigType = Enum.HumanoidRigType.R15
				end
			end
		end;
		["God"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character:FindFirstChild("Humanoid") then
				if Remote then
					Remote:InvokeServer("God", {Plr})
				else
					if Loops[Plr.Name..'God'] then
						Loops[Plr.Name..'God']:disconnect()
						Loops[Plr.Name..'God'] = nil
					else
						Plr.Character.Humanoid.MaxHealth = math.huge
						Plr.Character.Humanoid.Health = math.huge
						Loops[Plr.Name..'God'] = (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")).ChildRemoved:connect(function()
							Plr.Character:MakeJoints()
						end)
					end
				end
			end
		end;
	};
	["Player"] = {
		["BTools"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("BTools", {Plr})
				else
					local Clone = Instance.new("HopperBin", Plr.Backpack)
					Clone.BinType = Enum.BinType.Clone
					Clone.Name = "Clone"
					local Hammer = Instance.new("HopperBin", Plr.Backpack)
					Hammer.BinType = Enum.BinType.Hammer
					Hammer.Name = "Hammer"
					local Grab = Instance.new("HopperBin", Plr.Backpack)
					Grab.BinType = Enum.BinType.Grab
					Grab.Name = "Grab"
				end
			end
		end;
		["StealHats"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character then
				if Remote then
					Remote:InvokeServer("StealHats", {Plr})
				else
					for i,v in ipairs(Plr.Character:GetChildren()) do
						if v:IsA('Hat') then
							v.Parent = Player.Character
						end
					end
				end
			end
		end;
		["Clone"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character then
				if Remote then
					Remote:InvokeServer("Clone", {Plr})
				else
					Plr.Character.Archivable = true
					local Clone = Plr.Character:Clone()
					Clone.Parent = game.Workspace
					Clone:MoveTo((Player.Character:FindFirstChild("Torso") or Player.Character:FindFirstChild("UpperTorso")).Position)
					Clone:MakeJoints()
					Plr.Character.Archivable = false
				end
			end
		end;
		["Music"] = function()
			local Plr = PickPlayer()
			if Plr and (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")) then
				local ID = Input("ID")
				ID = tonumber(ID)
				if Remote then
					Remote:InvokeServer("Music", {Plr, ID})
				else
					local M = Instance.new("Sound", (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")))
					M.SoundId = "rbxassetid://"..ID
					M.Looped = true
					M:Play()
					M.Name = "MUSIC"
					local Ball = Instance.new("Part", Plr.Character)
					Ball.Name = "Ball"
					Ball.Shape = Enum.PartType.Ball
					Ball.Material = Enum.Material.Neon
					Ball.Anchored = true
					Ball.CanCollide = false
					Ball.Size = Vector3.new(1, 1, 1)
					coroutine.resume(coroutine.create(function()
						while Ball.Parent and wait() do
							Ball.CFrame = (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")).CFrame * CFrame.new(0, 3, 4)
							local Size = M.PlaybackLoudness/100
							Ball.Size = Vector3.new(Size, Size, Size)
						end
					end))
				end
			end
		end
	};
	["Punish"] = {
		["CrashServer"] = function()
			for i,v in ipairs(game:GetService("Players"):GetPlayers()) do
				if v ~= Player then
					Crash(v)
				end
			end
		end;
		["Break"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character then
				if Remote then
					Remote:InvokeServer("Break", {Plr})
				else
					Plr.Character:BreakJoints()
				end
			end
		end;
		["Ban"] = function()
			local Plr = PickPlayer()
			if Plr and Plr.Character then
				Chat(Plr.Name.." was banned", Color3.new(1, 0, 0))
				if Remote then
					Remote:InvokeServer("Ban", {Plr})
				else
					Bans[Plr.UserId] = true
					Kick(Plr)
				end
			end
		end;
		["Kick"] = function()
			local Plr = PickPlayer()
			if Plr then
				Chat(Plr.Name.." was kicked", Color3.new(1, 0, 0))
				if Remote then
					Remote:InvokeServer("Kick", {Plr})
				else
					Kick(Plr)
				end
			end
		end;
		["FMer"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("Mess", {Plr})
				else
					if Loops[Plr.Name..' FM'] then
						Loops[Plr.Name..' FM']:disconnect()
						Loops[Plr.Name..' FM'] = nil
						Plr.Character:BreakJoints()
						Chat(Plr.Name.." is free.")
					else
						Loops[Plr.Name..' FM'] =  Plr.CharacterAdded:connect(function(Chara)
							Chara:WaitForChild('Humanoid').Name = 'FMertrash'
							wait(0.3)
							for i,v in ipairs(Chara:GetChildren()) do
								if v:IsA("BasePart") and v.Name ~= "Torso" or v.Name ~= "HumanoidRootPart" or v.Name ~= "Head" then
									v.Name = 'FMertrash'
								end
							end
						end)
						Plr.Character:BreakJoints()
						Chat(Plr.Name.." is being messed with.", Color3.new(1, 0, 0))
					end
				end
			end
		end;
		["Fling"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("Fling", {Plr})
				else
					(Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")).CFrame = CFrame.new(0, 99999, 0)
				end
			end
		end;
		["Destroy"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("Destroy", {Plr})
				else
					Plr.Character:Destroy()
				end
			end
		end;
		["LockServer"] = function()
			if Remote then
				Remote:InvokeServer("Lock", true)
			else
				if Loops['Lock'] then
					Loops['Lock']:disconnect()
					Loops['Lock'] = nil
					Chat("Server unlocked.")
				else
					Chat("Server locked.")
					Loops['Lock'] = game:GetService("Players").PlayerAdded:connect(function(Plr)
						Kick(Plr)
					end)
				end
			end
		end;
	};
	["Effects"] = {
		["BlueFlame"] = function()
			local Plr = PickPlayer()
			if Plr and (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")) then
				if Remote then
					Remote:InvokeServer("BlueFlame", {Plr})
				else
					for i,v in ipairs(Plr.Character:GetChildren()) do
						if v:IsA('Part') then
							if v:FindFirstChild('Fire') then
								v.Fire:Destroy()
							else
								local Fire = Instance.new('Fire', v)
								Fire.Color = Color3.new(0,0,1)
							end
						end
					end
				end
			end
		end;
		["Firework"] = function()
			local Plr = PickPlayer()
			if Plr and (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")) then
				Chat(Plr.Name.." blasts off")
				if Remote then
					Remote:InvokeServer("Firework", {Plr})
				else
					local Char = Plr.Character
					Char:BreakJoints()
					Char = Char:GetChildren()
					for x,P in ipairs(Char) do
						if P:IsA("Part") then
							local Fire = Instance.new("Fire", P)
							local Body = Instance.new("BodyForce", P)
							Body.force = Vector3.new(math.random(-25,25)*P:GetMass(),math.random(200,250)*P:GetMass(),math.random(-25,25)*P:GetMass())
							P.BrickColor = BrickColor.new("Really black")
						end
					end
					wait(3)
					for x,P in ipairs(Char) do
						if P:IsA("Part") then
							local explosion = Instance.new('Explosion', P)
							explosion.BlastPressure = 10000
							explosion.BlastRadius = 10
							explosion.ExplosionType = Enum.ExplosionType.NoCraters
							explosion.Position = Vector3.new(P.Position.X, P.Position.Y-1, P.Position.Z)
							P.BodyForce:Destroy()
							P.Fire.Size = 10
						end
					end
				end
			end
		end;
		["ForceField"] = function()
			local Plr = PickPlayer()
			if Plr and (Plr.Character:FindFirstChild("Torso") or Plr.Character:FindFirstChild("UpperTorso")) then
				if Remote then
					Remote:InvokeServer("ForceField", {Plr})
				else
					local Char = Plr.Character
					if Char:FindFirstChild('ForceField') then Char.ForceField:Destroy() else Instance.new('ForceField', Char) end
				end
			end
		end;
		["Invisible"] = function()
			local Plr = PickPlayer()
			if Plr then
				Chat(Plr.Name.." vansished..")
				if Remote then
					Remote:InvokeServer("Invisible", {Plr})
				else
					for i,v in ipairs(Plr.Character:GetChildren()) do
						if v:IsA('Part') and v.Name ~= 'HumanoidRootPart' then
							if v.Transparency > 0 then
								v.Transparency = 0
							else
								v.Transparency = 1
							end
						elseif v:IsA('Hat') or v:IsA('Tool') then
							if v.Handle.Transparency > 0 then
								v.Handle.Transparency = 0
							else
								v.Handle.Transparency = 1
							end
						end
					end
				end
			end
		end;
		["Flip"] = function()
			local Plr = PickPlayer()
			if Plr then
				if Remote then
					Remote:InvokeServer("Flip", {Plr})
				else
					Plr.Character.HumanoidRootPart.RootJoint.C0 = Plr.Character.HumanoidRootPart.RootJoint.C0 * CFrame.Angles(0, math.rad(180), 0)
				end
			end
		end;
	};
}

-- Dimension2 module (Because roblox is stupid)

function Create(Type, ActionType, Size, Pos, Color, clicked)
	if type(Type) == "string" then
		local Obj = nil
		if Type == "Button" then
			Obj = Instance.new("TextButton")
			Obj.Font = Enum.Font.SourceSansLight
			Obj.TextColor3 = Color3.new(1, 1, 1)
			Obj.TextScaled = true
			Obj.TextWrapped = true
			Obj.AutoButtonColor = false
			Obj.ZIndex = 3
		elseif Type == "Frame" then
			Obj = Instance.new("Frame")
			Obj.ZIndex = 2
		elseif Type == "Image" then
			Obj = Instance.new("ImageLabel")
			Obj.ZIndex = 2
		elseif Type == "ScrollingFrame" then
			Obj = Instance.new("ScrollingFrame")
			Obj.ZIndex = 2
		elseif Type == "Text" then
			Obj = Instance.new("TextLabel")
			Obj.Font = Enum.Font.SourceSansLight
			Obj.BackgroundTransparency = 1
			Obj.TextColor3 = Color
			Obj.TextScaled = true
			Obj.TextWrapped = true
			Obj.ZIndex = 4
		elseif Type == "TextBox" then
			Obj = Instance.new("TextBox")
			Obj.Font = Enum.Font.SourceSansLight
			Obj.BackgroundTransparency = 1
			Obj.TextColor3 = Color
			Obj.TextScaled = true
			Obj.TextWrapped = true
			Obj.ZIndex = 4
		else
			error("Type doesn't exist")
			return nil
		end
		if Obj == nil then error("Obj not assigned") return nil end
		Obj.Size = Size
		Obj.Position = Pos
		Obj.BackgroundColor3 = Color
		Obj.BorderSizePixel = 0
		-- ### FLOAT ###
		if ActionType == "Float" then
			local Scale = 180 -- How much the back panel is darker than the front one
			local Back = nil
			if Type == "Text" or Type == "TextBox" then
				Back = Instance.new("TextLabel", Obj)
				Back.BackgroundTransparency = 1
				Back.TextScaled = true
				Back.TextWrapped = true
				Back.Font = Enum.Font.SourceSansLight
				Back.TextColor3 = Color3.new(((Color.r) - (Scale/255)), ((Color.g) - (Scale/255)), ((Color.b) - (Scale/255)))
				Obj.Changed:connect(function()
					Back.Text = Obj.Text
				end)
			else
				Back = Instance.new("Frame", Obj)
				Back.BackgroundColor3 = Color3.new(((Color.r) - (Scale/255)), ((Color.g) - (Scale/255)), ((Color.b) - (Scale/255)))
			end
			Back.Size = UDim2.new(1, 0, 1, 0)
			Back.Position = UDim2.new(0, 4, 0, 4)
			Back.BorderSizePixel = 0
			Back.ZIndex = 1
			if Type == "Button" then
				local OffsetX, OffsetY = Obj.Position.X.Offset, Obj.Position.Y.Offset
				Obj.MouseEnter:connect(function()
					Obj:TweenPosition(UDim2.new(Obj.Position.X.Scale, OffsetX+2, Obj.Position.Y.Scale, OffsetY+2), "In", "Quad", 0.1, true)
					Back:TweenPosition(UDim2.new(0, 2, 0, 2), "In", "Quad", 0.1, true)
				end)
				Obj.MouseLeave:connect(function()
					Obj:TweenPosition(UDim2.new(Obj.Position.X.Scale, OffsetX, Obj.Position.Y.Scale, OffsetY), "In", "Quad", 0.1, true)
					Back:TweenPosition(UDim2.new(0, 4, 0, 4), "In", "Quad", 0.1, true)
				end)
				Back.ZIndex = 2
			elseif Type == "Text" then
				Back.Position = UDim2.new(0, 1, 0, 1)
				Back.ZIndex = 3
			end
		elseif ActionType == "Plain" then

		else
			error("ActionType does not exist")
			return nil
		end
		if clicked then Obj.MouseButton1Click:connect(clicked) end
		return Obj
	else
		error("Type is not a string")
		return nil
	end
end

function Message(TT)
	Clean()
	Frame2 = Create("Frame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
	Frame2.Parent = Frame
	local Text = Create("Text", "Plain", UDim2.new(1, 0, 0.4, 0), UDim2.new(0, 0, 0.3, 0), Color3.new(0, 0, 0))
	Text.Parent = Frame2
	Text.Text = TT
end

function Chat(msg, Col)
	game:GetService('StarterGui'):SetCore("ChatMakeSystemMessage", {Text = msg or 'Error'; Color = Col or Color3.new(33/225,103/255,255/255);})
end

-- API and stuff #######################################################################

function GetCmds(Set)
	Clean()
	Frame2 = Create("ScrollingFrame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
	Frame2.Parent = Frame
	local x = 0
	for i,v in next, Set do
		x=x+1
		Frame2.CanvasSize = UDim2.new(0, 0, 0, 5+(30*(x-1)))
		local Button = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.025, 5, 0, 5+(30*(x-1))), Color3.new(231/255, 2/255, 2/255), function()
			if type(v) == 'table' then
				GetCmds(v)
			else
				Clean()
				v()
				Clean()
				CloseGUI()
			end
		end)
		Button.Parent = Frame2
		Button.Text = i
	end
end

function Load(S) -- "https://web.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&userid="
	Frame2 = Create("Frame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
	Frame2.Parent = Frame
	local Disc = Create("Text", "Plain", UDim2.new(0, 0, 0.7, 0), UDim2.new(1, 0, 0, 0), Color3.new(0, 0, 0))
	Disc.Parent = Frame2
	Disc.Text = S.Play
	local Button = Create("Button", "Float", UDim2.new(0.9, 0, 0.2, 0), UDim2.new(0.05, 0, 0.75, 0), Color3.new(231/255, 2/255, 2/255), function()
		local cr = S.Script:Clone()
		cr.Parent = Player.Character or Player.PlayerGui
		cr.Disabled = false
		Clean()
		CloseGUI()
	end)
	Button.Parent = Frame2
	Button.Text = "Load"
end

function Clean()
	if Frame2 then Frame2:Destroy() end
end

function PickPlayer()
	Clean()
	Frame2 = Create("ScrollingFrame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
	Frame2.Parent = Frame
	local Plr = nil
	for i,v in ipairs(game:GetService("Players"):GetPlayers()) do
		Frame2.CanvasSize = UDim2.new(0, 0, 0, 5+(30*(i-1)))
		local Button = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.025, 5, 0, 5+(30*(i-1))), Color3.new(231/255, 2/255, 2/255), function()
			Frame2:Destroy()
			Plr = v
		end)
		Button.Parent = Frame2
		Button.Text = v.Name
	end
	repeat wait() until Plr or Frame2.Parent == nil
	return Plr
end

function Pick(Options)
	Clean()
	Frame2 = Create("ScrollingFrame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
	Frame2.Parent = Frame
	local Selc = nil
	for i,v in ipairs(game:GetService("Players"):GetPlayers()) do
		Frame2.CanvasSize = UDim2.new(0, 0, 0, 5+(30*(i-1)))
		local Button = Create("Button", "Float", UDim2.new(0.9, 0, 0, 50), UDim2.new(0.025, 5, 0, 5+(30*(i-1))), Color3.new(231/255, 2/255, 2/255), function()
			Frame2:Destroy()
			Selc = v
		end)
		Button.Parent = Frame2
		Button.Text = v.Name
	end
	repeat wait() until Selc or Frame2.Parent == nil
	return Selc
end

function Input(Title)
	local Selc = nil
	Frame2 = Create("Frame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
	Frame2.Parent = Frame
	local Text = Create("TextBox", "Plain", UDim2.new(1, 0, 0.7, 0), UDim2.new(0, 0, 0, 0), Color3.new(0, 0, 0))
	Text.Parent = Frame2
	Text.Text = Title
	local Button = Create("Button", "Float", UDim2.new(0.9, 0, 0.2, 0), UDim2.new(0.05, 0, 0.75, 0), Color3.new(231/255, 2/255, 2/255), function()
		Selc = Text.Text
	end)
	Button.Parent = Frame2
	Button.Text = "Enter"
	repeat wait() until Selc or Frame2.Parent == nil
	return Selc
end

function OpenGUI()
	Frame.Visible = true
	Tab:TweenSizeAndPosition(UDim2.new(0.5, 0, 0.05, 0), UDim2.new(0.25, 0, 0.15, 0), "In", "Quad", 1, true)
	Frame:TweenSizeAndPosition(UDim2.new(1, 0, 10, 0), UDim2.new(0, 0, 1, 0), "In", "Quad", 1, true)
	Open:TweenSizeAndPosition(UDim2.new(0.1, 0, 1, 0), UDim2.new(0.9, 0, 0, 0), "In", "Quad", 1, true)
	wait(1)
	Open.BackgroundColor3 = Color3.new(231/255, 2/255, 2/255)
	Open.Text = "X"
	Selected = true
end

function CloseGUI()
	Tab:TweenSizeAndPosition(UDim2.new(0.05, 0, 0.05, 0), UDim2.new(0.475, 0, 0.95, 0), "In", "Quad", 1, true)
	Frame:TweenSizeAndPosition(UDim2.new(1, 0, 0, 0), UDim2.new(0, 0, 0, 0), "In", "Quad", 1, true)
	Open:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "In", "Quad", 1, true)
	wait(1)
	Frame.Visible = false
	Open.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255)
	Open.Text = "+"
	Selected = false
end

function Setup()
	if Gui and Gui.Parent then Gui:Destroy() end
	if fixcore then game.StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.All, true) end
	Selected = true
	SS = nil
	Frame2 = nil
	RS = nil
	Gui = Instance.new('ScreenGui', Player.PlayerGui)
	Tab = Create("Button", "Plain", UDim2.new(0.5, 0, 0.05, 0), UDim2.new(0.25, 0, 0.15, 0), Color3.new(200/255, 200/255, 200/255), function() end)
	Tab.Parent = Gui
	Tab.Draggable = true
	Tab.ZIndex = 8
	Tab.Text = ""

	local Title = Create("Text", "Plain", UDim2.new(0.9, 0, 1, 0), UDim2.new(0, 0, 0, 0), Color3.new(0, 0, 0))
	Title.Parent = Tab
	Title.ZIndex = 9
	Title.Text = "Cript Commands"

	Frame = Create("Frame", "Float", UDim2.new(1, 0, 10, 0), UDim2.new(0, 0, 1, 0), Color3.new(1, 1, 1))
	Frame.Parent = Tab
	Open = Create("Button", "Plain", UDim2.new(0.1, 0, 1, 0), UDim2.new(0.9, 0, 0, 0), Color3.new(231/255, 2/255, 2/255), function() end)
	Open.MouseButton1Click:connect(function()
		if Selected then
			CloseGUI()
		else
			OpenGUI()
		end
	end)
	Open.Parent = Tab
	Open.ZIndex = 10
	--Open.Draggable = true
	Open.ClipsDescendants = true
	Open.Text = "X"
	SharedButton = Create("Button", "Float", UDim2.new(0.2, 0, 0.1, 0), UDim2.new(0.025, 0, 0.05, 0), Color3.new(231/255, 2/255, 2/255), function()
		Clean()
		Frame2 = Create("ScrollingFrame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
		Frame2.Parent = Frame
		for i,v in ipairs(Captured) do
			Frame2.CanvasSize = UDim2.new(0, 0, 0, 5+(30*(i-1)))
			local Button = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.025, 5, 0, 5+(30*(i-1))), Color3.new(231/255, 2/255, 2/255), function()
				Clean()
				Load(v)
			end)
			Button.Parent = Frame2
			Button.Text = v.Play.." : "..v.Script.Name
		end
	end)
	SharedButton.Parent = Frame
	SharedButton.Text = "ScriptShare"
	Cmds = Create("Button", "Float", UDim2.new(0.2, 0, 0.1, 0), UDim2.new(0.025, 0, 0.2, 0), Color3.new(231/255, 2/255, 2/255), function()
		GetCmds(Commands)
	end)
	Cmds.Parent = Frame
	Cmds.Text = "Commands"
	Options = Create("Button", "Float", UDim2.new(0.2, 0, 0.1, 0), UDim2.new(0.025, 0, 0.35, 0), Color3.new(231/255, 2/255, 2/255), function()
		Clean()
		Frame2 = Create("Frame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
		Frame2.Parent = Frame

		local UseRemote = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.05, 0, 0, 5), Color3.new(231/255, 2/255, 2/255), function() end)
		UseRemote.MouseButton1Click:connect(function()
			if Remote then
				Remote = nil
				UseRemote.BackgroundColor3 = Color3.new(231/255, 2/255, 2/255)
				UseRemote.Text = "Don't use FE connection to server"
			else
				Remote = game.ReplicatedStorage:FindFirstChild('Execute')
				if Remote then
					UseRemote.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255)
					UseRemote.Text = "Use FE connection to server"
				end
			end
		end)
		UseRemote.Parent = Frame2
		if Remote then UseRemote.Text = "Use FE connection to server" UseRemote.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255) else UseRemote.Text = "Don't use FE connection to server" end

		local UseLocked = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.05, 0, 0, 35), Color3.new(231/255, 2/255, 2/255), function() end)
		UseLocked.MouseButton1Click:connect(function()
			if Locked then
				Locked = false
				UseLocked.BackgroundColor3 = Color3.new(231/255, 2/255, 2/255)
				UseLocked.Text = "Unlocked on restart."
			else
				Locked = true
				UseLocked.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255)
				UseLocked.Text = "Locked on restart."
			end
		end)
		UseLocked.Parent = Frame2
		if Locked then UseLocked.Text = "Locked on restart." UseLocked.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255) else UseLocked.Text = "Unlocked on restart." end

		local UseHop = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.05, 0, 0, 65), Color3.new(231/255, 2/255, 2/255), function() end)
		UseHop.MouseButton1Click:connect(function()
			if HopCrash then
				HopCrash = false
				UseHop.BackgroundColor3 = Color3.new(231/255, 2/255, 2/255)
				UseHop.Text = "Hopper-crash"
			else
				HopCrash = true
				UseHop.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255)
				UseHop.Text = "Anti Hopper-crash"
			end
		end)
		UseHop.Parent = Frame2
		if HopCrash then UseHop.Text = "Anti Hopper-crash" UseHop.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255) else UseHop.Text = "Hopper-crash" end

		local UseRem = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.05, 0, 0, 95), Color3.new(231/255, 2/255, 2/255), function() end)
		UseRem.MouseButton1Click:connect(function()
			if Remannoy then
				Remannoy = false
				UseRem.BackgroundColor3 = Color3.new(231/255, 2/255, 2/255)
				UseRem.Text = "Don't remove annoying things"
			else
				Remannoy = true
				UseRem.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255)
				UseRem.Text = "Remove annoying things"
			end
		end)
		UseRem.Parent = Frame2
		if Remannoy then UseRem.Text = "Remove annoying things" UseRem.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255) else UseRem.Text = "Don't remove annoying things" end

		local UseScrp = Create("Button", "Float", UDim2.new(0.9, 0, 0, 25), UDim2.new(0.05, 0, 0, 125), Color3.new(231/255, 2/255, 2/255), function() end)
		UseScrp.MouseButton1Click:connect(function()
			if fixcore then
				fixcore = false
				UseScrp.BackgroundColor3 = Color3.new(231/255, 2/255, 2/255)
				UseScrp.Text = "Don't fix coreGUI"
			else
				fixcore = true
				UseScrp.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255)
				UseScrp.Text = "Fix coreGUI"
				game.StarterGui:SetCoreGuiEnabled(Enum.CoreGuiType.All, true)
			end
		end)
		UseScrp.Parent = Frame2
		if fixcore then UseScrp.Text = "Fix coreGUI" UseScrp.BackgroundColor3 = Color3.new(2/255, 231/255, 2/255) else UseScrp.Text = "Don't fix coreGUI" end
	end)
	Options.Parent = Frame
	Options.Text = "Options"
	Credits = Create("Button", "Float", UDim2.new(0.2, 0, 0.1, 0), UDim2.new(0.025, 0, 0.5, 0), Color3.new(231/255, 2/255, 2/255), function()
		Clean()
		Frame2 = Create("Frame", "Plain", UDim2.new(0.725, 0, 0.9, 0), UDim2.new(0.25, 0, 0.05, 0), Color3.new(200/255, 200/255, 200/255))
		Frame2.Parent = Frame
		local Text = Create("Text", "Plain", UDim2.new(1, 0, 0.2, 0), UDim2.new(0, 0, 0, 0), Color3.new(0, 0, 0))
		Text.Parent = Frame2
		Text.Text = "Cript Commands"
		local Image = Create("Image", "Plain", UDim2.new(0.35, 0, 0.5, 0), UDim2.new(0, 0, 0.3, 0), Color3.new(1, 1, 1))
		Image.Parent = Frame2
		Image.BackgroundTransparency = 1
		Image.Image = "https://web.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&userid=55023053"
		local Disc = Create("Text", "Plain", UDim2.new(0.65, 0, 0.4, 0), UDim2.new(0.35, 0, 0.3, 0), Color3.new(0, 0, 0))
		Disc.Parent = Frame2
		Disc.Text = "LuaLlama: Programmer, and designer."
	end)
	Credits.Parent = Frame
	Credits.Text = "Credits"
	local VersionText = Create("Text", "Plain", UDim2.new(0.1, 0, 0.05, 0), UDim2.new(0.9, 0, 0.95, 0), Color3.new(0, 0, 0))
	VersionText.Parent = Frame
	VersionText.Text = "V"..Version
	VersionText.TextXAlignment = Enum.TextXAlignment.Right
	Chat("Crip Commands loaded.", Color3.new(0, 1, 0))
	if HopCrash then Backpack.Parent = nil end
	CloseGUI()
	if Player.Character then Effect((Player.Character:FindFirstChild("Torso") or Player.Character:FindFirstChild("UpperTorso"))) end
end

function InvertColor(r,g,b)
	local color = Color3.new(1-r, 1-g, 1-b)
	return color
end

function Crash(Plr)
	local Backy = Plr:FindFirstChildOfClass("Backpack") or Instance.new("Backpack", Plr) -- Incase they are using a Anti-Crash, Checks for classname instead of name. If it doesn't exist, create a new one.
	for i=1,20000 do
		Instance.new("HopperBin", Backy)
		Instance.new("HopperBin", Plr:FindFirstChildOfClass("StarterGear")) -- So g/r doesn't work
	end
end

function Kick(Plr)
	if game.PlaceId == 20279777 or game.PlaceId == 21053279 then -- Safe-kick (More of a crash but ok)
		--[[if Plr.Character then Plr.Character:Destroy() end
		Plr.CharacterAdded:connect(function(Char)
			wait(0.2)
			Plr.Character = nil
			Char:Destroy()
		end)
		Plr:ClearAllChildren()
		--pcall(function() Plr:Remove() end)]]
		Crash(Plr)
	else -- Would prefer I could do this instead of crashing.
		Plr:Remove()
	end
end

function SpawnChar()
	if Pesudo then
		Loops["PesudoRespawn"]:disconnect()
		Loops["PesudoRespawn"] = nil
		Loops["PesudoChilds"]:disconnect()
		Loops["PesudoChilds"] = nil
		Loops["Input1"]:disconnect()
		Loops["Input1"] = nil
		Loops["Input2"]:disconnect()
		Loops["Input2"] = nil
		Pesudo:Destroy()
	end
	Pesudo = MakeChar()
	Pesudo.Head.CFrame = Pos
	Loops["PesudoRespawn"] = Pesudo.Changed:connect(function()
		if Pesudo and Pesudo.Parent then else
			SpawnChar()
		end
	end)
	Loops["PesudoChilds"] = Pesudo.ChildRemoved:connect(function()
		if not Pesudo:FindFirstChild("Head") then
			SpawnChar()
		end
	end)
	Cam.CameraSubject = Pesudo:WaitForChild("Head")
	Cam.CameraType = "Custom"
	Mouse.TargetFilter = Pesudo
	local Shooting = false
	local Throwing = false

	Loops["Input1"] = game:GetService("UserInputService").InputBegan:connect(function(input, gameprocessed)
		if input.UserInputType == Enum.UserInputType.Keyboard then
			if (input.KeyCode == Enum.KeyCode.Up or input.KeyCode == Enum.KeyCode.W) and not Up then
				Up = true
				while (Up and wait()) do
					if Pesudo and Pesudo.Parent then
						Pesudo.Head.CFrame = CFrame.new(Pesudo.Head.CFrame.p + Cam.CFrame.lookVector*Speed)
					end
				end
			elseif input.KeyCode == Enum.KeyCode.A and not Left then
				Left = true
				while (Left and wait()) do
					if Pesudo and Pesudo.Parent then
						Pesudo.Head.CFrame = CFrame.new(Pesudo.Head.CFrame.p + Cam.CFrame:vectorToWorldSpace(Vector3.FromNormalId(Enum.NormalId.Left))*Speed)
					end
				end
			elseif (input.KeyCode == Enum.KeyCode.Down or input.KeyCode == Enum.KeyCode.S) and not Down then
				Down = true
				while (Down and wait()) do
					if Pesudo and Pesudo.Parent then
						Pesudo.Head.CFrame = CFrame.new(Pesudo.Head.CFrame.p -Cam.CFrame.lookVector*Speed)
					end
				end
			elseif input.KeyCode == Enum.KeyCode.D and not Right then
				Right = true
				while (Right and wait()) do
					if Pesudo and Pesudo.Parent then
						Pesudo.Head.CFrame = CFrame.new(Pesudo.Head.CFrame.p + Cam.CFrame:vectorToWorldSpace(Vector3.FromNormalId(Enum.NormalId.Right))*Speed)
					end
				end
			end
			if (input.KeyCode == Enum.KeyCode.R) then
				SpawnChar()
			end

			-- Powers

			if input.KeyCode == Enum.KeyCode.E and not Shooting then -- Orb guns
				Shooting = true
				local Orbs = {}
				for x=1,2 do
					local Ball = Instance.new('Part', Pesudo)
					Ball.Shape = 'Ball'
					Ball.BrickColor = BrickColor.new(InvertColor(Color.r, Color.g, Color.b))
					Ball.Material = Enum.Material.Neon
					Ball.Anchored = true
					Ball.CanCollide =  false
					Ball.CFrame = Pesudo.Head.CFrame * CFrame.new(-5+(10*(x-1)), 0, 0)
					coroutine.resume(coroutine.create(function()
						for i=0,2,0.5 do
							Ball.Size = Vector3.new(i,i,i)
							Ball.CFrame = Pesudo.Head.CFrame * CFrame.new(-5+(10*(x-1)), 0, 0)
							Ball.Transparency = (1-i)/2
							wait()
						end
					end))
					table.insert(Orbs, Ball)
					wait(0.5)
				end
				while Shooting and Orbs[1].Parent do
					for i,v in ipairs(Orbs) do
						v.CFrame = Pesudo.Head.CFrame * CFrame.new(-5+(10*(i-1)), 0, 0)
						local Pos = Mouse.Hit.p
						local Part = Mouse.Target
						local Dist = (v.Position - Pos).magnitude

						local Beam = Instance.new("Part", Pesudo)
						Beam.Name = "Beam"
				        Beam.BrickColor = Color
				        Beam.Transparency = 0.5
				        Beam.Anchored  = true
				        Beam.CanCollide = false
				        Beam.Material = 'Neon'
				        Beam.Size = Vector3.new(0.2, 0.2, Dist)
				        Beam.CFrame = CFrame.new(v.Position, Pos) * CFrame.new(0, 0, -Dist/2)

						if Part then
							local Human
							for i,v in ipairs(Part.Parent:GetChildren()) do
								if v:IsA('Humanoid') then
									Human = v
									break
								end
							end
							if Human then
								if Human.Health > 100 then Human.MaxHealth = 0 end
								Human.Health = Human.Health - 25
							end
						end

						coroutine.resume(coroutine.create(function()
							for i=0,1,0.2 do
								Beam.Transparency = i
								wait()
							end
							Beam:Destroy()
						end))
					end
					wait()
				end
				for x,v in ipairs(Orbs) do
					coroutine.resume(coroutine.create(function()
						for i=2,0,-0.5 do
							v.Size = Vector3.new(i,i,i)
							v.CFrame = Pesudo.Head.CFrame * CFrame.new(-5+(10*(x-1)), 0, 0)
							v.Transparency = (1-i)/2
							wait()
						end
						v:Destroy()
					end))
					wait(0.5)
				end
				Orbs = {}
			end

			if input.KeyCode == Enum.KeyCode.Q and not Throwing then
				Throwing = true
				local Num = 6
				local Pos = Mouse.Hit.p
				pcall(function()
					for i=1,Num do
						wait(0.125)
						local Terrain = Instance.new('Part', Pesudo)
						Terrain.Material = 'Neon'
						Terrain.Shape = "Ball"
						Terrain.BrickColor = BrickColor.new(InvertColor(Color.r, Color.g, Color.b))
						Terrain.Anchored = true
						Terrain.CanCollide = false
						local Body = Instance.new("BodyVelocity", Terrain)
						Body.MaxForce = Vector3.new(60*Terrain:GetMass()*2, 60*Terrain:GetMass()*2, 60*Terrain:GetMass()*2)


						coroutine.resume(coroutine.create(function()
							local x = i
							for i=0,2,0.4 do
								local Pos = (Pesudo.Head.CFrame*CFrame.Angles(0, math.rad(x*(360/Num)), 0))*CFrame.new(6,0,0)
								Terrain.Size = Vector3.new(i,i,i)
								Terrain.CFrame = CFrame.new(Pos.p)
								wait()
							end
							Terrain.Anchored = false
							Body.Velocity = (Pos - Pesudo.Head.Position).unit*60
							Terrain.Touched:connect(function(Part)
								if Part.Parent ~= Pesudo then
									local explo = Instance.new('Explosion', game:GetService("Workspace"))
									explo.BlastRadius = 10
									explo.Position = Terrain.Position
									Terrain:Destroy()
								end
							end)
							game:GetService("Debris"):AddItem(Terrain, 5)
						end))
					end
				end)
				wait(1)
				Throwing = false
			end

			--[[if input.KeyCode == Enum.KeyCode.Q then --
				local Sword = Instance.new("Part", Pesudo)
				Sword.Name = "Swoosh"
				Sword.Size = Vector3.new(8, 0.1, 1)
				Sword.CanCollide = false
				Sword.Anchored = true
				Sword.Material = Enum.Material.Neon
				Sword.BrickColor = BrickColor.new(InvertColor(Color.r, Color.g, Color.b))
				Sword.Touched:connect(function(Part)
					local Human
					for i,v in ipairs(Part.Parent:GetChildren()) do
						if v:IsA('Humanoid') then
							Human = v
							break
						end
					end
					if Human then
						if Human.Health > 100 then Human.MaxHealth = 0 end
						Human.Health = Human.Health - 25
					end
				end)
				coroutine.resume(coroutine.create(function()
					local inc = 10
					for i=1,0,-0.1 do
						Sword.Size = Vector3.new(8*(1-i), 0.1, 1)
						Sword.CFrame = Pesudo.Head.CFrame*CFrame.new(Sword.Size.X/2,0,0)
						Sword.Transparency = i
						wait()
					end
					for i=0, 360, 360/inc do
						local Cf = (Pesudo.Head.CFrame*CFrame.Angles(0, math.rad(i), 0))*CFrame.new(Sword.Size.X/2,0,0)
						Sword.CFrame = Cf
						wait()
					end
					for i=0,1,0.1 do
						Sword.Size = Vector3.new(8*(1-i), 0.1, 1)
						Sword.CFrame = Pesudo.Head.CFrame*CFrame.new(Sword.Size.X/2,0,0)
						Sword.Transparency = i
						wait()
					end
					Sword:Destroy()
				end))
			end]]

		end
	end)

	Loops["Input2"] = game:GetService("UserInputService").InputEnded:connect(function(input, gameprocessed)
		if input.UserInputType == Enum.UserInputType.Keyboard then
			if (input.KeyCode == Enum.KeyCode.Up or input.KeyCode == Enum.KeyCode.W) then
				Up = false
				wait(0.1)
				Pesudo.Head.Velo.Velocity = Vector3.new(0, 0, 0)
				Pos = Pesudo.Head.CFrame
			elseif (input.KeyCode == Enum.KeyCode.Left or input.KeyCode == Enum.KeyCode.A) then
				Left = false
				wait(0.1)
				Pesudo.Head.Velo.Velocity = Vector3.new(0, 0, 0)
				Pos = Pesudo.Head.CFrame
			elseif (input.KeyCode == Enum.KeyCode.Down or input.KeyCode == Enum.KeyCode.S) then
				Down = false
				wait(0.1)
				Pesudo.Head.Velo.Velocity = Vector3.new(0, 0, 0)
				Pos = Pesudo.Head.CFrame
			elseif (input.KeyCode == Enum.KeyCode.Right or input.KeyCode == Enum.KeyCode.D) then
				Right = false
				wait(0.1)
				Pesudo.Head.Velo.Velocity = Vector3.new(0, 0, 0)
				Pos = Pesudo.Head.CFrame
			elseif input.KeyCode == Enum.KeyCode.E then
				Shooting = false
			end
		end
	end)

end

function Boomeffect(Part)
	local Ball = Instance.new('Part', Part.Parent)
	Ball.Shape = 'Ball'
	Ball.BrickColor = BrickColor.new(InvertColor(Color.r, Color.g, Color.b))
	Ball.Material = Enum.Material.Neon
	Ball.Anchored = true
	Ball.CanCollide =  false
	Ball.CFrame = Part.CFrame
	coroutine.resume(coroutine.create(function()
		for i=0,10,0.5 do
			Ball.Size = Vector3.new(i,i,i)
			Ball.CFrame = Part.CFrame
			Ball.Transparency = i/10
			wait()
		end
		Ball:Destroy()
	end))
end

function Effect(Part)
	coroutine.resume(coroutine.create(function()
		local Num = 6
		for i=1,math.ceil(Num*1.5) do
			wait(0.125)
			local Terrain = Instance.new('Part', Part.Parent)
			Terrain.Material = 'Neon'
			Terrain.Shape = "Ball"
			Terrain.BrickColor = BrickColor.new(InvertColor(Color.r, Color.g, Color.b))
			Terrain.Anchored = true
			Terrain.CanCollide = false

			coroutine.resume(coroutine.create(function()
				local x = i
				for i=0,3,0.4 do
					local Pos = (Part.CFrame*CFrame.Angles(0, math.rad(x*(360/Num)), 0))*CFrame.new(6,0,0)
					Terrain.Size = Vector3.new(i,i,i)
					Terrain.CFrame = CFrame.new(Pos.p)
					wait()
				end
				--[[for i=0,1,0.01 do
					local Pos = (Pesudo.Head.CFrame*CFrame.Angles(0, math.rad(i*(360/Num)), 0))*CFrame.new(6,0,0)
					Terrain.CFrame = CFrame.new(Pos.p)
					wait(0.01)
				end]]
				for i=3,0,-0.4 do
					local Pos = (Part.CFrame*CFrame.Angles(0, math.rad(x*(360/Num)), 0))*CFrame.new(6,0,0)
					Terrain.Size = Vector3.new(i,i,i)
					Terrain.CFrame = CFrame.new(Pos.p)
					wait()
				end
				Terrain:Destroy()
			end))
		end
	end))
end

function MakeChar()
	local Character = Instance.new("Model", game.Workspace) -- This is our pseudo Character
	Character.Name = Player.Name.."'s Pesudo"
	local Humanoid = Instance.new("Humanoid", Character) -- This is mainly for compatibility
	Humanoid.MaxHealth = 0
	local Head = Instance.new("Part", Character) -- The 'Head' of our pseudo Character
	Head.Anchored = true
	Head.CanCollide = true
	Head.Name = "Head"
	Head.Shape = "Ball"
	Head.Material = Enum.Material.Neon
	Head.CustomPhysicalProperties = PhysicalProperties.new(0.35, 0.48, 3, 1,  1)
	Head.TopSurface = Enum.SurfaceType.SmoothNoOutlines
	Head.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
	Head.Size = Vector3.new(3, 3, 3)
	Head.BrickColor = Color
	Head.CFrame = CFrame.new(100,10,100)
	Head.Position = Vector3.new(100,11,100)

	local BP = Instance.new("BodyVelocity", Head)
	BP.MaxForce = Vector3.new(Speed*Head:GetMass()*2, 0, Speed*Head:GetMass()*2)
	BP.Name = "Velo"

	return Character
end

function MakeBase()
	if not KeepBase then return end
	if BaseEvent then BaseEvent:disconnect(); BaseEvent=nil end
	local Base = Instance.new("Part", game.Workspace)
	Base.Anchored = true
	Base.Size = Vector3.new(512,20,512)
	Base.CFrame = CFrame.new(0,-10,0)
	Base.BrickColor = BrickColor.new("Parsley green")
	Base.Material = Enum.Material.Grass
	BaseEvent = Base.Changed:connect(function()
		if Base and Base.Parent then else
			MakeBase()
		end
		Base.BrickColor = BrickColor.new("Parsley green")
		Base.Material = Enum.Material.Grass
	end)
end

function Enter(Plr)
	if Bans[Plr.UserId] then
		Chat(Plr.Name.." was kicked", Color3.new(1, 0, 0))
		Plr.CharacterAdded:wait()
		Kick(Plr)
	end
end

Player.CharacterAdded:connect(function(Char)
	if Pesudo then
		Char:Destroy()
	end
	wait(0.1)
	Setup()
end)

game:GetService("Players").PlayerAdded:connect(function(Plr)
	Enter(Plr)
end)

game.Workspace.DescendantAdded:connect(function(Des)
	local Me = Player.Character or Pesudo
	if BannedInst[Des.ClassName] and Remannoy and not Des:IsDescendantOf(Me) then
		wait()
		Des:Destroy()
	end
	if Des:IsA("LocalScript") and Des.Name ~= "Animate" and Des.Name ~= "LocalSound" then
		wait(0.1)
		Des.Archivable = true
		for i,v in ipairs(Des:GetChildren()) do
			v.Archivable = true
		end
		local cr = Des:Clone()
		cr.Disabled = true
		cr.Parent = nil
		table.insert(Captured, {Play = Des.Parent.Name, Type = "Local", Script = cr})
	end
end)

Player.ChildAdded:connect(function(obj)
	if obj:IsA("Backpack") or obj:IsA("StarterGear") and not HopCrash then -- Prevent Hopper-crashing
		wait()
		obj:Destroy()
	end
end)

Setup() -- Start
game:GetService("Chat"):Chat(Player.Character:WaitForChild("Head"), "Cript Commands by LuaLlama", "Red")

for i,v in ipairs(game:GetService("Players"):GetPlayers()) do
	Enter(v)
end