local player = game.Players.LocalPlayer
local teleporting = false
local successful = 0
local failed = 0
local detectionRadius = 150

if game.CoreGui:FindFirstChild("FoodTPGui") then
    game.CoreGui.FoodTPGui:Destroy()
end

local function notify(title, text)
    pcall(function()
        game.StarterGui:SetCore("SendNotification", {
            Title = title,
            Text = text,
            Duration = 3
        })
    end)
end

local function getCharacter()
    return player.Character or player.CharacterAdded:Wait()
end

local function getFoodParts()
    local parts = {}
    for _, obj in ipairs(workspace:GetDescendants()) do
        if obj:IsA("BasePart") and obj.Name == "new_food" then
            table.insert(parts, obj)
        end
    end
    return parts
end

local function isPlayerNearby(part)
    for _, otherPlayer in ipairs(game.Players:GetPlayers()) do
        if otherPlayer ~= player then
            local char = otherPlayer.Character
            local hrp = char and char:FindFirstChild("HumanoidRootPart")
            if hrp and (hrp.Position - part.Position).Magnitude <= detectionRadius then
                return true
            end
        end
    end
    return false
end

local function teleportToPart(part)
    local char = getCharacter()
    local root = char:FindFirstChild("HumanoidRootPart")
    if root then
        local targetPos = Vector3.new(part.Position.X, root.Position.Y, part.Position.Z)
        root.CFrame = CFrame.new(targetPos)
    end
end

local gui = Instance.new("ScreenGui")
gui.Name = "FoodTPGui"
gui.Parent = game.CoreGui
gui.ResetOnSpawn = false

local dragFrame = Instance.new("Frame")
dragFrame.Size = UDim2.new(0, 220, 0, 180)
dragFrame.Position = UDim2.new(0.5, -110, 0.1, 0)
dragFrame.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
dragFrame.BorderSizePixel = 0
dragFrame.Active = true
dragFrame.Draggable = true
dragFrame.Selectable = true
dragFrame.Parent = gui

local label = Instance.new("TextLabel")
label.Size = UDim2.new(1, 0, 0, 30)
label.Position = UDim2.new(0, 0, 0, 0)
label.BackgroundTransparency = 1
label.Text = "Funny GUI"
label.Font = Enum.Font.GothamBold
label.TextScaled = true
label.TextColor3 = Color3.fromRGB(255, 255, 255)
label.Parent = dragFrame

local button = Instance.new("TextButton")
button.Size = UDim2.new(0, 200, 0, 35)
button.Position = UDim2.new(0.5, -100, 0, 35)
button.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
button.BorderSizePixel = 0
button.Text = "Teleport: OFF"
button.TextColor3 = Color3.fromRGB(255, 255, 255)
button.Font = Enum.Font.GothamBold
button.TextScaled = true
button.Parent = dragFrame

local successLabel = Instance.new("TextLabel")
successLabel.Size = UDim2.new(1, -20, 0, 20)
successLabel.Position = UDim2.new(0, 10, 0, 75)
successLabel.BackgroundTransparency = 1
successLabel.Text = "✅ Successful: 0"
successLabel.Font = Enum.Font.Gotham
successLabel.TextScaled = true
successLabel.TextColor3 = Color3.fromRGB(0, 255, 0)
successLabel.TextXAlignment = Enum.TextXAlignment.Left
successLabel.Parent = dragFrame

local failLabel = Instance.new("TextLabel")
failLabel.Size = UDim2.new(1, -20, 0, 20)
failLabel.Position = UDim2.new(0, 10, 0, 100)
failLabel.BackgroundTransparency = 1
failLabel.Text = "❌ Failed: 0"
failLabel.Font = Enum.Font.Gotham
failLabel.TextScaled = true
failLabel.TextColor3 = Color3.fromRGB(255, 50, 50)
failLabel.TextXAlignment = Enum.TextXAlignment.Left
failLabel.Parent = dragFrame

local radiusLabel = Instance.new("TextLabel")
radiusLabel.Size = UDim2.new(0, 90, 0, 20)
radiusLabel.Position = UDim2.new(0, 10, 0, 125)
radiusLabel.BackgroundTransparency = 1
radiusLabel.Text = "Radius (studs):"
radiusLabel.Font = Enum.Font.Gotham
radiusLabel.TextScaled = true
radiusLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
radiusLabel.TextXAlignment = Enum.TextXAlignment.Left
radiusLabel.Parent = dragFrame

local radiusBox = Instance.new("TextBox")
radiusBox.Size = UDim2.new(0, 100, 0, 20)
radiusBox.Position = UDim2.new(0, 110, 0, 125)
radiusBox.BackgroundColor3 = Color3.fromRGB(70, 70, 70)
radiusBox.TextColor3 = Color3.fromRGB(255, 255, 255)
radiusBox.Font = Enum.Font.Gotham
radiusBox.TextScaled = true
radiusBox.Text = tostring(detectionRadius)
radiusBox.ClearTextOnFocus = false
radiusBox.Parent = dragFrame

radiusBox.FocusLost:Connect(function()
    local num = tonumber(radiusBox.Text)
    if num then
        detectionRadius = math.clamp(num, 1, 9999)
        radiusBox.Text = tostring(detectionRadius)
    else
        radiusBox.Text = tostring(detectionRadius)
    end
end)

button.MouseButton1Click:Connect(function()
    teleporting = not teleporting
    button.Text = "Teleport: " .. (teleporting and "ON" or "OFF")
end)

task.spawn(function()
    while true do
        if teleporting then
            local parts = getFoodParts()
            if #parts > 0 then
                local tries = 10
                while tries > 0 and teleporting do
                    local target = parts[math.random(1, #parts)]
                    if not isPlayerNearby(target) then
                        teleportToPart(target)
                        successful += 1
                        successLabel.Text = "✅ Successful: " .. successful
                        break
                    else
                        failed += 1
                        failLabel.Text = "❌ Failed: " .. failed
                        notify("Failed ❌", "Player too close, skipping...")
                        if failed % 15 == 0 then
                            teleporting = false
                            button.Text = "Teleport: OFF"
                            notify("⚠️ Auto Stop", "15 failed attempts. You can toggle again.")
                            break
                        end
                    end
                    tries -= 1
                end
            end
        end
        task.wait(0.1)
    end
end)