99 Nights in the Forest Scripts August 2025

-- Auto Wood Collector Script
loadstring(game:HttpGet("https://raw.githubusercontent.com/99nightsscripts/main/autowoodv2.lua"))()

-- Alternative method
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer

local function collectWood()
    for _, obj in pairs(workspace:GetDescendants()) do
        if obj.Name == "Wood" and obj:IsA("Part") then
            player.Character.HumanoidRootPart.CFrame = obj.CFrame
            wait(0.1)
            fireproximityprompt(obj.ProximityPrompt)
            wait(0.5)
        end
    end
end

-- Auto collect every 30 seconds
spawn(function()
    while wait(30) do
        collectWood()
    end
end)

-- Auto Scrap Farmer Script
local scrapItems = {"Scrap", "MetalScrap", "ElectronicScrap", "RareScrap"}

local function farmScrap()
    for _, itemName in pairs(scrapItems) do
        for _, obj in pairs(workspace:GetDescendants()) do
            if obj.Name == itemName and obj:IsA("Part") then
                game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = obj.CFrame
                wait(0.2)
                if obj:FindFirstChild("ProximityPrompt") then
                    fireproximityprompt(obj.ProximityPrompt)
                end
                wait(0.3)
            end
        end
    end
end

-- Run every 45 seconds
spawn(function()
    while wait(45) do
        farmScrap()
    end
end)

-- Auto Food Gatherer Script
local foodItems = {"Mushroom", "Berry", "Apple", "Meat"}

local function gatherFood()
    for _, foodType in pairs(foodItems) do
        for _, food in pairs(workspace:GetDescendants()) do
            if food.Name:find(foodType) and food:IsA("Part") then
                game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = food.CFrame
                wait(0.15)
                if food:FindFirstChild("ProximityPrompt") then
                    fireproximityprompt(food.ProximityPrompt)
                end
                wait(0.25)
            end
        end
    end
end

-- Auto eat when hungry
local function autoEat()
    local hunger = game.Players.LocalPlayer.PlayerGui.MainGui.Hunger.Value
    if hunger < 50 then
        -- Auto consume food from inventory
        game:GetService("ReplicatedStorage").Events.EatFood:FireServer()
    end
end

spawn(function()
    while wait(20) do
        gatherFood()
        autoEat()
    end
end)

-- God Mode Script
local Players = game:GetService("Players")
local player = Players.LocalPlayer

-- Method 1: Health manipulation
spawn(function()
    while wait(0.1) do
        if player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
        end
    end
end)

-- Method 2: Damage immunity
local function onDamage(damage)
    return 0
end

if player.Character and player.Character:FindFirstChild("Humanoid") then
    player.Character.Humanoid.HealthChanged:Connect(function(health)
        if health < player.Character.Humanoid.MaxHealth then
            player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
        end
    end)
end

-- Method 3: Advanced god mode
loadstring(game:HttpGet("https://raw.githubusercontent.com/99nightsscripts/main/godmodev3.lua"))()

-- Auto Combat Script
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer

local attackRange = 50
local autoAttackEnabled = true

local function findNearestEnemy()
    local nearestEnemy = nil
    local shortestDistance = attackRange
    
    for _, obj in pairs(workspace:GetDescendants()) do
        if obj.Name:find("Monster") or obj.Name:find("Enemy") or obj.Name:find("Wendigo") then
            if obj:IsA("Model") and obj:FindFirstChild("HumanoidRootPart") then
                local distance = (player.Character.HumanoidRootPart.Position - obj.HumanoidRootPart.Position).Magnitude
                if distance < shortestDistance then
                    nearestEnemy = obj
                    shortestDistance = distance
                end
            end
        end
    end
    
    return nearestEnemy
end

local function attackEnemy(enemy)
    if enemy and enemy:FindFirstChild("HumanoidRootPart") then
        -- Face the enemy
        local lookDirection = (enemy.HumanoidRootPart.Position - player.Character.HumanoidRootPart.Position).Unit
        player.Character.HumanoidRootPart.CFrame = CFrame.lookAt(player.Character.HumanoidRootPart.Position, enemy.HumanoidRootPart.Position)
        
        -- Attack
        game:GetService("ReplicatedStorage").Events.Attack:FireServer()
        wait(0.5)
    end
end

-- Main combat loop
spawn(function()
    while autoAttackEnabled do
        wait(0.1)
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local enemy = findNearestEnemy()
            if enemy then
                attackEnemy(enemy)
            end
        end
    end
end)

-- Infinite Stamina Script
local Players = game:GetService("Players")
local player = Players.LocalPlayer

spawn(function()
    while wait(0.1) do
        if player.PlayerGui:FindFirstChild("MainGui") then
            local staminaBar = player.PlayerGui.MainGui:FindFirstChild("Stamina")
            if staminaBar then
                staminaBar.Value = 100
            end
        end
        
        -- Alternative method
        if player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.WalkSpeed = 25
            player.Character.Humanoid.JumpPower = 50
        end
    end
end)

-- Teleport Script with GUI
local Players = game:GetService("Players")
local player = Players.LocalPlayer

-- Teleport locations
local locations = {
    ["Spawn"] = Vector3.new(0, 5, 0),
    ["Forest Center"] = Vector3.new(100, 5, 100),
    ["Mountain Top"] = Vector3.new(200, 50, 200),
    ["Cave Entrance"] = Vector3.new(-150, 5, -100),
    ["Abandoned House"] = Vector3.new(50, 5, -200),
    ["Resource Area"] = Vector3.new(-200, 5, 150)
}

-- Create GUI
local screenGui = Instance.new("ScreenGui")
local frame = Instance.new("Frame")
local title = Instance.new("TextLabel")

screenGui.Parent = player.PlayerGui
frame.Parent = screenGui
frame.Size = UDim2.new(0, 300, 0, 400)
frame.Position = UDim2.new(0, 50, 0, 50)
frame.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
frame.BorderSizePixel = 0

title.Parent = frame
title.Size = UDim2.new(1, 0, 0, 50)
title.Text = "Teleport Menu"
title.TextColor3 = Color3.new(1, 1, 1)
title.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
title.Font = Enum.Font.SourceSansBold
title.TextSize = 18

-- Create teleport buttons
local yPos = 60
for locationName, position in pairs(locations) do
    local button = Instance.new("TextButton")
    button.Parent = frame
    button.Size = UDim2.new(0.9, 0, 0, 40)
    button.Position = UDim2.new(0.05, 0, 0, yPos)
    button.Text = "Teleport to " .. locationName
    button.TextColor3 = Color3.new(1, 1, 1)
    button.BackgroundColor3 = Color3.new(0.3, 0.3, 0.3)
    button.Font = Enum.Font.SourceSans
    button.TextSize = 14
    
    button.MouseButton1Click:Connect(function()
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            player.Character.HumanoidRootPart.CFrame = CFrame.new(position)
        end
    end)
    
    yPos = yPos + 50
end

-- Click to teleport function
local mouse = player:GetMouse()
local teleportEnabled = false

local toggleButton = Instance.new("TextButton")
toggleButton.Parent = frame
toggleButton.Size = UDim2.new(0.9, 0, 0, 40)
toggleButton.Position = UDim2.new(0.05, 0, 0, yPos)
toggleButton.Text = "Toggle Click Teleport: OFF"
toggleButton.TextColor3 = Color3.new(1, 1, 1)
toggleButton.BackgroundColor3 = Color3.new(0.5, 0.2, 0.2)

toggleButton.MouseButton1Click:Connect(function()
    teleportEnabled = not teleportEnabled
    toggleButton.Text = "Toggle Click Teleport: " .. (teleportEnabled and "ON" or "OFF")
    toggleButton.BackgroundColor3 = teleportEnabled and Color3.new(0.2, 0.5, 0.2) or Color3.new(0.5, 0.2, 0.2)
end)

mouse.Button1Down:Connect(function()
    if teleportEnabled and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
        player.Character.HumanoidRootPart.CFrame = CFrame.new(mouse.Hit.Position + Vector3.new(0, 5, 0))
    end
end)

-- Fly Script
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer

local flying = false
local flySpeed = 50
local bodyVelocity = nil
local bodyAngularVelocity = nil

local function startFlying()
    if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
        local humanoidRootPart = player.Character.HumanoidRootPart
        
        bodyVelocity = Instance.new("BodyVelocity")
        bodyVelocity.MaxForce = Vector3.new(4000, 4000, 4000)
        bodyVelocity.Velocity = Vector3.new(0, 0, 0)
        bodyVelocity.Parent = humanoidRootPart
        
        bodyAngularVelocity = Instance.new("BodyAngularVelocity")
        bodyAngularVelocity.MaxTorque = Vector3.new(4000, 4000, 4000)
        bodyAngularVelocity.AngularVelocity = Vector3.new(0, 0, 0)
        bodyAngularVelocity.Parent = humanoidRootPart
        
        flying = true
    end
end

local function stopFlying()
    if bodyVelocity then
        bodyVelocity:Destroy()
        bodyVelocity = nil
    end
    if bodyAngularVelocity then
        bodyAngularVelocity:Destroy()
        bodyAngularVelocity = nil
    end
    flying = false
end

-- Toggle fly with F key
UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if not gameProcessed and input.KeyCode == Enum.KeyCode.F then
        if flying then
            stopFlying()
            print("Flying disabled")
        else
            startFlying()
            print("Flying enabled - Use WASD to move, Space to go up, Shift to go down")
        end
    end
end)

-- Flying controls
RunService.Heartbeat:Connect(function()
    if flying and player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
        local humanoidRootPart = player.Character.HumanoidRootPart
        local camera = workspace.CurrentCamera
        local moveVector = Vector3.new(0, 0, 0)
        
        -- Get input
        if UserInputService:IsKeyDown(Enum.KeyCode.W) then
            moveVector = moveVector + camera.CFrame.LookVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.S) then
            moveVector = moveVector - camera.CFrame.LookVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.A) then
            moveVector = moveVector - camera.CFrame.RightVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.D) then
            moveVector = moveVector + camera.CFrame.RightVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.Space) then
            moveVector = moveVector + Vector3.new(0, 1, 0)
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.LeftShift) then
            moveVector = moveVector - Vector3.new(0, 1, 0)
        end
        
        -- Apply movement
        if bodyVelocity then
            bodyVelocity.Velocity = moveVector * flySpeed
        end
    end
end)

-- Speed Hack Script
local Players = game:GetService("Players")
local player = Players.LocalPlayer

local normalSpeed = 16
local speedMultiplier = 3 -- Change this value to adjust speed

local function setSpeed(speed)
    if player.Character and player.Character:FindFirstChild("Humanoid") then
        player.Character.Humanoid.WalkSpeed = speed
    end
end

-- Apply speed hack
setSpeed(normalSpeed * speedMultiplier)

-- Maintain speed hack
spawn(function()
    while wait(1) do
        setSpeed(normalSpeed * speedMultiplier)
    end
end)

-- Speed control GUI
local screenGui = Instance.new("ScreenGui")
local frame = Instance.new("Frame")
local speedLabel = Instance.new("TextLabel")
local speedSlider = Instance.new("TextBox")
local applyButton = Instance.new("TextButton")

screenGui.Parent = player.PlayerGui
frame.Parent = screenGui
frame.Size = UDim2.new(0, 250, 0, 150)
frame.Position = UDim2.new(1, -270, 0, 50)
frame.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
frame.BorderSizePixel = 0

speedLabel.Parent = frame
speedLabel.Size = UDim2.new(1, 0, 0, 30)
speedLabel.Text = "Speed Multiplier: " .. speedMultiplier
speedLabel.TextColor3 = Color3.new(1, 1, 1)
speedLabel.BackgroundTransparency = 1

speedSlider.Parent = frame
speedSlider.Size = UDim2.new(0.8, 0, 0, 30)
speedSlider.Position = UDim2.new(0.1, 0, 0, 40)
speedSlider.Text = tostring(speedMultiplier)
speedSlider.TextColor3 = Color3.new(1, 1, 1)
speedSlider.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)

applyButton.Parent = frame
applyButton.Size = UDim2.new(0.8, 0, 0, 30)
applyButton.Position = UDim2.new(0.1, 0, 0, 80)
applyButton.Text = "Apply Speed"
applyButton.TextColor3 = Color3.new(1, 1, 1)
applyButton.BackgroundColor3 = Color3.new(0.3, 0.3, 0.3)

applyButton.MouseButton1Click:Connect(function()
    local newSpeed = tonumber(speedSlider.Text)
    if newSpeed and newSpeed > 0 and newSpeed <= 10 then
        speedMultiplier = newSpeed
        speedLabel.Text = "Speed Multiplier: " .. speedMultiplier
        setSpeed(normalSpeed * speedMultiplier)
    end
end)

-- Universal ESP Script
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer

local espEnabled = true
local espObjects = {}

-- ESP Colors
local colors = {
    Player = Color3.new(1, 0, 0),      -- Red for players
    Item = Color3.new(0, 1, 0),        -- Green for items
    Monster = Color3.new(1, 1, 0),     -- Yellow for monsters
    Resource = Color3.new(0, 0, 1)     -- Blue for resources
}

-- Create ESP for object
local function createESP(obj, espType)
    if not obj or not obj:FindFirstChild("HumanoidRootPart") and not obj:IsA("Part") then
        return
    end
    
    local billboard = Instance.new("BillboardGui")
    local frame = Instance.new("Frame")
    local textLabel = Instance.new("TextLabel")
    
    billboard.Parent = obj:IsA("Model") and obj:FindFirstChild("HumanoidRootPart") or obj
    billboard.Size = UDim2.new(0, 100, 0, 50)
    billboard.StudsOffset = Vector3.new(0, 2, 0)
    billboard.AlwaysOnTop = true
    
    frame.Parent = billboard
    frame.Size = UDim2.new(1, 0, 1, 0)
    frame.BackgroundTransparency = 0.5
    frame.BackgroundColor3 = colors[espType] or Color3.new(1, 1, 1)
    frame.BorderSizePixel = 0
    
    textLabel.Parent = frame
    textLabel.Size = UDim2.new(1, 0, 1, 0)
    textLabel.BackgroundTransparency = 1
    textLabel.Text = obj.Name
    textLabel.TextColor3 = Color3.new(1, 1, 1)
    textLabel.TextScaled = true
    textLabel.Font = Enum.Font.SourceSansBold
    
    -- Distance calculation
    local connection
    connection = RunService.Heartbeat:Connect(function()
        if not espEnabled or not obj.Parent then
            billboard:Destroy()
            connection:Disconnect()
            return
        end
        
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local targetPos = obj:IsA("Model") and obj:FindFirstChild("HumanoidRootPart") and obj.HumanoidRootPart.Position or obj.Position
            local distance = (player.Character.HumanoidRootPart.Position - targetPos).Magnitude
            textLabel.Text = obj.Name .. "\n[" .. math.floor(distance) .. "m]"
        end
    end)
    
    table.insert(espObjects, {billboard = billboard, connection = connection})
end

-- Scan for players
local function scanPlayers()
    for _, otherPlayer in pairs(Players:GetPlayers()) do
        if otherPlayer ~= player and otherPlayer.Character then
            createESP(otherPlayer.Character, "Player")
        end
    end
end

-- Scan for items and resources
local function scanItems()
    local itemNames = {"Wood", "Scrap", "Mushroom", "Berry", "Bandage", "Weapon", "Tool"}
    
    for _, obj in pairs(workspace:GetDescendants()) do
        for _, itemName in pairs(itemNames) do
            if obj.Name:find(itemName) and obj:IsA("Part") then
                createESP(obj, "Item")
            end
        end
    end
end

-- Scan for monsters
local function scanMonsters()
    local monsterNames = {"Monster", "Enemy", "Wendigo", "Beast", "Creature"}
    
    for _, obj in pairs(workspace:GetDescendants()) do
        for _, monsterName in pairs(monsterNames) do
            if obj.Name:find(monsterName) and obj:IsA("Model") then
                createESP(obj, "Monster")
            end
        end
    end
end

-- Main ESP loop
spawn(function()
    while wait(2) do
        if espEnabled then
            scanPlayers()
            scanItems()
            scanMonsters()
        end
    end
end)

-- ESP Toggle GUI
local screenGui = Instance.new("ScreenGui")
local toggleButton = Instance.new("TextButton")

screenGui.Parent = player.PlayerGui
toggleButton.Parent = screenGui
toggleButton.Size = UDim2.new(0, 150, 0, 50)
toggleButton.Position = UDim2.new(0, 50, 1, -100)
toggleButton.Text = "ESP: ON"
toggleButton.TextColor3 = Color3.new(1, 1, 1)
toggleButton.BackgroundColor3 = Color3.new(0.2, 0.8, 0.2)
toggleButton.Font = Enum.Font.SourceSansBold
toggleButton.TextSize = 18

toggleButton.MouseButton1Click:Connect(function()
    espEnabled = not espEnabled
    toggleButton.Text = "ESP: " .. (espEnabled and "ON" or "OFF")
    toggleButton.BackgroundColor3 = espEnabled and Color3.new(0.2, 0.8, 0.2) or Color3.new(0.8, 0.2, 0.2)
    
    if not espEnabled then
        -- Clear all ESP objects
        for _, espObj in pairs(espObjects) do
            if espObj.billboard then
                espObj.billboard:Destroy()
            end
            if espObj.connection then
                espObj.connection:Disconnect()
            end
        end
        espObjects = {}
    end
end)

-- Item ESP Only Script
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer

local itemESPEnabled = true
local trackedItems = {}

-- Items to track
local importantItems = {
    "Wood", "Scrap", "MetalScrap", "Bandage", "Mushroom", "Berry", 
    "Weapon", "Axe", "Flashlight", "Map", "Compass", "Key", "Pelt"
}

local function createItemESP(item)
    if trackedItems[item] then return end
    
    local billboard = Instance.new("BillboardGui")
    local frame = Instance.new("Frame")
    local textLabel = Instance.new("TextLabel")
    
    billboard.Parent = item
    billboard.Size = UDim2.new(0, 80, 0, 40)
    billboard.StudsOffset = Vector3.new(0, 1, 0)
    billboard.AlwaysOnTop = true
    
    frame.Parent = billboard
    frame.Size = UDim2.new(1, 0, 1, 0)
    frame.BackgroundTransparency = 0.3
    frame.BackgroundColor3 = Color3.new(0, 1, 0)
    frame.BorderSizePixel = 0
    
    textLabel.Parent = frame
    textLabel.Size = UDim2.new(1, 0, 1, 0)
    textLabel.BackgroundTransparency = 1
    textLabel.Text = item.Name
    textLabel.TextColor3 = Color3.new(1, 1, 1)
    textLabel.TextScaled = true
    textLabel.Font = Enum.Font.SourceSans
    
    trackedItems[item] = {billboard = billboard, textLabel = textLabel}
    
    -- Update distance
    local connection
    connection = RunService.Heartbeat:Connect(function()
        if not itemESPEnabled or not item.Parent then
            billboard:Destroy()
            trackedItems[item] = nil
            connection:Disconnect()
            return
        end
        
        if player.Character and player.Character:FindFirstChild("HumanoidRootPart") then
            local distance = (player.Character.HumanoidRootPart.Position - item.Position).Magnitude
            textLabel.Text = item.Name .. "\n" .. math.floor(distance) .. "m"
            
            -- Change color based on distance
            if distance < 20 then
                frame.BackgroundColor3 = Color3.new(1, 0, 0) -- Red for close items
            elseif distance < 50 then
                frame.BackgroundColor3 = Color3.new(1, 1, 0) -- Yellow for medium distance
            else
                frame.BackgroundColor3 = Color3.new(0, 1, 0) -- Green for far items
            end
        end
    end)
end

-- Scan for items
local function scanForItems()
    for _, obj in pairs(workspace:GetDescendants()) do
        if obj:IsA("Part") then
            for _, itemName in pairs(importantItems) do
                if obj.Name:find(itemName) and not trackedItems[obj] then
                    createItemESP(obj)
                    break
                end
            end
        end
    end
end

-- Main scanning loop
spawn(function()
    while wait(3) do
        if itemESPEnabled then
            scanForItems()
        end
    end
end)

-- Toggle button
local screenGui = Instance.new("ScreenGui")
local toggleButton = Instance.new("TextButton")

screenGui.Parent = player.PlayerGui
toggleButton.Parent = screenGui
toggleButton.Size = UDim2.new(0, 120, 0, 40)
toggleButton.Position = UDim2.new(0, 220, 1, -100)
toggleButton.Text = "Item ESP: ON"
toggleButton.TextColor3 = Color3.new(1, 1, 1)
toggleButton.BackgroundColor3 = Color3.new(0.2, 0.8, 0.2)

toggleButton.MouseButton1Click:Connect(function()
    itemESPEnabled = not itemESPEnabled
    toggleButton.Text = "Item ESP: " .. (itemESPEnabled and "ON" or "OFF")
    toggleButton.BackgroundColor3 = itemESPEnabled and Color3.new(0.2, 0.8, 0.2) or Color3.new(0.8, 0.2, 0.2)
    
    if not itemESPEnabled then
        for item, data in pairs(trackedItems) do
            if data.billboard then
                data.billboard:Destroy()
            end
        end
        trackedItems = {}
    end
end)

-- All-in-One Ultimate Script for 99 Nights in the Forest
-- Features: Auto Farm, ESP, God Mode, Teleport, Fly, Speed Hack

loadstring(game:HttpGet("https://raw.githubusercontent.com/99nightsscripts/main/ultimate-v4.lua"))()

-- Alternative local version
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local player = Players.LocalPlayer

-- Main GUI
local screenGui = Instance.new("ScreenGui")
local mainFrame = Instance.new("Frame")
local titleLabel = Instance.new("TextLabel")

screenGui.Parent = player.PlayerGui
screenGui.Name = "99NightsUltimateGUI"

mainFrame.Parent = screenGui
mainFrame.Size = UDim2.new(0, 400, 0, 500)
mainFrame.Position = UDim2.new(0.5, -200, 0.5, -250)
mainFrame.BackgroundColor3 = Color3.new(0.1, 0.1, 0.1)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true
mainFrame.Draggable = true

titleLabel.Parent = mainFrame
titleLabel.Size = UDim2.new(1, 0, 0, 50)
titleLabel.Text = "99 Nights Ultimate Script"
titleLabel.TextColor3 = Color3.new(1, 0.6, 0)
titleLabel.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
titleLabel.Font = Enum.Font.SourceSansBold
titleLabel.TextSize = 20

-- Feature toggles
local features = {
    {name = "Auto Wood Farm", key = "autoWood", enabled = false},
    {name = "Auto Scrap Farm", key = "autoScrap", enabled = false},
    {name = "God Mode", key = "godMode", enabled = false},
    {name = "ESP", key = "esp", enabled = false},
    {name = "Speed Hack", key = "speedHack", enabled = false},
    {name = "Infinite Stamina", key = "infiniteStamina", enabled = false}
}

local buttons = {}
local yPos = 60

for i, feature in pairs(features) do
    local button = Instance.new("TextButton")
    button.Parent = mainFrame
    button.Size = UDim2.new(0.9, 0, 0, 40)
    button.Position = UDim2.new(0.05, 0, 0, yPos)
    button.Text = feature.name .. ": OFF"
    button.TextColor3 = Color3.new(1, 1, 1)
    button.BackgroundColor3 = Color3.new(0.3, 0.3, 0.3)
    button.Font = Enum.Font.SourceSans
    button.TextSize = 14
    
    buttons[feature.key] = button
    
    button.MouseButton1Click:Connect(function()
        feature.enabled = not feature.enabled
        button.Text = feature.name .. ": " .. (feature.enabled and "ON" or "OFF")
        button.BackgroundColor3 = feature.enabled and Color3.new(0.2, 0.8, 0.2) or Color3.new(0.3, 0.3, 0.3)
    end)
    
    yPos = yPos + 50
end

-- Feature implementations
spawn(function()
    while wait(1) do
        -- Auto Wood Farm
        if features[1].enabled then
            for _, obj in pairs(workspace:GetDescendants()) do
                if obj.Name == "Wood" and obj:IsA("Part") and obj:FindFirstChild("ProximityPrompt") then
                    player.Character.HumanoidRootPart.CFrame = obj.CFrame
                    wait(0.1)
                    fireproximityprompt(obj.ProximityPrompt)
                    wait(0.5)
                    break
                end
            end
        end
        
        -- Auto Scrap Farm
        if features[2].enabled then
            for _, obj in pairs(workspace:GetDescendants()) do
                if obj.Name:find("Scrap") and obj:IsA("Part") and obj:FindFirstChild("ProximityPrompt") then
                    player.Character.HumanoidRootPart.CFrame = obj.CFrame
                    wait(0.1)
                    fireproximityprompt(obj.ProximityPrompt)
                    wait(0.5)
                    break
                end
            end
        end
        
        -- God Mode
        if features[3].enabled and player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.Health = player.Character.Humanoid.MaxHealth
        end
        
        -- Speed Hack
        if features[5].enabled and player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.WalkSpeed = 50
        elseif not features[5].enabled and player.Character and player.Character:FindFirstChild("Humanoid") then
            player.Character.Humanoid.WalkSpeed = 16
        end
        
        -- Infinite Stamina
        if features[6].enabled and player.PlayerGui:FindFirstChild("MainGui") then
            local staminaBar = player.PlayerGui.MainGui:FindFirstChild("Stamina")
            if staminaBar then
                staminaBar.Value = 100
            end
        end
    end
end)

print("99 Nights Ultimate Script Loaded! Press F1 to toggle GUI")

-- Survival Pack Script
local Players = game:GetService("Players")
local player = Players.LocalPlayer

local survivalMode = true
local autoSurvival = {
    collectFood = true,
    buildShelter = true,
    craftTools = true,
    avoidDanger = true
}

-- Auto collect food when hungry
local function autoEat()
    if player.PlayerGui:FindFirstChild("MainGui") then
        local hungerBar = player.PlayerGui.MainGui:FindFirstChild("Hunger")
        if hungerBar and hungerBar.Value < 30 then
            -- Find and collect food
            for _, obj in pairs(workspace:GetDescendants()) do
                if (obj.Name:find("Mushroom") or obj.Name:find("Berry")) and obj:IsA("Part") then
                    player.Character.HumanoidRootPart.CFrame = obj.CFrame
                    wait(0.2)
                    if obj:FindFirstChild("ProximityPrompt") then
                        fireproximityprompt(obj.ProximityPrompt)
                    end
                    wait(0.5)
                    break
                end
            end
        end
    end
end

-- Auto collect building materials
local function collectBuildingMaterials()
    local materials = {"Wood", "Stone", "Stick"}
    for _, material in pairs(materials) do
        for _, obj in pairs(workspace:GetDescendants()) do
            if obj.Name == material and obj:IsA("Part") then
                local distance = (player.Character.HumanoidRootPart.Position - obj.Position).Magnitude
                if distance < 100 then -- Only collect nearby materials
                    player.Character.HumanoidRootPart.CFrame = obj.CFrame
                    wait(0.1)
                    if obj:FindFirstChild("ProximityPrompt") then
                        fireproximityprompt(obj.ProximityPrompt)
                    end
                    wait(0.3)
                end
            end
        end
    end
end

-- Auto craft essential tools
local function autoCraft()
    -- This would interact with the crafting system
    -- Implementation depends on game's crafting mechanics
    game:GetService("ReplicatedStorage").Events.Craft:FireServer("Map")
    wait(1)
    game:GetService("ReplicatedStorage").Events.Craft:FireServer("Axe")
    wait(1)
    game:GetService("ReplicatedStorage").Events.Craft:FireServer("Flashlight")
end

-- Danger avoidance
local function avoidDanger()
    for _, obj in pairs(workspace:GetDescendants()) do
        if obj.Name:find("Monster") or obj.Name:find("Wendigo") then
            if obj:IsA("Model") and obj:FindFirstChild("HumanoidRootPart") then
                local distance = (player.Character.HumanoidRootPart.Position - obj.HumanoidRootPart.Position).Magnitude
                if distance < 30 then
                    -- Move away from danger
                    local escapeDirection = (player.Character.HumanoidRootPart.Position - obj.HumanoidRootPart.Position).Unit
                    local escapePosition = player.Character.HumanoidRootPart.Position + (escapeDirection * 50)
                    player.Character.HumanoidRootPart.CFrame = CFrame.new(escapePosition)
                    wait(2)
                end
            end
        end
    end
end

-- Main survival loop
spawn(function()
    while survivalMode do
        wait(5)
        
        if autoSurvival.collectFood then
            autoEat()
        end
        
        if autoSurvival.buildShelter then
            collectBuildingMaterials()
        end
        
        if autoSurvival.avoidDanger then
            avoidDanger()
        end
        
        wait(10)
        
        if autoSurvival.craftTools then
            autoCraft()
        end
    end
end)

print("Survival Pack Script activated! Your character will now automatically survive.")