evannik23

Roblox roville autofarm (from 2 years ago)

Aug 28th, 2024 (edited)
1,005
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 5.42 KB | None | 0 0
  1. local Lib = loadstring(game:HttpGet("https://pastebin.com/raw/S023gV5f"))()
  2. local Gui = Lib:MakeGUI(game.CoreGui,"@*&DN*(@NNDDBWBWJ", "Sussy Baka")
  3. local Frame = nil
  4. local ExploitGui = Gui
  5. local filename = "SussyBakaSettings.JSON"
  6. for i,v in pairs(Gui:GetChildren()) do
  7.     if v.Name == "Frame" then
  8.       Frame = v  end
  9. end
  10. Frame.BackgroundTransparency =0
  11. Lib:Dragify(Frame)
  12. local CatagoriesMenu = Lib:MakeCatagoriesMenu(Frame)
  13. local Settings = Lib:MakeSettings(Frame)
  14. local Buy = Lib:MakeCatagory(CatagoriesMenu,"Buy Products",1)
  15. local PlotLoader = Lib:MakeCatagory(CatagoriesMenu,"Load Plots",2)
  16. local GrabParts = game:GetService("ReplicatedStorage").ActionEvents["Grab parts"]
  17. local AutoFarmV = Lib:MakeCatagory(CatagoriesMenu, "Auto-Farm", 3)
  18.  
  19. local plots = {"Mudturtle26's Residence", "Mansion", "Stone Manor"}
  20. local plr = game.Players.LocalPlayer
  21. local Apartment = CFrame.new(4120, 61, 5147)
  22. local AssemblePart = game:GetService("ReplicatedStorage").ActionEvents["Assemble Part"]
  23. Gui.Frame.Title.TextScaled = false
  24. Gui.Frame.Title.TextSize = 40
  25. Restock = nil
  26. if game.ReplicatedStorage.ActionEvents:FindFirstChild("Restock - $11424") then
  27.    Restock = game.ReplicatedStorage.ActionEvents:FindFirstChild("Restock - $11424")
  28. end
  29. local BrewRemote = game:GetService("ReplicatedStorage").CS.Brew
  30. local House = workspace.Properties[plr.Name]
  31. local Lighting = game.Lighting
  32. local TimeActive = true
  33. local http = game:GetService("HttpService")
  34. local LoadPlot = game:GetService("ReplicatedStorage").CS.SaveSlotData
  35. for i,v in pairs(plots) do
  36.     local Button = Lib:MakeButtonFrame(PlotLoader[2], v, 1, function()
  37.  
  38.         LoadPlot:FireServer(v, House)
  39.     end)
  40. end
  41. local HotKey = Lib:MakeKeyBindFrame(Settings, "Hide/UnhideUI", 0)
  42. HotKey.Name = "Hotkey"
  43. function EditValueFromFile(filename, ValueName, NewValue)
  44.     local file = readfile(filename)
  45.     local Data = http:JSONDecode(file)[ValueName]
  46.     local PastData = http:JSONDecode(file)
  47.     PastData[ValueName] = NewValue
  48.     delfile(filename)
  49.     local NewData = http:JSONEncode(PastData)
  50.     writefile(filename, NewData)
  51.     Lib:SendNotif("Saved value","Saved value "..(ValueName),2)
  52. end
  53.  
  54.  
  55. if not isfile(filename) then
  56.     local JSONData = {["GUIHotkey"] = HotKey.Text}
  57.     writefile(filename, http:JSONEncode(JSONData))
  58.     else
  59.     print("Loading Saved Data")
  60.     local file = readfile(filename)
  61.      local content = http:JSONDecode(file)
  62.  
  63.  
  64.      Lib:ConnectKeyBind(HotKey, content.GUIHotkey, function() if ExploitGui.Enabled == true then
  65.    ExploitGui.Enabled = false else ExploitGui.Enabled = true
  66. end
  67. end)
  68. end
  69. HotKey.FocusLost:Connect(function(prop)
  70.     local file = readfile(filename)
  71.     local data =  http:JSONDecode(file).GUIHotkey
  72.      if HotKey.Text == data then
  73.          else
  74.            EditValueFromFile(filename, "GUIHotkey", HotKey.Text)
  75.     end
  76. end)
  77. function Assemble()
  78.      AssemblePart:FireServer(workspace.RocketEngineer.AssembleBox)
  79. end
  80.  
  81.  
  82. local IsEngine = false
  83. function RestockJew()
  84.     loadstring(game:HttpGet("https://pastebin.com/raw/1e7UVDfu"))()
  85. end
  86. function FarmRocketSci()
  87.   local AssemblyBoard = game:GetService("Workspace").RocketEngineer:FindFirstChild("PartBoard").Board
  88.   local EngineFrame = AssemblyBoard.EngineFrame
  89.   local RocketFrame = AssemblyBoard.RocketFrame
  90.   if EngineFrame.Visible == true then
  91.       for i,v in pairs(EngineFrame:GetChildren()) do
  92.  
  93.           if v:FindFirstChild("checkmark") then
  94.  
  95.               if v.checkmark.Visible == false then
  96.  
  97.                   GrabParts:FireServer(v.Name, v.clrText.Text, true)
  98.                   Assemble()
  99.                   wait(3)
  100.             end
  101.         end
  102.       end
  103.   end
  104. if RocketFrame.Visible == true then
  105.       for i,v in pairs(RocketFrame:GetChildren()) do
  106.  
  107.           if v:FindFirstChild("checkmark") then
  108.  
  109.               if v.checkmark.Visible == false then
  110.  
  111.                   GrabParts:FireServer(v.Name, v.clrText.Text, false)
  112.                   Assemble()
  113.                   wait(3)
  114.             end
  115.         end
  116.       end
  117.   end
  118. end
  119.  
  120. local AutoFarm = Lib:MakeBoolFrame(AutoFarmV[2], "Auto Farm Rocket Sci", 1, function()
  121.  
  122.          local AutoFarmValue = AutoFarmV[2].AutoFarm.Value
  123.        Lib:SendNotif("Started", "AutoFarming started", 5)
  124.             while AutoFarmValue.Value == true do
  125.                 if AutoFarmValue.Value == false then break end
  126.                 wait(1)
  127.                 FarmRocketSci()
  128.  
  129.  
  130.             end
  131.  
  132.  
  133.  
  134.  
  135.  
  136.  
  137. end, function() Lib:SendNotif("Stoped", "AutoFarming ended", 5)  end)
  138. for i,v in pairs(AutoFarmV[2]:GetChildren()) do
  139.     print(AutoFarmV[2].Name)
  140. end
  141. AutoFarmV[2].Bool.Name = "AutoFarm"
  142.  
  143. local BuyCoffee = Lib:MakeButtonFrame(Buy[2], "Buy Coffee", 1, function()BrewRemote:FireServer()end)
  144. local RestockButton = Lib:MakeButtonFrame(Buy[2], "Restock", 2,RestockJew)
  145. function CleanHouse()
  146.     local remote = game:GetService("ReplicatedStorage").CS.CleanHome
  147.     remote:FireServer()
  148.  end
  149. local CleanHouse2 = Lib:MakeButtonFrame(Buy[2], "Cleaning Service $300", 3,CleanHouse)
  150. local Avatar = Lib:MakeCatagory(CatagoriesMenu, "Avatar", 3)
  151. function Nude()
  152.     local name = "LoadCustomOutfit"
  153.     local Remote = Lib:FindRemoteEvent(game.ReplicatedStorage, name)
  154.     Remote:InvokeServer("Nudist")
  155. end
  156. function Unude()
  157.     local name = "LoadCustomOutfit"
  158.     local Remote = Lib:FindRemoteEvent(game.ReplicatedStorage, name)
  159.     Remote:InvokeServer("Gangster")
  160. end
  161. local GetNude = Lib:MakeBoolFrame(Avatar[2], "Nude?",4,Nude,Unude)
  162.  
Advertisement
Add Comment
Please, Sign In to add comment