Holiwarm

Vacuum Simulator (Autofarm,inf. rebith)

Sep 27th, 2019
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 27.28 KB | None | 0 0
  1. --[[
  2.     Made by Holiwarm
  3.     <3
  4. ]]
  5. game:GetService("Players").LocalPlayer.PlayerGui.Notifications:Destroy()
  6.  
  7. local VacuumSimulatorGUI = Instance.new("ScreenGui")
  8. local NormalGui = Instance.new("Frame")
  9. local VacuumSimulatorGui = Instance.new("TextLabel")
  10. local AutoFarmButton = Instance.new("TextButton")
  11. local AutoUpgradeVacuumButton = Instance.new("TextButton")
  12. local AutoUpgradeBagButton = Instance.new("TextButton")
  13. local AutoRebirthButton = Instance.new("TextButton")
  14. local BlackHoleVacuumButton = Instance.new("TextButton")
  15. local InfiniteBackpackButton = Instance.new("TextButton")
  16. local MoneyAmountNeeded = Instance.new("TextLabel")
  17. local TextButton = Instance.new("TextButton")
  18. local AdvancedGui = Instance.new("Frame")
  19. local VacuumSimulatorGui_2 = Instance.new("TextLabel")
  20. local AutoMultiRebirth = Instance.new("TextButton")
  21. local InfoAboutFarms1 = Instance.new("TextLabel")
  22. local TeleportToBoard = Instance.new("TextButton")
  23. local TeleportBack = Instance.new("TextButton")
  24. local InfoAboutFarms2 = Instance.new("TextLabel")
  25. local AdvancedAutoFarm = Instance.new("TextButton")
  26. local CloseButton = Instance.new("TextButton")
  27. --Properties:
  28. VacuumSimulatorGUI.Name = "Vacuum Simulator GUI"
  29. VacuumSimulatorGUI.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  30. VacuumSimulatorGUI.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  31.  
  32. NormalGui.Name = "NormalGui"
  33. NormalGui.Parent = VacuumSimulatorGUI
  34. NormalGui.BackgroundColor3 = Color3.new(0.211765, 0.239216, 0.223529)
  35. NormalGui.Position = UDim2.new(0, 412, 0, 373)
  36. NormalGui.Size = UDim2.new(0, 237, 0, 223)
  37.  
  38. VacuumSimulatorGui.Name = "Vacuum Simulator Gui"
  39. VacuumSimulatorGui.Parent = NormalGui
  40. VacuumSimulatorGui.BackgroundColor3 = Color3.new(0.113725, 0.109804, 0.105882)
  41. VacuumSimulatorGui.Size = UDim2.new(0, 237, 0, 31)
  42. VacuumSimulatorGui.Font = Enum.Font.SourceSans
  43. VacuumSimulatorGui.Text = "Vacuum Simulator Gui"
  44. VacuumSimulatorGui.TextColor3 = Color3.new(1, 1, 1)
  45. VacuumSimulatorGui.TextSize = 14
  46.  
  47. AutoFarmButton.Name = "AutoFarmButton"
  48. AutoFarmButton.Parent = NormalGui
  49. AutoFarmButton.BackgroundColor3 = Color3.new(1, 1, 1)
  50. AutoFarmButton.Position = UDim2.new(0.0497925319, 0, 0.179267079, 0)
  51. AutoFarmButton.Size = UDim2.new(0, 102, 0, 33)
  52. AutoFarmButton.Font = Enum.Font.SourceSans
  53. AutoFarmButton.Text = "Auto Farm"
  54. AutoFarmButton.TextColor3 = Color3.new(0, 0, 0)
  55. AutoFarmButton.TextSize = 14
  56. AutoFarmButton.MouseButton1Down:connect(function()
  57. if AutoFarmButton == true then
  58.     AutoFarmButton = false
  59.     print("Auto Farm Disabled")
  60. else AutoFarmButton = true
  61. print("Auto Farm Enabled")
  62. end
  63. end)
  64.  
  65. AutoUpgradeVacuumButton.Name = "AutoUpgradeVacuumButton"
  66. AutoUpgradeVacuumButton.Parent = NormalGui
  67. AutoUpgradeVacuumButton.BackgroundColor3 = Color3.new(1, 1, 1)
  68. AutoUpgradeVacuumButton.BorderSizePixel = 0
  69. AutoUpgradeVacuumButton.Position = UDim2.new(0.049792558, 0, 0.374132901, 0)
  70. AutoUpgradeVacuumButton.Size = UDim2.new(0, 102, 0, 33)
  71. AutoUpgradeVacuumButton.SizeConstraint = Enum.SizeConstraint.RelativeYY
  72. AutoUpgradeVacuumButton.Modal = true
  73. AutoUpgradeVacuumButton.Font = Enum.Font.SourceSans
  74. AutoUpgradeVacuumButton.Text = "Auto Upgrade Vacuum"
  75. AutoUpgradeVacuumButton.TextColor3 = Color3.new(0, 0, 0)
  76. AutoUpgradeVacuumButton.TextSize = 14
  77. AutoUpgradeVacuumButton.TextWrapped = true
  78. AutoUpgradeVacuumButton.MouseButton1Down:connect(function()
  79. if AutoUpgradeVacuum == true then
  80.     AutoUpgradeVacuum = false
  81.     print("Auto Vacuum Upgrade Disabled")
  82. else AutoUpgradeVacuum = true
  83. print("Auto Vacuum Upgrade Enabled (A bit buggy)")
  84. end
  85. end)
  86.  
  87. AutoUpgradeBagButton.Name = "AutoUpgradeBagButton"
  88. AutoUpgradeBagButton.Parent = NormalGui
  89. AutoUpgradeBagButton.BackgroundColor3 = Color3.new(1, 1, 1)
  90. AutoUpgradeBagButton.BorderSizePixel = 0
  91. AutoUpgradeBagButton.Position = UDim2.new(0.518812299, 0, 0.374132961, 0)
  92. AutoUpgradeBagButton.Size = UDim2.new(0, 102, 0, 33)
  93. AutoUpgradeBagButton.Modal = true
  94. AutoUpgradeBagButton.Font = Enum.Font.SourceSans
  95. AutoUpgradeBagButton.Text = "Auto Upgrade Bag"
  96. AutoUpgradeBagButton.TextColor3 = Color3.new(0, 0, 0)
  97. AutoUpgradeBagButton.TextSize = 14
  98. AutoUpgradeBagButton.MouseButton1Down:connect(function()
  99. if AutoUpgradeBag == true then
  100.     AutoUpgradeBag = false
  101.     print("Auto Bag Upgrade Disabled")
  102. else AutoUpgradeBag = true
  103. print("Auto Bag Upgrade Enabled (A bit buggy)")
  104. end
  105. end)
  106.  
  107. AutoRebirthButton.Name = "AutoRebirthButton"
  108. AutoRebirthButton.Parent = NormalGui
  109. AutoRebirthButton.BackgroundColor3 = Color3.new(1, 1, 1)
  110. AutoRebirthButton.BorderSizePixel = 0
  111. AutoRebirthButton.Position = UDim2.new(0.518812299, 0, 0.179267019, 0)
  112. AutoRebirthButton.Size = UDim2.new(0, 102, 0, 33)
  113. AutoRebirthButton.Modal = true
  114. AutoRebirthButton.Font = Enum.Font.SourceSans
  115. AutoRebirthButton.Text = "Auto Rebirth"
  116. AutoRebirthButton.TextColor3 = Color3.new(0, 0, 0)
  117. AutoRebirthButton.TextSize = 14
  118. AutoRebirthButton.MouseButton1Down:connect(function()
  119. if AutoRebirth == true then
  120.     AutoRebirth = false
  121.     print("Auto Rebirth Disabled")
  122. else AutoRebirth = true
  123. print("Auto Rebirth Enabled")
  124. end
  125. end)
  126.  
  127. BlackHoleVacuumButton.Name = "BlackHoleVacuumButton"
  128. BlackHoleVacuumButton.Parent = NormalGui
  129. BlackHoleVacuumButton.BackgroundColor3 = Color3.new(1, 1, 1)
  130. BlackHoleVacuumButton.BorderSizePixel = 0
  131. BlackHoleVacuumButton.Position = UDim2.new(0.049792558, 0, 0.574911714, 0)
  132. BlackHoleVacuumButton.Size = UDim2.new(0, 102, 0, 33)
  133. BlackHoleVacuumButton.Modal = true
  134. BlackHoleVacuumButton.Font = Enum.Font.SourceSans
  135. BlackHoleVacuumButton.Text = "Black Hole Vacuum"
  136. BlackHoleVacuumButton.TextColor3 = Color3.new(0, 0, 0)
  137. BlackHoleVacuumButton.TextSize = 14
  138. BlackHoleVacuumButton.MouseButton1Down:connect(function()
  139. local Remote = game.ReplicatedStorage.Events['VacuumShop']
  140.  
  141. local Arguments = {
  142.         [1] = game.ReplicatedStorage.Vacuums.EarthShop["Black Hole Vacuum"]
  143. }
  144.  
  145. Remote:FireServer(unpack(Arguments))
  146. end)
  147.  
  148. InfiniteBackpackButton.Name = "InfiniteBackpackButton"
  149. InfiniteBackpackButton.Parent = NormalGui
  150. InfiniteBackpackButton.BackgroundColor3 = Color3.new(1, 1, 1)
  151. InfiniteBackpackButton.BorderSizePixel = 0
  152. InfiniteBackpackButton.Position = UDim2.new(0.518812299, 0, 0.574911714, 0)
  153. InfiniteBackpackButton.Size = UDim2.new(0, 102, 0, 33)
  154. InfiniteBackpackButton.Modal = true
  155. InfiniteBackpackButton.Font = Enum.Font.SourceSans
  156. InfiniteBackpackButton.Text = "Infinite Backpack"
  157. InfiniteBackpackButton.TextColor3 = Color3.new(0, 0, 0)
  158. InfiniteBackpackButton.TextSize = 14
  159. InfiniteBackpackButton.MouseButton1Down:connect(function()
  160.  
  161. local Remote = game.ReplicatedStorage.Events['BagShop']
  162.  
  163. local Arguments = {
  164.         [1] = game.ReplicatedStorage.Bags.EarthShop["Infinite Backpack"]
  165. }
  166.  
  167. Remote:FireServer(unpack(Arguments))
  168. end)
  169.  
  170. MoneyAmountNeeded.Name = "MoneyAmountNeeded"
  171. MoneyAmountNeeded.Parent = NormalGui
  172. MoneyAmountNeeded.Active = true
  173. MoneyAmountNeeded.BackgroundColor3 = Color3.new(0.211765, 0.239216, 0.223529)
  174. MoneyAmountNeeded.BorderSizePixel = 0
  175. MoneyAmountNeeded.Position = UDim2.new(0, 0, 0.749417305, 0)
  176. MoneyAmountNeeded.Size = UDim2.new(0, 237, 0, 17)
  177. MoneyAmountNeeded.Font = Enum.Font.SourceSans
  178. MoneyAmountNeeded.Text = "10 Bil Needed                     100 Bil Needed"
  179. MoneyAmountNeeded.TextColor3 = Color3.new(1, 1, 1)
  180. MoneyAmountNeeded.TextSize = 14
  181.  
  182. TextButton.Parent = NormalGui
  183. TextButton.BackgroundColor3 = Color3.new(0.192157, 0.184314, 0.176471)
  184. TextButton.Position = UDim2.new(0, 0, 0.866952956, 0)
  185. TextButton.Size = UDim2.new(0, 237, 0, 29)
  186. TextButton.Font = Enum.Font.SourceSans
  187. TextButton.Text = "Advanced Mode"
  188. TextButton.TextColor3 = Color3.new(1, 1, 1)
  189. TextButton.TextSize = 14
  190. TextButton.MouseButton1Down:connect(function()
  191.     AdvancedGui.Visible = true
  192. end)
  193.  
  194. AdvancedGui.Name = "AdvancedGui"
  195. AdvancedGui.Parent = VacuumSimulatorGUI
  196. AdvancedGui.BackgroundColor3 = Color3.new(0.890196, 0.294118, 0.890196)
  197. AdvancedGui.BorderColor3 = Color3.new(0.541176, 0, 0.541176)
  198. AdvancedGui.Position = UDim2.new(0, 654, 0, 373)
  199. AdvancedGui.Size = UDim2.new(0, 237, 0, 201)
  200. AdvancedGui.Visible = false
  201.  
  202. VacuumSimulatorGui_2.Name = "Vacuum Simulator Gui"
  203. VacuumSimulatorGui_2.Parent = AdvancedGui
  204. VacuumSimulatorGui_2.BackgroundColor3 = Color3.new(0.686275, 0, 0.686275)
  205. VacuumSimulatorGui_2.BorderColor3 = Color3.new(0.541176, 0, 0.541176)
  206. VacuumSimulatorGui_2.Size = UDim2.new(0, 237, 0, 31)
  207. VacuumSimulatorGui_2.Font = Enum.Font.SourceSans
  208. VacuumSimulatorGui_2.Text = "Advanced Vacuum Simulator Gui"
  209. VacuumSimulatorGui_2.TextColor3 = Color3.new(1, 1, 1)
  210. VacuumSimulatorGui_2.TextSize = 14
  211.  
  212. AutoMultiRebirth.Name = "AutoMultiRebirth"
  213. AutoMultiRebirth.Parent = AdvancedGui
  214. AutoMultiRebirth.BackgroundColor3 = Color3.new(1, 1, 1)
  215. AutoMultiRebirth.BorderColor3 = Color3.new(0.796079, 0, 0.796079)
  216. AutoMultiRebirth.Position = UDim2.new(0.531470597, 0, 0.224043146, 0)
  217. AutoMultiRebirth.Size = UDim2.new(0, 102, 0, 33)
  218. AutoMultiRebirth.Modal = true
  219. AutoMultiRebirth.Font = Enum.Font.SourceSans
  220. AutoMultiRebirth.Text = "Auto Multi Rebirth"
  221. AutoMultiRebirth.TextColor3 = Color3.new(0, 0, 0)
  222. AutoMultiRebirth.TextSize = 14
  223. AutoMultiRebirth.MouseButton1Down:connect(function()
  224. if AutoMultiRebirth == true then
  225.     AutoMultiRebirth = false
  226.     print("Auto Multi-Rebirth Disabled")
  227. else AutoMultiRebirth = true
  228. print("Auto Multi-Rebirth Enabled")
  229. end
  230. end)
  231.  
  232. InfoAboutFarms1.Name = "InfoAboutFarms1"
  233. InfoAboutFarms1.Parent = AdvancedGui
  234. InfoAboutFarms1.Active = true
  235. InfoAboutFarms1.BackgroundColor3 = Color3.new(0.890196, 0.294118, 0.890196)
  236. InfoAboutFarms1.BorderSizePixel = 0
  237. InfoAboutFarms1.Position = UDim2.new(0, 0, 0.406133711, 0)
  238. InfoAboutFarms1.Size = UDim2.new(0, 236, 0, 36)
  239. InfoAboutFarms1.Font = Enum.Font.SourceSans
  240. InfoAboutFarms1.Text = "Farms above are only meant to be used with Black Hole Vacuum and Infinite Backpack."
  241. InfoAboutFarms1.TextColor3 = Color3.new(1, 1, 1)
  242. InfoAboutFarms1.TextSize = 14
  243. InfoAboutFarms1.TextWrapped = true
  244.  
  245. TeleportToBoard.Name = "TeleportToBoard"
  246. TeleportToBoard.Parent = AdvancedGui
  247. TeleportToBoard.BackgroundColor3 = Color3.new(1, 1, 1)
  248. TeleportToBoard.BorderColor3 = Color3.new(0.796079, 0, 0.796079)
  249. TeleportToBoard.Position = UDim2.new(0.0413537025, 0, 0.791207373, 0)
  250. TeleportToBoard.Size = UDim2.new(0, 102, 0, 33)
  251. TeleportToBoard.Font = Enum.Font.SourceSans
  252. TeleportToBoard.Text = "Teleport To Board"
  253. TeleportToBoard.TextColor3 = Color3.new(0, 0, 0)
  254. TeleportToBoard.TextSize = 14
  255. TeleportToBoard.TextWrapped = true
  256. TeleportToBoard.MouseButton1Down:connect(function()
  257.     Localplyer = game.Players.LocalPlayer.Name
  258.     game.workspace[Localplyer].HumanoidRootPart.CFrame = CFrame.new(1016,18,1157)
  259. end)
  260.  
  261. TeleportBack.Name = "TeleportBack"
  262. TeleportBack.Parent = AdvancedGui
  263. TeleportBack.BackgroundColor3 = Color3.new(1, 1, 1)
  264. TeleportBack.BorderColor3 = Color3.new(0.796079, 0, 0.796079)
  265. TeleportBack.Position = UDim2.new(0.53080523, 0, 0.791207373, 0)
  266. TeleportBack.Size = UDim2.new(0, 102, 0, 33)
  267. TeleportBack.Font = Enum.Font.SourceSans
  268. TeleportBack.Text = "Teleport Back"
  269. TeleportBack.TextColor3 = Color3.new(0, 0, 0)
  270. TeleportBack.TextSize = 14
  271. TeleportBack.TextWrapped = true
  272. TeleportBack.MouseButton1Down:connect(function()
  273.     Localplyer = game.Players.LocalPlayer.Name
  274.     game.workspace[Localplyer].HumanoidRootPart.CFrame = CFrame.new(15, -2, 181)
  275. end)
  276.  
  277. InfoAboutFarms2.Name = "InfoAboutFarms2"
  278. InfoAboutFarms2.Parent = AdvancedGui
  279. InfoAboutFarms2.Active = true
  280. InfoAboutFarms2.BackgroundColor3 = Color3.new(0.890196, 0.294118, 0.890196)
  281. InfoAboutFarms2.BorderSizePixel = 0
  282. InfoAboutFarms2.Position = UDim2.new(0, 0, 0.585238218, 0)
  283. InfoAboutFarms2.Size = UDim2.new(0, 236, 0, 36)
  284. InfoAboutFarms2.Font = Enum.Font.SourceSans
  285. InfoAboutFarms2.Text = "Multi-Rebirth rebirths 100 times at a time, use the buttons below to check the prices."
  286. InfoAboutFarms2.TextColor3 = Color3.new(1, 1, 1)
  287. InfoAboutFarms2.TextSize = 14
  288. InfoAboutFarms2.TextWrapped = true
  289.  
  290. AdvancedAutoFarm.Name = "AdvancedAutoFarm"
  291. AdvancedAutoFarm.Parent = AdvancedGui
  292. AdvancedAutoFarm.BackgroundColor3 = Color3.new(1, 1, 1)
  293. AdvancedAutoFarm.BorderColor3 = Color3.new(0.796079, 0, 0.796079)
  294. AdvancedAutoFarm.Position = UDim2.new(0.0413537025, 0, 0.21906805, 0)
  295. AdvancedAutoFarm.Size = UDim2.new(0, 102, 0, 33)
  296. AdvancedAutoFarm.Font = Enum.Font.SourceSans
  297. AdvancedAutoFarm.Text = "Advanced Auto Farm"
  298. AdvancedAutoFarm.TextColor3 = Color3.new(0, 0, 0)
  299. AdvancedAutoFarm.TextSize = 14
  300. AdvancedAutoFarm.TextWrapped = true
  301. AdvancedAutoFarm.MouseButton1Down:connect(function()
  302. if AdvAutoFarm == true then
  303.     AdvAutoFarm = false
  304.     print("Advanced Auto Farm Disabled")
  305. else AdvAutoFarm = true
  306. print("Advanced Auto Farm Enabled")
  307. end
  308. end)
  309.  
  310. CloseButton.Name = "Close Button"
  311. CloseButton.Parent = AdvancedGui
  312. CloseButton.BackgroundColor3 = Color3.new(0.686275, 0, 0.686275)
  313. CloseButton.BorderSizePixel = 0
  314. CloseButton.Position = UDim2.new(0.873417735, 0, -0.000116604475, 0)
  315. CloseButton.Size = UDim2.new(0, 30, 0, 31)
  316. CloseButton.Font = Enum.Font.Gotham
  317. CloseButton.Text = "X"
  318. CloseButton.TextColor3 = Color3.new(1, 0.937255, 0.937255)
  319. CloseButton.TextSize = 36
  320. CloseButton.MouseButton1Down:connect(function()
  321.     AdvancedGui.Visible = false
  322. end)
  323.  
  324. -- Scripts:
  325. function SCRIPT_YYLM68_FAKESCRIPT() -- NormalGui.LocalScript
  326.     local script = Instance.new('LocalScript')
  327.     script.Parent = NormalGui
  328.     local UserInputService = game:GetService("UserInputService")
  329.    
  330.     local gui = script.Parent
  331.    
  332.     local dragging
  333.     local dragInput
  334.     local dragStart
  335.     local startPos
  336.    
  337.     local function update(input)
  338.         local delta = input.Position - dragStart
  339.         gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  340.     end
  341.    
  342.     gui.InputBegan:Connect(function(input)
  343.         if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  344.             dragging = true
  345.             dragStart = input.Position
  346.             startPos = gui.Position
  347.            
  348.             input.Changed:Connect(function()
  349.                 if input.UserInputState == Enum.UserInputState.End then
  350.                     dragging = false
  351.                 end
  352.             end)
  353.         end
  354.     end)
  355.    
  356.     gui.InputChanged:Connect(function(input)
  357.         if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  358.             dragInput = input
  359.         end
  360.     end)
  361.    
  362.     UserInputService.InputChanged:Connect(function(input)
  363.         if input == dragInput and dragging then
  364.             update(input)
  365.         end
  366.     end)
  367.  
  368. end
  369. coroutine.resume(coroutine.create(SCRIPT_YYLM68_FAKESCRIPT))
  370. function SCRIPT_NMZP88_FAKESCRIPT() -- AdvancedGui.LocalScript
  371.     local script = Instance.new('LocalScript')
  372.     script.Parent = AdvancedGui
  373.     local UserInputService = game:GetService("UserInputService")
  374.    
  375.     local gui = script.Parent
  376.    
  377.     local dragging
  378.     local dragInput
  379.     local dragStart
  380.     local startPos
  381.    
  382.     local function update(input)
  383.         local delta = input.Position - dragStart
  384.         gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
  385.     end
  386.    
  387.     gui.InputBegan:Connect(function(input)
  388.         if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  389.             dragging = true
  390.             dragStart = input.Position
  391.             startPos = gui.Position
  392.            
  393.             input.Changed:Connect(function()
  394.                 if input.UserInputState == Enum.UserInputState.End then
  395.                     dragging = false
  396.                 end
  397.             end)
  398.         end
  399.     end)
  400.    
  401.     gui.InputChanged:Connect(function(input)
  402.         if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
  403.             dragInput = input
  404.         end
  405.     end)
  406.    
  407.     UserInputService.InputChanged:Connect(function(input)
  408.         if input == dragInput and dragging then
  409.             update(input)
  410.         end
  411.     end)
  412.  
  413. end
  414. coroutine.resume(coroutine.create(SCRIPT_NMZP88_FAKESCRIPT))
  415. -----------------------------------------------
  416. AutoFarmButton = false
  417. AutoUpgradeVacuum = false
  418. AutoUpgradeBag = false
  419. AutoRebirth = false
  420. AdvAutoFarm = false
  421. AutoMultiRebirth = false
  422. while true do
  423. wait(0.01)
  424.  
  425. if AutoRebirth == true then
  426. local Remote = game.ReplicatedStorage.Events['Rebirth']
  427.  
  428. local Arguments = {
  429.        
  430. }
  431.  
  432. Remote:FireServer(unpack(Arguments))
  433. end
  434.  
  435. if AutoFarmButton == true then
  436.     Localplyer = game.Players.LocalPlayer.Name
  437.     game.workspace.GameComponents.SellStuff.otherpat.Position = game.workspace[Localplyer].HumanoidRootPart.Position + Vector3.new(0,1,0)
  438.     game.workspace.GameComponents.SellStuff.otherpat.Position = game.workspace[Localplyer].HumanoidRootPart.Position
  439. wait(0.01)
  440. local coin = game.workspace.GameComponents.ClientCoins["Sandcastles - 18"]:FindFirstChild("Coin")
  441.     if coin then
  442.         local Remote = game.ReplicatedStorage.Events['VacuumObject']
  443.  
  444. local Arguments = {
  445.         [1] = coin.Position
  446. }
  447.  
  448. Remote:FireServer(unpack(Arguments))
  449. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  450.  
  451. local Arguments = {
  452.         [1] = coin.Position
  453. }
  454.  
  455. Remote:FireServer(unpack(Arguments))
  456. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  457.  
  458. local Arguments = {
  459.         [1] = coin.Position
  460. }
  461.  
  462. Remote:FireServer(unpack(Arguments))
  463. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  464.  
  465. local Arguments = {
  466.         [1] = coin.Position
  467. }
  468.  
  469. Remote:FireServer(unpack(Arguments))
  470. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  471.  
  472. local Arguments = {
  473.         [1] = coin.Position
  474. }
  475.  
  476. Remote:FireServer(unpack(Arguments))
  477. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  478.  
  479. local Arguments = {
  480.         [1] = coin.Position
  481. }
  482.  
  483. Remote:FireServer(unpack(Arguments))
  484. end
  485. end
  486. if AutoUpgradeVacuum == true then
  487.     VacuumToBuy = "Futuristic Robovac"
  488.     CoinBalance = game:GetService("Players").LocalPlayer.leaderstats.Coins.Value
  489.         if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Plastic Handheld Vacuum"].Properties.Cost.Value then
  490.             if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Silver Handheld Vacuum"].Properties.Cost.Value then
  491.                 if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Gold Handheld Vacuum"].Properties.Cost.Value then
  492.                     if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Rusty R-Vac"].Properties.Cost.Value then
  493.                         if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Plastic R-Vac"].Properties.Cost.Value then
  494.                             if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Silver R-Vac"].Properties.Cost.Value then
  495.                                 if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Gold R-Vac"].Properties.Cost.Value then
  496.                                     if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Rusty Backvac"].Properties.Cost.Value then
  497.                                         if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Gold R-Vac"].Properties.Cost.Value then
  498.                                             if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Plastic Backvac"].Properties.Cost.Value then
  499.                                                 if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Silver Backvac"].Properties.Cost.Value then
  500.                                                     if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Rusty Robovac"].Properties.Cost.Value then
  501.                                                         if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Plastic Robovac"].Properties.Cost.Value then
  502.                                                             if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Silver Robovac"].Properties.Cost.Value then
  503.                                                                 if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Gold Robovac"].Properties.Cost.Value then
  504.                                                                     if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Coin Zapper"].Properties.Cost.Value then
  505.                                                                         if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Silver Coin Zapper"].Properties.Cost.Value then
  506.                                                                             if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Gold Coin Zapper"].Properties.Cost.Value then
  507.                                                                                 if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Diamond Coin Zapper"].Properties.Cost.Value then
  508.                                                                                     if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Biometric Coin Diffuser"].Properties.Cost.Value then
  509.                                                                                         if CoinBalance >= game:GetService("ReplicatedStorage").Vacuums.EarthShop["Biometric Robovac"].Properties.Cost.Value then
  510.                                                                                             VacuumToBuy = "Futuristic Robovac"
  511.                                                                                         else VacuumToBuy = "Biometric Robovac"
  512.                                                                                         end
  513.                                                                                     else VacuumToBuy = "Biometric Coin Diffuser"
  514.                                                                                     end
  515.                                                                                 else VacuumToBuy = "Diamond Coin Zapper"
  516.                                                                                 end
  517.                                                                             else VacuumToBuy = "Gold Coin Zapper"
  518.                                                                             end
  519.                                                                         else VacuumToBuy = "Silver Coin Zapper"
  520.                                                                         end
  521.                                                                     else VacuumToBuy = "Coin Zapper"
  522.                                                                     end
  523.                                                                 else VacuumToBuy = "Gold Robovac"
  524.                                                                 end
  525.                                                             else VacuumToBuy = "Silver Robovac"
  526.                                                             end
  527.                                                         else VacuumToBuy = "Plastic Robovac"
  528.                                                         end
  529.                                                     else VacuumToBuy = "Rusty Robovac"
  530.                                                     end
  531.                                                 else VacuumToBuy = "Gold Backvac"
  532.                                                 end
  533.                                             else VacuumToBuy = "Silver Backvac"
  534.                                             end  
  535.                                         else VacuumToBuy = "Plastic Backvac"
  536.                                         end
  537.                                     else VacuumToBuy = "Rusty Backvac"
  538.                                     end
  539.                                 else VacuumToBuy = "Gold R-Vac"
  540.                                 end
  541.                             else VacuumToBuy = "Silver R-Vac"
  542.                             end
  543.                         else VacuumToBuy = "Plastic R-Vac"
  544.                         end
  545.                     else VacuumToBuy = "Rusty R-Vac"
  546.                     end
  547.                 else VacuumToBuy = "Gold Handheld Vacuum"
  548.                 end
  549.             else VacuumToBuy = "Silver Handheld Vacuum"
  550.             end
  551.         else VacuumToBuy = "Plastic Handheld Vacuum"
  552.         end
  553. wait(0.75)
  554. local Remote = game.ReplicatedStorage.Events['VacuumShop']
  555.  
  556. local Arguments = {
  557.         [1] = game.ReplicatedStorage.Vacuums.EarthShop[VacuumToBuy]
  558. }
  559.  
  560. Remote:FireServer(unpack(Arguments))
  561. end
  562.  
  563. if AutoUpgradeBag == true then
  564.     BagToBuy = "Shipback"
  565.     CoinBalance = game:GetService("Players").LocalPlayer.leaderstats.Coins.Value
  566.         if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Tangerine Pack"].Properties.Cost.Value then
  567.             if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Picnipack"].Properties.Cost.Value then
  568.                 if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Cauldronpack"].Properties.Cost.Value then
  569.                     if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Catpack"].Properties.Cost.Value then
  570.                         if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Moving Box"].Properties.Cost.Value then
  571.                             if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Bucketpack"].Properties.Cost.Value then
  572.                                 if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Balloonpack"].Properties.Cost.Value then
  573.                                     if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Uniback"].Properties.Cost.Value then
  574.                                         if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Batterypack"].Properties.Cost.Value then
  575.                                             if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Green 8 Bit Pack"].Properties.Cost.Value then
  576.                                                 if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Red 8 Bit Pack"].Properties.Cost.Value then
  577.                                                     if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Pot-O-Coins Pack"].Properties.Cost.Value then
  578.                                                         if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Bubble Blowing Bag"].Properties.Cost.Value then
  579.                                                             if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Black 8 Bit Pack"].Properties.Cost.Value then
  580.                                                                 if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Backpack: Noir"].Properties.Cost.Value then
  581.                                                                     if CoinBalance >= game:GetService("ReplicatedStorage").Bags.EarthShop["Spaceback"].Properties.Cost.Value then
  582.                                                                         BagToBuy = "Shipback"
  583.                                                                     else
  584.                                                                     BagToBuy = "Spaceback"
  585.                                                                     end
  586.                                                                 else
  587.                                                                 BagToBuy = "Backpack: Noir"
  588.                                                                 end
  589.                                                             else
  590.                                                             BagToBuy = "Black 8 Bit Pack"
  591.                                                             end
  592.                                                         else
  593.                                                         BagToBuy = "Bubble Blowing Bag"
  594.                                                         end
  595.                                                     else
  596.                                                     BagToBuy = "Pot-O-Coins Pack"
  597.                                                     end
  598.                                                 else
  599.                                                 BagToBuy = "Red 8 Bit Pack"
  600.                                                 end
  601.                                             else
  602.                                             BagToBuy = "Green 8 Bit Pack"
  603.                                             end
  604.                                         else
  605.                                         BagToBuy = "Batterypack"
  606.                                         end
  607.                                     else
  608.                                     BagToBuy = "Uniback"
  609.                                     end
  610.                                 else
  611.                                 BagToBuy = "Balloonpack"
  612.                                 end
  613.                             else
  614.                             BagToBuy = "Bucketpack"
  615.                             end
  616.                         else
  617.                         BagToBuy = "Moving Box"
  618.                         end
  619.                     else
  620.                     BagToBuy = "Catpack"
  621.                     end
  622.                 else
  623.                 BagToBuy = "Cauldronpack"
  624.                 end
  625.             else
  626.             BagToBuy = "Picnipack"
  627.             end
  628.         else
  629.         BagToBuy = "Tangerine Pack"
  630.         end
  631.     wait(0.5)
  632. local Remote = game.ReplicatedStorage.Events['BagShop']
  633.  
  634. local Arguments = {
  635.         [1] = game.ReplicatedStorage.Bags.EarthShop[BagToBuy]
  636. }
  637.  
  638. Remote:FireServer(unpack(Arguments))
  639. end
  640. if AutoRebirth == true then
  641. local Remote = game.ReplicatedStorage.Events['Rebirth']
  642.  
  643. local Arguments = {
  644.        
  645. }
  646.  
  647. Remote:FireServer(unpack(Arguments))
  648. end
  649.  
  650. if AdvAutoFarm == true then
  651.    
  652.     local Remote = game.ReplicatedStorage.Events['VacuumShop']
  653.  
  654. local Arguments = {
  655.         [1] = game.ReplicatedStorage.Vacuums.EarthShop["Black Hole Vacuum"]
  656. }
  657.  
  658. Remote:FireServer(unpack(Arguments))
  659.  
  660. local Remote = game.ReplicatedStorage.Events['BagShop']
  661.  
  662. local Arguments = {
  663.         [1] = game.ReplicatedStorage.Bags.EarthShop["Infinite Backpack"]
  664. }
  665.  
  666. Remote:FireServer(unpack(Arguments))
  667.  
  668.     Localplyer = game.Players.LocalPlayer.Name
  669.     game.workspace.GameComponents.SellStuff.otherpat.Position = game.workspace[Localplyer].HumanoidRootPart.Position + Vector3.new(0,1,0)
  670.     game.workspace.GameComponents.SellStuff.otherpat.Position = game.workspace[Localplyer].HumanoidRootPart.Position
  671. wait(0.01)
  672. local coin = game.workspace.GameComponents.ClientCoins["Sandcastles - 18"]:FindFirstChild("Coin")
  673.     if coin then
  674.         local Remote = game.ReplicatedStorage.Events['VacuumObject']
  675.  
  676. local Arguments = {
  677.         [1] = coin.Position
  678. }
  679.  
  680. Remote:FireServer(unpack(Arguments))
  681. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  682.  
  683. local Arguments = {
  684.         [1] = coin.Position
  685. }
  686.  
  687. Remote:FireServer(unpack(Arguments))
  688. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  689.  
  690. local Arguments = {
  691.         [1] = coin.Position
  692. }
  693.  
  694. Remote:FireServer(unpack(Arguments))
  695. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  696.  
  697. local Arguments = {
  698.         [1] = coin.Position
  699. }
  700.  
  701. Remote:FireServer(unpack(Arguments))
  702. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  703.  
  704. local Arguments = {
  705.         [1] = coin.Position
  706. }
  707.  
  708. Remote:FireServer(unpack(Arguments))
  709. local Remote = game.ReplicatedStorage.Events['VacuumObject']
  710.  
  711. local Arguments = {
  712.         [1] = coin.Position
  713. }
  714.  
  715. Remote:FireServer(unpack(Arguments))
  716. end
  717. end
  718.  
  719. if AutoMultiRebirth == true then
  720. local Remote = game.ReplicatedStorage.Events['MultiRebirth']
  721.  
  722. local Arguments = {
  723.         [1] = 100
  724. }
  725.  
  726. Remote:FireServer(unpack(Arguments))
  727. end
  728.  
  729. end
Add Comment
Please, Sign In to add comment