Sail for Brainrots Autofarm Keyless

local SimpleLib = loadstring(game:HttpGet("https://raw.githubusercontent.com/IcantAffordSynapse/SimpleLib/refs/heads/main/SimpleLib.lua"))()

local Window = SimpleLib:Window("lol haha sub to vaehz")
local AutoTab = Window:AddSection("Autofarm")
local MiscTab = Window:AddSection("Misc")

local player = game:GetService("Players").LocalPlayer
local zonesFold = workspace.Zones

getgenv().Farming = false
getgenv().Selling = false
getgenv().ChosenZone = nil
getgenv().MaxPrice = 0

local function parseValue(str)
    local suffixes = {
        K = 1e3,
        M = 1e6,
        B = 1e9,
        T = 1e12,
        Q = 1e15,
    }
    
    local num, suffix = str:match("^([%d%.]+)([A-Za-z]*)")
    
    if not num then return 0 end
    
    num = tonumber(num) or 0
    suffix = suffix:upper()
    
    if suffixes[suffix] then
        return num * suffixes[suffix]
    end
    
    return num
end

AutoTab:TextBox("Farm Zone (1-13)", 1, function(str)
    getgenv().ChosenZone = zonesFold["Zone" .. str]
end)

AutoTab:Toggle("Autofarm", false, function(bool)
    if bool then
        getgenv().Farming = true

        while getgenv().Farming do
            local char = player.Character
            if not char then continue end

            for _, brainrot in pairs(getgenv().ChosenZone.Objects:GetChildren()) do
                if not getgenv().Farming then return end

                char:MoveTo(brainrot.PrimaryPart.Position)
                repeat
                    fireproximityprompt(brainrot.ProximityPrompt)
                    task.wait()
                until brainrot == nil or brainrot.Parent ~= getgenv().ChosenZone.Objects

                char:MoveTo(workspace.Bases[player.Name].Root.Position)
                task.wait(0.5)
            end

            task.wait(1)
        end
    else
        getgenv().Farming = false
    end
end)

AutoTab:TextBox("Max Price (number)", 1, function(str)
    getgenv().MaxPrice = tonumber(str)
end)

AutoTab:Toggle("Autosell", false, function(bool)
    if bool then
        getgenv().Selling = true

        while getgenv().Selling do
            local char = player.Character
            if not char then continue end

            for _, brainrot in pairs(player.Backpack:GetChildren()) do
                if brainrot.Name == "Bat" then continue end
                spawn(function()
                    pcall(function()
                        if parseValue(brainrot.Handle.ObjectInfo.Value.ValueLabel.Text) <= getgenv().MaxPrice then
                            local Event = game:GetService("ReplicatedStorage").Shared.Classes.RemoteFunction.Remotes.EntityShared_SellEntity
                            Event:InvokeServer(brainrot.Name)
                        end
                    end)
                end)
            end

            task.wait(3)
        end
    else
        getgenv().Selling = false
    end
end)

MiscTab:Button("Redeem Codes", function()
    local codes = {"Stop Looking", "TommysHouse", "Phew", "GoldStatue", "FreeSpin"}

    for i, v in pairs(codes) do
        local Event = game:GetService("ReplicatedStorage").Shared.Classes.RemoteFunction.Remotes.CodeShared_Redeem
        Event:InvokeServer(v)
        task.wait()
    end
end)