-- [[ Rscripts Risk Notice ]]
-- This script is not verified by rscripts.net. Deal with caution.
--
-- Stay safe:
--   • Never log in on unofficial Roblox sites or lookalike domains.
--   • Real Roblox links use roblox.com (check the .com ending).
--   • Treat fake Roblox login / "claim reward" pages as phishing.
-- [[ End Rscripts Risk Notice ]]
-- Ensure execution within a proper executor context
local CoreGui = game:GetService("CoreGui")
local Players = game:GetService("Players")
local LocalPlayer = Players.LocalPlayer
local Workspace = game:GetService("Workspace")
local ProximityPromptService = game:GetService("ProximityPromptService")

-- Identify best environment target for the UI
local parent = (gethui and gethui()) or CoreGui:FindFirstChild("RobloxGui") or LocalPlayer:WaitForChild("PlayerGui")

-- Clean up any existing instances of this UI
if parent:FindFirstChild("DeltaAnimalESP") then
    parent.DeltaAnimalESP:Destroy()
end

-- ScreenGui Setup
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "DeltaAnimalESP"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = parent

-- Main Window Frame (Expanded size vertically to fit the extra button)
local MainFrame = Instance.new("Frame")
MainFrame.Name = "MainFrame"
MainFrame.Size = UDim2.new(0, 260, 0, 220)
MainFrame.Position = UDim2.new(0.5, -130, 0.5, -110)
MainFrame.BackgroundColor3 = Color3.fromRGB(25, 25, 35)
MainFrame.BorderSizePixel = 0
MainFrame.Parent = ScreenGui

local UICorner = Instance.new("UICorner")
UICorner.CornerRadius = UDim.new(0, 10)
UICorner.Parent = MainFrame

-- Window Header / Title Bar
local TitleBar = Instance.new("TextLabel")
TitleBar.Name = "TitleBar"
TitleBar.Size = UDim2.new(1, 0, 0, 35)
TitleBar.BackgroundColor3 = Color3.fromRGB(40, 40, 55)
TitleBar.Text = "  Animal Rest. Menu Menu"
TitleBar.TextColor3 = Color3.fromRGB(255, 255, 255)
TitleBar.TextSize = 13
TitleBar.Font = Enum.Font.GothamBold
TitleBar.TextXAlignment = Enum.TextXAlignment.Left
TitleBar.Parent = MainFrame

local TitleCorner = Instance.new("UICorner")
TitleCorner.CornerRadius = UDim.new(0, 10)
TitleCorner.Parent = TitleBar

-- Button 1: ESP Control Toggle Button
local ESPButton = Instance.new("TextButton")
ESPButton.Name = "ESPButton"
ESPButton.Size = UDim2.new(0, 220, 0, 40)
ESPButton.Position = UDim2.new(0.5, -110, 0, 55)
ESPButton.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
ESPButton.Text = "MONSTER ESP: DISABLED"
ESPButton.TextColor3 = Color3.fromRGB(255, 255, 255)
ESPButton.TextSize = 11
ESPButton.Font = Enum.Font.GothamBold
ESPButton.Parent = MainFrame

local ButtonCorner = Instance.new("UICorner")
ButtonCorner.CornerRadius = UDim.new(0, 8)
ButtonCorner.Parent = ESPButton

-- Button 2: Auto-Cook Toggle Button
local CookButton = Instance.new("TextButton")
CookButton.Name = "CookButton"
CookButton.Size = UDim2.new(0, 220, 0, 40)
CookButton.Position = UDim2.new(0.5, -110, 0, 110)
CookButton.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
CookButton.Text = "AUTO COOK: DISABLED"
CookButton.TextColor3 = Color3.fromRGB(255, 255, 255)
CookButton.TextSize = 11
CookButton.Font = Enum.Font.GothamBold
CookButton.Parent = MainFrame

local CookCorner = Instance.new("UICorner")
CookCorner.CornerRadius = UDim.new(0, 8)
CookCorner.Parent = CookButton

----------------------------------------------------------------
-- FEATURE 1: ESP System Logic
----------------------------------------------------------------
local espActive = false
local activeHighlights = {}

local function clearESP()
    for model, highlight in pairs(activeHighlights) do
        if highlight and highlight.Parent then
            highlight:Destroy()
        end
    end
    activeHighlights = {}
end

local function updateESP()
    if not espActive then 
        clearESP()
        return 
    end

    for _, obj in pairs(Workspace:GetDescendants()) do
        if obj:IsA("Model") and obj:FindFirstChildOfClass("Humanoid") and obj ~= LocalPlayer.Character then
            if not Players:GetPlayerFromCharacter(obj) then
                if not activeHighlights[obj] or not activeHighlights[obj].Parent then
                    local hl = Instance.new("Highlight")
                    hl.Name = "AnomalyRadarRed"
                    hl.FillColor = Color3.fromRGB(255, 0, 0)
                    hl.FillTransparency = 0.6
                    hl.OutlineColor = Color3.fromRGB(255, 0, 0)
                    hl.OutlineTransparency = 0
                    hl.Adornee = obj
                    hl.Parent = obj
                    activeHighlights[obj] = hl
                end
            end
        end
    end
end

ESPButton.MouseButton1Click:Connect(function()
    espActive = not espActive
    if espActive then
        ESPButton.Text = "MONSTER ESP: ACTIVE"
        ESPButton.BackgroundColor3 = Color3.fromRGB(46, 204, 113)
        updateESP()
    else
        ESPButton.Text = "MONSTER ESP: DISABLED"
        ESPButton.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
        clearESP()
    end
end)

----------------------------------------------------------------
-- FEATURE 2: Auto-Cook Macro Logic
----------------------------------------------------------------
local autoCookActive = false

-- Actively checks for interaction prompts at kitchen counters or stoves
task.spawn(function()
    while true do
        task.wait(0.1) -- Rapid trigger speed loop
        if autoCookActive then
            for _, prompt in pairs(Workspace:GetDescendants()) do
                if prompt:IsA("ProximityPrompt") then
                    -- Fires prompt interaction automatically if within range or forced
                    prompt:InputHoldBegin()
                    task.wait()
                    prompt:InputHoldEnd()
                end
            end
        end
    end
end)

CookButton.MouseButton1Click:Connect(function()
    autoCookActive = not autoCookActive
    if autoCookActive then
        CookButton.Text = "AUTO COOK: ACTIVE"
        CookButton.BackgroundColor3 = Color3.fromRGB(46, 204, 113)
    else
        CookButton.Text = "AUTO COOK: DISABLED"
        CookButton.BackgroundColor3 = Color3.fromRGB(180, 40, 40)
    end
end)

-- Main Background Persistence Loops
task.spawn(function()
    while true do
        task.wait(1)
        if espActive then
            updateESP()
        end
    end
end)

----------------------------------------------------------------
-- Mobile-Friendly Draggable UI Scripting
----------------------------------------------------------------
local UserInputService = game:GetService("UserInputService")
local dragging, dragInput, dragStart, startPos

TitleBar.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        dragging = true
        dragStart = input.Position
        startPos = MainFrame.Position
        
        input.Changed:Connect(function()
            if input.UserInputState == Enum.UserInputState.End then
                dragging = false
            end
        end)
    end
end)

TitleBar.InputChanged:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        dragInput = input
    end
end)

UserInputService.InputChanged:Connect(function(input)
    if input == dragInput and dragging then
        local delta = input.Position - dragStart
        MainFrame.Position = UDim2.new(
            startPos.X.Scale, 
            startPos.X.Offset + delta.X, 
            startPos.Y.Scale, 
            startPos.Y.Offset + delta.Y
        )
    end
end)