meccha

-- Made by lostgirlnosleep

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

local Invisible = false
local SpeedEnabled = false
local CurrentSpeed = 16
local SavedTransparencies = {}

-- 1. Create Container
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "GhostMenu_" .. math.random(1000, 9999)
ScreenGui.Parent = CoreGui

-- 2. Main Window Frame
local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 220, 0, 200) -- Expanded to fit controls comfortably
MainFrame.Position = UDim2.new(0.1, 0, 0.4, 0)
MainFrame.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
MainFrame.BorderSizePixel = 0
MainFrame.Active = true
MainFrame.Draggable = true 
MainFrame.Parent = ScreenGui

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

-- 3. Title Bar
local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, 0, 0, 30)
Title.BackgroundColor3 = Color3.fromRGB(35, 35, 40)
Title.Text = "Ghost Mode Admin"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.Font = Enum.Font.SourceSansBold
Title.TextSize = 14
Title.Parent = MainFrame

local TitleCorner = Instance.new("UICorner")
TitleCorner.CornerRadius = UDim.new(0, 8)
TitleCorner.Parent = Title

-- 4. Credits Label
local CreditsLabel = Instance.new("TextLabel")
CreditsLabel.Size = UDim2.new(1, 0, 0, 20)
CreditsLabel.Position = UDim2.new(0, 0, 0.16, 0)
CreditsLabel.BackgroundTransparency = 1
CreditsLabel.Text = "Made by lostgirlnosleep"
CreditsLabel.TextColor3 = Color3.fromRGB(150, 150, 160)
CreditsLabel.Font = Enum.Font.SourceSansItalic
CreditsLabel.TextSize = 12
CreditsLabel.Parent = MainFrame

-- 5. Toggle Invisibility Button
local ToggleButton = Instance.new("TextButton")
ToggleButton.Size = UDim2.new(0.85, 0, 0, 35)
ToggleButton.Position = UDim2.new(0.075, 0, 0.28, 0)
ToggleButton.BackgroundColor3 = Color3.fromRGB(50, 50, 55)
ToggleButton.Text = "Status: VISIBLE"
ToggleButton.TextColor3 = Color3.fromRGB(255, 255, 255)
ToggleButton.Font = Enum.Font.SourceSansSemibold
ToggleButton.TextSize = 14
ToggleButton.Parent = MainFrame

local ButtonCorner = Instance.new("UICorner")
ButtonCorner.CornerRadius = UDim.new(0, 6)
ButtonCorner.Parent = ToggleButton

-- 6. Toggle Speed Button
local SpeedButton = Instance.new("TextButton")
SpeedButton.Size = UDim2.new(0.85, 0, 0, 35)
SpeedButton.Position = UDim2.new(0.075, 0, 0.50, 0)
SpeedButton.BackgroundColor3 = Color3.fromRGB(50, 50, 55)
SpeedButton.Text = "Speed: OFF"
SpeedButton.TextColor3 = Color3.fromRGB(255, 255, 255)
SpeedButton.Font = Enum.Font.SourceSansSemibold
SpeedButton.TextSize = 14
SpeedButton.Parent = MainFrame

local SpeedCorner = Instance.new("UICorner")
SpeedCorner.CornerRadius = UDim.new(0, 6)
SpeedCorner.Parent = SpeedButton

-- 7. Walkspeed Input Configuration Box
local SpeedInput = Instance.new("TextBox")
SpeedInput.Size = UDim2.new(0.85, 0, 0, 30)
SpeedInput.Position = UDim2.new(0.075, 0, 0.73, 0)
SpeedInput.BackgroundColor3 = Color3.fromRGB(40, 40, 45)
SpeedInput.Text = "Set Speed (Default: 35)"
SpeedInput.TextColor3 = Color3.fromRGB(200, 200, 200)
SpeedInput.Font = Enum.Font.SourceSans
SpeedInput.TextSize = 14
SpeedInput.ClearTextOnFocus = true
SpeedInput.Parent = MainFrame

local InputCorner = Instance.new("UICorner")
InputCorner.CornerRadius = UDim.new(0, 6)
InputCorner.Parent = SpeedInput

-- Core Invisibility System
local function toggleInvisibility()
    local char = LocalPlayer.Character
    if not char then return end
    Invisible = not Invisible
    
    for _, part in pairs(char:GetDescendants()) do
        if part:IsA("BasePart") or part:IsA("Decal") then
            if Invisible then
                SavedTransparencies[part] = part.Transparency
                part.Transparency = 1
            else
                part.Transparency = SavedTransparencies[part] or 0
            end
        elseif part:IsA("Texture") or part:IsA("Highlight") then
            part.Enabled = not Invisible
        end
    end
    
    if Invisible then
        ToggleButton.Text = "Status: INVISIBLE"
        ToggleButton.BackgroundColor3 = Color3.fromRGB(180, 40, 70)
    else
        ToggleButton.Text = "Status: VISIBLE"
        ToggleButton.BackgroundColor3 = Color3.fromRGB(50, 50, 55)
    end
end

ToggleButton.MouseButton1Click:Connect(toggleInvisibility)

-- Speed Management Mechanics
SpeedButton.MouseButton1Click:Connect(function()
    SpeedEnabled = not SpeedEnabled
    if SpeedEnabled then
        SpeedButton.Text = "Speed: ON"
        SpeedButton.BackgroundColor3 = Color3.fromRGB(0, 160, 100)
    else
        SpeedButton.Text = "Speed: OFF"
        SpeedButton.BackgroundColor3 = Color3.fromRGB(50, 50, 55)
        -- Instantly normalize character speed on turn-off
        if LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
            LocalPlayer.Character.Humanoid.WalkSpeed = 16
        end
    end
end)

-- Track Input Updates
SpeedInput.FocusLost:Connect(function(enterPressed)
    local num = tonumber(SpeedInput.Text)
    if num then
        CurrentSpeed = num
        SpeedInput.Text = "Speed Set To: " .. num
    else
        SpeedInput.Text = "Invalid Number!"
    end
end)

-- Constant Speed Loop
RunService.RenderStepped:Connect(function()
    if SpeedEnabled and LocalPlayer.Character and LocalPlayer.Character:FindFirstChild("Humanoid") then
        LocalPlayer.Character.Humanoid.WalkSpeed = CurrentSpeed
    end
end)