--!strict
local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local UserInputService = game:GetService("UserInputService")

local LP = Players.LocalPlayer
local PlayerScripts = LP:WaitForChild("PlayerScripts")
local PlayerGui = LP:WaitForChild("PlayerGui")

local function safeRequire(parent, name)
    if not parent then return nil end
    local m = parent:FindFirstChild(name)
    if not m then return nil end
    local ok, res = pcall(require, m)
    if ok then return res end
    return nil
end

local Variables = safeRequire(PlayerScripts, "Variables")
local Debounce  = safeRequire(PlayerScripts, "Debounce")
local Client    = PlayerScripts:FindFirstChild("Client")
local Cooldown  = Client and safeRequire(Client, "Cooldown")

local state = {
    InfEnergy  = false,
    InfDash    = false,
    InfJump    = false,
    NoCooldown = false,
    NoStun     = false,
    NoKB       = false,
}

local conns = {}
local function disconnect(key)
    if conns[key] then conns[key]:Disconnect(); conns[key] = nil end
end
local function loop(key, fn)
    disconnect(key)
    conns[key] = RunService.Heartbeat:Connect(fn)
end

local function applyEnergy()
    local char = LP.Character
    if char then
        local e = char:FindFirstChild("Energy")
        if e then e.Value = 100 end
        if Variables then Variables.energy = 100 end
    end
end

local function setInfEnergy(on)
    state.InfEnergy = on
    if on then loop("energy", applyEnergy) else disconnect("energy") end
end

local function setInfDash(on)
    state.InfDash = on
    if on then
        setInfEnergy(true)
        loop("dash", function()
            if Debounce then Debounce.disableDash = nil end
        end)
    else disconnect("dash") end
end

local function setInfJump(on)
    state.InfJump = on
    if on then
        setInfEnergy(true)
        loop("jump", function()
            if Debounce then Debounce.disableJump = nil end
        end)
    else disconnect("jump") end
end

local function setNoCooldown(on)
    state.NoCooldown = on
    if not Cooldown then return end
    if on then
        if not Cooldown._origWait then
            Cooldown._origWait = Cooldown.Wait
            Cooldown.Wait = function() end
        end
    else
        if Cooldown._origWait then
            Cooldown.Wait = Cooldown._origWait
            Cooldown._origWait = nil
        end
    end
end

local function setNoStun(on)
    state.NoStun = on
    if on then
        loop("stun", function()
            local c = LP.Character
            if c then c:SetAttribute("Stun", nil) end
        end)
    else disconnect("stun") end
end

local function setNoKB(on)
    state.NoKB = on
    if on then
        loop("kb", function()
            if Debounce then Debounce.antikb = true end
        end)
    else
        disconnect("kb")
        if Debounce then Debounce.antikb = nil end
    end
end

local gui = Instance.new("ScreenGui")
gui.Name = "CheatMenu"
gui.ResetOnSpawn = false
gui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
gui.Parent = PlayerGui

local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 240, 0, 350)
frame.Position = UDim2.new(0, 20, 0.5, -175)
frame.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
frame.BorderSizePixel = 0
frame.Active = true
frame.Draggable = true
frame.Parent = gui

local scroll = Instance.new("ScrollingFrame")
scroll.Size = UDim2.new(1, -10, 1, -10)
scroll.Position = UDim2.new(0, 5, 0, 5)
scroll.BackgroundTransparency = 1
scroll.BorderSizePixel = 0
scroll.ScrollBarThickness = 4
scroll.CanvasSize = UDim2.new(0, 0, 0, 0)
scroll.AutomaticCanvasSize = Enum.AutomaticSize.Y
scroll.Parent = frame

local layout = Instance.new("UIListLayout")
layout.Padding = UDim.new(0, 4)
layout.SortOrder = Enum.SortOrder.LayoutOrder
layout.Parent = scroll

local function makeToggle(text, cb)
    local btn = Instance.new("TextButton")
    btn.Size = UDim2.new(1, 0, 0, 30)
    btn.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
    btn.BorderSizePixel = 0
    btn.Text = text .. ": OFF"
    btn.TextColor3 = Color3.fromRGB(230, 230, 230)
    btn.Font = Enum.Font.Code
    btn.TextSize = 14
    btn.AutoButtonColor = false
    btn.Parent = scroll

    local on = false
    btn.MouseButton1Click:Connect(function()
        on = not on
        btn.Text = text .. ": " .. (on and "ON" or "OFF")
        btn.BackgroundColor3 = on
            and Color3.fromRGB(60, 130, 60)
            or  Color3.fromRGB(45, 45, 45)
        cb(on)
    end)
end

makeToggle("Inf Energy",  setInfEnergy)
makeToggle("Inf Dash",    setInfDash)
makeToggle("Inf Jump",    setInfJump)
makeToggle("No Cooldown", setNoCooldown)
makeToggle("No Stun",     setNoStun)
makeToggle("No KB",       setNoKB)

LP.CharacterAdded:Connect(function()
    task.wait(1)
    if state.InfEnergy then applyEnergy() end
end)

UserInputService.InputBegan:Connect(function(input, gp)
    if gp then return end
    if input.KeyCode == Enum.KeyCode.RightShift then
        frame.Visible = not frame.Visible
    end
end)