--[[ =========================
      Cool All-in-One GUI (FE)
      KRNL-ready, 2025
=========================== ]]

-- Services & locals
local Players = game:GetService("Players")
local UIS = game:GetService("UserInputService")
local RS = game:GetService("RunService")
local LP = Players.LocalPlayer

local function getChar() return LP.Character or LP.CharacterAdded:Wait() end
local function getHum() local c=getChar(); return c:FindFirstChildOfClass("Humanoid") end
local function getRoot() local c=getChar(); return c:FindFirstChild("HumanoidRootPart") end

-- Clipboard helper (supports multiple executors)
local function copyToClipboard(text)
    if typeof(setclipboard) == "function" then setclipboard(text)
    elseif typeof(toclipboard) == "function" then toclipboard(text)
    else
        warn("Clipboard not supported in this executor.")
        return false
    end
    return true
end

-- UI helpers
local CoreGui = game:GetService("CoreGui")
local function ShowNote(msg)
    local sg = Instance.new("ScreenGui")
    sg.Name = "NotePopup"
    sg.ResetOnSpawn = false
    sg.Parent = CoreGui

    local lbl = Instance.new("TextLabel")
    lbl.Parent = sg
    lbl.Size = UDim2.new(0, 320, 0, 44)
    lbl.Position = UDim2.new(0.5, -160, 0.5, -22)
    lbl.BackgroundColor3 = Color3.fromRGB(30,30,30)
    lbl.TextColor3 = Color3.fromRGB(255,255,255)
    lbl.Font = Enum.Font.SourceSansBold
    lbl.TextSize = 20
    lbl.BorderSizePixel = 0
    lbl.Text = tostring(msg)
    task.delay(3, function() if sg then sg:Destroy() end end)
end

local function MakeDraggable(frame, dragArea)
    local dragging, dragInput, startPos, startOffset
    dragArea.InputBegan:Connect(function(input)
        if input.UserInputType == Enum.UserInputType.MouseButton1 then
            dragging = true
            startPos = input.Position
            startOffset = frame.Position
            input.Changed:Connect(function()
                if input.UserInputState == Enum.UserInputState.End then
                    dragging = false
                end
            end)
        end
    end)
    dragArea.InputChanged:Connect(function(input)
        if input.UserInputType == Enum.UserInputType.MouseMovement then
            dragInput = input
        end
    end)
    UIS.InputChanged:Connect(function(input)
        if dragging and input == dragInput then
            local delta = input.Position - startPos
            frame.Position = UDim2.new(
                startOffset.X.Scale, startOffset.X.Offset + delta.X,
                startOffset.Y.Scale, startOffset.Y.Offset + delta.Y
            )
        end
    end)
end

-- Welcome note (3s)
do
    local sg = Instance.new("ScreenGui")
    sg.Name = "WelcomeNote"
    sg.ResetOnSpawn = false
    sg.Parent = CoreGui

    local lbl = Instance.new("TextLabel")
    lbl.Parent = sg
    lbl.Size = UDim2.new(0, 320, 0, 44)
    lbl.Position = UDim2.new(0.5, -160, 0.4, -22)
    lbl.BackgroundColor3 = Color3.fromRGB(25,25,25)
    lbl.TextColor3 = Color3.fromRGB(255,255,255)
    lbl.Font = Enum.Font.SourceSansBold
    lbl.TextSize = 20
    lbl.BorderSizePixel = 0
    lbl.Text = "Welcome, "..LP.Name.."!"
    task.delay(3, function() if sg then sg:Destroy() end end)
end

-- ===== Main GUI =====
local mainGui = Instance.new("ScreenGui")
mainGui.Name = "CoolGui"
mainGui.ResetOnSpawn = false
mainGui.Parent = CoreGui

local mainFrame = Instance.new("Frame", mainGui)
mainFrame.Size = UDim2.new(0, 270, 0, 320)
mainFrame.Position = UDim2.new(0.5, -135, 0.5, -160)
mainFrame.BackgroundColor3 = Color3.fromRGB(40,40,40)
mainFrame.BorderSizePixel = 0

local title = Instance.new("TextLabel", mainFrame)
title.Size = UDim2.new(1, -30, 0, 30)
title.Position = UDim2.new(0, 8, 0, 0)
title.BackgroundTransparency = 1
title.Text = "Cool GUI"
title.TextXAlignment = Enum.TextXAlignment.Left
title.Font = Enum.Font.SourceSansBold
title.TextColor3 = Color3.fromRGB(255,255,255)
title.TextSize = 20

local closeBtn = Instance.new("TextButton", mainFrame)
closeBtn.Size = UDim2.new(0,25,0,25)
closeBtn.Position = UDim2.new(1, -30, 0, 2)
closeBtn.BackgroundColor3 = Color3.fromRGB(200,50,50)
closeBtn.TextColor3 = Color3.fromRGB(255,255,255)
closeBtn.Font = Enum.Font.SourceSansBold
closeBtn.TextSize = 18
closeBtn.Text = "X"
closeBtn.MouseButton1Click:Connect(function() mainGui:Destroy() end)

MakeDraggable(mainFrame, title)

local nextY = 40
local function AddButton(text, cb)
    local b = Instance.new("TextButton", mainFrame)
    b.Size = UDim2.new(1, -20, 0, 32)
    b.Position = UDim2.new(0, 10, 0, nextY)
    b.BackgroundColor3 = Color3.fromRGB(70,70,70)
    b.TextColor3 = Color3.fromRGB(255,255,255)
    b.Font = Enum.Font.SourceSans
    b.TextSize = 18
    b.Text = text
    b.MouseButton1Click:Connect(function()
        if typeof(cb) == "function" then cb(b) end
    end)
    nextY += 38
    return b
end

-- ===== Executor GUI =====
local execGui = Instance.new("ScreenGui")
execGui.Name = "ExecutorGui"
execGui.ResetOnSpawn = false
execGui.Enabled = false
execGui.Parent = CoreGui

local execFrame = Instance.new("Frame", execGui)
execFrame.Size = UDim2.new(0, 380, 0, 240)
execFrame.Position = UDim2.new(0.5, -190, 0.5, -120)
execFrame.BackgroundColor3 = Color3.fromRGB(50,50,50)
execFrame.BorderSizePixel = 0

local execTitle = Instance.new("TextLabel", execFrame)
execTitle.Size = UDim2.new(1, -30, 0, 30)
execTitle.Position = UDim2.new(0, 8, 0, 0)
execTitle.BackgroundTransparency = 1
execTitle.Text = "Executor"
execTitle.TextXAlignment = Enum.TextXAlignment.Left
execTitle.Font = Enum.Font.SourceSansBold
execTitle.TextColor3 = Color3.fromRGB(255,255,255)
execTitle.TextSize = 20

local execClose = Instance.new("TextButton", execFrame)
execClose.Size = UDim2.new(0,25,0,25)
execClose.Position = UDim2.new(1, -30, 0, 2)
execClose.BackgroundColor3 = Color3.fromRGB(200,50,50)
execClose.TextColor3 = Color3.fromRGB(255,255,255)
execClose.Font = Enum.Font.SourceSansBold
execClose.TextSize = 18
execClose.Text = "X"
execClose.MouseButton1Click:Connect(function() execGui.Enabled = false end)

local codeBox = Instance.new("TextBox", execFrame)
codeBox.Size = UDim2.new(1, -20, 1, -80)
codeBox.Position = UDim2.new(0, 10, 0, 40)
codeBox.BackgroundColor3 = Color3.fromRGB(30,30,30)
codeBox.TextColor3 = Color3.fromRGB(255,255,255)
codeBox.Font = Enum.Font.Code
codeBox.TextSize = 16
codeBox.TextXAlignment = Enum.TextXAlignment.Left
codeBox.TextYAlignment = Enum.TextYAlignment.Top
codeBox.ClearTextOnFocus = false
codeBox.MultiLine = true
codeBox.Text = ""

local execRun = Instance.new("TextButton", execFrame)
execRun.Size = UDim2.new(0.5, -15, 0, 28)
execRun.Position = UDim2.new(0, 10, 1, -34)
execRun.BackgroundColor3 = Color3.fromRGB(0,170,0)
execRun.TextColor3 = Color3.fromRGB(255,255,255)
execRun.Font = Enum.Font.SourceSansBold
execRun.TextSize = 18
execRun.Text = "Execute"
execRun.MouseButton1Click:Connect(function()
    local src = codeBox.Text or ""
    if src == "" then return end
    local f, err = loadstring(src)
    if not f then
        ShowNote("Compile error:\n"..tostring(err))
        return
    end
    local ok, runErr = pcall(f)
    if not ok then
        ShowNote("Runtime error:\n"..tostring(runErr))
    end
end)

local execClear = Instance.new("TextButton", execFrame)
execClear.Size = UDim2.new(0.5, -15, 0, 28)
execClear.Position = UDim2.new(0.5, 5, 1, -34)
execClear.BackgroundColor3 = Color3.fromRGB(170,0,0)
execClear.TextColor3 = Color3.fromRGB(255,255,255)
execClear.Font = Enum.Font.SourceSansBold
execClear.TextSize = 18
execClear.Text = "Clear"
execClear.MouseButton1Click:Connect(function() codeBox.Text = "" end)

MakeDraggable(execFrame, execTitle)

-- ===== Speed/Jump GUI =====
local sjGui = Instance.new("ScreenGui")
sjGui.Name = "SpeedJumpGui"
sjGui.ResetOnSpawn = false
sjGui.Enabled = false
sjGui.Parent = CoreGui

local sjFrame = Instance.new("Frame", sjGui)
sjFrame.Size = UDim2.new(0, 270, 0, 170)
sjFrame.Position = UDim2.new(0.5, -135, 0.5, -85)
sjFrame.BackgroundColor3 = Color3.fromRGB(50,50,50)
sjFrame.BorderSizePixel = 0

local sjTitle = Instance.new("TextLabel", sjFrame)
sjTitle.Size = UDim2.new(1, -60, 0, 30)
sjTitle.Position = UDim2.new(0, 8, 0, 0)
sjTitle.BackgroundTransparency = 1
sjTitle.Text = "Speed / Jump"
sjTitle.TextXAlignment = Enum.TextXAlignment.Left
sjTitle.Font = Enum.Font.SourceSansBold
sjTitle.TextColor3 = Color3.fromRGB(255,255,255)
sjTitle.TextSize = 20

local backBtn = Instance.new("TextButton", sjFrame)
backBtn.Size = UDim2.new(0,50,0,25)
backBtn.Position = UDim2.new(1, -58, 0, 3)
backBtn.BackgroundColor3 = Color3.fromRGB(100,100,100)
backBtn.TextColor3 = Color3.fromRGB(255,255,255)
backBtn.Font = Enum.Font.SourceSansBold
backBtn.TextSize = 18
backBtn.Text = "<"
backBtn.MouseButton1Click:Connect(function()
    sjGui.Enabled = false
    mainGui.Enabled = true
end)

local speedBox = Instance.new("TextBox", sjFrame)
speedBox.Size = UDim2.new(1, -20, 0, 26)
speedBox.Position = UDim2.new(0, 10, 0, 40)
speedBox.PlaceholderText = "Enter WalkSpeed"
speedBox.BackgroundColor3 = Color3.fromRGB(30,30,30)
speedBox.TextColor3 = Color3.fromRGB(255,255,255)
speedBox.Font = Enum.Font.SourceSans
speedBox.TextSize = 18

local jumpBox = Instance.new("TextBox", sjFrame)
jumpBox.Size = UDim2.new(1, -20, 0, 26)
jumpBox.Position = UDim2.new(0, 10, 0, 74)
jumpBox.PlaceholderText = "Enter JumpPower"
jumpBox.BackgroundColor3 = Color3.fromRGB(30,30,30)
jumpBox.TextColor3 = Color3.fromRGB(255,255,255)
jumpBox.Font = Enum.Font.SourceSans
jumpBox.TextSize = 18

local applyBtn = Instance.new("TextButton", sjFrame)
applyBtn.Size = UDim2.new(1, -20, 0, 28)
applyBtn.Position = UDim2.new(0, 10, 0, 110)
applyBtn.BackgroundColor3 = Color3.fromRGB(0,170,0)
applyBtn.TextColor3 = Color3.fromRGB(255,255,255)
applyBtn.Font = Enum.Font.SourceSansBold
applyBtn.TextSize = 18
applyBtn.Text = "Apply"
applyBtn.MouseButton1Click:Connect(function()
    local hum = getHum()
    if not hum then return end
    local ws = tonumber(speedBox.Text)
    local jp = tonumber(jumpBox.Text)
    if ws then hum.WalkSpeed = ws end
    if jp then hum.JumpPower = jp end
end)

-- Mouse wheel: ±10 WalkSpeed while this GUI is open
UIS.InputChanged:Connect(function(input)
    if not sjGui.Enabled then return end
    if input.UserInputType == Enum.UserInputType.MouseWheel then
        local amount = 0
        pcall(function() amount = input.Position.Z end)
        if amount == 0 then amount = input.Delta and input.Delta.Y or 0 end
        if amount ~= 0 then
            local hum = getHum()
            if hum then
                local step = (amount > 0) and 10 or -10
                hum.WalkSpeed = math.max(0, hum.WalkSpeed + step)
                if speedBox then speedBox.Text = tostring(hum.WalkSpeed) end
            end
        end
    end
end)

MakeDraggable(sjFrame, sjTitle)

-- ===== Feature toggles =====
local flyOn, flyConn, flyVelConn
local function SetFly(state)
    flyOn = state
    local root = getRoot()
    if not root then return end

    -- Clean previous
    if flyConn then flyConn:Disconnect() flyConn = nil end
    if flyVelConn then flyVelConn:Disconnect() flyVelConn = nil end
    for _,v in ipairs(root:GetChildren()) do
        if v:IsA("BodyVelocity") then v:Destroy() end
    end

    if state then
        local bv = Instance.new("BodyVelocity")
        bv.MaxForce = Vector3.new(9e9,9e9,9e9)
        bv.Velocity = Vector3.zero
        bv.Parent = root

        local function currentVel()
            local cam = workspace.CurrentCamera
            local look = cam.CFrame.LookVector
            local right = cam.CFrame.RightVector
            local v = Vector3.zero
            if UIS:IsKeyDown(Enum.KeyCode.W) then v += look end
            if UIS:IsKeyDown(Enum.KeyCode.S) then v -= look end
            if UIS:IsKeyDown(Enum.KeyCode.A) then v -= right end
            if UIS:IsKeyDown(Enum.KeyCode.D) then v += right end
            if UIS:IsKeyDown(Enum.KeyCode.Space) then v += Vector3.new(0,1,0) end
            if UIS:IsKeyDown(Enum.KeyCode.LeftControl) or UIS:IsKeyDown(Enum.KeyCode.C) then v -= Vector3.new(0,1,0) end
            return v.Magnitude > 0 and v.Unit * 60 or Vector3.zero
        end

        flyVelConn = RS.RenderStepped:Connect(function()
            bv.Velocity = currentVel()
        end)

        -- Reapply after respawn
        flyConn = LP.CharacterAdded:Connect(function()
            task.wait(0.2)
            SetFly(true)
        end)
    end
end

local infJumpOn = false
UIS.JumpRequest:Connect(function()
    if infJumpOn then
        local hum = getHum()
        if hum then hum:ChangeState(Enum.HumanoidStateType.Jumping) end
    end
end)

local noclipOn, noclipStepConn
local function SetNoclip(state)
    noclipOn = state
    if noclipStepConn then noclipStepConn:Disconnect() noclipStepConn = nil end
    if state then
        noclipStepConn = RS.Stepped:Connect(function()
            local c = LP.Character
            if not c then return end
            for _,v in ipairs(c:GetDescendants()) do
                if v:IsA("BasePart") then v.CanCollide = false end
            end
        end)
    else
        local c = LP.Character
        if c then
            for _,v in ipairs(c:GetDescendants()) do
                if v:IsA("BasePart") then v.CanCollide = true end
            end
        end
    end
end

-- ===== Main buttons =====
local execBtn = AddButton("Executor", function()
    execGui.Enabled = true
end)

local sjBtn = AddButton("Change Speed / Jump", function()
    mainGui.Enabled = false
    sjGui.Enabled = true
end)

local discordBtn = AddButton("Join Discord", function()
    local ok = copyToClipboard("https://discord.gg/pevZaXWbJ7")
    if ok then ShowNote("Discord link copied!") else ShowNote("Clipboard not supported") end
end)

local flyBtn = AddButton("Fly: OFF", function(btn)
    local new = not flyOn
    SetFly(new)
    btn.Text = "Fly: " .. (new and "ON" or "OFF")
end)

local infJumpBtn = AddButton("Infinite Jump: OFF", function(btn)
    infJumpOn = not infJumpOn
    btn.Text = "Infinite Jump: " .. (infJumpOn and "ON" or "OFF")
end)

local noclipBtn = AddButton("Noclip: OFF", function(btn)
    local new = not noclipOn
    SetNoclip(new)
    btn.Text = "Noclip: " .. (new and "ON" or "OFF")
end)

-- Safety: if character respawns, keep noclip state
LP.CharacterAdded:Connect(function()
    if flyOn then task.defer(function() SetFly(true) end) end
    if noclipOn then task.defer(function() SetNoclip(true) end) end
end)