SPEED UNIVERSAL

-- GUI Nativa para Delta Executor (Sin Rayfield/Orion/Kavo)
-- Juego: +1 Speed Keyboard: Escape the Backrooms

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

-- Variables de Estado
local VelocidadDeseada = 16
local InfinityJumpEnabled = false

-- CREACIÓN DE LA INTERFAZ
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "DeltaCustomMenu"
ScreenGui.ResetOnSpawn = false
-- Asegura que se dibuje sobre la interfaz del juego en Delta
pcall(function() ScreenGui.Parent = CoreGui end)
if not ScreenGui.Parent then ScreenGui.Parent = LocalPlayer:WaitForChild("PlayerGui") end

-- Contenedor Principal (Menú)
local MainFrame = Instance.new("Frame")
MainFrame.Name = "MainFrame"
MainFrame.Size = UDim2.new(0, 250, 0, 200)
MainFrame.Position = UDim2.new(0.5, -125, 0.4, -100)
MainFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 35)
MainFrame.BorderSizePixel = 0
MainFrame.Active = true
MainFrame.Draggable = true -- Permite arrastrar el menú en la pantalla
MainFrame.Parent = ScreenGui

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

-- Título del Menú
local Title = Instance.new("TextLabel")
Title.Name = "Title"
Title.Size = UDim2.new(1, 0, 0, 35)
Title.BackgroundColor3 = Color3.fromRGB(45, 45, 50)
Title.BorderSizePixel = 0
Title.Text = "  SPEED KEYBOARD HUB"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.TextSize = 14
Title.Font = Enum.Font.SourceSansBold
Title.TextXAlignment = Enum.TextXAlignment.Left
Title.Parent = MainFrame

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

-- Etiqueta para la Caja de Texto
local SpeedLabel = Instance.new("TextLabel")
SpeedLabel.Size = UDim2.new(1, -20, 0, 25)
SpeedLabel.Position = UDim2.new(0, 10, 0, 50)
SpeedLabel.BackgroundTransparency = 1
SpeedLabel.Text = "Ajustar Velocidad:"
SpeedLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
SpeedLabel.TextSize = 14
SpeedLabel.Font = Enum.Font.SourceSans
SpeedLabel.TextXAlignment = Enum.TextXAlignment.Left
SpeedLabel.Parent = MainFrame

-- Caja de Texto para la Velocidad
local SpeedInput = Instance.new("TextBox")
SpeedInput.Size = UDim2.new(1, -20, 0, 35)
SpeedInput.Position = UDim2.new(0, 10, 0, 75)
SpeedInput.BackgroundColor3 = Color3.fromRGB(20, 20, 22)
SpeedInput.BorderSizePixel = 0
SpeedInput.Text = "16"
SpeedInput.TextColor3 = Color3.fromRGB(0, 255, 150)
SpeedInput.TextSize = 16
SpeedInput.Font = Enum.Font.Code
SpeedInput.ClipsDescendants = true
SpeedInput.Parent = MainFrame

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

-- Botón de Infinity Jump
local JumpButton = Instance.new("TextButton")
JumpButton.Size = UDim2.new(1, -20, 0, 40)
JumpButton.Position = UDim2.new(0, 10, 0, 130)
JumpButton.BackgroundColor3 = Color3.fromRGB(180, 50, 50)
JumpButton.BorderSizePixel = 0
JumpButton.Text = "Infinity Jump: OFF"
JumpButton.TextColor3 = Color3.fromRGB(255, 255, 255)
JumpButton.TextSize = 14
JumpButton.Font = Enum.Font.SourceSansBold
JumpButton.Parent = MainFrame

local ButtonCorner = Instance.new("UICorner")
ButtonCorner.CornerRadius = UDim.new(0, 5)
ButtonCorner.Parent = JumpButton

-- LÓGICA DEL SCRIPT

-- Control de Velocidad Constante (Bucle infinito por personaje)
local function iniciarControlVelocidad(character)
    local humanoid = character:WaitForChild("Humanoid")
    task.spawn(function()
        while character and character:IsDescendantOf(game) do
            if humanoid.WalkSpeed ~= VelocidadDeseada then
                humanoid.WalkSpeed = VelocidadDeseada
            end
            task.wait(0.1)
        end
    end)
end

if LocalPlayer.Character then iniciarControlVelocidad(LocalPlayer.Character) end
LocalPlayer.CharacterAdded:Connect(iniciarControlVelocidad)

-- Evento al escribir en la caja de texto
SpeedInput.FocusLost:Connect(function(enterPressed)
    local num = tonumber(SpeedInput.Text)
    if num then
        VelocidadDeseada = num
    else
        SpeedInput.Text = tostring(VelocidadDeseada)
    end
end)

-- Evento al presionar el botón de Salto Infinito
JumpButton.MouseButton1Click:Connect(function()
    InfinityJumpEnabled = not InfinityJumpEnabled
    if InfinityJumpEnabled then
        JumpButton.Text = "Infinity Jump: ON"
        JumpButton.BackgroundColor3 = Color3.fromRGB(50, 150, 50)
    else
        JumpButton.Text = "Infinity Jump: OFF"
        JumpButton.BackgroundColor3 = Color3.fromRGB(180, 50, 50)
    end
end)

-- Ejecución del Salto Infinito
UserInputService.JumpRequest:Connect(function()
    if InfinityJumpEnabled then
        local character = LocalPlayer.Character
        if character then
            local humanoid = character:FindFirstChildOfClass("Humanoid")
            if humanoid then
                humanoid:ChangeState(Enum.HumanoidStateType.Jumping)
            end
        end
    end
end)

print("Menú personalizado cargado.")