Greed menu

local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local TweenService = game:GetService("TweenService")
local InsertService = game:GetService("InsertService")

local localPlayer = Players.LocalPlayer
local mouse = localPlayer:GetMouse()
local playerGui = localPlayer:WaitForChild("PlayerGui")

-- Create blur for password screen
local blur = Instance.new("BlurEffect")
blur.Size = 24
blur.Enabled = true
blur.Parent = game:GetService("Lighting")

-- Password Screen GUI
local passwordScreen = Instance.new("ScreenGui", playerGui)
passwordScreen.ResetOnSpawn = false

local frame = Instance.new("Frame", passwordScreen)
frame.AnchorPoint = Vector2.new(0.5, 0.5)
frame.Position = UDim2.new(0.5,0,0.5,0)
frame.Size = UDim2.new(0,300,0,150)
frame.BackgroundColor3 = Color3.fromRGB(30,30,30)
frame.BorderSizePixel = 0
frame.BackgroundTransparency = 0.2
frame.ClipsDescendants = true
frame.AutomaticSize = Enum.AutomaticSize.None
frame.Visible = true

local frameCorner = Instance.new("UICorner", frame)
frameCorner.CornerRadius = UDim.new(0, 15)

local textLabel = Instance.new("TextLabel", frame)
textLabel.Size = UDim2.new(1,0,0,50)
textLabel.BackgroundTransparency = 1
textLabel.Text = "Enter Key:"
textLabel.Font = Enum.Font.SourceSansBold
textLabel.TextSize = 24
textLabel.TextColor3 = Color3.new(1,1,1)

local textBox = Instance.new("TextBox", frame)
textBox.Size = UDim2.new(1, -20, 0, 40)
textBox.Position = UDim2.new(0,10,0,60)
textBox.ClearTextOnFocus = false
textBox.Text = ""
textBox.PlaceholderText = "Type password here"
textBox.Font = Enum.Font.SourceSans
textBox.TextSize = 20
textBox.TextColor3 = Color3.new(1,1,1)
textBox.BackgroundColor3 = Color3.fromRGB(50,50,50)
textBox.BorderSizePixel = 0

local textBoxCorner = Instance.new("UICorner", textBox)
textBoxCorner.CornerRadius = UDim.new(0, 10)

local infoLabel = Instance.new("TextLabel", frame)
infoLabel.Size = UDim2.new(1,0,0,40)
infoLabel.Position = UDim2.new(0,0,1,-40)
infoLabel.BackgroundTransparency = 1
infoLabel.Text = ""
infoLabel.Font = Enum.Font.SourceSansItalic
infoLabel.TextSize = 18
infoLabel.TextColor3 = Color3.fromRGB(200,100,100)

local correctKey = "pizza"
local keyAccepted = false

-- Function to give sword
local function giveSword()
    if not localPlayer.Character then return end
    -- Check if player already has sword
    if localPlayer.Backpack:FindFirstChild("Sword") or (localPlayer.Character:FindFirstChild("Sword")) then
        return
    end

    local success, sword = pcall(function()
        return InsertService:LoadAsset(125013769)
    end)

    if success and sword then
        local swordTool = sword:FindFirstChildOfClass("Tool") or sword:FindFirstChild("Sword")
        if swordTool then
            swordTool.Parent = localPlayer.Backpack
        else
            sword.Parent = localPlayer.Backpack
        end
    end
end

textBox.FocusLost:Connect(function(enterPressed)
    if not enterPressed then return end
    if textBox.Text:lower() == correctKey then
        keyAccepted = true
        blur.Enabled = false
        passwordScreen:Destroy()
        openMenu()
        giveSword() -- Give sword after menu opens
    else
        infoLabel.Text = "Incorrect key, try again."
        wait(2)
        infoLabel.Text = ""
        textBox.Text = ""
    end
end)

-- Main menu GUI (initially hidden)
local menuGui = Instance.new("ScreenGui", playerGui)
menuGui.ResetOnSpawn = false
menuGui.Enabled = false

local menuFrame = Instance.new("Frame", menuGui)
menuFrame.Size = UDim2.new(0, 250, 0, 380)
menuFrame.Position = UDim2.new(0, 10, 0, 10)
menuFrame.BackgroundColor3 = Color3.fromRGB(25,25,25)
menuFrame.BorderSizePixel = 0
menuFrame.Visible = true

local menuFrameCorner = Instance.new("UICorner", menuFrame)
menuFrameCorner.CornerRadius = UDim.new(0, 15)

local titleLabel = Instance.new("TextLabel", menuFrame)
titleLabel.Size = UDim2.new(1, 0, 0, 40)
titleLabel.BackgroundTransparency = 1
titleLabel.Font = Enum.Font.SourceSansBold
titleLabel.TextSize = 24
titleLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
titleLabel.Text = "Greed Menu"
titleLabel.TextStrokeTransparency = 0.75

-- Buttons helper function
local function createButton(text, posY)
    local btn = Instance.new("TextButton", menuFrame)
    btn.Size = UDim2.new(0.9, 0, 0, 40)
    btn.Position = UDim2.new(0.05, 0, 0, posY)
    btn.BackgroundColor3 = Color3.fromRGB(70, 70, 70)
    btn.BorderSizePixel = 0
    btn.Text = text
    btn.Font = Enum.Font.SourceSans
    btn.TextSize = 20
    btn.TextColor3 = Color3.new(1,1,1)
    btn.AutoButtonColor = true

    local btnCorner = Instance.new("UICorner", btn)
    btnCorner.CornerRadius = UDim.new(0, 10)

    return btn
end

-- Variables for toggles
local infiniteJumpEnabled = false
local flyEnabled = false
local ghostEnabled = false
local fartSmokeEnabled = false

-- Fly variables
local flying = false
local flySpeed = 50
local flyVelocity = nil
local flyBodyGyro = nil

-- Fart smoke effect
local fartEmitter = nil

-- Infinite Jump toggle function
local function toggleInfiniteJump(state)
    infiniteJumpEnabled = state
end

-- Hook infinite jump
UserInputService.JumpRequest:Connect(function()
    if infiniteJumpEnabled then
        local character = localPlayer.Character
        if character and character:FindFirstChildOfClass("Humanoid") then
            local humanoid = character:FindFirstChildOfClass("Humanoid")
            if humanoid:GetState() ~= Enum.HumanoidStateType.Jumping and humanoid:GetState() ~= Enum.HumanoidStateType.Freefall then
                humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
            end
        end
    end
end)

-- Toggle Fly function
local function toggleFly(state)
    local character = localPlayer.Character
    if not character then return end
    local rootPart = character:FindFirstChild("HumanoidRootPart")
    local humanoid = character:FindFirstChildOfClass("Humanoid")
    if not rootPart or not humanoid then return end

    flyEnabled = state
    flying = state

    if flying then
        rootPart.Anchored = false
        humanoid.PlatformStand = true

        flyBodyGyro = Instance.new("BodyGyro")
        flyBodyGyro.P = 9e4
        flyBodyGyro.MaxTorque = Vector3.new(9e4, 9e4, 9e4)
        flyBodyGyro.CFrame = rootPart.CFrame
        flyBodyGyro.Parent = rootPart

        flyVelocity = Instance.new("BodyVelocity")
        flyVelocity.Velocity = Vector3.new(0,0,0)
        flyVelocity.MaxForce = Vector3.new(9e4, 9e4, 9e4)
        flyVelocity.Parent = rootPart

    else
        humanoid.PlatformStand = false
        if flyBodyGyro then
            flyBodyGyro:Destroy()
            flyBodyGyro = nil
        end
        if flyVelocity then
            flyVelocity:Destroy()
            flyVelocity = nil
        end
    end
end

-- Fly movement controls
RunService.Heartbeat:Connect(function()
    if flying and flyBodyGyro and flyVelocity then
        local character = localPlayer.Character
        local rootPart = character and character:FindFirstChild("HumanoidRootPart")
        if not rootPart then return end

        local camCF = workspace.CurrentCamera.CFrame
        local moveDir = Vector3.new(0,0,0)

        if UserInputService:IsKeyDown(Enum.KeyCode.W) then
            moveDir = moveDir + camCF.LookVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.S) then
            moveDir = moveDir - camCF.LookVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.A) then
            moveDir = moveDir - camCF.RightVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.D) then
            moveDir = moveDir + camCF.RightVector
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.Space) then
            moveDir = moveDir + Vector3.new(0,1,0)
        end
        if UserInputService:IsKeyDown(Enum.KeyCode.LeftControl) then
            moveDir = moveDir - Vector3.new(0,1,0)
        end

        moveDir = moveDir.Unit
        if moveDir ~= moveDir then -- NaN check
            moveDir = Vector3.new(0,0,0)
        end

        flyVelocity.Velocity = moveDir * flySpeed
        flyBodyGyro.CFrame = camCF
    end
end)

-- Toggle Ghost mode
local function toggleGhost(state)
    ghostEnabled = state
    local character = localPlayer.Character
    if not character then return end

    for _, part in pairs(character:GetChildren()) do
        if part:IsA("BasePart") then
            part.CanCollide = not state
            if state then
                part.Transparency = 0.5
            else
                part.Transparency = 0
            end
        elseif part:IsA("Decal") then
            part.Transparency = state and 0.5 or 0
        end
    end
end

-- Toggle Fart smoke effect
local function toggleFartSmoke(state)
    fartSmokeEnabled = state
    local character = localPlayer.Character
    if not character then return end
    local rootPart = character:FindFirstChild("HumanoidRootPart")
    if not rootPart then return end

    if state then
        if fartEmitter then return end
        local smoke = Instance.new("ParticleEmitter")
        smoke.Name = "FartSmoke"
        smoke.Texture = "rbxassetid://258128463" -- smoke texture
        smoke.Rate = 20
        smoke.Lifetime = NumberRange.new(1,1.5)
        smoke.Speed = NumberRange.new(1,2)
        smoke.Rotation = NumberRange.new(-180,180)
        smoke.RotSpeed = NumberRange.new(-180,180)
        smoke.SpreadAngle = Vector2.new(45, 45)
        smoke.Size = NumberSequence.new({NumberSequenceKeypoint.new(0, 1), NumberSequenceKeypoint.new(1, 0)})
        smoke.Color = ColorSequence.new(Color3.fromRGB(200, 200, 200))
        smoke.LightEmission = 0.7
        smoke.Parent = rootPart
        fartEmitter = smoke
    else
        if fartEmitter then
            fartEmitter:Destroy()
            fartEmitter = nil
        end
    end
end

-- Admin commands input box (initially hidden)
local adminTextBox = Instance.new("TextBox", menuFrame)
adminTextBox.Size = UDim2.new(0.9, 0, 0, 30)
adminTextBox.Position = UDim2.new(0.05, 0, 1, -40)
adminTextBox.PlaceholderText = "Type admin command here"
adminTextBox.ClearTextOnFocus = true
adminTextBox.Text = ""
adminTextBox.Visible = false
adminTextBox.BackgroundColor3 = Color3.fromRGB(40,40,40)
adminTextBox.TextColor3 = Color3.new(1,1,1)
adminTextBox.Font = Enum.Font.SourceSansItalic
adminTextBox.TextSize = 18
adminTextBox.BorderSizePixel = 0

local adminActive = false

local function setAdminVisible(state)
    adminActive = state
    adminTextBox.Visible = state
end

-- Buttons creation
local btnY = 50
local btnJump = createButton("Toggle Infinite Jump", btnY)
btnY = btnY + 50
local btnFly = createButton("Toggle Fly", btnY)
btnY = btnY + 50
local btnGhost = createButton("Toggle Ghost Mode", btnY)
btnY = btnY + 50
local btnFart = createButton("Toggle Fart Smoke", btnY)
btnY = btnY + 50
local btnAdmin = createButton("Toggle Admin Commands", btnY)

-- Button connections
btnJump.MouseButton1Click:Connect(function()
    toggleInfiniteJump(not infiniteJumpEnabled)
    btnJump.Text = "Infinite Jump: "..(infiniteJumpEnabled and "ON" or "OFF")
end)

btnFly.MouseButton1Click:Connect(function()
    toggleFly(not flyEnabled)
    btnFly.Text = "Fly: "..(flyEnabled and "ON" or "OFF")
end)

btnGhost.MouseButton1Click:Connect(function()
    toggleGhost(not ghostEnabled)
    btnGhost.Text = "Ghost Mode: "..(ghostEnabled and "ON" or "OFF")
end)

btnFart.MouseButton1Click:Connect(function()
    toggleFartSmoke(not fartSmokeEnabled)
    btnFart.Text = "Fart Smoke: "..(fartSmokeEnabled and "ON" or "OFF")
end)

btnAdmin.MouseButton1Click:Connect(function()
    setAdminVisible(not adminActive)
end)

-- Admin command processing
adminTextBox.FocusLost:Connect(function(enterPressed)
    if not enterPressed then return end
    local text = adminTextBox.Text
    local args = {}
    for word in text:gmatch("%S+") do
        table.insert(args, word)
    end

    local cmd = args[1] and args[1]:lower() or ""

    if cmd == "walkspeed" and args[2] then
        local speed = tonumber(args[2])
        if speed and localPlayer.Character and localPlayer.Character:FindFirstChildOfClass("Humanoid") then
            localPlayer.Character:FindFirstChildOfClass("Humanoid").WalkSpeed = speed
            adminTextBox.Text = "WalkSpeed set to "..speed
        else
            adminTextBox.Text = "Invalid speed or character"
        end
    elseif (cmd == "fly" or cmd == "flyto" or cmd == "teleport") and args[2] then
        local targetName = args[2]
        local targetPlayer = Players:FindFirstChild(targetName)
        if not targetPlayer then
            for _, p in pairs(Players:GetPlayers()) do
                if p.Name:lower():sub(1, #targetName) == targetName:lower() then
                    targetPlayer = p
                    break
                end
            end
        end
        if targetPlayer and targetPlayer.Character and targetPlayer.Character:FindFirstChild("HumanoidRootPart") then
            localPlayer.Character.HumanoidRootPart.CFrame = targetPlayer.Character.HumanoidRootPart.CFrame + Vector3.new(0,3,0)
            adminTextBox.Text = "Teleported to "..targetPlayer.Name
        else
            adminTextBox.Text = "Player not found or no character"
        end
    elseif cmd == "infinitejump" then
        toggleInfiniteJump(not infiniteJumpEnabled)
        adminTextBox.Text = "Infinite Jump: "..(infiniteJumpEnabled and "ON" or "OFF")
    elseif cmd == "flytoggle" then
        toggleFly(not flyEnabled)
        adminTextBox.Text = "Fly: "..(flyEnabled and "ON" or "OFF")
    elseif cmd == "ghost" then
        toggleGhost(not ghostEnabled)
        adminTextBox.Text = "Ghost Mode: "..(ghostEnabled and "ON" or "OFF")
    elseif cmd == "fart" then
        toggleFartSmoke(not fartSmokeEnabled)
        adminTextBox.Text = "Fart Smoke: "..(fartSmokeEnabled and "ON" or "OFF")
    else
        adminTextBox.Text = "Unknown command"
    end

    -- Clear text after 3 seconds
    delay(3, function()
        adminTextBox.Text = ""
    end)
end)

-- Menu toggle function
local menuOpen = false

function openMenu()
    menuGui.Enabled = true
    menuOpen = true
end
function closeMenu()
    menuGui.Enabled = false
    menuOpen = false
end

-- Toggle menu with RightControl
UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if gameProcessed then return end
    if not keyAccepted then return end
    if input.KeyCode == Enum.KeyCode.RightControl then
        if menuOpen then
            closeMenu()
        else
            openMenu()
        end
    end
end)

-- If key already accepted (reload case)
if keyAccepted then
    blur.Enabled = false
    passwordScreen:Destroy()
    openMenu()
    giveSword()
end