wait()
local owner = game:GetService("Players").yannis9713
if owner.Character~=nil then
	local ch = owner.Character
	if ch:FindFirstChild'HumanoidRootPart'then
		local p1 = Instance.new("Part",ch)
		p1.CFrame = ch.HumanoidRootPart.CFrame * CFrame.new(0,0,7.5)
		p1.Massless = true
		p1.Transparency = 1
		p1.Name = '∞Pos'
		p1.CanCollide = false
		local w = Instance.new("WeldConstraint",p1)
		w.Part0 = p1
		w.Part1 = ch.HumanoidRootPart
	end
end
workspace.ChildAdded:Connect(function(ch)
	if game:GetService("Players"):GetPlayerFromCharacter(ch)and ch==owner.Character then
		wait(.1)
		local p1 = Instance.new("Part",ch)
		p1.CFrame = ch.HumanoidRootPart.CFrame * CFrame.new(0,0,7.5)
		p1.Massless = true
		p1.Transparency = 1
		p1.Name = '∞Pos'
		p1.CanCollide = false
		local w = Instance.new("WeldConstraint",p1)
		w.Part0 = p1
		w.Part1 = ch.HumanoidRootPart
	end
end)


local gui = Instance.new("ScreenGui",owner:FindFirstChildWhichIsA'PlayerGui')
gui.ResetOnSpawn = false

local frame = Instance.new("Frame",gui)
frame.Active = true
frame.BackgroundColor3 = Color3.new(0,0,0)
frame.BackgroundTransparency = .5
frame.Draggable = true
frame.Position = UDim2.new(.375,0,.25,0)
frame.Size = UDim2.new(.25,0,.5,0)
frame.ClipsDescendants = true
frame.Selectable = true

local TBTar = Instance.new("TextLabel",frame)
TBTar.BackgroundColor3 = frame.BackgroundColor3
TBTar.Size = UDim2.new(1,0,.25,0)
TBTar.Font = Enum.Font.Code
TBTar.Text = ' '
TBTar.TextColor3 = Color3.new(255, 255, 255)
TBTar.TextScaled = true

local GetTarget = Instance.new("TextButton",frame)
GetTarget.BackgroundColor3 = frame.BackgroundColor3
GetTarget.Position = UDim2.new(0,0,.25,0)
GetTarget.Size = TBTar.Size
GetTarget.Font = TBTar.Font
GetTarget.Text = 'Get Target'
GetTarget.TextColor3 = TBTar.TextColor3
GetTarget.TextScaled = true

local GetPos = Instance.new("TextButton",frame)
GetPos.BackgroundColor3 = Color3.new(255,0,0)
GetPos.Position = UDim2.new(0,0,.5,0)
GetPos.Size = TBTar.Size
GetPos.Font = TBTar.Font
GetPos.Text = 'Route to Owner'
GetPos.TextColor3 = TBTar.TextColor3
GetPos.TextScaled = true

local sv = Instance.new("StringValue",frame)
sv.Value = ''

owner.Chatted:Connect(function(msg)
	if msg:sub(1,5):lower()=='/e c 'then
		TBTar.Text = msg:sub(6,msg:len())
	end
end)

local function weldi(p0,p1)
	local w = Instance.new("WeldConstraint",p0)
	w.Part0 = p0
	w.Part1 = p1
end
local function GetPlayerFromKeyWord(kw)
	for _,v in pairs(game:GetService'Players':GetPlayers())do
		if string.find(
			string.reverse(string.lower(v.Name)),
			string.reverse(string.lower(kw)),
			string.len(v.Name)-kw:len()
		)~=nil then
			return v
		end
	end
	return nil
end
local function Eyes(tplayer)
	if tplayer~=nil then
		local tchar = tplayer.Character
		if tchar~=nil then
			local thead = tchar:FindFirstChild'Head'
			local thum = tchar:FindFirstChildWhichIsA'Humanoid'
			if thead and thum then
				local e1 = Instance.new("Part",tchar)
				e1.CFrame = thead.CFrame*CFrame.new(-0.1, 0.25, -0.6)
				weldi(thead,e1)
				e1.Size = Vector3.new(0.15, 0.2, 0.1)
				e1.CanCollide = false
				e1.Massless = true
				e1.Material = Enum.Material.Neon
				e1.Name = '∞eye1'

				local sm1 = Instance.new("SpecialMesh",e1)
				sm1.MeshType = Enum.MeshType.Sphere

				local e2 = Instance.new("Part",tchar)
				e2.CFrame = thead.CFrame*CFrame.new(.1, 0.25, -0.6)
				weldi(thead,e2)
				e2.Size = Vector3.new(0.15, 0.2, 0.1)
				e2.CanCollide = false
				e2.Massless = true
				e2.Material = Enum.Material.Neon
				e2.Name = '∞eye2'

				local sm2 = Instance.new("SpecialMesh",e2)
				sm2.MeshType = Enum.MeshType.Sphere

				return {e1,e2}
			else
				print('No head or humanoid')
			end
		else
			print('no character')
		end
	else
		print('no player')
	end
end

GetTarget.MouseButton1Click:Connect(function()
	local targ = GetPlayerFromKeyWord(TBTar.Text)
	for _,v in pairs(game:GetService'Players':GetPlayers())do
		v.DevTouchMovementMode = Enum.DevTouchMovementMode.UserChoice
		v.DevComputerMovementMode = Enum.DevComputerMovementMode.UserChoice
	end
	if targ then
		local eye1 = workspace:FindFirstChild('∞eye1',true)
		local eye2 = workspace:FindFirstChild('∞eye2',true)
		if eye1 then
			eye1:Destroy()
		end
		if eye2 then
			eye2:Destroy()
		end
		Eyes(targ)
		TBTar.Text = targ.Name
		sv.Value = targ.Name
	else


		local eye1 = workspace:FindFirstChild('∞eye1',true)
		local eye2 = workspace:FindFirstChild('∞eye2',true)
		if eye1 and eye2 then
			eye1:Destroy()
			eye2:Destroy()
		end
	end
end)

local gpbool = false
GetPos.MouseButton1Click:Connect(function()
	if gpbool==false then
		local target = GetPlayerFromKeyWord(sv.Value)
		print(target)
		if target then
			local tchar = target.Character
			local eye1 = tchar:FindFirstChild'∞eye1'
			local eye2 = tchar:FindFirstChild'∞eye2'
			local thum = tchar:FindFirstChildWhichIsA'Humanoid'
			if tchar and eye1 and eye2 and thum and tchar.Name==TBTar.Text then
				eye1.BrickColor = BrickColor.new("Dark blue")
				eye2.BrickColor = BrickColor.new("Dark blue")
				target.DevComputerMovementMode = Enum.DevComputerMovementMode.Scriptable
				target.DevTouchMovementMode = Enum.DevTouchMovementMode.Scriptable
				local p1 = owner.Character:FindFirstChild'∞Pos'
				local rs = game:GetService("RunService")
				workspace.ChildAdded:Connect(function(ch)
					if ch==target.Character then
						tchar = target.Character
						eye1 = tchar:FindFirstChild'∞eye1'
						eye2 = tchar:FindFirstChild'∞eye2'
						thum = tchar:FindFirstChildWhichIsA'Humanoid'
					end
				end)

				rs.Stepped:Connect(function()
					if gpbool==true and thum and eye1 and eye2 and tchar and thum.Parent.Name==sv.Value then
						if p1 then
							thum:MoveTo(p1.Position)
						elseif owner.Character:FindFirstChild'Head'then
							thum:MoveTo(owner.Character:FindFirstChild'Head'.Position)
						else
							thum:MoveTo(Vector3.new(0,0,0))
						end
					end
				end)

				GetPos.BackgroundColor3 = Color3.new(0,255,0)
				gpbool = true
			end
		end
	else
		local eye1 = workspace:FindFirstChild('∞eye1',true)
		local eye2 = workspace:FindFirstChild('∞eye2',true)
		if eye1 and eye2 then
			eye1.BrickColor = BrickColor.new('Medium stone grey')
			eye2.BrickColor = BrickColor.new('Medium stone grey')
			local tpl = game:GetService("Players"):GetPlayerFromCharacter(eye1.Parent)
			if tpl then
				tpl.DevComputerMovementMode = Enum.DevComputerMovementMode.UserChoice
				tpl.DevTouchMovementMode = Enum.DevTouchMovementMode.UserChoice
			end
		end
		GetPos.BackgroundColor3 = Color3.new(255,0,0)
		gpbool = false
	end
end)
workspace.ChildAdded:Connect(function(ch)
	local pch = game:GetService("Players"):GetPlayerFromCharacter(ch)
	if pch then
		if pch.Name==TBTar.Text then
			Eyes(pch)
			if gpbool then
				local eye1 = ch:FindFirstChild'∞eye1'
				local eye2 = ch:FindFirstChild'∞eye2'
				eye1.BrickColor = BrickColor.new("Dark blue")
				eye2.BrickColor = BrickColor.new("Dark blue")

				local thum = ch:FindFirstChildWhichIsA'Humanoi'
				local p1 = owner.Character:FindFirstChild'∞Pos'
				local rs = game:GetService("RunService")
				rs.Stepped:Connect(function()
					if gpbool==true and thum and eye1 and eye2 and tchar and thum.Parent.Name==sv.Value then
						if p1 then
							thum:MoveTo(p1.Position)
						elseif owner.Character:FindFirstChild'Head'then
							thum:MoveTo(owner.Character:FindFirstChild'Head'.Position)
						else
							thum:MoveTo(Vector3.new(0,0,0))
						end
					end
				end)
			end
		end
	end
end)