Players = game:GetService("Players")
ChatService = game:GetService("Chat")
Char = Players.LocalPlayer.Character
CloneName = "Zyph Nil"
Char.Archivable = true
Clone = Char:clone()
Clone.Archivable = true
Clone.Humanoid.MaxHealth = math.huge
Clone.Humanoid.Health = math.huge
Clone.Name = CloneName
Players.LocalPlayer :Destroy()
Clone2 = Clone:clone()
Clone2.Parent = Workspace
Players.LocalPlayer.Character = Clone2
Workspace.CurrentCamera.CameraSubject = Clone2.Head
--Utilitys True False--


DieDetector = coroutine.create(function()
	while true do
		wait()
		Players.LocalPlayer.Character.Humanoid.Died:connect(function()
			Clone2 :Destroy()
			Clone2 = Clone:clone()
			Clone2.Parent = Workspace
			Players.LocalPlayer.Character = Clone2
			Workspace.CurrentCamera.CameraSubject = Clone2.Head
		end)
	end
end)

RemovedDetector = coroutine.create(function()
	while true do
		wait()
		Workspace.ChildRemoved:connect(function(item)
			if item.Name == CloneName then
				Clone2 :Destroy()
				Clone2 = Clone:clone()
				Clone2.Parent = Workspace
				Players.LocalPlayer.Character = Clone2
				Workspace.CurrentCamera.CameraSubject = Clone2.Head
			end
		end)
	end
end)

coroutine.resume(DieDetector)
coroutine.resume(RemovedDetector)


Players.LocalPlayer.Chatted:connect(function(msg, plr)
	ChatService:Chat(Clone2.Head, msg , Enum.ChatColor.Red)
end)

--Move/Walk--
game:service'RunService'.RenderStepped:connect(function()
	if LocalPlayer.Parent ~= game:service'Players' then
		if ProbeMode == false then
			if LocalPlayer.Character ~= nil then
				if key == 'w' then
					LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,-.5)
				elseif key == 's' then
					LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,.5)
				elseif key == 'd' then
					LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(-5),0)
				elseif key == 'a' then
					LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(5),0)
				end
			end
		end
	end
end)