The text below is selected, press Ctrl+C to copy to your clipboard. (⌘+C on Mac) No line numbers will be copied.
Guest
Gems Auto Farm script pastebin roblox
By Gems Auto Farm on 2024-11-12 08:00 am | Syntax: LUA | Views: 13


New Script | Raw | Show/Hide line no. | Copy text to clipboard
  1. --[[
  2.    Royale High Gem farm *UwU* made by Kaid#0001!!! Look below for settings!
  3. ]]--
  4.  
  5. --Seeding random
  6. math.randomseed(tick())
  7.  
  8. --Settings
  9. local collectDelay = .05 + (math.random(1,2)*.1) --Delay for each gem tp
  10. local bypassCaptcha = true --Click the bubble captcha solver
  11. local unsafe = false --Uses possibly unsafe collection method (Lets you still play the game while farming!) (Other note, if you use unsafe other users wont know who's stealing all the diamonds)
  12. local limit = 500000 --Kicks you from the game at X gems (Idk what a good limit is, I don't play this game, it may be way higher / lower than the one provided, no fucking idea)
  13.  
  14. --Script
  15. if _G.farm == nil then
  16.    _G.farm = false
  17.    local specials = {}
  18.    local normals = {}
  19.    
  20.    local plr = game:GetService("Players").LocalPlayer
  21.    local UI = game:GetObjects("rbxassetid://8887653583")[1]
  22.    local tws = game:GetService("TweenService");
  23.    
  24.    if syn and syn.protect_gui then
  25.        syn.protect_gui(UI)
  26.        for i,v in pairs(UI:GetDescendants()) do
  27.            syn.protect_gui(v)
  28.        end
  29.    end
  30.    
  31.    UI.Main.FarmLimit.Text = limit
  32.    
  33.    UI.Main.TotalCash.Text = string.gsub(plr.PlayerGui.HUD.Center.DiamondAmount.Text, ",", "")
  34.    
  35.    for i,v in pairs(UI:GetDescendants()) do
  36.        if v:IsA("UIGradient") then
  37.            v.Offset = Vector2.new(-.5,-.5)
  38.            local twig = TweenInfo.new(4,Enum.EasingStyle.Quad,Enum.EasingDirection.InOut,-1,true,.2)
  39.            local tweeng = tws:Create(v,twig,{["Offset"]=Vector2.new(.5,.5)})
  40.            tweeng:Play()
  41.        end
  42.    end
  43.    
  44.    UI.Main.Toggle.MouseButton1Down:Connect(function(v)
  45.        if _G.farm then
  46.            _G.farm = false
  47.            UI.Main.Toggle.Toggle_Roundify_30px.ImageColor3 = Color3.fromRGB(63, 39, 39)
  48.        else
  49.            _G.farm = true
  50.            UI.Main.Toggle.Toggle_Roundify_30px.ImageColor3 = Color3.fromRGB(43, 63, 39)
  51.        end
  52.    end)
  53.    
  54.    --Drag script by Tiffblox
  55.    local a=game:GetService("UserInputService")local b=UI.Main;local c;local d;local e;local f;local function g(h)local i=h.Position-e;b.Position=UDim2.new(f.X.Scale,f.X.Offset+i.X,f.Y.Scale,f.Y.Offset+i.Y)end;b.InputBegan:Connect(function(h)if h.UserInputType==Enum.UserInputType.MouseButton1 or h.UserInputType==Enum.UserInputType.Touch then c=true;e=h.Position;f=b.Position;h.Changed:Connect(function()if h.UserInputState==Enum.UserInputState.End then c=false end end)end end)b.InputChanged:Connect(function(h)if h.UserInputType==Enum.UserInputType.MouseMovement or h.UserInputType==Enum.UserInputType.Touch then d=h end end)a.InputChanged:Connect(function(h)if h==d and c then g(h)end end)
  56.    
  57.    UI.Name = math.random(10000000,99999999)
  58.    UI.Parent = game:GetService("CoreGui")
  59.    
  60.    local startingCash = UI.Main.TotalCash.Text
  61.    local firstMinCash = tonumber(UI.Main.TotalCash.Text)
  62.    
  63.    local function a()
  64.        while wait(60) do
  65.            UI.Main.HourlyCash.Text = tostring((tonumber(UI.Main.TotalCash.Text) - firstMinCash)*60)
  66.            firstMinCash = tonumber(UI.Main.TotalCash.Text)
  67.        end
  68.    end
  69.    
  70.    coroutine.wrap(a)()
  71.    
  72.    game:GetService("ReplicatedStorage").Network.Events.Gui.Currency.Update.OnClientEvent:Connect(function(value)
  73.     UI.Main.TotalCash.Text = value
  74.     UI.Main.FarmedCash.Text = tonumber(value) - tonumber(startingCash)
  75.    
  76.     if tonumber(value) > limit then
  77.         plr:Kick("\n[Kaid's Autofarm]\nYou hit/exceeded the limit specified in your limit variable\nEither spend your gems now or increase your limit variable!\n(This is to prevent supposed trade-bans)")
  78.        end
  79.    end)
  80.    
  81.    --Antiafk https://v3rmillion.net/showthread.php?tid=772135
  82.    local vu = game:GetService("VirtualUser")
  83.    plr.Idled:connect(function()
  84.        vu:Button2Down(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
  85.        wait(1)
  86.        vu:Button2Up(Vector2.new(0,0),workspace.CurrentCamera.CFrame)
  87.    end)
  88.    
  89.    if bypassCaptcha then
  90.        plr.PlayerGui.CaptchaGui:GetPropertyChangedSignal("Enabled"):Connect(function()
  91.            wait(1)
  92.            if plr.PlayerGui.CaptchaGui.Enabled then
  93.                for i,v in pairs(plr.PlayerGui.CaptchaGui.Captcha.FloatArea:GetChildren()) do
  94.                    local absolute = v.AbsoluteSize.X
  95.                    wait(.1)
  96.                    if absolute ~= v.AbsoluteSize.X then
  97.                        for i,v in pairs(getconnections(v.MouseButton1Click)) do
  98.                            v:Fire()
  99.                        end
  100.                        wait(.01)
  101.                        v:Destroy()
  102.                    end
  103.                end
  104.                plr.PlayerGui.CaptchaGui.PopupMessage.Visible = false
  105.                plr.PlayerGui.CaptchaGui.Enabled = false
  106.            end
  107.        end)
  108.    end
  109.    
  110.    for i,v in pairs(game:GetService("Workspace").CollectibleDiamonds:GetChildren()) do
  111.        if v.Name ~= "specialdiamond" then table.insert(specials,v) else table.insert(normals,v) end
  112.    end
  113.    
  114.    while wait(1) do
  115.        while _G.farm and wait() do
  116.            if not unsafe then
  117.                for i,v in pairs(normals) do
  118.                    if not _G.farm then break end
  119.                    for i,v in pairs(specials) do
  120.                        if v.Transparency == 0 then
  121.                            if plr.Character.Humanoid.Sit == true then plr.Character.Humanoid.Sit = false end
  122.                            wait(collectDelay)
  123.                            plr.Character.Humanoid.RootPart.CFrame = CFrame.new(v.CFrame.X,v.CFrame.Y + 2,v.CFrame.Z)
  124.                            for i,v in pairs(v:GetChildren()) do
  125.                                if v:IsA("TouchTransmitter") then
  126.                                    firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,0)
  127.                                    firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,1)
  128.                                end
  129.                            end
  130.                        end
  131.                    end
  132.                    if v.Transparency == 0 then
  133.                        if plr.Character.Humanoid.Sit == true then plr.Character.Humanoid.Sit = false end
  134.                        wait(collectDelay)
  135.                        plr.Character.Humanoid.RootPart.CFrame = CFrame.new(v.CFrame.X,v.CFrame.Y + 2,v.CFrame.Z)
  136.                        for i,v in pairs(v:GetChildren()) do
  137.                            if v:IsA("TouchTransmitter") then
  138.                                firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,0)
  139.                                firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,1)
  140.                            end
  141.                        end
  142.                    end
  143.                end
  144.            else
  145.                for i,v in pairs(specials) do
  146.                    if not _G.farm then break end
  147.                    if v.Transparency == 1 then continue end
  148.                    wait(collectDelay)
  149.                    local old = v.CFrame
  150.                    v.CFrame = plr.Character.Humanoid.RootPart.CFrame
  151.                    for i,v in pairs(v:GetChildren()) do
  152.                        if v:IsA("TouchTransmitter") then
  153.                            firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,0)
  154.                            firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,1)
  155.                        end
  156.                    end
  157.                    wait()
  158.                    v.CFrame = old
  159.                end
  160.                for i,v in pairs(normals) do
  161.                    if not _G.farm then break end
  162.                    if v.Transparency == 1 then continue end
  163.                    wait(collectDelay)
  164.                    local old = v.CFrame
  165.                    v.CFrame = plr.Character.Humanoid.RootPart.CFrame
  166.                    for i,v in pairs(v:GetChildren()) do
  167.                        if v:IsA("TouchTransmitter") then
  168.                            firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,0)
  169.                            firetouchinterest(plr.Character.Humanoid.RootPart,v.Parent,1)
  170.                        end
  171.                    end
  172.                    wait()
  173.                    v.CFrame = old
  174.                end
  175.            end
  176.        end
  177.    end
  178. end