Advertisement
Guest User

Ok boomer

a guest
Dec 12th, 2019
948
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.74 KB | None | 0 0
  1. -- Credits are going to noname#0073 ( dragen on YT )
  2.  
  3. _G.Settings = {
  4. AutoEgg = {
  5. Enabled = false;
  6. AmountOpenedBeforeClear = 15;
  7. Tier = 1;
  8. KeepByStrengthFactor = {
  9. Enabled = false;
  10. MinStrengthToKeep = 5;
  11. };
  12. IndividualPetKeepSettings = {
  13. Enabled = false;
  14. ['1'] = {
  15. ['Cat'] = false;
  16. ['Dog'] = false;
  17. ['Bunny'] = false;
  18. ['Bear'] = false;
  19. ['Cow'] = false;
  20. ['Fox'] = true;
  21. ['Dalmatian'] = true;
  22. ['Racoon'] = true;
  23. };
  24. ['2'] = {
  25. ['Ducky'] = false;
  26. ['Turtle'] = false;
  27. ['Flamingo'] = true;
  28. ['Shark'] = true;
  29. };
  30. ['3'] = {
  31. ['Parrot'] = false;
  32. ['Monkey'] = false;
  33. ['Tiger'] = true;
  34. ['Dino'] = true;
  35.  
  36. };
  37. };
  38. };
  39. CoinFarm = {
  40. Enabled = true;
  41. FarmMultiplier = 50;
  42. MinHP = 0;
  43. MaxHP = math.huge;
  44. }
  45. };
  46. -- RE EXECUTE 42 LINES(ONLY THEM, NOT WHOLE SCRIPT) ABOVE WITH NEW PARAMETERS IF YOU WANT TO CHANGE THEM AND WONT TO REJOIN GAME
  47.  
  48.  
  49. local Structure = {
  50. Pets = {
  51. ['1'] = {
  52. ['Cat'] = 'rbxassetid://4360069887';
  53. ['Dog'] = 'rbxassetid://4360070694';
  54. ['Bunny'] = 'rbxassetid://4360069633';
  55. ['Bear'] = 'rbxassetid://4360069391';
  56. ['Cow'] = 'rbxassetid://4360070120';
  57. ['Fox'] = 'rbxassetid://4360071727';
  58. ['Dalmatian'] = 'rbxassetid://4360070349';
  59. ['Racoon'] = 'rbxassetid://4360074644';
  60. };
  61. ['2'] = {
  62. ['Ducky'] = 'rbxassetid://4360071131';
  63. ['Turtle'] = 'rbxassetid://4360075663';
  64. ['Flamingo'] = 'rbxassetid://4360071500';
  65. ['Shark'] = 'rbxassetid://4360074880';
  66. };
  67. ['3'] = {
  68. ['Parrot'] = 'rbxassetid://4360073740';
  69. ['Monkey'] = 'rbxassetid://4360072918';
  70. ['Dino'] = 'rbxassetid://4360070478';
  71. ['Tiger'] = 'rbxassetid://4360075403';
  72. };
  73. };
  74. Functions = {
  75. GetPlayerMoney = function()
  76. local Success, Money = pcall(function()
  77. local Original = game.Players.LocalPlayer.PlayerGui.Currency.Frame.Coins.Amount.Text
  78. local Ready = ''
  79. for Index = 1, #Original:split(',') do
  80. Ready = Ready .. Original:split(',')[Index]
  81. end
  82. return tonumber(Ready)
  83. end)
  84. return Money
  85. end;
  86. BuyEgg = function()
  87. workspace.__THINGS.__REMOTES['buy egg']:InvokeServer(
  88. {
  89. {
  90. tostring(_G.Settings.AutoEgg.Tier)
  91. };
  92. {
  93. false
  94. }
  95. }
  96. )
  97. end;
  98. DeletePet = function(UPI)
  99. workspace.__THINGS.__REMOTES['delete pet']:InvokeServer(
  100. {
  101. {
  102. UPI
  103. };
  104. {
  105. false
  106. }
  107. }
  108. )
  109. end;
  110. EquipPet = function(UPI)
  111. workspace.__THINGS.__REMOTES['equip pet']:InvokeServer(
  112. {
  113. {
  114. UPI
  115. };
  116. {
  117. false
  118. }
  119. }
  120. )
  121. end;
  122. UnequipPet = function(UPI)
  123. workspace.__THINGS.__REMOTES['unequip pet']:InvokeServer(
  124. {
  125. {
  126. UPI
  127. };
  128. {
  129. false
  130. }
  131. }
  132. )
  133. end;
  134. AutoPickUpLoot = function()
  135. workspace['__THINGS'].Drops.ChildAdded:Connect(function()
  136. pcall(function()
  137. for Index, Drop in pairs(workspace.__THINGS.Drops:GetChildren()) do
  138. for Try = 0, 8, 1 do
  139. workspace.__THINGS.__REMOTES['take drop']:FireServer(
  140. {
  141. {
  142. Drop.Name, 'id' .. Try
  143. };
  144. {
  145. false, false
  146. };
  147. }
  148. )
  149. end
  150. end
  151. end)
  152. end)
  153. end;
  154. AutoPickUpCoins = function()
  155. while true do
  156. while _G.Settings.CoinFarm.Enabled do
  157. for PetIndex, Pet in pairs(game.Players.LocalPlayer:WaitForChild'PlayerGui':WaitForChild'Inventory':WaitForChild'Frame':WaitForChild'Container':WaitForChild'Holder':WaitForChild'Pets':GetChildren()) do
  158. if Pet:FindFirstChild'Equipped' and Pet.Equipped.Visible then
  159. coroutine.wrap(function()
  160. while true do
  161. for CoinIndex, Coin in pairs(workspace.__THINGS.Coins:GetChildren()) do
  162. if Coin and not Coin:FindFirstChild'Already' and Coin:FindFirstChild'Settings' and Coin.Settings.Health.Value >= _G.Settings.CoinFarm.MinHP and Coin.Settings.Health.Value <= _G.Settings.CoinFarm.MaxHP then
  163. Instance.new('NumberValue', Coin).Name = 'Already'
  164. coroutine.wrap(function()
  165. workspace.__THINGS.__REMOTES['join coin']:InvokeServer(
  166. {
  167. {
  168. Coin.Name, Pet.Name
  169. };
  170. {
  171. false, false
  172. };
  173. }
  174. );
  175. end)()
  176. coroutine.wrap(function()
  177. workspace.__THINGS.__REMOTES['change pet target']:FireServer(
  178. {
  179. {
  180. Pet.Name, 'Coin', Coin.Name
  181. };
  182. {
  183. false, false, false
  184. };
  185. }
  186. );
  187. end)()
  188. for i = 1, _G.Settings.CoinFarm.FarmMultiplier do
  189. coroutine.wrap(function()
  190. workspace.__THINGS.__REMOTES['farm coin']:FireServer(
  191. {
  192. {
  193. Coin.Name, Pet.Name
  194. };
  195. {
  196. false, false
  197. };
  198. }
  199. );
  200. end)()
  201. end
  202. repeat
  203. wait()
  204. until workspace.__THINGS.Coins:FindFirstChild(Coin.Name) == nil or game.Players.LocalPlayer.Character == nil or Coin == nil
  205. end
  206. end
  207. end
  208. end)()
  209. end
  210. end
  211. repeat
  212. wait()
  213. until workspace:FindFirstChild'COCK'
  214. end
  215. repeat
  216. wait()
  217. until _G.Settings.CoinFarm.Enabled
  218. end
  219. end;
  220. };
  221. };
  222.  
  223. game:GetService"StarterGui":SetCore("SendNotification", {
  224. Title = "Pet Hacker v1.0",
  225. Text = "Writed by noname#0073"
  226. })
  227. coroutine.wrap(Structure.Functions.AutoPickUpCoins)()
  228. coroutine.wrap(Structure.Functions.AutoPickUpLoot)()
  229. coroutine.wrap(function()
  230. coroutine.wrap(function()
  231. game.Players.LocalPlayer:WaitForChild'PlayerScripts':WaitForChild'Scripts':WaitForChild'Game':WaitForChild'Eggs':Destroy()
  232. end)()
  233. while true do
  234. while _G.Settings.AutoEgg.Enabled do
  235. for Index = 1, _G.Settings.AutoEgg.AmountOpenedBeforeClear, 1 do
  236. coroutine.wrap(function()
  237. Structure.Functions.BuyEgg()
  238. end)()
  239. end
  240. wait(1)
  241. local ActivePets = {}
  242. for PetIndex, Pet in pairs(game.Players.LocalPlayer:WaitForChild'PlayerGui':WaitForChild'Inventory':WaitForChild'Frame':WaitForChild'Container':WaitForChild'Holder':WaitForChild'Pets':GetChildren()) do
  243. if Pet:FindFirstChild'Equipped' and Pet.Equipped.Visible then
  244. table.insert(ActivePets, { UPI = Pet.Name, Strength = tonumber(Pet.Strength.Text) })
  245. end
  246. end
  247. for PetIndex, Pet in pairs(game.Players.LocalPlayer:WaitForChild'PlayerGui':WaitForChild'Inventory':WaitForChild'Frame':WaitForChild'Container':WaitForChild'Holder':WaitForChild'Pets':GetChildren()) do
  248. coroutine.wrap(function()
  249. if Pet:FindFirstChild'Equipped' and not Pet.Equipped.Visible then
  250. for PetNum, PetInfo in pairs(ActivePets) do
  251. if Pet:FindFirstChild'Strength' and tonumber(Pet.Strength.Text) > PetInfo.Strength then
  252. Structure.Functions.UnequipPet(PetInfo.UPI)
  253. Structure.Functions.EquipPet(Pet.Name)
  254. PetInfo.UPI = Pet.Name
  255. PetInfo.Strength = tonumber(Pet.Strength.Text)
  256. end
  257. end
  258. end
  259. end)()
  260. end
  261. for Index, Pet in pairs(game.Players.LocalPlayer:WaitForChild'PlayerGui':WaitForChild'Inventory':WaitForChild'Frame':WaitForChild'Container':WaitForChild'Holder':WaitForChild'Pets':GetChildren()) do
  262. coroutine.wrap(function()
  263. if Pet:IsA'ImageButton' then
  264. if Pet:FindFirstChild'Equipped' and not Pet.Equipped.Visible then
  265. if _G.Settings.AutoEgg.KeepByStrengthFactor.Enabled then
  266. if _G.Settings.AutoEgg.IndividualPetKeepSettings.Enabled then
  267. for PetName, Thumb in pairs(Structure.Pets[tostring(_G.Settings.AutoEgg.Tier)]) do
  268. if _G.Settings.AutoEgg.IndividualPetKeepSettings[tostring(_G.Settings.AutoEgg.Tier)][PetName] == false and Structure.Pets[tostring(_G.Settings.AutoEgg.Tier)][PetName] and Pet.Thumbnail.Image == Structure.Pets[tostring(_G.Settings.AutoEgg.Tier)][PetName] then
  269. if not (tonumber(Pet.Strength.Text) >= _G.Settings.AutoEgg.KeepByStrengthFactor.MinStrengthToKeep) then
  270. Structure.Functions.DeletePet(Pet.Name)
  271. end
  272. end
  273. end
  274. else
  275. if not (tonumber(Pet.Strength.Text) >= _G.Settings.AutoEgg.KeepByStrengthFactor.MinStrengthToKeep) then
  276. Structure.Functions.DeletePet(Pet.Name)
  277. end
  278. end
  279. elseif _G.Settings.AutoEgg.IndividualPetKeepSettings.Enabled then
  280. for PetName, Thumb in pairs(Structure.Pets[tostring(_G.Settings.AutoEgg.Tier)]) do
  281. if _G.Settings.AutoEgg.IndividualPetKeepSettings[tostring(_G.Settings.AutoEgg.Tier)][PetName] == false and Structure.Pets[tostring(_G.Settings.AutoEgg.Tier)][PetName] and Pet.Thumbnail.Image == Structure.Pets[tostring(_G.Settings.AutoEgg.Tier)][PetName] then
  282. Structure.Functions.DeletePet(Pet.Name)
  283. end
  284. end
  285. end
  286. end
  287. end
  288. end)()
  289. end
  290. wait()
  291. end
  292. repeat
  293. wait()
  294. until _G.Settings.AutoEgg.Enabled
  295. end
  296. end)()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement