--Designed and Coded by Kangerujack 2016
--Revisioned 2018


----------------------Local Variables----------------------------


local Player = game.Players.LocalPlayer

local Mouse = Player:GetMouse()

local RealCamera = workspace.CurrentCamera


local Actions = {"Destroy","Kill","BreakJoints","Distort","Anchor","Push","Freeze",
	"Clone","Build","Laser","Rekt","Weld"}
local Action = "Destroy"
local Selection = 1
local Mode = "Model"--{"Part","Model"}

local punishedPlayers = {}

table.sort(Actions)


local SizeX = 3
local SizeY = 3
local SizeZ = 3

local menuUp = false

--if Player.Name ~= "Player1" then
	--repeat
		--wait(100000000)
	--until false
--end

---------------------------CLEAN UP------------------------------

--RealCamera:ClearAllChildren()
--Player.PlayerGui:ClearAllChildren()

function freshLoad()

	Char = workspace:WaitForChild(Player.Name)

	for _,v in pairs(Char:GetChildren()) do
		print("Checking: "..v.Name)
		if v:IsA("Part","Humanoid","Hat") and v.Name ~= "Eye" then
			print("Destroying part: "..v.Name)
			v:Destroy()
		end
	end


	Camera = Instance.new("Part",Char) -- New character
	Camera.Size = Vector3.new(1.5,1.5,1.5)
	Camera.Shape = "Ball"
	Camera.BrickColor = BrickColor.new("Really black")
	Camera.CanCollide = false
	Camera.TopSurface = "Smooth"
	Camera.BottomSurface = "Smooth"
	Camera.Anchored = true
	Camera.Locked = true
	Camera.CFrame = CFrame.new(0,10,0)
	Camera.BackSurface = "Motor"
	Camera.Name = "Eye"

	Eye = Instance.new("Part",Char)
	Eye.Size = Vector3.new(0.4,0.4,0.4)
	Eye.Shape = "Ball"
	Eye.BrickColor = BrickColor.new("White")
	Eye.CanCollide = false
	Eye.TopSurface = "Smooth"
	Eye.BottomSurface = "Smooth"
	Eye.Locked = true
	Eye:BreakJoints()

	EyeWeld = Instance.new("Weld")
	EyeWeld.Parent = Char
	EyeWeld.Part0 = Eye
	EyeWeld.Part1 = Camera
	EyeWeld.C0 = CFrame.new(0,0,0.7)

	ScreenGui = Instance.new("ScreenGui",Player.PlayerGui) ----------------------BASIC GUI---------------------------------

	GuiM = Instance.new("TextButton",ScreenGui)
	GuiM.Size = UDim2.new(0,250,0,50)
	GuiM.Position = UDim2.new(0.7,1,0.8,1) --0.95= 5
	GuiM.Text = "Action: Destroy, Model"
	GuiM.BackgroundColor = BrickColor.new("Really black")
	GuiM.Transparency = 0.3
	GuiM.TextColor = BrickColor.new("White")

	SB = Instance.new("SelectionBox",workspace.CurrentCamera)

	workspace.CurrentCamera.CameraSubject = Camera

	local guiAnimating = false

	GuiM.MouseButton1Click:connect(function()

		if guiAnimating == true then return end



		function closeGui()
			for i,v in pairs(ActionsGui) do
				spawn(function()
					ActionsGui[i].Text = ""
					repeat
						guiAnimating = true
						wait()
						ActionsGui[i].Size = UDim2.new(0,ActionsGui[i].Size.X.Offset - 15,0,ActionsGui[i].Size.Y.Offset)
					until ActionsGui[i].Size.X.Offset < 1
					ActionsGui[i]:Destroy()
					guiAnimating = false
					menuUp = false
				end)
			end
		end

		if menuUp == true then

			closeGui()

			return --Don't do it

		end

		if guiMenu ~= nil then
			guiMenu:Destroy()
		end

		guiMenu = Instance.new("Folder",ScreenGui)

		menuUp = true

		local selectionGui = nil
		local selectionGuiMode = nil





		ActionsGui = {}
		for i,v in pairs(Actions) do
			local gui = Instance.new("TextButton",guiMenu)
			gui.Size = UDim2.new(0,125,0,25)
			gui.Position = GuiM.Position + UDim2.new(0,0,0,-25 * i)
			gui.Text = v
			gui.BackgroundColor = BrickColor.new("Really black")
			gui.Transparency = 0.3
			gui.TextColor = BrickColor.new("White")

			if v == Action then
				gui.BackgroundColor = BrickColor.new("Really red") ---------------------Selects the action in use
				selectionGui = gui
			end

			gui.MouseButton1Click:connect(function()
				if selectionGui == nil then
					gui.BackgroundColor = BrickColor.new("Really red")
					selectionGui = gui
				else
					selectionGui.BackgroundColor = BrickColor.new("Really black")
					gui.BackgroundColor = BrickColor.new("Really red")
					selectionGui = gui
				end
			end)
			table.insert(ActionsGui, gui)
		end


		for i = 1, 2 do
			local gui = Instance.new("TextButton",guiMenu)
			gui.Size = UDim2.new(0,125,0,25)
			gui.Position = GuiM.Position + UDim2.new(0,125,0,-25 * i)

			gui.BackgroundColor = BrickColor.new("Really black")
			gui.Transparency = 0.3
			gui.TextColor = BrickColor.new("White")
			if i == 1 then
				gui.Text = "Part"
			else
				gui.Text = "Model"
				gui.BackgroundColor = BrickColor.new("Really red")
				selectionGuiMode = gui
			end

			gui.MouseButton1Click:connect(function()
				if selectionGuiMode == nil then
					gui.BackgroundColor = BrickColor.new("Really red")
					selectionGuiMode = gui
				else
					selectionGuiMode.BackgroundColor = BrickColor.new("Really black")
					gui.BackgroundColor = BrickColor.new("Really red")
					selectionGuiMode = gui
				end
			end)

			table.insert(ActionsGui, gui)
		end







		local gui = Instance.new("TextButton",guiMenu) ----------------Okay we will change what mode we are in!
		gui.Size = UDim2.new(0,50,0,25)
		gui.Position = GuiM.Position + UDim2.new(0,250,0,0)
		gui.Text = "Okay"
		gui.BackgroundColor = BrickColor.new("Bright green")
		gui.Transparency = 0.3
		gui.TextColor = BrickColor.new("White")
		gui.MouseButton1Click:connect(function()

			Action = selectionGui.Text
			Mode = selectionGuiMode.Text

			GuiM.Text = "Action: "..Action..", Mode: "..Mode

			closeGui()
		end)

		table.insert(ActionsGui, gui)

		local gui = Instance.new("TextButton",guiMenu)
		gui.Size = UDim2.new(0,50,0,25)
		gui.Position = GuiM.Position + UDim2.new(0,250,0,25)
		gui.Text = "Cancel"
		gui.BackgroundColor = BrickColor.new("Bright red")
		gui.Transparency = 0.3
		gui.TextColor = BrickColor.new("White")
		gui.MouseButton1Click:connect(closeGui)

		table.insert(ActionsGui, gui)

		local gui = Instance.new("TextButton",guiMenu) ----------------------------------PROGRAMS MARK-----------------------------------------||||
		gui.Size = UDim2.new(0,75,0,25)
		gui.Position = GuiM.Position + UDim2.new(0,-75,0,25)
		gui.Text = "Programs"
		gui.BackgroundColor = BrickColor.new("Bright red")
		gui.Transparency = 0.3
		gui.TextColor = BrickColor.new("White")
		table.insert(ActionsGui, gui)

		gui.MouseButton1Click:connect(function() -------------------------------------Track Player Function------------------------------------------
			local gui = Instance.new("TextButton",guiMenu)
			gui.Size = UDim2.new(0,75,0,25)
			gui.Position = GuiM.Position + UDim2.new(0,-75,0,0)
			gui.Text = "Track"
			gui.BackgroundColor = BrickColor.new("Bright green")
			gui.Transparency = 0.3
			gui.TextColor = BrickColor.new("White")
			table.insert(ActionsGui, gui)


			gui.MouseButton1Click:connect(function() -------------------------------------------------Load players---------------------------------
				for i,v in pairs(game.Players:GetPlayers()) do
					local gui = Instance.new("TextButton",guiMenu)
					gui.Size = UDim2.new(0,75,0,25)
					gui.Position = GuiM.Position + UDim2.new(0,-150,0,(-25 * i) + 25)
					gui.Text = v.Name
					gui.BackgroundColor = BrickColor.new("Really black")
					gui.Transparency = 0.3
					gui.TextColor = BrickColor.new("White")
					table.insert(ActionsGui, gui)
					gui.MouseButton1Click:connect(function() -------When they select a player
						if game.Players:findFirstChild(gui.Text) then
							local targetPlayer = game.Players[gui.Text]
							if targetPlayer.Character:findFirstChild("Head") and targetPlayer.Character:findFirstChild("Humanoid") then



								RealCamera.CameraSubject = targetPlayer.Character.Head
								closeGui()

								local gui = Instance.new("TextButton",ScreenGui)
								gui.Size = UDim2.new(0,75,0,50)
								gui.Position = GuiM.Position + UDim2.new(0,-200,0,0)
								gui.Text = "Exit Tracker"
								gui.BackgroundColor = BrickColor.new("Really red")
								gui.Transparency = 0.3
								gui.TextColor = BrickColor.new("White")
								gui.MouseButton1Click:connect(function()
									RealCamera.CameraSubject = Camera
									gui:Destroy()
								end)


								spawn(function()
									repeat
										wait(1)

										--Conditions to check to make sure we don't get locked in
										if RealCamera.CameraSubject ~= targetPlayer.Character.Head then
											break
										end


										if workspace:findFirstChild(targetPlayer.Name) == nil then
											break
										end

										if targetPlayer.Character:findFirstChild("Humanoid") == nil then
											break
										end

										if targetPlayer.Character.Humanoid.Health < 1 then
											break
										end
									until false
									RealCamera.CameraSubject = Camera
									gui:Destroy()
								end)
							end
						end
					end)
				end
			end)


			local gui = Instance.new("TextButton",guiMenu) ----------------------------------------Punish Player---------------------------
			gui.Size = UDim2.new(0,75,0,25)
			gui.Position = GuiM.Position + UDim2.new(0,-75,0,-25)
			gui.Text = "Punish"
			gui.BackgroundColor = BrickColor.new("Bright green")
			gui.Transparency = 0.3
			gui.TextColor = BrickColor.new("White")
			table.insert(ActionsGui, gui)


			gui.MouseButton1Click:connect(function()      ----------------------------------------Punish Player------------------------
				for i,v in pairs(game.Players:GetChildren()) do
					local gui = Instance.new("TextButton",guiMenu)
					gui.Size = UDim2.new(0,75,0,25)
					gui.Position = GuiM.Position + UDim2.new(0,-151,0,-25* i)
					gui.Text = v.Name
					gui.Transparency = 0.3
					gui.TextColor = BrickColor.new("White")
					table.insert(ActionsGui, gui)

					for i,x in pairs(punishedPlayers) do
						print(gui.Text,x)
						if gui.Text == x then
							gui.BackgroundColor = BrickColor.new("Really red")
							break
						else
							gui.BackgroundColor = BrickColor.new("Really black")
						end
					end


					gui.MouseButton1Click:connect(function()
						if gui.BackgroundColor == BrickColor.new("Really red") then
							gui.BackgroundColor = BrickColor.new("Really black")
							for i,x in pairs(punishedPlayers) do
								if x == gui.Text then
									table.remove(punishedPlayers, i)
									return
								end
							end
						end

						if game.Players:FindFirstChild(gui.Text) then
							gui.BackgroundColor = BrickColor.new("Really red")
							table.insert(punishedPlayers, gui.Text)
							local punishTarget = gui.Text
							spawn(function()
								repeat
									wait(0.5)
									game.Players[punishTarget].Character:Destroy()
									print('destroying player: '..punishTarget)
									for i,x in pairs(punishedPlayers) do
										if x == punishTarget then
											print('player still in punishment')
											break
										elseif i == #punishedPlayers then
											print('player not in punishment anymore')
											return
										end
									end
									if #punishedPlayers == 0 then
										return
									end
								until game.Players:findFirstChild(punishTarget) == nil
							end)
						end
					end)
				end
			end)





		end)

	end)

end

freshLoad()











local GhostPart = Instance.new("Part")
GhostPart.CanCollide = false
GhostPart.Anchored = true
GhostPart.Transparency = 0.5
GhostPart.Size = Vector3.new(SizeX,SizeY,SizeZ)







--workspace.CurrentCamera.CameraType = "Scriptable"


function getMasterModel(target)
	repeat
		wait()

		if Char:IsAncestorOf(target) or menuUp or target == nil then
			return nil
		end



		if target.Parent ~= workspace then
			target = target.Parent
		else
			if target.Name == "Base" then return nil end --We don't want to mess with the baseplate
			return target
		end
	until target == false
end



-------------------------------------------------------------------------------MAIN FUNCTIONS MARK-------------------------------------




function DestroyFunction()
	SB.Adornee:Destroy()
end

function KillFunction()
	for i,v in pairs(SB.Adornee:GetDescendants()) do
		if v:IsA("Humanoid") then
			v.Health = 0
			v:Destroy()
		end
	end
end

function BreakJointsFunction()
	SB.Adornee:BreakJoints()

end

function DistortFunction()
	--if Mode == "Model" then
	print(SB.Adornee.ClassName)
	for _,v in pairs(SB.Adornee:GetDescendants()) do
		if v:IsA("Part","WedgePart","UnionOperation") then
			v.Size = Vector3.new(math.random(v.Size.X),math.random(v.Size.Y),math.random(v.Size.Z)) + Vector3.new(math.random(v.Size.X),math.random(v.Size.Y),math.random(v.Size.Z))
		end
	end
	if SB.Adornee:IsA("Part","WedgePart","UnionOperation") then
		SB.Adornee.Size = Vector3.new(math.random(SB.Adornee.Size.X),math.random(SB.Adornee.Size.Y),math.random(SB.Adornee.Size.Z)) +
			Vector3.new(math.random(SB.Adornee.Size.X),math.random(SB.Adornee.Size.Y),math.random(SB.Adornee.Size.Z))
	end
end

function rektFunction()
	for _,v in pairs(SB.Adornee:GetDescendants()) do
		if v:IsA("Part","WedgePart","UnionOperation") then
			v:breakJoints()
			v.Anchored = false
			v.Velocity = Vector3.new(math.random(-1000,1000),math.random(-1000,1000),math.random(-1000,1000))
			v.Color = Color3.new(math.random(),math.random(),math.random())
		end
	end
	if SB.Adornee:IsA("Part","WedgePart","UnionOperation") then
		local v = SB.Adornee
		v:breakJoints()
		v.Anchored = false
		v.Velocity = Vector3.new(math.random(-1000,1000),math.random(-1000,1000),math.random(-1000,1000))
		v.Color = Color3.new(math.random(),math.random(),math.random())
	end
end

function AnchorFunction()
	for _,v in pairs (SB.Adornee:GetDescendants()) do
		if v:IsA("Part","WedgePart","UnionOperation") then
			v.Anchored = not v.Anchored
		end
	end
	if SB.Adornee:IsA("Part","WedgePart","UnionOperation") then
		SB.Adornee.Anchored = not SB.Adornee.Anchored
	end
end

function PushFunction()
	for _,v in pairs (SB.Adornee:GetDescendants()) do
		if v:IsA("Part","WedgePart","UnionOperation") then
			v.Anchored = false
			v.Velocity = Mouse.Target.CFrame.lookVector * 1000
		end
	end
	if SB.Adornee:IsA("Part","WedgePart","UnionOperation") then
		SB.Adornee.Anchored = false
		SB.Adornee.Velocity = Mouse.Target.CFrame.lookVector * 1000
	end
end

function FreezeFunction()
	for _,v in pairs(SB.Adornee:GetDescendants()) do
		if v:IsA("Part","WedgePart","UnionOperation") then
			v.BrickColor = BrickColor.new("Pastel Blue")
			v.Anchored = true
			v.Material = "Ice"
		end
	end
	if SB.Adornee:IsA("Part","WedgePart","UnionOperation") then
		SB.Adornee.Anchored = true
		SB.Adornee.Material = "Ice"
	end
end

function CloneFunction()
	SB.Adornee.Archivable = true
	local c = SB.Adornee:Clone()
	c.Parent = workspace
	c:MakeJoints()

	if c.ClassName == "Model" then
		c:MoveTo(Mouse.Target.CFrame.p + Vector3.new(0,5,0))
	elseif c:IsA("Part","WedgePart","UnionOperation") then
		c.CFrame = Mouse.Target.CFrame + Vector3.new(0,5,0)
	end


	spawn(function()

		if c:findFirstChild("Humanoid") and c:findFirstChild("Torso") then
			local human = c.Humanoid
			local torso = c.Torso

			human.Archivable = true

			local bp = Instance.new("BodyPosition",torso)
			bp.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
			bp.Position = torso.Position

			if c:findFirstChild("Right Arm") and c:findFirstChild("Left Arm") then ---Put the arms up like a zombie
				local zarm1 = c["Right Arm"]
				local zarm2 = c["Left Arm"]

				local weld = Instance.new("Weld",c)
				weld.Part0 = torso
				weld.Part1 = zarm2
				weld.C0 = CFrame.new(-1.5,0.5,-0.5) * CFrame.fromEulerAnglesXYZ(math.pi/2,0,0) --Left arm

				local weld = Instance.new("Weld",c)
				weld.Part0 = torso
				weld.Part1 = zarm1
				weld.C0 = CFrame.new(1.5,0.5,-0.5) * CFrame.fromEulerAnglesXYZ(math.pi/2,0,0) --Right arm

				local function touchChaos(hit)

					if c == nil then return end
					if hit.Name == c.Name then return end
					if getMasterModel(hit) == nil or hit.Parent == nil or hit == nil then return end
					if getMasterModel(hit).Name == c.Name then return end
					if hit.Parent == c then return end


					if hit.Parent:findFirstChild("Torso") then
						if hit.Parent.Torso:findFirstChild("BodyPosition") then
							return ----Don't hurt other clones
						end
					end

					print('touched '..hit.Name..'parent of '..hit.Parent.Name..'I AM: '..c.Name)

					if hit.Parent:findFirstChild("Humanoid") then
						hit.Parent.Humanoid:Destroy()
					elseif hit.Parent ~= workspace and hit.BrickColor ~= BrickColor.new("Really red") then
						for i,v in pairs(getMasterModel(hit):GetDescendants()) do
							if v:IsA("Part") or v:IsA("WedgePart") then
								v:breakJoints()
								v.Anchored = false
								v.Velocity = Vector3.new(math.random(-250,250),math.random(-250,250),math.random(-250,250))
								v.BrickColor = BrickColor.new("Really red")
							end
						end
						game:GetService("Debris"):AddItem(getMasterModel(hit), 5)
					elseif hit:IsA("Part") and hit.Name ~= "Base" then
						hit:Destroy()
					end
				end

				zarm1.Touched:connect(touchChaos)
				zarm2.Touched:connect(touchChaos)
			end

			repeat

				local targets = {}

				local players = workspace:GetChildren()



				local enemyTorso = nil
				local enemyHuman = nil
				local enemyTorsoDistance = nil

				for i,v in pairs(players) do


					if v:findFirstChild("Humanoid") and v:findFirstChild("Torso") and v ~= c and v.Name ~= c.Name then


						if (v.Torso.Position - torso.Position).magnitude < 200 and v.Humanoid.Health > 0 and
							v.Torso:findFirstChild("BodyPosition") == nil then

							enemyTorsoDistance = (v.Torso.Position - torso.Position).magnitude
							enemyTorso = v.Torso
							enemyHuman = v.Humanoid

							table.insert(targets, enemyTorso)


						end
					end
				end

				if #targets > 0 then
					local target = targets[math.random(#targets)]
					print("Target: "..target.Parent.Name.."I am: "..c.Name)
					human:MoveTo(target.Position, target)
					human.WalkSpeed = 20
					human.Jump = true
					bp.Position = target.Position
				end


				wait(2)



			until human == nil or human.Health < 1 or torso == nil or human.Parent.Parent == nil
			print(c.Name.." has died!")
			game:GetService("Debris"):AddItem(c, 0.1)
		end
	end)
end

function WeldFunction()
	local welds = {}
	for _,v in pairs(SB.Adornee:GetDescendants()) do
		if v:IsA("Part","WedgePart","UnionOperation")  then
			table.insert(welds, v)
			local weld = Instance.new("Weld")
			weld.Parent = workspace
			weld.Part0 = welds[math.random(#welds)]
			weld.Part1 = v
			weld.C1 = CFrame.new(math.random(-10,10),math.random(-10,10),math.random(-10,10))
		end
	end
end


function BuildFunction()
	local p = Instance.new("Part",workspace)
	p.CFrame = GhostPart.CFrame
	p:MakeJoints()
	p.Anchored = true
	p.Size = Vector3.new(SizeX,SizeY,SizeZ)
end

function LaserFunction()
	if SB.Adornee:findFirstChild("Humanoid") then
		SB.Adornee.Humanoid:TakeDamage(25)
	end
	local Laser = Instance.new("Part",workspace)
	Laser.Anchored = true
	Laser.BrickColor = BrickColor.new("Really red")
	Laser.TopSurface = "Smooth"
	Laser.BottomSurface = "Smooth"
	Laser.Size = Vector3.new(0.4,0.4,(Mouse.Hit.p - Camera.CFrame.p).magnitude)
	Laser.CFrame = CFrame.new(Camera.CFrame.p, Mouse.Hit.p):toWorldSpace(CFrame.new(0,0,-(Camera.CFrame.p- Mouse.Hit.p).magnitude/2))
	game:GetService("Debris"):AddItem(Laser,1)
	spawn(function()
		repeat
			wait()
			Laser.Transparency = Laser.Transparency + 0.05
			Laser.Size = Laser.Size - Vector3.new(0.05,0,0.05)
		until Laser.Transparency > 1
	end)
end

function ActionFunction()
	if Action == "Destroy" then
		DestroyFunction()
	elseif Action == "Kill" then
		KillFunction()
	elseif Action == "BreakJoints" then
		BreakJointsFunction()
	elseif Action == "Distort" then
		DistortFunction()
	elseif Action == "Anchor" then
		AnchorFunction()
	elseif Action == "Push" then
		PushFunction()
	elseif Action == "Freeze" then
		FreezeFunction()
	elseif Action == "Clone" then
		CloneFunction()
	elseif Action == "Build" then
		BuildFunction()
	elseif Action == "Laser" then
		LaserFunction()
	elseif Action == "Rekt" then
		rektFunction()
	elseif Action == "Weld" then
		WeldFunction()
	end
end



local mouseTarget = nil

Mouse.Move:connect(function()

	if Player.Character:findFirstChild("Eye") == nil then freshLoad() end
	if workspace:findFirstChild(Player.Name) == nil then freshLoad() end


	Camera.CFrame = CFrame.new(Camera.CFrame.p, RealCamera.CFrame.p)

	if Mouse.Target ~= nil then

		if mouseTarget == Mouse.Target then --Don't waste resources when we already have what we want
			return
		end



		if Mode == "Part" then
			mouseTarget = Mouse.Target
			SB.Adornee = Mouse.Target
		elseif Mode == "Model" then
			mouseTarget = Mouse.Target
			SB.Adornee = getMasterModel(Mouse.Target)--Mouse.Target.Parent
		end

		if Action == "Build" then
			GhostPart.Parent = Char
			if Mouse.Target ~= GhostPart then
				GhostPart.CFrame = CFrame.new(Mouse.Hit.p)
			end
		elseif Action ~= "Build" then
			GhostPart.Parent = nil
		end

	else
		SB.Adornee = nil
	end
end)

Mouse.Button1Down:connect(function()
	if Mouse.Target ~= nil then
		ActionFunction()
	end
end)

local keyS = false
local keyW = false
local keyA = false
local keyD = false

local speed = 0.7 -- fast is 5

GuiSlider2 = nil
GuiSlider1 = nil

Mouse.KeyDown:connect(function(key)
	if key == "c" then
		Mode = "Part"
	elseif key == "v" then
		Mode = "Model"
	elseif key == "z" then
		Selection = Selection + 1
		if Selection > #Actions then
			Selection = 1
		end
		Action = Actions[Selection]
	elseif key == "x" then
		Selection = Selection - 1
		if Selection < 1 then
			Selection = #Actions
		end
		Action = Actions[Selection]
	end

	if Action == "Build" and key == "x" or key == "z" and Action == "Build" then
		GuiSlider1 = Instance.new("TextButton",ScreenGui)
		GuiSlider1.Text = "<"
		GuiSlider1.Size = UDim2.new(0,25,0,25)
		GuiSlider1.Transparency = 0.3
		GuiSlider1.BackgroundColor = BrickColor.new("Black")
		GuiSlider1.TextColor = BrickColor.new("White")
		GuiSlider1.Position = UDim2.new(0.7,1,0.895,1)
		GuiSlider1.MouseButton1Down:connect(function()
			SizeX = SizeX - 1
			if SizeX < 1 then
				SizeX = 3
			end
		end)

		GuiSlider2 = Instance.new("TextButton",ScreenGui)
		GuiSlider2.Text = ">"
		GuiSlider2.Size = UDim2.new(0,25,0,25)
		GuiSlider2.Transparency = 0.3
		GuiSlider2.BackgroundColor = BrickColor.new("Black")
		GuiSlider2.TextColor = BrickColor.new("White")
		GuiSlider2.Position = UDim2.new(0.859,1,0.895,1)
		GuiSlider2.MouseButton1Down:connect(function()
			SizeX = SizeX + 1
			if SizeX > 3 then
				SizeX = 1
			end
		end)
	elseif GuiSlider1 ~= nil and GuiSlider2 ~= nil and Action ~= "Build" then
		GuiSlider1:Destroy()
		GuiSlider2:Destroy()
	end

	if string.byte(key) == 48 then
		speed = 5


	elseif key == "s" then
		keyS = true
		repeat
			wait()
			Camera.CFrame = Camera.CFrame:toWorldSpace(CFrame.new(0,0,-speed))
			EyeWeld.C0 = CFrame.new(0,0,0.7)
		until keyS == false


	elseif key =="w" then
		keyW = true
		repeat
			wait()
			Camera.CFrame = Camera.CFrame:toWorldSpace(CFrame.new(0,0,speed))
			EyeWeld.C0 = CFrame.new(0,0,0.7)
		until keyW == false


	elseif key =="a" then
		keyA = true
		repeat
			wait()
			Camera.CFrame = Camera.CFrame:toWorldSpace(CFrame.new(speed,0,0))
		until keyA == false


	elseif key =="d" then
		keyD = true
		repeat
			wait()
			Camera.CFrame = Camera.CFrame:toWorldSpace(CFrame.new(-speed,0,0))
		until keyD == false


	elseif key == "e" then
		Camera.Transparency = math.abs(Camera.Transparency - 1)
	end
	GuiM.Text = "Action: "..Action..", Mode: "..Mode
end)


function keyLiftedFunction(key)
	print(string.byte(key))

	if key == "s" then keyS = false end
	if key == "a" then keyA = false end
	if key == "d" then keyD = false end
	if key == "w" then keyW = false end
	if string.byte(key) == 48 then speed = 0.7 end
end

Mouse.KeyUp:connect(keyLiftedFunction)





wait(2)
Player.Backpack:ClearAllChildren()