local player = game.Players.LocalPlayer
local playerGui = player:WaitForChild("PlayerGui")

local HitboxSettings = {Enabled = false, Size = Vector3.new(7, 7, 7), ShowVisual = false, Transparency = 0.4, Color = Color3.fromRGB(255, 50, 50), Radius = 50}
local AntiWeaveSettings = {Enabled = false, Strength = 1.5}
local WeaveSettings = {Enabled = false, GlideIntensity = 2.3}
local HeadlessSettings = {Enabled = false}
local NoDelaySettings = {Enabled = false}
local CritBoosterSettings = {Enabled = false}

local screenGui = Instance.new("ScreenGui")
screenGui.Name = "KeegoMenu"
screenGui.ResetOnSpawn = false
screenGui.Parent = playerGui

local mainFrame = Instance.new("Frame")
mainFrame.Name = "MainFrame"
mainFrame.Size = UDim2.new(0, 320, 0, 420)
mainFrame.Position = UDim2.new(0.5, -160, 0.5, -210)
mainFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
mainFrame.BackgroundTransparency = 0.1
mainFrame.Parent = screenGui

Instance.new("UICorner", mainFrame).CornerRadius = UDim.new(0, 12)

local titleBar = Instance.new("Frame")
titleBar.Name = "TitleBar"
titleBar.Size = UDim2.new(1, 0, 0, 40)
titleBar.BackgroundColor3 = Color3.fromRGB(20, 20, 20)
titleBar.Parent = mainFrame
Instance.new("UICorner", titleBar).CornerRadius = UDim.new(0, 12)

local titleLabel = Instance.new("TextLabel")
titleLabel.Size = UDim2.new(1, 0, 1, 0)
titleLabel.BackgroundTransparency = 1
titleLabel.Text = "Keego"
titleLabel.TextColor3 = Color3.fromRGB(180, 0, 255)
titleLabel.TextScaled = true
titleLabel.Font = Enum.Font.Code
titleLabel.Parent = titleBar

local closeBtn = Instance.new("TextButton")
closeBtn.Size = UDim2.new(0, 30, 0, 30)
closeBtn.Position = UDim2.new(1, -35, 0, 5)
closeBtn.BackgroundTransparency = 1
closeBtn.Text = "X"
closeBtn.TextColor3 = Color3.fromRGB(255, 50, 50)
closeBtn.TextScaled = true
closeBtn.Font = Enum.Font.Code
closeBtn.Parent = titleBar
closeBtn.MouseButton1Click:Connect(function() mainFrame.Visible = false end)

local tabBar = Instance.new("Frame")
tabBar.Size = UDim2.new(1, 0, 0, 40)
tabBar.Position = UDim2.new(0, 0, 0, 40)
tabBar.BackgroundColor3 = Color3.fromRGB(15, 15, 15)
tabBar.Parent = mainFrame

Instance.new("UIListLayout", tabBar).FillDirection = Enum.FillDirection.Horizontal
Instance.new("UIListLayout", tabBar).Padding = UDim.new(0, 5)

local contentFrame = Instance.new("Frame")
contentFrame.Size = UDim2.new(1, 0, 1, -80)
contentFrame.Position = UDim2.new(0, 0, 0, 80)
contentFrame.BackgroundTransparency = 1
contentFrame.Parent = mainFrame

local tabs = {}
local function createTab(name)
    local tabBtn = Instance.new("TextButton")
    tabBtn.Size = UDim2.new(0, 100, 1, 0)
    tabBtn.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
    tabBtn.Text = name
    tabBtn.TextColor3 = Color3.fromRGB(180, 0, 255)
    tabBtn.TextScaled = true
    tabBtn.Font = Enum.Font.Code
    tabBtn.Parent = tabBar
    Instance.new("UICorner", tabBtn).CornerRadius = UDim.new(0, 8)

    local tabContent = Instance.new("ScrollingFrame")
    tabContent.Size = UDim2.new(1, 0, 1, 0)
    tabContent.BackgroundTransparency = 1
    tabContent.ScrollBarThickness = 6
    tabContent.ScrollBarImageColor3 = Color3.fromRGB(180, 0, 255)
    tabContent.Visible = false
    tabContent.Parent = contentFrame
    Instance.new("UIListLayout", tabContent).Padding = UDim.new(0, 12)

    tabs[name] = {button = tabBtn, content = tabContent}

    tabBtn.MouseButton1Click:Connect(function()
        for _, t in pairs(tabs) do
            t.content.Visible = false
            t.button.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
        end
        tabContent.Visible = true
        tabBtn.BackgroundColor3 = Color3.fromRGB(50, 0, 80)
    end)
    return tabContent
end

local function createToggle(parent, text, defaultState)
    local toggleFrame = Instance.new("Frame")
    toggleFrame.Size = UDim2.new(1, -40, 0, 50)
    toggleFrame.BackgroundTransparency = 1
    toggleFrame.Parent = parent

    local label = Instance.new("TextLabel")
    label.Size = UDim2.new(0.65, 0, 1, 0)
    label.Position = UDim2.new(0, 15, 0, 0)
    label.BackgroundTransparency = 1
    label.Text = text
    label.TextColor3 = Color3.fromRGB(200, 200, 255)
    label.TextXAlignment = Enum.TextXAlignment.Left
    label.TextScaled = true
    label.Font = Enum.Font.Code
    label.Parent = toggleFrame

    local toggleBtn = Instance.new("TextButton")
    toggleBtn.Size = UDim2.new(0, 60, 0, 30)
    toggleBtn.Position = UDim2.new(1, -70, 0.5, -15)
    toggleBtn.BackgroundColor3 = defaultState and Color3.fromRGB(0, 255, 100) or Color3.fromRGB(80, 80, 80)
    toggleBtn.Text = ""
    toggleBtn.Parent = toggleFrame
    Instance.new("UICorner", toggleBtn).CornerRadius = UDim.new(0, 15)

    local knob = Instance.new("Frame")
    knob.Size = UDim2.new(0, 26, 0, 26)
    knob.Position = defaultState and UDim2.new(1, -28, 0.5, -13) or UDim2.new(0, 2, 0.5, -13)
    knob.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    knob.Parent = toggleBtn
    Instance.new("UICorner", knob).CornerRadius = UDim.new(0, 13)

    local state = defaultState
    toggleBtn.MouseButton1Click:Connect(function()
        state = not state
        if state then
            toggleBtn.BackgroundColor3 = Color3.fromRGB(0, 255, 100)
            knob:TweenPosition(UDim2.new(1, -28, 0.5, -13), "Out", "Quad", 0.2, true)
        else
            toggleBtn.BackgroundColor3 = Color3.fromRGB(80, 80, 80)
            knob:TweenPosition(UDim2.new(0, 2, 0.5, -13), "Out", "Quad", 0.2, true)
        end

        if text == "Hitbox" then HitboxSettings.Enabled = state
        elseif text == "Anti Stun" then AntiWeaveSettings.Enabled = state
        elseif text == "Weave Glide" then WeaveSettings.Enabled = state
        elseif text == "Client Sided Headless" then HeadlessSettings.Enabled = state
        elseif text == "No Delay" then NoDelaySettings.Enabled = state
        elseif text == "Crit % Booster" then CritBoosterSettings.Enabled = state
        end
    end)
end

local function createSlider(parent, text, minVal, maxVal, defaultVal, step)
    step = step or 0.1
    local sliderFrame = Instance.new("Frame")
    sliderFrame.Size = UDim2.new(1, -40, 0, 70)
    sliderFrame.BackgroundTransparency = 1
    sliderFrame.Parent = parent

    local label = Instance.new("TextLabel")
    label.Size = UDim2.new(1, 0, 0, 20)
    label.BackgroundTransparency = 1
    label.Text = text .. ": " .. string.format("%.1f", defaultVal)
    label.TextColor3 = Color3.fromRGB(200, 200, 255)
    label.TextXAlignment = Enum.TextXAlignment.Left
    label.TextScaled = true
    label.Font = Enum.Font.Code
    label.Parent = sliderFrame

    local bar = Instance.new("Frame")
    bar.Size = UDim2.new(1, 0, 0, 8)
    bar.Position = UDim2.new(0, 0, 0, 30)
    bar.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
    bar.Parent = sliderFrame
    Instance.new("UICorner", bar).CornerRadius = UDim.new(0, 4)

    local fill = Instance.new("Frame")
    fill.Size = UDim2.new((defaultVal - minVal) / (maxVal - minVal), 0, 1, 0)
    fill.BackgroundColor3 = Color3.fromRGB(180, 0, 255)
    fill.Parent = bar
    Instance.new("UICorner", fill).CornerRadius = UDim.new(0, 4)

    local knob = Instance.new("Frame")
    knob.Size = UDim2.new(0, 20, 0, 20)
    knob.Position = UDim2.new((defaultVal - minVal) / (maxVal - minVal), -10, 0.5, -10)
    knob.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
    knob.Parent = bar
    Instance.new("UICorner", knob).CornerRadius = UDim.new(0, 10)

    local dragging = false
    local connection

    local function updateSlider()
        if not dragging then return end
        local mousePos = game:GetService("UserInputService"):GetMouseLocation()
        local barPos = bar.AbsolutePosition
        local barSize = bar.AbsoluteSize.X
        local percent = math.clamp((mousePos.X - barPos.X) / barSize, 0, 1)
        local val = minVal + percent * (maxVal - minVal)
        val = math.floor(val / step + 0.5) * step

        fill.Size = UDim2.new(percent, 0, 1, 0)
        knob.Position = UDim2.new(percent, -10, 0.5, -10)
        label.Text = text .. ": " .. string.format("%.1f", val)

        if text == "Hitbox Size" then
            local scale = 5 + (val - 5) * 0.8
            HitboxSettings.Size = Vector3.new(scale, scale, scale)
        elseif text == "Weave Intensity" then
            WeaveSettings.GlideIntensity = val
        end
    end

    knob.InputBegan:Connect(function(input)
        if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
            dragging = true
            if connection then connection:Disconnect() end
            connection = game:GetService("RunService").RenderStepped:Connect(updateSlider)
        end
    end)

    game:GetService("UserInputService").InputEnded:Connect(function(input)
        if (input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch) and dragging then
            dragging = false
            if connection then connection:Disconnect() connection = nil end
        end
    end)
end

-- Tabs
local combatTab = createTab("Combat")
combatTab.Visible = true
createToggle(combatTab, "Hitbox", false)
createSlider(combatTab, "Hitbox Size", 1, 10, 7, 1)
createToggle(combatTab, "Anti Stun", false)
createToggle(combatTab, "No Delay", false)
createToggle(combatTab, "Crit % Booster", false)  -- NEW: 90% CRIT BOOSTER (90% of attacks are now criticals)

local movementTab = createTab("Movement")
createToggle(movementTab, "Weave Glide", false)
createSlider(movementTab, "Weave Intensity", 0.5, 5.0, 2.3, 0.1)

local visualTab = createTab("Visual")
createToggle(visualTab, "Client Sided Headless", false)

-- Draggable + Opener (unchanged)
local draggingMain, dragStartPos, startFramePos
titleBar.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        draggingMain = true
        dragStartPos = input.Position
        startFramePos = mainFrame.Position
    end
end)
titleBar.InputChanged:Connect(function(input)
    if draggingMain then
        local delta = input.Position - dragStartPos
        mainFrame.Position = UDim2.new(startFramePos.X.Scale, startFramePos.X.Offset + delta.X, startFramePos.Y.Scale, startFramePos.Y.Offset + delta.Y)
    end
end)
game:GetService("UserInputService").InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then draggingMain = false end
end)

local opener = Instance.new("TextButton")
opener.Size = UDim2.new(0, 50, 0, 50)
opener.Position = UDim2.new(0, 20, 0.5, -25)
opener.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
opener.Text = "K"
opener.TextColor3 = Color3.fromRGB(180, 0, 255)
opener.TextScaled = true
opener.Font = Enum.Font.Code
opener.Parent = screenGui
Instance.new("UICorner", opener).CornerRadius = UDim.new(0, 12)

local draggingOpener, dragStartOpener, startOpenerPos
opener.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        draggingOpener = true
        dragStartOpener = input.Position
        startOpenerPos = opener.Position
    end
end)
opener.InputChanged:Connect(function(input)
    if draggingOpener then
        local delta = input.Position - dragStartOpener
        opener.Position = UDim2.new(startOpenerPos.X.Scale, startOpenerPos.X.Offset + delta.X, startOpenerPos.Y.Scale, startOpenerPos.Y.Offset + delta.Y)
    end
end)
game:GetService("UserInputService").InputEnded:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then draggingOpener = false end
end)
opener.MouseButton1Click:Connect(function() mainFrame.Visible = not mainFrame.Visible end)

game:GetService("UserInputService").InputBegan:Connect(function(input, gameProcessed)
    if not gameProcessed and input.KeyCode == Enum.KeyCode.Insert then
        mainFrame.Visible = not mainFrame.Visible
    end
end)

mainFrame.Visible = true

-- Core Functions (existing functions unchanged except new Crit Booster)
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

local function UpdateHitboxes()  -- unchanged
    local myRoot = player.Character and player.Character:FindFirstChild("HumanoidRootPart")
    if not myRoot then return end
    for _, plr in ipairs(Players:GetPlayers()) do
        if plr ~= player and plr.Character then
            local root = plr.Character:FindFirstChild("HumanoidRootPart")
            local hum = plr.Character:FindFirstChild("Humanoid")
            if root and hum and hum.Health > 0 and (root.Position - myRoot.Position).Magnitude <= HitboxSettings.Radius then
                if HitboxSettings.Enabled then
                    root.Size = HitboxSettings.Size
                    root.Transparency = 0.8
                    root.CanCollide = false
                else
                    root.Size = Vector3.new(2, 2, 1)
                    root.Transparency = 0
                    root.CanCollide = true
                end
            end
        end
    end
end
RunService.Heartbeat:Connect(UpdateHitboxes)

spawn(function()
    while true do
        if AntiWeaveSettings.Enabled then  -- unchanged
            local myRoot = player.Character and player.Character:FindFirstChild("HumanoidRootPart")
            local myHum = player.Character and player.Character:FindFirstChild("Humanoid")
            if myRoot and myHum then
                for _, plr in ipairs(Players:GetPlayers()) do
                    if plr ~= player and plr.Character then
                        local hum = plr.Character:FindFirstChild("Humanoid")
                        local root = plr.Character:FindFirstChild("HumanoidRootPart")
                        if hum and root and hum.Health > 0 and (root.Position - myRoot.Position).Magnitude <= HitboxSettings.Radius then
                            hum.PlatformStand = true
                            root.Velocity = root.Velocity * Vector3.new(0.1, 1, 0.1) * AntiWeaveSettings.Strength
                            task.wait(0.15)
                            hum.PlatformStand = false
                        end
                    end
                end
            end
        end
        task.wait(0.2)
    end
end)

RunService.Heartbeat:Connect(function()
    if AntiWeaveSettings.Enabled then  -- unchanged
        local char = player.Character
        if char then
            local hum = char:FindFirstChild("Humanoid")
            if hum and (hum:GetState() == Enum.HumanoidStateType.PlatformStand or hum.PlatformStand) then
                hum.PlatformStand = false
                hum:ChangeState(Enum.HumanoidStateType.Running)
            end
        end
    end
end)

local function UpdateHeadless()  -- unchanged
    local char = player.Character
    if not char then return end
    local head = char:FindFirstChild("Head")
    if head then
        if HeadlessSettings.Enabled then
            head.Transparency = 1
            local face = head:FindFirstChild("face") or head:FindFirstChildOfClass("Decal")
            if face then face.Transparency = 1 end
        else
            head.Transparency = 0
            local face = head:FindFirstChild("face") or head:FindFirstChildOfClass("Decal")
            if face then face.Transparency = 0 end
        end
    end
end
RunService.Heartbeat:Connect(UpdateHeadless)

-- === OPTIMIZED FIAS NO DELAY (unchanged) ===
RunService.Heartbeat:Connect(function()
    if NoDelaySettings.Enabled then
        local char = player.Character
        if char then
            local tool = char:FindFirstChildWhichIsA("Tool")
            if tool then
                local hitDelay = tool:FindFirstChild("hit delay") or tool:FindFirstChild("next hit delay")
                if hitDelay then
                    if hitDelay:IsA("NumberValue") then hitDelay.Value = 0.05
                    elseif hitDelay:IsA("IntValue") then hitDelay.Value = 50 end
                end
                local stomp = tool:FindFirstChild("Stomp")
                if stomp then stomp:FireServer() end
                if tool:FindFirstChild("Activated") then
                    tool:Activate()
                end
            end
        end
    end
end)

-- === WEAVE GLIDE (unchanged) ===
local glideConn
local function ManageGlideLoop()
    if glideConn then glideConn:Disconnect() end
    if WeaveSettings.Enabled then
        glideConn = RunService.Heartbeat:Connect(function()
            if not WeaveSettings.Enabled then return end
            local char = player.Character
            if char then
                local hum = char:FindFirstChild("Humanoid")
                local root = char:FindFirstChild("HumanoidRootPart")
                if hum and root then
                    hum:ChangeState(Enum.HumanoidStateType.Running)
                    local vel = root.Velocity
                    local horizontal = Vector3.new(vel.X, 0, vel.Z)
                    local currentMag = horizontal.Magnitude
                    if currentMag > 1 then
                        local intensityFactor = WeaveSettings.GlideIntensity / 2.3
                        local targetMag = currentMag * intensityFactor
                        targetMag = math.clamp(targetMag, currentMag * 0.75, math.max(currentMag, 58))
                        local smoothedMag = currentMag * 0.75 + targetMag * 0.25
                        local newHorizontal = horizontal.Unit * smoothedMag
                        root.Velocity = Vector3.new(newHorizontal.X, vel.Y, newHorizontal.Z)
                    end
                end
            end
        end)
    end
end

local oldEnabled = false
RunService.Heartbeat:Connect(function()
    if WeaveSettings.Enabled ~= oldEnabled then
        oldEnabled = WeaveSettings.Enabled
        ManageGlideLoop()
    end
end)

ManageGlideLoop()

-- === NEW: CRIT % BOOSTER (90% CRITICALS WHEN ACTIVATED) ===
RunService.Heartbeat:Connect(function()
    if CritBoosterSettings.Enabled then
        local char = player.Character
        if char then
            local hum = char:FindFirstChild("Humanoid")
            if hum then
                local critAttr = hum:FindFirstChild("CriticalHitChance")
                if not critAttr then
                    critAttr = Instance.new("NumberValue")
                    critAttr.Name = "CriticalHitChance"
                    critAttr.Value = 0.90
                    critAttr.Parent = hum
                else
                    critAttr.Value = 0.90
                end
            end
        end
    else
        local char = player.Character
        if char then
            local hum = char:FindFirstChild("Humanoid")
            if hum then
                local critAttr = hum:FindFirstChild("CriticalHitChance")
                if critAttr then
                    critAttr:Destroy()
                end
            end
        end
    end
end)