Advertisement
Guest User

Untitled

a guest
Feb 29th, 2020
136
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.58 KB | None | 0 0
  1. local LocalPlayer, Characters, ESPList, LocalCharacter = game:GetService('Players').LocalPlayer, workspace.Characters, {}
  2.  
  3. local Leaderboard = LocalPlayer.PlayerGui.LeaderboardGui.Leaderboard
  4. local function GetTeam(Player)
  5. local Name = Player.Name
  6. for i,v in next, Leaderboard.Teams:GetDescendants() do
  7. if v.Name == 'NameLabel' and v.Text == Name then
  8. return v.Parent.Parent.Parent
  9. end
  10. end
  11. end
  12.  
  13. local Camera, Div = workspace.CurrentCamera, Vector2.new(2,2)
  14. local function GetNearestToCenter()
  15. local Center = Camera.ViewportSize / Div
  16. local Character, CharacterDistance, ScreenPosition = nil, 0, nil
  17. -- Created by Peyton @ V3rmillion
  18. for i,v in next, Characters:GetChildren() do
  19. if v.Name ~= LocalPlayer.Name and GetTeam(v) ~= GetTeam(LocalPlayer) and v:FindFirstChild('Health') and v.Health.Value > 0 and v:FindFirstChild('Hitbox') and v.Hitbox:FindFirstChild('Head') then
  20. local Position, OnScreen = Camera:WorldToViewportPoint(v.Hitbox.Head.Position)
  21. if OnScreen then
  22. local Vec2 = Vector2.new(Position.X, Position.Y)
  23. local Distance = (Vec2 - Center).magnitude
  24. if not Character or CharacterDistance > Distance then
  25. Character, CharacterDistance, ScreenPosition = v, Distance, Vec2
  26. end
  27. end
  28. end
  29. end
  30. return ScreenPosition and Center and (ScreenPosition - Center) or nil
  31. end
  32.  
  33. local function NewCircle()
  34. local Circle = Drawing.new('Circle')
  35. Circle.Color = Color3.new(255, 0, 0)
  36. Circle.Filled = true
  37. Circle.Transparency = 0.5
  38. Circle.Visible = true
  39. return Circle
  40. end
  41. -- Created by Peyton @ V3rmillion
  42. local function Add(Character)
  43. if Character == workspace.Characters:FindFirstChild(LocalPlayer.Name) then
  44. LocalCharacter = Character
  45. elseif GetTeam(Character) ~= GetTeam(LocalPlayer) then
  46. ESPList[Character] = NewCircle()
  47. end
  48. end
  49.  
  50. local function Remove(Character)
  51. if ESPList[Character] then
  52. ESPList[Character]:Remove()
  53. ESPList[Character] = nil
  54. end
  55. end
  56.  
  57. local UserInputService, AimEnable = game:GetService('UserInputService'), false
  58. local function Update()
  59. for Character,v in next, ESPList do
  60. if Character and Character.Parent ~= Characters then
  61. Remove(Characters)
  62. elseif Character:FindFirstChild('Hitbox') and Character.Hitbox:FindFirstChild('Head') then
  63. local Position, OnScreen = workspace.CurrentCamera:WorldToViewportPoint(Character.Hitbox.Head.Position)
  64. v.Position = Vector2.new(Position.X, Position.Y)
  65. v.Radius = 700 / Position.Z
  66. v.Visible = OnScreen
  67. end
  68. end
  69.  
  70. if AimEnable and UserInputService.MouseBehavior ~= Enum.MouseBehavior.Default and Characters:FindFirstChild(LocalPlayer.Name) and Characters[LocalPlayer.Name].Health.Value ~= 0 then
  71. local ToMove = GetNearestToCenter()
  72. if ToMove then mousemoverel(ToMove.X, ToMove.Y) end
  73. else
  74. AimEnable = false
  75. end
  76. end
  77. -- Created by Peyton @ V3rmillion
  78. for i,v in next, Characters:GetChildren() do Add(v) end
  79. Characters.ChildAdded:Connect(Add)
  80. Characters.ChildRemoved:Connect(Remove)
  81. game:GetService('RunService').RenderStepped:Connect(Update)
  82. UserInputService.InputBegan:Connect(function(input, gameProcessed) if input.UserInputType == Enum.UserInputType.MouseButton2 then AimEnable = true end end)
  83. UserInputService.InputEnded:Connect(function(input, gameProcessed) if input.UserInputType == Enum.UserInputType.MouseButton2 then AimEnable = false end end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement