--[[
    made by Claude & DeepSeek
    Sell Lemons Ultimate Auto Farmer
--]]

local Rayfield = loadstring(game:HttpGet('https://sirius.menu/rayfield'))()

local Window = Rayfield:CreateWindow({
    Name = "🍋 Sell Lemons | made by Claude & DeepSeek",
    LoadingTitle = "Loading Premium Features...",
    LoadingSubtitle = "made by Claude & DeepSeek",
    ConfigurationSaving = {Enabled = false},
    KeySystem = false,
})

local MainTab = Window:CreateTab("Main", 4483362458)
local StatsTab = Window:CreateTab("Statistics", 4483362459)

local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer

local userTycoon = nil
for _, v in pairs(workspace:GetChildren()) do
    if v:IsA("Folder") and v.Name:match("Tycoon%d") then
        if v:FindFirstChild("Owner") and v.Owner.Value == LocalPlayer then
            userTycoon = v
            break
        end
    end
end

if not userTycoon then
    Rayfield:Notify({Title = "Error", Content = "Tycoon not found!", Duration = 5})
    return
end

local AutoBuy = false
local AutoUpgrade = false
local AutoFruit = false
local AutoRebirth = false
local AutoEvolve = false
local AutoPowerLevel = false
local AutoSewer = false
local AutoLever = false

local stats = {buys = 0, upgrades = 0, fruit = 0, rebirths = 0, evolves = 0, powerlevels = 0, sewers = 0, levers = 0}

-- AUTO BUY
local function buyAllAffordable()
    for _, obj in ipairs(userTycoon.Purchases:GetDescendants()) do
        if obj:IsA("Model") then
            local shown = obj:GetAttribute("Shown")
            local purchased = obj:GetAttribute("Purchased")
            if shown == true and purchased ~= true then
                local purchase = obj:FindFirstChild("Purchase")
                if purchase and purchase:IsA("RemoteFunction") then
                    pcall(function() purchase:InvokeServer() end)
                    stats.buys = stats.buys + 1
                end
            end
        end
    end
end

task.spawn(function()
    while true do
        task.wait(0.05)
        if AutoBuy then pcall(buyAllAffordable) end
    end
end)

-- AUTO UPGRADE
local upgradeRemotes = {}
local upgradeLevel = {}
local lastUpgradeScan = 0

local function refreshUpgradeRemotes()
    upgradeRemotes = {}
    upgradeLevel = {}
    local purchases = userTycoon:FindFirstChild("Purchases")
    if not purchases then return end
    for _, obj in ipairs(purchases:GetDescendants()) do
        if obj:IsA("RemoteFunction") and obj.Name == "Upgrade" then
            upgradeRemotes[#upgradeRemotes + 1] = obj
        end
    end
end

task.spawn(function()
    while true do
        task.wait(0.25)
        if AutoUpgrade then
            if tick() - lastUpgradeScan > 3 then
                refreshUpgradeRemotes()
                lastUpgradeScan = tick()
            end
            for _, remote in ipairs(upgradeRemotes) do
                if remote.Parent then
                    local lvl = (upgradeLevel[remote] or 0) + 1
                    while lvl <= 100 do
                        local ok, res = pcall(function() return remote:InvokeServer(lvl) end)
                        if (not ok) or res == false then break end
                        upgradeLevel[remote] = lvl
                        stats.upgrades = stats.upgrades + 1
                        lvl = lvl + 1
                    end
                end
            end
        end
    end
end)

-- AUTO POWER LEVEL
local function getPowerLevelRemote()
    local remotes = userTycoon:FindFirstChild("Remotes")
    return remotes and remotes:FindFirstChild("UpgradePowerLevel")
end

task.spawn(function()
    while true do
        task.wait(0.25)
        if AutoPowerLevel then
            local remote = getPowerLevelRemote()
            if remote then
                pcall(function() remote:InvokeServer() stats.powerlevels = stats.powerlevels + 1 end)
            end
        end
    end
end)

-- AUTO REBIRTH
local RebirthGainMultiple = 1.0
local MinPotential = 1
local RebirthCooldown = 2
local RebirthTimeout = 8
local rebirthBusy = false

local function getRebirthRemote()
    local remotes = userTycoon:FindFirstChild("Remotes")
    return remotes and remotes:FindFirstChild("Rebirth")
end

local function getRebirthedSignal()
    local remotes = userTycoon:FindFirstChild("Remotes")
    return remotes and remotes:FindFirstChild("Rebirthed")
end

local NUM_SCALE = {thousand=1e3, million=1e6, billion=1e9, trillion=1e12, quadrillion=1e15, quintillion=1e18, sextillion=1e21, septillion=1e24, octillion=1e27, nonillion=1e30, decillion=1e33, k=1e3, m=1e6, b=1e9, t=1e12, qd=1e15, qn=1e18}

local function parseNumber(s)
    if not s then return nil end
    s = tostring(s):gsub(",", ""):lower()
    local num = s:match("[%d%.]+")
    local val = num and tonumber(num)
    if not val then return nil end
    local word = s:match("[%d%.%s]+([a-z]+)")
    if word and NUM_SCALE[word] then val = val * NUM_SCALE[word] end
    return val
end

local function investorBody()
    local pg = LocalPlayer:FindFirstChildOfClass("PlayerGui")
    local r = pg and pg:FindFirstChild("Rebirth")
    local im = r and r:FindFirstChild("InvestorsMenu")
    return im and im:FindFirstChild("Body")
end

local function readQuantity(frameName)
    local body = investorBody()
    local frame = body and body:FindFirstChild(frameName)
    local q = frame and frame:FindFirstChild("Quantity")
    return q and parseNumber(q.Text)
end

local function getCurrentInvestors() return readQuantity("Amount") or 0 end
local function getPotentialInvestors() return readQuantity("Potential") end

task.spawn(function()
    while true do
        task.wait(0.5)
        if AutoRebirth and not rebirthBusy then
            local remote = getRebirthRemote()
            local potential = getPotentialInvestors()
            local current = getCurrentInvestors()
            local worthIt = remote and potential and potential >= MinPotential and potential >= current * RebirthGainMultiple
            if worthIt then
                rebirthBusy = true
                pcall(function()
                    local done = false
                    local signal = getRebirthedSignal()
                    local conn
                    if signal and signal:IsA("RemoteEvent") then
                        conn = signal.OnClientEvent:Connect(function() done = true end)
                    end
                    remote:InvokeServer()
                    stats.rebirths = stats.rebirths + 1
                    local t = 0
                    while not done and t < RebirthTimeout do
                        task.wait(0.1)
                        t = t + 0.1
                    end
                    if conn then conn:Disconnect() end
                end)
                task.wait(RebirthCooldown)
                rebirthBusy = false
            end
        end
    end
end)

-- AUTO EVOLVE
local EvolveAt = 100
local EvolveCooldown = 2
local EvolveTimeout = 8
local evolveBusy = false

local function getEvolveRemote()
    local remotes = userTycoon:FindFirstChild("Remotes")
    return remotes and remotes:FindFirstChild("Evolve")
end

local function getEvolvedSignal()
    local remotes = userTycoon:FindFirstChild("Remotes")
    return remotes and remotes:FindFirstChild("Evolved")
end

local function getEvolveProgress()
    local pg = LocalPlayer:FindFirstChildOfClass("PlayerGui")
    local r = pg and pg:FindFirstChild("Rebirth")
    local em = r and r:FindFirstChild("EvolutionMenu")
    local body = em and em:FindFirstChild("Body")
    local p = body and body:FindFirstChild("Progress")
    if not p then return nil end
    return tonumber(tostring(p.Text):match("[%d%.]+"))
end

task.spawn(function()
    while true do
        task.wait(0.5)
        if AutoEvolve and not evolveBusy then
            local remote = getEvolveRemote()
            local progress = getEvolveProgress()
            if remote and progress and progress >= EvolveAt then
                evolveBusy = true
                pcall(function()
                    local done = false
                    local signal = getEvolvedSignal()
                    local conn
                    if signal and signal:IsA("RemoteEvent") then
                        conn = signal.OnClientEvent:Connect(function() done = true end)
                    end
                    remote:InvokeServer()
                    stats.evolves = stats.evolves + 1
                    local t = 0
                    while not done and t < EvolveTimeout do
                        task.wait(0.1)
                        t = t + 0.1
                    end
                    if conn then conn:Disconnect() end
                end)
                task.wait(EvolveCooldown)
                evolveBusy = false
            end
        end
    end
end)

-- AUTO LEVER
local function pullAllLevers()
    local char = LocalPlayer.Character
    local hrp = char and char:FindFirstChild("HumanoidRootPart")
    if not hrp then return 0 end
    local map = workspace:FindFirstChild("Map")
    local sewer = map and map:FindFirstChild("Sewer")
    local root = sewer or workspace
    local pulled = 0
    for _, o in ipairs(root:GetDescendants()) do
        if o:IsA("BasePart") and (o.Name == "Lever" or string.find(string.lower(o.Name), "lever", 1, true)) then
            pcall(function()
                firetouchinterest(hrp, o, 0)
                firetouchinterest(hrp, o, 1)
            end)
            pulled = pulled + 1
        end
    end
    if sewer then
        for _, o in ipairs(sewer:GetDescendants()) do
            if o:IsA("BasePart") and (o.Name == "VineKey" or o.Name == "UFOKey") then
                pcall(function()
                    firetouchinterest(hrp, o, 0)
                    firetouchinterest(hrp, o, 1)
                end)
            end
        end
    end
    if pulled > 0 then stats.levers = stats.levers + pulled end
    return pulled
end

task.spawn(function()
    while true do
        task.wait(2)
        if AutoLever then pcall(pullAllLevers) end
    end
end)

-- AUTO SEWER RUN
local function touchPart(hrp, part)
    pcall(function()
        firetouchinterest(hrp, part, 0)
        firetouchinterest(hrp, part, 1)
    end)
end

local function doSewerRun()
    local char = LocalPlayer.Character
    local hrp = char and char:FindFirstChild("HumanoidRootPart")
    if not hrp then return false end
    local map = workspace:FindFirstChild("Map")
    local sewer = map and map:FindFirstChild("Sewer")
    if not sewer then return false end
    for _, o in ipairs(sewer:GetDescendants()) do
        if o:IsA("BasePart") and string.find(string.lower(o.Name), "lever", 1, true) then
            touchPart(hrp, o)
        end
    end
    for _, folderName in ipairs({"CashVine", "SewerAlien"}) do
        local folder = sewer:FindFirstChild(folderName)
        if folder then
            for _, o in ipairs(folder:GetDescendants()) do
                if o:IsA("BasePart") and (o.Name == "VineKey" or o.Name == "UFOKey") then
                    touchPart(hrp, o)
                end
            end
        end
    end
    task.wait(0.3)
    local cashVine = sewer:FindFirstChild("CashVine")
    if cashVine then
        local vineDoor = cashVine:FindFirstChild("VineDoor")
        if vineDoor then
            for _, o in ipairs(vineDoor:GetDescendants()) do
                if o:IsA("BasePart") then touchPart(hrp, o) end
            end
        end
    end
    task.wait(0.3)
    if cashVine then
        local vineModel = cashVine:FindFirstChild("CashVine")
        if vineModel then
            local pivot = vineModel:GetPivot()
            pcall(function() hrp.CFrame = pivot + Vector3.new(0, 3, 0) end)
            task.wait(0.2)
            for _, o in ipairs(vineModel:GetDescendants()) do
                if o:IsA("BasePart") then touchPart(hrp, o) end
            end
        end
    end
    stats.sewers = stats.sewers + 1
    return true
end

task.spawn(function()
    while true do
        task.wait(10)
        if AutoSewer then pcall(doSewerRun) end
    end
end)

-- AUTO FRUIT
local Trees = {}

local function addTree(obj)
    if obj:IsA("Model") and obj.Name == "LemonTree" then
        if not table.find(Trees, obj) then
            table.insert(Trees, obj)
        end
    end
end

local function removeTree(obj)
    local index = table.find(Trees, obj)
    if index then table.remove(Trees, index) end
end

for _, v in ipairs(workspace:GetDescendants()) do addTree(v) end
workspace.DescendantAdded:Connect(addTree)
workspace.DescendantRemoving:Connect(removeTree)

local function noCollisionTree(tree)
    for _, obj in ipairs(tree:GetDescendants()) do
        if obj:IsA("BasePart") then obj.CanCollide = false end
    end
end

local function teleportToTree(tree)
    local character = LocalPlayer.Character
    if not character then return false end
    local hrp = character:FindFirstChild("HumanoidRootPart")
    if not hrp then return false end
    hrp.CFrame = tree:GetPivot() + Vector3.new(0, 5, 0)
    return true
end

local function collectFruit(tree)
    noCollisionTree(tree)
    if not teleportToTree(tree) then return end
    for _, obj in ipairs(tree:GetDescendants()) do
        if obj:IsA("BasePart") and obj.Name == "Fruit" then
            obj.CanCollide = false
            local clickPart = obj:FindFirstChild("ClickPart")
            if clickPart then
                local detector = clickPart:FindFirstChildOfClass("ClickDetector")
                if detector then
                    task.wait(0.2)
                    pcall(function() fireclickdetector(detector) end)
                    stats.fruit = stats.fruit + 1
                end
            end
        end
    end
end

task.spawn(function()
    while true do
        task.wait(0.1)
        if AutoFruit then
            for _, tree in ipairs(Trees) do
                if not AutoFruit then break end
                if tree and tree.Parent then
                    pcall(function() collectFruit(tree) end)
                end
            end
        end
    end
end)

-- CREATE TOGGLES
MainTab:CreateToggle({Name = "🏪 Auto Buy", CurrentValue = false, Flag = "AutoBuy", Callback = function(Value) AutoBuy = Value Rayfield:Notify({Title = "Auto Buy", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Buy", Content = "Automatically purchases all available tycoon items instantly."})

MainTab:CreateToggle({Name = "📈 Auto Upgrade", CurrentValue = false, Flag = "AutoUpgrade", Callback = function(Value) AutoUpgrade = Value Rayfield:Notify({Title = "Auto Upgrade", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Upgrade", Content = "Continuously upgrades all items to maximum level."})

MainTab:CreateToggle({Name = "🍋 Auto Fruit", CurrentValue = false, Flag = "AutoFruit", Callback = function(Value) AutoFruit = Value Rayfield:Notify({Title = "Auto Fruit", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Fruit", Content = "Teleports to lemon trees and collects all fruits."})

MainTab:CreateToggle({Name = "🔄 Auto Rebirth (2x)", CurrentValue = false, Flag = "AutoRebirth", Callback = function(Value) AutoRebirth = Value Rayfield:Notify({Title = "Auto Rebirth", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Rebirth", Content = "Rebirths when profitable for 2x permanent income multiplier."})

MainTab:CreateToggle({Name = "✨ Auto Evolve (10x)", CurrentValue = false, Flag = "AutoEvolve", Callback = function(Value) AutoEvolve = Value Rayfield:Notify({Title = "Auto Evolve", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Evolve", Content = "Evolves when ready for 10x income speed multiplier."})

MainTab:CreateToggle({Name = "⚡ Auto Power Level", CurrentValue = false, Flag = "AutoPowerLevel", Callback = function(Value) AutoPowerLevel = Value Rayfield:Notify({Title = "Auto Power Level", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Power Level", Content = "Continuously upgrades power level for more damage/income."})

MainTab:CreateToggle({Name = "🪤 Auto Lever Puller", CurrentValue = false, Flag = "AutoLever", Callback = function(Value) AutoLever = Value Rayfield:Notify({Title = "Auto Lever", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Lever", Content = "Pulls all sewer levers and collects keys automatically."})

MainTab:CreateToggle({Name = "🧪 Auto Sewer Run", CurrentValue = false, Flag = "AutoSewer", Callback = function(Value) AutoSewer = Value Rayfield:Notify({Title = "Auto Sewer", Content = Value and "Enabled" or "Disabled", Duration = 2}) end})
MainTab:CreateParagraph({Title = "📖 Auto Sewer Run", Content = "Completes full sewer run for massive cash rewards."})

-- STATS DISPLAY
local function updateStatsDisplay()
    return string.format("Buys: %d\nUpgrades: %d\nFruits: %d\nRebirths: %d\nEvolves: %d\nPower Levels: %d\nLevers: %d\nSewer Runs: %d", stats.buys, stats.upgrades, stats.fruit, stats.rebirths, stats.evolves, stats.powerlevels, stats.levers, stats.sewers)
end

StatsTab:CreateParagraph({Title = "📊 Live Statistics - made by Claude & DeepSeek", Content = updateStatsDisplay()})

task.spawn(function()
    while true do
        task.wait(1)
    end
end)

MainTab:CreateParagraph({Title = "👨‍💻 Credits", Content = "made by Claude & DeepSeek"})

Rayfield:Notify({Title = "Loaded!", Content = "Sell Lemons Auto Farmer - made by Claude & DeepSeek", Duration = 3})

print("✅ Script loaded - made by Claude & DeepSeek")