The text below is selected, press Ctrl+C to copy to your clipboard. (⌘+C on Mac) No line numbers will be copied.
Guest
My Chicken Farm! [BETA] GUI script pastebin roblox
By LINK GAME on 2024-09-20 08:00 am | Syntax: LUA | Views: 10



New Script | Raw | Show/Hide line no. | Copy text to clipboard
  1. local library = loadstring(game:HttpGet(('https://raw.githubusercontent.com/Maxgat5/UiLib/main/lua')))()
  2. local w = library:CreateWindow("My Chicken Farm")
  3. local b = w:CreateFolder("AutoBuy")
  4. local e = w:CreateFolder("Mix")
  5. local u = w:CreateFolder("Credits")
  6.  
  7. b:Toggle("Chickens",function(bool)
  8.     shared.toggle = bool
  9.     Chicken = bool
  10. end)
  11.  
  12. b:Toggle("Chicken Upgrades",function(bool)
  13.     shared.toggle = bool
  14.     ChickenUpg = bool
  15. end)
  16.  
  17. b:Toggle("Rebirth",function(bool)
  18.     shared.togge = bool
  19.     Rebirth = bool
  20. end)
  21.  
  22. b:Toggle("Golden Shop",function(bool)
  23.     shared.toggle = bool
  24.     RebirthUpg = bool
  25. end)
  26.  
  27. e:Toggle("AntiAfk",function(bool)
  28.     shared.toggle = bool
  29.     AntiAfk = bool
  30. end)
  31.  
  32. e:Toggle("Achieve",function(bool)
  33.     shared.toggle = bool
  34.     Achieve = bool
  35. end)
  36. --Credits
  37. u:Button("Moepi#1149",function()
  38.     setclipboard("Moepi#1149")
  39. end)
  40.  
  41. u:Button("maxgat5#8395",function()
  42.     setclipboard("maxgat5#8395")
  43. end)
  44.  
  45. u:Button("Discord Server",function()
  46.     setclipboard("https://discord.gg/K4txdRSVfq")
  47. end)
  48.  
  49. while wait() do
  50.     spawn(function()
  51.         if Achieve == true then
  52.             for i,v in pairs(game:GetService("Players").LocalPlayer.PlayerGui.Gui.Achievements.List:GetDescendants()) do
  53.                 if v.ClassName == "TextButton" then
  54.                     firesignal(v.MouseButton1Click)
  55.                 end
  56.             end
  57.         end
  58.     end)
  59.    
  60.     spawn(function()
  61.         if Chicken == true then
  62.             text = nil
  63.             for i,v in pairs(game:GetService("Workspace").Farms:GetDescendants()) do
  64.                 if v.ClassName == "TextLabel" then
  65.                     if v.Text == game.Players.LocalPlayer.Name.."'s Farm" then
  66.                         text = v.Parent.Parent.Parent.Info.Frame.Chickens.Text
  67.                     end
  68.                 end
  69.             end
  70.             a = string.gsub(text,"Total Chickens","")
  71.             b = string.gsub(a,"font","")
  72.             c = string.gsub(b,">","")
  73.             d = string.gsub(c,"<","")
  74.             e = string.gsub(d,"color","")
  75.             f = string.gsub(e,"=","")
  76.             f1 = string.gsub(f,"'","")
  77.             f2 = string.gsub(f1,"rgb","")
  78.             f3 = string.gsub(f2,"229","")
  79.             f4 = string.gsub(f3,",","")
  80.             f5 = string.gsub(f4," ","")
  81.             f6 = string.gsub(f5,"%b()","")
  82.             string = f6
  83.             a1111,b1111 = string:match("(.+)//(.+)/")
  84.             game:GetService("ReplicatedStorage").Remotes.PurchaseFarm:FireServer(a1111 + 1)
  85.         end
  86.     end)
  87.    
  88.     spawn(function()
  89.         if ChickenUpg == true then
  90.             for i,v in pairs(game:GetService("Players").LocalPlayer.Data.Farm:GetChildren()) do
  91.                 game:GetService("ReplicatedStorage").Remotes.Upgrade:FireServer(v.Name)
  92.             end
  93.         end
  94.     end)
  95.  
  96.     spawn(function()
  97.         if Rebirth == true then
  98.             game:GetService("ReplicatedStorage").Remotes.Rebirth:FireServer()
  99.         end
  100.     end)
  101.  
  102.     spawn(function()
  103.         if RebirthUpg == true then
  104.             for i,v in pairs(game:GetService("Players").LocalPlayer.PlayerGui.Gui.GoldenShop.List:GetChildren()) do
  105.                 game:GetService("ReplicatedStorage").Remotes.GUpgrade:FireServer(v.Name)
  106.             end
  107.         end
  108.     end)
  109.  
  110.     spawn(function()
  111.         if AntiAfk == true then
  112.             local vu = game:GetService("VirtualUser")
  113.             game:GetService("Players").LocalPlayer.Idled:connect(function()
  114.             vu:Button2Down(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
  115.             wait(1)
  116.             vu:Button2Up(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
  117.             end)
  118.         end
  119.     end)
  120. end