Advertisement
BINO2002

Untitled

May 11th, 2019
648
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.18 KB | None | 0 0
  1. _G.CoinType = "Normal" -- your unlocked area here. use dex if u dont know the names
  2.  
  3. local plr = game.Players.LocalPlayer
  4. local char = plr.Character
  5. local plrhum = plr.Character.HumanoidRootPart
  6. local rs = game.ReplicatedStorage
  7. local CollectionService = game:GetService("CollectionService")
  8. local FireEventS = rs.Resources:FindFirstChild("RemoteEvents")
  9. local mouse = plr:GetMouse()
  10. local flags = {
  11. RUN = false,
  12. RUNNING = false
  13. }
  14.  
  15. function claimquests()
  16. local quests = plr.PlayerGui.MainMenuGui.MainFrame.DataFrame.Paginas.Rewards.MainFrame.Scroll:GetChildren()
  17. for _, quest in next, quests do
  18. if quest.ClassName == "ImageLabel" then
  19. FireEventS.ClaimReward:FireServer(quest.Name)
  20. end
  21. end
  22. end
  23.  
  24. function throwpaper()
  25. local tool = char:FindFirstChildOfClass("Tool")
  26. if not tool then
  27. char.Humanoid:EquipTool(plr.Backpack:FindFirstChildOfClass("Tool"))
  28. tool = char:FindFirstChildOfClass("Tool")
  29. end
  30. local Dir = (mouse.Hit.p - tool.Handle:FindFirstChildOfClass("Attachment").WorldPosition).Unit
  31. FireEventS.FireEvent:FireServer(Dir, tool)
  32. end
  33.  
  34. function sell()
  35. FireEventS.Teleport:FireServer("Sell")
  36. end
  37.  
  38. function isbackpackfull()
  39. local BackpackStats = plr:WaitForChild("BackpackStats")
  40. if BackpackStats.Value >= BackpackStats.MaxValue then
  41. return true
  42. end
  43. return false
  44. end
  45.  
  46. function getallcoins()
  47. flags.RUNNING = true
  48. claimquests()
  49. throwpaper()
  50. if isbackpackfull() then
  51. sell()
  52. wait(1)
  53. end
  54. flags.RUNNING = false
  55. end
  56.  
  57. function notification(title, subtitle, duration)
  58. game.StarterGui:SetCore("SendNotification", {
  59. Title = title;
  60. Text = subtitle;
  61. Duration = duration;
  62. })
  63. end
  64.  
  65. notification("Loaded", "Script by asgar#3199, Asgarr on v3rmillion", 5)
  66.  
  67. local uis = game:GetService("UserInputService")
  68. uis.InputBegan:Connect(function(input, gp)
  69. if input.KeyCode == Enum.KeyCode.Zero then
  70. flags.RUN = not flags.RUN
  71. end
  72. end)
  73.  
  74. game:GetService("RunService").RenderStepped:Connect(function()
  75. if flags.RUN and (not flags.RUNNING) then
  76. getallcoins()
  77. end
  78. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement