treasure hunt2

--[[ DOES NOT WORK WITH THE INFINITE BACKPACK!
    DOES NOT WORK WITH THE INFINITE BACKPACK!
    DOES NOT WORK WITH THE INFINITE BACKPACK!

    Scripting by: OMGGMH
    Gui by: REQUESTED TO BE HIDDEN

    Enjoy this while it lasts. I'm really getting tired of fixing this thing.



    How to use:
    1) Execute with a level 7 LUA NOT LUA-C exploit.
    2) Select the Tool and Backpack you have equipped. It will automatically buy the tool and backpack if you don't own it.
    2) That's it.
]]
local AntiAFK = false -- If enabled the script will press your w key from time to time to prevent idle kick. (REQURIES ELYSIAN OR SYNAPSE TO WORK!)
local Autorebirth = true -- Automatically rebirth when you can.
local TargetedShovel = "Metal Detector" -- The script will automatically buy/equip this shovel when you can.
local TargetedBackpack = "Sand Vault" -- The script will automatically buy/equip this backpack when you can.


local Plrs = game:GetService("Players")
local Run = game:GetService("RunService")
local Rep = game:GetService("ReplicatedStorage")
local Input = game:GetService("UserInputService")
local CoreGui = game:GetService("CoreGui")
local MyPlr = Plrs.LocalPlayer
local MyGui = MyPlr.PlayerGui
local MyPack = MyPlr.Backpack
local MyCoins = MyPlr.leaderstats.Coins
local MyRebirths = MyPlr.leaderstats.Rebirths
local RebirthPrice = math.floor((MyRebirths.Value ^ 1.5 + 1) * 500000)
local MyChar = MyPlr.Character
local Events = Rep.Events

local On = false
local DigSiteAboutToCollapse = false

local ShovelIds = {
    [1] = "Bucket",
    [2] = "Spade",
    [3] = "Toy Shovel",
    [4] = "Small Shovel",
    [5] = "Medium Shovel",
    [6] = "Large Shovel",
    [7] = "Big Scooper",
    [8] = "Vacuum",
    [9] = "Giant Shovel",
    [10] = "Metal Detector",
    [11] = "Jack Hammer",
    [12] = "Golden Spoon",
    [13] = "Dual Scoops",
    [14] = "Drill"
}

local ShovelPrice = {
    [1] = 0,
    [2] = 100,
    [3] = 250,
    [4] = 600,
    [5] = 2100,
    [6] = 8800,
    [7] = 24000,
    [8] = 65000,
    [9] = 250000,
    [10] = 500000,
    [11] = 3000000,
    [12] = 10000000,
    [13] = 220000000,
    [14] = 450000000
}

local BackpackIds = {
    [1] = "Starterpack",
    [2] = "Small Bag",
    [3] = "Medium Bag",
    [4] = "Large Bag",
    [5] = "XL Bag",
    [6] = "XXL Bag",
    [7] = "Sand Safe",
    [8] = "Sand Vault",
    [9] = "Small Canister",
    [10] = "Medium Canister",
    [11] = "Large Canister",
    [12] = "Duffle Bag",
    [13] = "Dual Canister",
    [14] = "Giant Canister",
    [15] = "Magical Fanny Pack"
}

local BackpackPrices = {
    [1] = 0,
    [2] = 150,
    [3] = 375,
    [4] = 900,
    [5] = 3150,
    [6] = 13200,
    [7] = 150000,
    [8] = 350000,
    [9] = 1500000,
    [10] = 4000000,
    [11] = 8000000,
    [12] = 12000000,
    [13] = 24000000,
    [14] = 48000000,
    [15] = 100000000
}

function GetTool()
    local tool = MyPack:FindFirstChildOfClass("Tool")
    return tool
end

function GetBackpack()
    local pack = MyChar:FindFirstChildOfClass("Model")
    if pack then
        return pack
    end

    return nil
end

local EquipedShovel = GetTool().Name

local EquipedBackpack = GetBackpack().Name

local SelectedShovel = EquipedShovel

local SelectedBackpack = EquipedBackpack

function GetBestSandBlock()
    local best = { }
    local bestblock = workspace.SandBlocks:GetChildren()[math.random(1, #workspace.SandBlocks:GetChildren())]

    local b = workspace.SandBlocks:GetChildren()
    for i, v in pairs(b) do
        local h = v:FindFirstChild("Health")
        if h and v.Material == Enum.Material.Sand then
            if h.Value > 50 then
                table.insert(best, v)
            end
        end
    end

    for i, v in next, best do
        if bestblock == nil then
            bestblock = v
        else
            if bestblock.Health.Value < v.Health.Value then
                bestblock = v
            end
        end
    end

    return bestblock
end

function BackpackFull()
    local FindBackpack = GetBackpack()
    if FindBackpack then
        local GUI = FindBackpack.Counter.SurfaceGui.TextLabel
        local CurSand, MaxSand = string.match(GUI.Text, "(%d+)/(%d+)")

        if FindBackpack.Name == "Infinite" then
            CurSand = MyPlr.leaderstats.Sand.Value
            MaxSand = 999999999
        end

        MaxSand = tonumber(MaxSand)
        if tonumber(CurSand) >= MaxSand then
            print("BACKPACK FULL")
            return true
        else
            return false
        end
    end

    return false
end

function BuyItem(i)
    local Owned = Events.CheckIfOwned:InvokeServer(i)
    if not Owned then
        Events.Checkout:FireServer(i)
    end
end

function EquipBackpack(s)
    Events.EquipBackpack:FireServer(s)
    EquipedBackpack = s
end

function EquipTool(s)
    local get = nil
    repeat
        get = MyPack:FindFirstChild(s) or MyChar:FindFirstChild(s)
        wait()
    until get ~= nil
    if get.Parent == MyPack then
        get.Parent = MyChar
    end

    return get
end

function Rebirth()
    print("REBIRTH COST: " .. tostring(RebirthPrice))
    if MyCoins.Value >= RebirthPrice then
        local tool = MyChar:FindFirstChild(EquipedShovel)
        if tool then
            tool.Parent = MyPack
        end
        Events.Rebirth:FireServer()
        repeat
            wait()
        until MyPack:FindFirstChild("Bucket")
        EquipedShovel = "Bucket"
        EquipedBackpack = "Starterpack"
    end
end

function BuyAndEquip(Fuck_My_Shitty_Coding)
    if Fuck_My_Shitty_Coding == nil then
        if EquipedShovel ~= TargetedShovel then
            for i, v in next, ShovelIds do
                if v == TargetedShovel then
                    local Owned = Events.CheckIfOwned:InvokeServer(TargetedShovel)
                    if not Owned then
                        if MyCoins.Value >= ShovelPrice[i] then
                            BuyItem(v)
                            Events.EquipShovel:FireServer(TargetedShovel)
                            EquipedShovel = TargetedShovel
                            EquipTool(v)
                            break
                        end
                    else
                        Events.EquipShovel:FireServer(TargetedShovel)
                        EquipedShovel = TargetedShovel
                    end
                end
            end
        end

        if EquipedBackpack ~= TargetedBackpack then
            for i, v in next, BackpackIds do
                if v == TargetedBackpack then
                    if MyCoins.Value >= BackpackPrices[i] then
                        BuyItem(v)
                        EquipBackpack(v)
                        break
                    end
                end
            end
        end
    else
        for i, v in next, ShovelIds do
            if v == Fuck_My_Shitty_Coding then
                local Owned = Events.CheckIfOwned:InvokeServer(Fuck_My_Shitty_Coding)
                if not Owned then
                    if MyCoins.Value >= ShovelPrice[i] then
                        BuyItem(v)
                        EquipTool(Fuck_My_Shitty_Coding)
                        EquipedShovel = Fuck_My_Shitty_Coding
                        break
                    end
                else
                    Events.EquipShovel:FireServer(Fuck_My_Shitty_Coding)
                    EquipedShovel = Fuck_My_Shitty_Coding
                end
            end
        end

        for i, v in next, BackpackIds do
            if v == Fuck_My_Shitty_Coding then
                EquipBackpack(Fuck_My_Shitty_Coding)
                if MyCoins.Value >= BackpackPrices[i] then
                    BuyItem(v)
                    EquipBackpack(Fuck_My_Shitty_Coding)
                    break
                end
            end
        end
    end
end

function MineSandBlock(Block, Tool)
    local FindHealth = Block:FindFirstChild("Health")
    if Block.Material == Enum.Material.Plastic then
        Tool.RemoteClick:FireServer(Block)
        return
    end

    if FindHealth then
        local MyTor = MyChar:FindFirstChild("HumanoidRootPart")
        if not MyTor then return end
        Tool.Parent = MyChar
        if BackpackFull() then
            MyTor.CFrame = CFrame.new(Vector3.new(-33.463, 20.608, -13.357))
            return
        end
        MyTor.CFrame = Block.CFrame
        Tool.RemoteClick:FireServer(Block)
    else
        return
    end
end

function GetPrice(s)
    local price = 0

    for i, v in next, BackpackIds do
        if v == s then
            return BackpackPrices[i]
        end
    end

    for i, v in next, ShovelIds do
        if v == s then
            return ShovelPrice[i]
        end
    end

    return price
end

function Init()
    -- Objects

    local TreasureHuntGUI = Instance.new("ScreenGui")
    local MainFrame = Instance.new("Frame")
    local title = Instance.new("TextLabel")
    local design = Instance.new("Frame")
    local buttons = Instance.new("Frame")
    local toolSelectionFrame = Instance.new("Frame")
    local toolSelectionText = Instance.new("TextLabel")
    local toolSelectionRight_B = Instance.new("ImageButton")
    local toolSelectionLeft_B = Instance.new("ImageButton")
    local backpackSelectionFrame = Instance.new("Frame")
    local backpackSelectionText = Instance.new("TextLabel")
    local backpackSelectionRight_B = Instance.new("ImageButton")
    local backpackSelectionLeft_B = Instance.new("ImageButton")
    local buyequiptoolbackpack_B = Instance.new("TextButton")
    local toggleautomine_B = Instance.new("TextButton")
    local toggleantiafk_B = Instance.new("TextButton")

    -- Properties

    TreasureHuntGUI.Name = "TreasureHuntGUI"
    TreasureHuntGUI.Parent = CoreGui
    TreasureHuntGUI.ResetOnSpawn = false

    MainFrame.Name = "MainFrame"
    MainFrame.Parent = TreasureHuntGUI
    MainFrame.Active = true
    MainFrame.BackgroundColor3 = Color3.new(0.164706, 0.172549, 0.192157)
    MainFrame.BorderSizePixel = 0
    MainFrame.Draggable = true
    MainFrame.LayoutOrder = 2
    MainFrame.Position = UDim2.new(0.5, -150, 0.5, -105)
    MainFrame.Size = UDim2.new(0, 300, 0, 247)

    title.Name = "title"
    title.Parent = MainFrame
    title.BackgroundColor3 = Color3.new(1, 1, 1)
    title.BackgroundTransparency = 1
    title.Size = UDim2.new(1, 0, 0, 40)
    title.Font = Enum.Font.SourceSansBold
    title.Text = "Treasure Hunt Simulator Exploit \nby Racist Dolphin#5199"
    title.TextColor3 = Color3.new(1, 1, 1)
    title.TextSize = 14

    design.Name = "design"
    design.Parent = MainFrame
    design.BackgroundColor3 = Color3.new(0.258824, 0.270588, 0.286275)
    design.BorderSizePixel = 0
    design.Position = UDim2.new(0, 5, 0, 45)
    design.Size = UDim2.new(1, -10, 0, 1)

    buttons.Name = "buttons"
    buttons.Parent = MainFrame
    buttons.BackgroundColor3 = Color3.new(1, 1, 1)
    buttons.BackgroundTransparency = 1
    buttons.Position = UDim2.new(0, 10, 0, 50)
    buttons.Size = UDim2.new(1, -20, 1, -60)

    toolSelectionFrame.Name = "toolSelectionFrame"
    toolSelectionFrame.Parent = buttons
    toolSelectionFrame.BackgroundColor3 = Color3.new(1, 1, 1)
    toolSelectionFrame.BackgroundTransparency = 1
    toolSelectionFrame.Size = UDim2.new(1, 0, 0, 40)

    toolSelectionText.Name = "toolSelectionText"
    toolSelectionText.Parent = toolSelectionFrame
    toolSelectionText.BackgroundColor3 = Color3.new(0.282353, 0.294118, 0.317647)
    toolSelectionText.BorderSizePixel = 0
    toolSelectionText.Position = UDim2.new(0.5, -85, 0.5, -15)
    toolSelectionText.Size = UDim2.new(0, 170, 0, 30)
    toolSelectionText.Font = Enum.Font.SourceSans
    toolSelectionText.Text =  EquipedShovel .. "($" .. tostring(GetPrice(EquipedShovel)) .. ")"
    toolSelectionText.TextColor3 = Color3.new(0.694118, 0.705882, 0.72549)
    toolSelectionText.TextSize = 18

    toolSelectionRight_B.Name = "toolSelectionRight_B"
    toolSelectionRight_B.Parent = toolSelectionFrame
    toolSelectionRight_B.BackgroundColor3 = Color3.new(1, 1, 1)
    toolSelectionRight_B.BackgroundTransparency = 1
    toolSelectionRight_B.Position = UDim2.new(1, -35, 0.5, -15)
    toolSelectionRight_B.Size = UDim2.new(0, 30, 0, 30)
    toolSelectionRight_B.Image = "rbxassetid://1380733312"
    toolSelectionRight_B.ImageColor3 = Color3.new(0.494118, 0.501961, 0.517647)

    toolSelectionLeft_B.Name = "toolSelectionLeft_B"
    toolSelectionLeft_B.Parent = toolSelectionFrame
    toolSelectionLeft_B.BackgroundColor3 = Color3.new(1, 1, 1)
    toolSelectionLeft_B.BackgroundTransparency = 1
    toolSelectionLeft_B.Position = UDim2.new(0, 5, 0.5, -15)
    toolSelectionLeft_B.Size = UDim2.new(0, 30, 0, 30)
    toolSelectionLeft_B.Image = "rbxassetid://1380733079"
    toolSelectionLeft_B.ImageColor3 = Color3.new(0.494118, 0.501961, 0.517647)

    backpackSelectionFrame.Name = "backpackSelectionFrame"
    backpackSelectionFrame.Parent = buttons
    backpackSelectionFrame.BackgroundColor3 = Color3.new(1, 1, 1)
    backpackSelectionFrame.BackgroundTransparency = 1
    backpackSelectionFrame.Position = UDim2.new(0, 0, 0, 40)
    backpackSelectionFrame.Size = UDim2.new(1, 0, 0, 40)

    backpackSelectionText.Name = "backpackSelectionText"
    backpackSelectionText.Parent = backpackSelectionFrame
    backpackSelectionText.BackgroundColor3 = Color3.new(0.282353, 0.294118, 0.317647)
    backpackSelectionText.BorderSizePixel = 0
    backpackSelectionText.Position = UDim2.new(0.5, -85, 0.5, -15)
    backpackSelectionText.Size = UDim2.new(0, 170, 0, 30)
    backpackSelectionText.Font = Enum.Font.SourceSans
    backpackSelectionText.Text = EquipedBackpack .. "($" .. tostring(GetPrice(EquipedBackpack)) .. ")"
    backpackSelectionText.TextColor3 = Color3.new(0.694118, 0.705882, 0.72549)
    backpackSelectionText.TextSize = 18

    backpackSelectionRight_B.Name = "backpackSelectionRight_B"
    backpackSelectionRight_B.Parent = backpackSelectionFrame
    backpackSelectionRight_B.BackgroundColor3 = Color3.new(1, 1, 1)
    backpackSelectionRight_B.BackgroundTransparency = 1
    backpackSelectionRight_B.Position = UDim2.new(1, -35, 0.5, -15)
    backpackSelectionRight_B.Size = UDim2.new(0, 30, 0, 30)
    backpackSelectionRight_B.Image = "rbxassetid://1380733312"
    backpackSelectionRight_B.ImageColor3 = Color3.new(0.494118, 0.501961, 0.517647)

    backpackSelectionLeft_B.Name = "backpackSelectionLeft_B"
    backpackSelectionLeft_B.Parent = backpackSelectionFrame
    backpackSelectionLeft_B.BackgroundColor3 = Color3.new(1, 1, 1)
    backpackSelectionLeft_B.BackgroundTransparency = 1
    backpackSelectionLeft_B.Position = UDim2.new(0, 5, 0.5, -15)
    backpackSelectionLeft_B.Size = UDim2.new(0, 30, 0, 30)
    backpackSelectionLeft_B.Image = "rbxassetid://1380733079"
    backpackSelectionLeft_B.ImageColor3 = Color3.new(0.494118, 0.501961, 0.517647)

    buyequiptoolbackpack_B.Name = "buyequiptoolbackpack_B"
    buyequiptoolbackpack_B.Parent = buttons
    buyequiptoolbackpack_B.BackgroundColor3 = Color3.new(0.282353, 0.294118, 0.317647)
    buyequiptoolbackpack_B.BorderSizePixel = 0
    buyequiptoolbackpack_B.Position = UDim2.new(0, 0, 0, 85)
    buyequiptoolbackpack_B.Size = UDim2.new(1, 0, 0, 30)
    buyequiptoolbackpack_B.Font = Enum.Font.SourceSansBold
    buyequiptoolbackpack_B.Text = "Buy & Equip Shovel"
    buyequiptoolbackpack_B.TextColor3 = Color3.new(0.694118, 0.705882, 0.72549)
    buyequiptoolbackpack_B.TextSize = 18

    toggleautomine_B.Name = "toggleautomine_B"
    toggleautomine_B.Parent = buttons
    toggleautomine_B.BackgroundColor3 = Color3.new(0.282353, 0.294118, 0.317647)
    toggleautomine_B.BorderSizePixel = 0
    toggleautomine_B.Position = UDim2.new(0, 0, 0, 120)
    toggleautomine_B.Size = UDim2.new(1, 0, 0, 30)
    toggleautomine_B.Font = Enum.Font.SourceSansBold
    toggleautomine_B.Text = "Toggle Auto Mine"
    toggleautomine_B.TextColor3 = Color3.new(0.694118, 0.705882, 0.72549)
    toggleautomine_B.TextSize = 18

    toggleantiafk_B.Name = "toggleantiafk_B"
    toggleantiafk_B.Parent = buttons
    toggleantiafk_B.BackgroundColor3 = Color3.new(0.282353, 0.294118, 0.317647)
    toggleantiafk_B.BorderSizePixel = 0
    toggleantiafk_B.Position = UDim2.new(0, 0, 0, 155)
    toggleantiafk_B.Size = UDim2.new(1, 0, 0, 30)
    toggleantiafk_B.Font = Enum.Font.SourceSansBold
    toggleantiafk_B.Text = "Toggle Anti-AFK"
    toggleantiafk_B.TextColor3 = Color3.new(0.694118, 0.705882, 0.72549)
    toggleantiafk_B.TextSize = 18

    toolSelectionRight_B.MouseButton1Click:connect(function()
        if SelectedShovel == "Bucket" then
            SelectedShovel = "Spade"
        elseif SelectedShovel == "Spade" then
            SelectedShovel = "Toy Shovel"
        elseif SelectedShovel == "Toy Shovel" then
            SelectedShovel = "Small Shovel"
        elseif SelectedShovel == "Small Shovel" then
            SelectedShovel = "Medium Shovel"
        elseif SelectedShovel == "Medium Shovel" then
            SelectedShovel = "Large Shovel"
        elseif SelectedShovel == "Large Shovel" then
            SelectedShovel = "Big Scooper"
        elseif SelectedShovel == "Big Scooper" then
            SelectedShovel = "Vacuum"
        elseif SelectedShovel == "Vacuum" then
            SelectedShovel = "Giant Shovel"
        elseif SelectedShovel == "Giant Shovel" then
            SelectedShovel = "Metal Detector"
        elseif SelectedShovel == "Metal Detector" then
            SelectedShovel = "Jack Hammer"
        elseif SelectedShovel == "Jack Hammer" then
            SelectedShovel = "Golden Spoon"
        elseif SelectedShovel == "Golden Spoon" then
            SelectedShovel = "Dual Scoops"
        elseif SelectedShovel == "Dual Scoops" then
            SelectedShovel = "Drill"
        elseif SelectedShovel == "Drill" then
            SelectedShovel = "Bucket"
        end

        toolSelectionText.Text = SelectedShovel .. " ($" .. tostring(GetPrice(SelectedShovel)) .. ")"
    end)

    toolSelectionLeft_B.MouseButton1Click:connect(function()
        if SelectedShovel == "Bucket" then
            SelectedShovel = "Drill"
        elseif SelectedShovel == "Drill" then
            SelectedShovel = "Dual Scoops"
        elseif SelectedShovel == "Dual Scoops" then
            SelectedShovel = "Golden Spoon"
        elseif SelectedShovel == "Golden Spoon" then
            SelectedShovel = "Jack Hammer"
        elseif SelectedShovel == "Jack Hammer" then
            SelectedShovel = "Metal Detector"
        elseif SelectedShovel == "Metal Detector" then
            SelectedShovel = "Giant Shovel"
        elseif SelectedShovel == "Giant Shovel" then
            SelectedShovel = "Vacuum"
        elseif SelectedShovel == "Vacuum" then
            SelectedShovel = "Big Scooper"
        elseif SelectedShovel == "Big Scooper" then
            SelectedShovel = "Large Shovel"
        elseif SelectedShovel == "Large Shovel" then
            SelectedShovel = "Medium Shovel"
        elseif SelectedShovel == "Medium Shovel" then
            SelectedShovel = "Small Shovel"
        elseif SelectedShovel == "Small Shovel" then
            SelectedShovel = "Toy Shovel"
        elseif SelectedShovel == "Toy Shovel" then
            SelectedShovel = "Spade"
        elseif SelectedShovel == "Spade" then
            SelectedShovel = "Bucket"
        end

        toolSelectionText.Text = SelectedShovel .. " ($" .. tostring(GetPrice(SelectedShovel)) .. ")"
    end)

    backpackSelectionRight_B.MouseButton1Click:connect(function()
        if SelectedBackpack == "Starterpack" then
            SelectedBackpack = "Small Bag"
        elseif SelectedBackpack == "Small Bag" then
            SelectedBackpack = "Medium Bag"
        elseif SelectedBackpack == "Medium Bag" then
            SelectedBackpack = "Large Bag"
        elseif SelectedBackpack == "Large Bag" then
            SelectedBackpack = "XL Bag"
        elseif SelectedBackpack == "XL Bag" then
            SelectedBackpack = "XXL Bag"
        elseif SelectedBackpack == "XXL Bag" then
            SelectedBackpack = "Sand Safe"
        elseif SelectedBackpack == "Sand Safe" then
            SelectedBackpack = "Sand Vault"
        elseif SelectedBackpack == "Sand Vault" then
            SelectedBackpack = "Small Canister"
        elseif SelectedBackpack == "Small Canister" then
            SelectedBackpack = "Medium Canister"
        elseif SelectedBackpack == "Medium Canister" then
            SelectedBackpack = "Large Canister"
        elseif SelectedBackpack == "Large Canister" then
            SelectedBackpack = "Duffle Bag"
        elseif SelectedBackpack == "Duffle Bag" then
            SelectedBackpack = "Dual Canister"
        elseif SelectedBackpack == "Dual Canister" then
            SelectedBackpack = "Giant Canister"
        elseif SelectedBackpack == "Giant Canister" then
            SelectedBackpack = "Magical Fanny Pack"
        elseif SelectedBackpack == "Magical Fanny Pack" then
            SelectedBackpack = "Starterpack"
        end

        backpackSelectionText.Text = SelectedBackpack .. "($" .. tostring(GetPrice(SelectedBackpack)) .. ")"
    end)

    backpackSelectionLeft_B.MouseButton1Click:connect(function()
        if SelectedBackpack == "Starterpack" then
            SelectedBackpack = "Magical Fanny Pack"
        elseif SelectedBackpack == "Magical Fanny Pack" then
            SelectedBackpack = "Giant Canister"
        elseif SelectedBackpack == "Giant Canister" then
            SelectedBackpack = "Dual Canister"
        elseif SelectedBackpack == "Dual Canister" then
            SelectedBackpack = "Duffle Bag"
        elseif SelectedBackpack == "Duffle Bag" then
            SelectedBackpack = "Large Canister"
        elseif SelectedBackpack == "Large Canister" then
            SelectedBackpack = "Medium Canister"
        elseif SelectedBackpack == "Medium Canister" then
            SelectedBackpack = "Small Canister"
        elseif SelectedBackpack == "Small Canister" then
            SelectedBackpack = "Sand Vault"
        elseif SelectedBackpack == "Sand Vault" then
            SelectedBackpack = "Sand Safe"
        elseif SelectedBackpack == "Sand Safe" then
            SelectedBackpack = "XXL Bag"
        elseif SelectedBackpack == "XXL Bag" then
            SelectedBackpack = "XL Bag"
        elseif SelectedBackpack == "XL Bag" then
            SelectedBackpack = "Large Bag"
        elseif SelectedBackpack == "Large Bag" then
            SelectedBackpack = "Medium Bag"
        elseif SelectedBackpack == "Medium Bag" then
            SelectedBackpack = "Small Bag"
        elseif SelectedBackpack == "Small Bag" then
            SelectedBackpack = "Starterpack"
        end

        backpackSelectionText.Text = SelectedBackpack .. "($" .. tostring(GetPrice(SelectedBackpack)) .. ")"
    end)

    buyequiptoolbackpack_B.MouseButton1Click:connect(function()
        BuyAndEquip(SelectedBackpack)
        BuyAndEquip(SelectedShovel)
    end)

    toggleautomine_B.MouseButton1Click:connect(function()
        On = not On
        if On then
            toggleautomine_B.BackgroundColor3 = Color3.new(0, 116 / 255, 4 / 255)
        else
            local MyTor = MyChar:FindFirstChild("HumanoidRootPart")
            if MyTor then
                MyTor.CFrame = CFrame.new(Vector3.new(-33.463, 20.608, -13.357))
            end
            toggleautomine_B.BackgroundColor3 = Color3.new(72 / 255, 75 / 255, 81 / 255)
        end
    end)

    toggleantiafk_B.MouseButton1Click:connect(function()
        AntiAFK = not AntiAFK
        if AntiAFK then
            toggleantiafk_B.BackgroundColor3 = Color3.new(0, 116 / 255, 4 / 255)
        else
            toggleantiafk_B.BackgroundColor3 = Color3.new(72 / 255, 75 / 255, 81 / 255)
        end
    end)
end

Init()

local succ, out = coroutine.resume(coroutine.create(function()
    while true do
        if AntiAFK then
            pcall(function() keypress(0x57) keyrelease(0x57) end)
        end

        RebirthPrice = math.floor((MyRebirths.Value ^ 1.5 + 1) * 500000)
        MyChar = MyPlr.Character
        if On and not workspace.Settings.Closed.Value then
            if Autorebirth then
                Rebirth()
            end

            if EquipedShovel ~= TargetedShovel or EquipedBackpack ~= TargetedBackpack then
                BuyAndEquip()
            end

            local tool = EquipTool(EquipedShovel)
            if tool ~= nil then
                local sandblock = GetBestSandBlock()
                MineSandBlock(sandblock, tool)
            end
        elseif On and workspace.Settings.Closed.Value then
            local tool = EquipTool(EquipedShovel)
            if tool == nil then return end
            if tool.Parent == MyChar then
                tool.Parent = MyPack
            end

            return
        end
        wait(0.25)
    end
end))
if not succ then
    error(out)
end

workspace.SandBlocks.ChildAdded:connect(function(Obj)
    local tool = EquipTool(EquipedShovel)
    if workspace.Settings.Closed.Value then
        if tool.Parent == MyChar then
            tool.Parent = MyPack
        end

        return
    end

    tool.Parent = MyChar
    if Obj.Material == Enum.Material.Plastic then
        MineSandBlock(Obj, tool)
    end
end)