HHLExploits

hiagain

Nov 3rd, 2019
120
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.21 KB | None | 0 0
  1. local library = loadstring(game:HttpGet("https://pastebin.com/raw/eWKgbdix", true))()
  2. library.options.underlinecolor = "rainbow"
  3.  
  4. local main = library:CreateWindow('Farms')
  5.  
  6. local RunService = game:GetService("RunService")
  7. local Players = game:GetService("Players")
  8. local Player = Players.LocalPlayer
  9.  
  10. --- Gets child from character
  11. -- @treturn Part or nil
  12. local function GetFromCharacter(Name)
  13. local Character = Player.Character or Player.CharacterAdded:Wait()
  14. local Part = Character:FindFirstChild(Name) or Character:WaitForChild(Name, 10)
  15.  
  16. return Part
  17. end
  18.  
  19. --- Touch 👀
  20. local function Touch(Parent, ChildName)
  21. local TouchPart = Parent:FindFirstChild(ChildName)
  22.  
  23. if TouchPart then
  24. local HumanoidRootPart = GetFromCharacter("HumanoidRootPart")
  25. if not HumanoidRootPart then return end
  26. if firetouchinterest then
  27. firetouchinterest(HumanoidRootPart, TouchPart, 0)
  28. firetouchinterest(HumanoidRootPart, TouchPart, 1)
  29. else
  30. TouchPart.CFrame = HumanoidRootPart.CFrame
  31. end
  32. end
  33. end
  34.  
  35. --- It'll get something
  36. local function CollectOpStuff()
  37. local Parts = workspace.Hoops:GetChildren()
  38.  
  39. for _, v in ipairs(Parts) do
  40. if not v:FindFirstChild("Cooldown") then
  41. Touch(v, "touchPart")
  42. end
  43. end
  44. end
  45.  
  46. --- Toggleeee pp
  47. local function ToggleGUI(To)
  48. local Guis = {Player.PlayerGui.statEffectsGui, Player.PlayerGui.hoopGui}
  49.  
  50. for _, v in ipairs(Guis) do
  51. if v.Enabled ~= To then
  52. v.Enabled = not v.Enabled
  53. end
  54. end
  55. end
  56.  
  57. ToggleGUI(false)
  58.  
  59. main:Toggle("Auto Chest", {flag = "AutoChest"}, function(toggle)
  60. if _G.Swing then _G.Swing:Disconnect() end
  61. local Chests = {"goldenChest","enchantedChest","magmaChest","mythicalChest","legendsChest"}
  62.  
  63. if toggle then
  64. _G.Swing = RunService.Heartbeat:Connect(function()
  65. for _, v in ipairs(Chests) do
  66. local Chest = workspace:FindFirstChild(v)
  67.  
  68. if Chest then
  69. Touch(Chest, "circleInner")
  70. end
  71. end
  72. end)
  73. end
  74. end)
  75.  
  76. main:Toggle("Op Chi Farm", {flag = "OpFarm"}, function(toggle)
  77. if _G.CollectorOP then _G.CollectorOP:Disconnect() end
  78.  
  79. if toggle then
  80. _G.CollectorOP = RunService.Heartbeat:Connect(CollectOpStuff)
  81. end
  82. end)
Add Comment
Please, Sign In to add comment