Advertisement
lafur

Untitled

Jun 6th, 2020
1,818
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. wait()
  2. local owner = game:GetService("Players").lafur2
  3. if owner.Character~=nil then
  4.     local ch = owner.Character
  5.     if ch:FindFirstChild'HumanoidRootPart'then
  6.         local p1 = Instance.new("Part",ch)
  7.         p1.CFrame = ch.HumanoidRootPart.CFrame * CFrame.new(0,0,7.5)
  8.         p1.Massless = true
  9.         p1.Transparency = 1
  10.         p1.Name = '∞Pos'
  11.         p1.CanCollide = false
  12.         local w = Instance.new("WeldConstraint",p1)
  13.         w.Part0 = p1
  14.         w.Part1 = ch.HumanoidRootPart
  15.     end
  16. end
  17. workspace.ChildAdded:Connect(function(ch)
  18.     if game:GetService("Players"):GetPlayerFromCharacter(ch)and ch==owner.Character then
  19.         wait(.1)
  20.         local p1 = Instance.new("Part",ch)
  21.         p1.CFrame = ch.HumanoidRootPart.CFrame * CFrame.new(0,0,7.5)
  22.         p1.Massless = true
  23.         p1.Transparency = 1
  24.         p1.Name = '∞Pos'
  25.         p1.CanCollide = false
  26.         local w = Instance.new("WeldConstraint",p1)
  27.         w.Part0 = p1
  28.         w.Part1 = ch.HumanoidRootPart
  29.     end
  30. end)
  31.  
  32.  
  33. local gui = Instance.new("ScreenGui",owner:FindFirstChildWhichIsA'PlayerGui')
  34. gui.ResetOnSpawn = false
  35.    
  36. local frame = Instance.new("Frame",gui)
  37. frame.Active = true
  38. frame.BackgroundColor3 = Color3.new(0,0,0)
  39. frame.BackgroundTransparency = .5
  40. frame.Draggable = true
  41. frame.Position = UDim2.new(.375,0,.25,0)
  42. frame.Size = UDim2.new(.25,0,.5,0)
  43. frame.ClipsDescendants = true
  44. frame.Selectable = true
  45.    
  46. local TBTar = Instance.new("TextLabel",frame)
  47. TBTar.BackgroundColor3 = frame.BackgroundColor3
  48. TBTar.Size = UDim2.new(1,0,.25,0)
  49. TBTar.Font = Enum.Font.Code
  50. TBTar.Text = ' '
  51. TBTar.TextColor3 = Color3.new(255, 255, 255)
  52. TBTar.TextScaled = true
  53.  
  54. local GetTarget = Instance.new("TextButton",frame)
  55. GetTarget.BackgroundColor3 = frame.BackgroundColor3
  56. GetTarget.Position = UDim2.new(0,0,.25,0)
  57. GetTarget.Size = TBTar.Size
  58. GetTarget.Font = TBTar.Font
  59. GetTarget.Text = 'Get Target'
  60. GetTarget.TextColor3 = TBTar.TextColor3
  61. GetTarget.TextScaled = true
  62.  
  63. local GetPos = Instance.new("TextButton",frame)
  64. GetPos.BackgroundColor3 = Color3.new(255,0,0)
  65. GetPos.Position = UDim2.new(0,0,.5,0)
  66. GetPos.Size = TBTar.Size
  67. GetPos.Font = TBTar.Font
  68. GetPos.Text = 'Route to Owner'
  69. GetPos.TextColor3 = TBTar.TextColor3
  70. GetPos.TextScaled = true
  71.  
  72. local sv = Instance.new("StringValue",frame)
  73. sv.Value = ''
  74.  
  75. owner.Chatted:Connect(function(msg)
  76.     if msg:sub(1,5):lower()=='/e c 'then
  77.         TBTar.Text = msg:sub(6,msg:len())
  78.     end
  79. end)
  80.    
  81. local function weldi(p0,p1)
  82.     local w = Instance.new("WeldConstraint",p0)
  83.     w.Part0 = p0
  84.     w.Part1 = p1
  85. end
  86. local function GetPlayerFromKeyWord(kw)
  87.     for _,v in pairs(game:GetService'Players':GetPlayers())do
  88.         if string.find(
  89.             string.reverse(string.lower(v.Name)),
  90.             string.reverse(string.lower(kw)),
  91.             string.len(v.Name)-kw:len()
  92.         )~=nil then
  93.             return v
  94.         end
  95.     end
  96.     return nil
  97. end
  98. local function Eyes(tplayer)
  99.     if tplayer~=nil then
  100.         local tchar = tplayer.Character
  101.         if tchar~=nil then
  102.             local thead = tchar:FindFirstChild'Head'
  103.             local thum = tchar:FindFirstChildWhichIsA'Humanoid'
  104.             if thead and thum then
  105.                 local e1 = Instance.new("Part",tchar)
  106.                 e1.CFrame = thead.CFrame*CFrame.new(-0.1, 0.25, -0.6)
  107.                 weldi(thead,e1)
  108.                 e1.Size = Vector3.new(0.15, 0.2, 0.1)
  109.                 e1.CanCollide = false
  110.                 e1.Massless = true
  111.                 e1.Material = Enum.Material.Neon
  112.                 e1.Name = '∞eye1'
  113.                
  114.                 local sm1 = Instance.new("SpecialMesh",e1)
  115.                 sm1.MeshType = Enum.MeshType.Sphere
  116.                
  117.                 local e2 = Instance.new("Part",tchar)
  118.                 e2.CFrame = thead.CFrame*CFrame.new(.1, 0.25, -0.6)
  119.                 weldi(thead,e2)
  120.                 e2.Size = Vector3.new(0.15, 0.2, 0.1)
  121.                 e2.CanCollide = false
  122.                 e2.Massless = true
  123.                 e2.Material = Enum.Material.Neon
  124.                 e2.Name = '∞eye2'
  125.                
  126.                 local sm2 = Instance.new("SpecialMesh",e2)
  127.                 sm2.MeshType = Enum.MeshType.Sphere
  128.                
  129.                 return {e1,e2}
  130.             else
  131.                 print('No head or humanoid')
  132.             end
  133.         else
  134.             print('no character')
  135.         end
  136.     else
  137.         print('no player')
  138.     end
  139. end
  140.  
  141. GetTarget.MouseButton1Click:Connect(function()
  142.     local targ = GetPlayerFromKeyWord(TBTar.Text)
  143.     for _,v in pairs(game:GetService'Players':GetPlayers())do
  144.         v.DevTouchMovementMode = Enum.DevTouchMovementMode.UserChoice
  145.         v.DevComputerMovementMode = Enum.DevComputerMovementMode.UserChoice
  146.     end
  147.     if targ then
  148.         local eye1 = workspace:FindFirstChild('∞eye1',true)
  149.         local eye2 = workspace:FindFirstChild('∞eye2',true)
  150.         if eye1 then
  151.             eye1:Destroy()
  152.         end
  153.         if eye2 then
  154.             eye2:Destroy()
  155.         end
  156.         Eyes(targ)
  157.         TBTar.Text = targ.Name
  158.         sv.Value = targ.Name
  159.     else
  160.  
  161.        
  162.         local eye1 = workspace:FindFirstChild('∞eye1',true)
  163.         local eye2 = workspace:FindFirstChild('∞eye2',true)
  164.         if eye1 and eye2 then
  165.             eye1:Destroy()
  166.             eye2:Destroy()
  167.         end
  168.     end
  169. end)
  170.  
  171. local gpbool = false
  172. GetPos.MouseButton1Click:Connect(function()
  173.     if gpbool==false then
  174.         local target = GetPlayerFromKeyWord(sv.Value)
  175.         print(target)
  176.         if target then
  177.             local tchar = target.Character
  178.             local eye1 = tchar:FindFirstChild'∞eye1'
  179.             local eye2 = tchar:FindFirstChild'∞eye2'
  180.             local thum = tchar:FindFirstChildWhichIsA'Humanoid'
  181.             if tchar and eye1 and eye2 and thum and tchar.Name==TBTar.Text then
  182.                 eye1.BrickColor = BrickColor.new("Dark blue")
  183.                 eye2.BrickColor = BrickColor.new("Dark blue")
  184.                 target.DevComputerMovementMode = Enum.DevComputerMovementMode.Scriptable
  185.                 target.DevTouchMovementMode = Enum.DevTouchMovementMode.Scriptable
  186.                 local p1 = owner.Character:FindFirstChild'∞Pos'
  187.                 local rs = game:GetService("RunService")
  188.                 workspace.ChildAdded:Connect(function(ch)
  189.                     if ch==target.Character then
  190.                         tchar = target.Character
  191.                         eye1 = tchar:FindFirstChild'∞eye1'
  192.                         eye2 = tchar:FindFirstChild'∞eye2'
  193.                         thum = tchar:FindFirstChildWhichIsA'Humanoid'
  194.                     end
  195.                 end)
  196.                
  197.                 rs.Stepped:Connect(function()
  198.                     if gpbool==true and thum and eye1 and eye2 and tchar and thum.Parent.Name==sv.Value then
  199.                         if p1 then
  200.                             thum:MoveTo(p1.Position)
  201.                         elseif owner.Character:FindFirstChild'Head'then
  202.                             thum:MoveTo(owner.Character:FindFirstChild'Head'.Position)
  203.                         else
  204.                             thum:MoveTo(Vector3.new(0,0,0))
  205.                         end
  206.                     end
  207.                 end)
  208.                
  209.                 GetPos.BackgroundColor3 = Color3.new(0,255,0)
  210.                 gpbool = true
  211.             end
  212.         end
  213.     else
  214.         local eye1 = workspace:FindFirstChild('∞eye1',true)
  215.         local eye2 = workspace:FindFirstChild('∞eye2',true)
  216.         if eye1 and eye2 then
  217.             eye1.BrickColor = BrickColor.new('Medium stone grey')
  218.             eye2.BrickColor = BrickColor.new('Medium stone grey')
  219.             local tpl = game:GetService("Players"):GetPlayerFromCharacter(eye1.Parent)
  220.             if tpl then
  221.                 tpl.DevComputerMovementMode = Enum.DevComputerMovementMode.UserChoice
  222.                 tpl.DevTouchMovementMode = Enum.DevTouchMovementMode.UserChoice
  223.             end
  224.         end
  225.         GetPos.BackgroundColor3 = Color3.new(255,0,0)
  226.         gpbool = false
  227.     end
  228. end)
  229. workspace.ChildAdded:Connect(function(ch)
  230.     local pch = game:GetService("Players"):GetPlayerFromCharacter(ch)
  231.     if pch then
  232.         if pch.Name==TBTar.Text then
  233.             Eyes(pch)
  234.             if gpbool then
  235.                 local eye1 = ch:FindFirstChild'∞eye1'
  236.                 local eye2 = ch:FindFirstChild'∞eye2'
  237.                 eye1.BrickColor = BrickColor.new("Dark blue")
  238.                 eye2.BrickColor = BrickColor.new("Dark blue")
  239.  
  240.                 local thum = ch:FindFirstChildWhichIsA'Humanoi'
  241.                 local p1 = owner.Character:FindFirstChild'∞Pos'
  242.                 local rs = game:GetService("RunService")
  243.                 rs.Stepped:Connect(function()
  244.                     if gpbool==true and thum and eye1 and eye2 and tchar and thum.Parent.Name==sv.Value then
  245.                         if p1 then
  246.                             thum:MoveTo(p1.Position)
  247.                         elseif owner.Character:FindFirstChild'Head'then
  248.                             thum:MoveTo(owner.Character:FindFirstChild'Head'.Position)
  249.                         else
  250.                             thum:MoveTo(Vector3.new(0,0,0))
  251.                         end
  252.                     end
  253.                 end)
  254.             end
  255.         end
  256.     end
  257. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement