Dig It!

--LoadString:
--loadstring(game:HttpGet("https://pastebin.com/raw/qu5nUSvA",true))()

--Game: https://www.roblox.com/games/5344707538/NEW-BIOMES-Dig-It

--https://detourious.gitbook.io/project-finity/docs
if game:GetService("CoreGui"):FindFirstChild("FinityUI") then
    game.CoreGui.FinityUI:Destroy()
end
local desc = [[
May not work super well on rebirth stages
]]
local plr = game.Players.LocalPlayer
local Finity = loadstring(game:HttpGet("http://finity.vip/scripts/finity_lib.lua"))()
local FinityWindow = Finity.new(true)
FinityWindow.ChangeToggleKey(Enum.KeyCode.Semicolon)
local CreditsCategory = FinityWindow:Category("Credits/Info")
local CreditsCreator = CreditsCategory:Sector("Finity Library Creator:")
local ScriptCredit = CreditsCategory:Sector("Cheat Credit:")
local Description = CreditsCategory:Sector("Description:")
local OC = CreditsCategory:Sector("Open Close Button:")
CreditsCreator:Cheat("Label", "detourious @ v3rmillion.net")
ScriptCredit:Cheat("Label", "brianops16 @ v3rmillion.net")
Description:Cheat("Label", desc)
local Cheats = FinityWindow:Category("Cheats")
local S1 = Cheats:Sector("Main Cheats")
local S2 = Cheats:Sector("Cheat Settings")
local EnumKeys = {'Semicolon','Tab','Equals','Comma','Minus','Period','F1',"F2","F3","F4",'F5',"F6","F7",
"F8","F9","F10","F11","F12",'Q', 'W', 'E', 'R', 'T', 'Y', 'U', 'I', 'O', 'P', 'A', 'S', 'D', 'F', 'G', 'H',
 'J', 'K', 'L', 'Z', 'X', 'C', 'V', 'B', 'N', 'M','Slash','One','Two','Three',"Four","Five","Six","Seven","Eight",
 "Nine","Zero",'BackSlash','RightBracket','LeftBracket'}
OC:Cheat("Dropdown", "(Default ';')", function(Option) --Dropdowns
  print('Current key: '..Option)
    FinityWindow.ChangeToggleKey(Enum.KeyCode[Option])
end, {
    options = EnumKeys
})

local NormalBlocks = {
    ["Starter"] = {"Dirt","Gravel","Stone"},
    ["Snow"] = {"Snow","Ice","Permafrost"},
    ["Sand"] = {"Sand","Silt","Sandstone"},
    ["Lava"] = {"Ash","Basalt","Obsidian"},
    ["Candy"] = {"CottonCandy","RockCandy","Sugar"},
    ["Moon"] = {"LunarSoil","LunarRock","LunarCrust"},
    ["Mars"] = {"MartianSoil","MartianRock","MartianCrust"},
    ["Crystal"] = {"Clay","DeepStone","DeepGranite"},
}

local MineDistance = 25
local Normals = false
local Specials = false
local Percent = 80
local Type = "All Around"
local Changed = false
local Biome = "Starter"
local EventCache = game:GetService("Players")["LocalPlayer"]["PlayerScripts"]["ClientPackage"]["Installer"]["EventCache"]

function Mine(obj)
    local string_1 = "Server";
    local string_2 = "MineBlock";
    local table_1 = {
        [1] = obj.Position.X..'|'..obj.Position.Y..'|'..obj.Position.Z
    };
    local Target = game:GetService("NetworkClient")[""]
    Target:InvokeServer(string_1, string_2, table_1);
end

function BiomeCheck()
    coroutine.resume(coroutine.create(function()
        while _G.on == 1 do
            pcall(function()
                local CurrentPosition = plr.Character.HumanoidRootPart.Position
                local Low,Lowest = nil,1e99
                if (game.Workspace.Starter.DigPit.Wedge.Position - CurrentPosition).Magnitude < Lowest then
                    Lowest = (game.Workspace.Starter.DigPit.Wedge.Position - CurrentPosition).Magnitude
                    Low = "Starter"
                end
                for i,v in pairs(NormalBlocks) do
                    if i ~= "Starter" then
                        local Part = game:GetService("Workspace")["Biomes"][i]["DigPit"]:FindFirstChild("Wedge")
                        if Part and (Part.Position - CurrentPosition).Magnitude < Lowest then
                            Lowest = (Part.Position - CurrentPosition).Magnitude
                            Low = i
                        end
                    end
                end
                Biome = Low
            end)
            wait(.5)
        end
    end))
end

function BlockBiomeCheck()
    for i,v in pairs(game:GetService("Workspace")["Blocks"]:GetChildren()) do
        for a,b in pairs(NormalBlocks[Biome]) do
            if v:FindFirstChild(b) then
                return v
            end
        end
    end
end

function SpecialChecks(obj,pos)
    local Good = true
    local ObjP = obj.Position
    if Type == "All Around" then
        Good = true
    elseif Type == "Up and Down" and not ((ObjP.X > pos.X - 3.1 and ObjP.X < pos.X + 3.1) and (ObjP.Z > pos.Z - 3.1 and ObjP.Z < pos.Z + 3.1)) then
        Good = false
    elseif Type == "AllButUp&Down" and ((ObjP.X > pos.X - 3.1 and ObjP.X < pos.X + 3.1) and (ObjP.Z > pos.Z - 3.1 and ObjP.Z < pos.Z + 3.1)) then
        Good = false
    elseif Type == "Same Level" and not (ObjP.Y > pos.Y - 3 and ObjP.Y < pos.Y + 3) then
        Good = false
    elseif Type == "Above" and (ObjP.Y <= pos.Y - 2) then
        Good = false
    end
    if Good and Normals ~= Specials then
        if Normals and not table.find(NormalBlocks[Biome],obj.Name) then
            Good = false
        elseif Specials and table.find(NormalBlocks[Biome],obj.Name) then
            Good = false
        end
    end
    return Good
end

--------------------------------------------------

S1:Cheat("Checkbox","AutoSell",
function(State)
    if not State then
        _G.on1 = 0
    else
        _G.on1 = 1
        while _G.on1 == 1 do
            wait()
            pcall(function()
                local Gauge = game:GetService("Players")["LocalPlayer"]["PlayerGui"]["GameUI"]["Menu"]["MenuLeft"]["BagGauge"]["Inner"]["Progress"]["Gauge"]
                if Gauge.Size.Width.Scale >= Percent / 100 then
                    local root = plr.Character.HumanoidRootPart
                    local o = root.CFrame
                    root.CFrame = game:GetService("Workspace")["Pads"]["Sell"].CFrame * CFrame.new(0,3,0)
                    EventCache.Sell:Fire(true);
                    repeat wait() until Gauge.Size.Width.Scale <= .08 or not _G.on1
                    EventCache.Sell:Fire(false);
                    root.CFrame = o
                end
            end)
        end
    end
end
)

S1:Cheat("Checkbox","Mine",
function(State)
    if not State then
        _G.on = 0
    else
        _G.on = 1

        BiomeCheck()

        pcall(function()
            while _G.on == 1 do
                game:GetService('RunService').Stepped:wait()

                local Minables = {}
                local CurrentPosition = plr.Character.HumanoidRootPart.Position
                for a,b in pairs(BlockBiomeCheck():GetChildren()) do
                    if b and b:IsA("Part") and (b.Position - CurrentPosition).Magnitude < MineDistance and SpecialChecks(b,CurrentPosition) then
                        table.insert(Minables,b)
                    elseif Changed then
                        break
                    end
                end
                for i,v in pairs(Minables) do
                    if v then
                        Mine(v)
                        if i % 4 == 0 then
                            game:GetService('RunService').Stepped:wait()
                        end
                        if Changed or _G.on == 0 then
                            break
                        end
                    end
                end
                if Type == "Up and Down" then
                    wait()
                end
                if #Minables == 0 then
                    wait(.5)
                end
                Changed = false
            end
        end)
    end
end
)

----------------------------------------------------

S2:Cheat("Slider", "Auto Sell %", function(Value)--Slider
    Percent = Value
end, {min = 10, max = 100, suffix = " %"})

S2:Cheat("Slider", "Mine Distance", function(Value)--Slider
    MineDistance = Value
    Changed = true
end, {min = 0, max = 50, suffix = " studs"})

S2:Cheat("Checkbox","Mine Normals",
function(State)
    if not State then
        Normals = false
        Changed = true
    else
        Normals = true
        Changed = true
    end
end
)

S2:Cheat("Checkbox","Mine Ores",
function(State)
    if not State then
        Specials = false
        Changed = true
    else
        Specials = true
        Changed = true
    end
end
)

S2:Cheat("Dropdown", "Mining Type", function(Option) --Dropdowns
    Type = Option
    Changed = true
end, {
    options = {
        "All Around",
        "Up and Down",
        "AllButUp&Down",
        "Same Level",
        "Above",
    }
})