-- Advanced Persistent Speed GUI with Insert Toggle & Draggable Frame (English)
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local player = Players.LocalPlayer

-- Remove old GUI if it exists
if game.CoreGui:FindFirstChild("AdvancedSpeedGui") then
    game.CoreGui.AdvancedSpeedGui:Destroy()
end

local screenGui = Instance.new("ScreenGui")
screenGui.Name = "AdvancedSpeedGui"
screenGui.Parent = game.CoreGui

-- Main Frame
local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 240, 0, 190)
frame.Position = UDim2.new(0.5, -120, 0.2, 0)
frame.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
frame.BorderSizePixel = 0
frame.Active = true
frame.Parent = screenGui

-- Rounded corners for frame
local uiCorner = Instance.new("UICorner")
uiCorner.CornerRadius = UDim.new(0, 8)
uiCorner.Parent = frame

-- Title
local title = Instance.new("TextLabel")
title.Size = UDim2.new(1, 0, 0, 35)
title.Text = "⚡ Ultra Speed Hub (Insert)"
title.TextColor3 = Color3.fromRGB(255, 255, 255)
title.BackgroundColor3 = Color3.fromRGB(35, 35, 42)
title.TextSize = 15
title.Font = Enum.Font.GothamBold
title.Parent = frame

local titleCorner = Instance.new("UICorner")
titleCorner.CornerRadius = UDim.new(0, 8)
titleCorner.Parent = title

-- TextBox for custom speed
local textBox = Instance.new("TextBox")
textBox.Size = UDim2.new(0.85, 0, 0, 35)
textBox.Position = UDim2.new(0.075, 0, 0.25, 0)
textBox.PlaceholderText = "Enter target speed..."
textBox.Text = ""
textBox.TextColor3 = Color3.fromRGB(255, 255, 255)
textBox.PlaceholderColor3 = Color3.fromRGB(150, 150, 150)
textBox.BackgroundColor3 = Color3.fromRGB(45, 45, 55)
textBox.TextSize = 14
textBox.Font = Enum.Font.Gotham
textBox.Parent = frame

local boxCorner = Instance.new("UICorner")
boxCorner.CornerRadius = UDim.new(0, 6)
boxCorner.Parent = textBox

-- Set Speed Button
local setBtn = Instance.new("TextButton")
setBtn.Size = UDim2.new(0.85, 0, 0, 35)
setBtn.Position = UDim2.new(0.075, 0, 0.48, 0)
setBtn.Text = "Set Speed"
setBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
setBtn.BackgroundColor3 = Color3.fromRGB(0, 162, 255)
setBtn.TextSize = 14
setBtn.Font = Enum.Font.GothamBold
setBtn.Parent = frame

local btnCorner = Instance.new("UICorner")
btnCorner.CornerRadius = UDim.new(0, 6)
btnCorner.Parent = setBtn

-- Reset Button (Normal 16)
local resetBtn = Instance.new("TextButton")
resetBtn.Size = UDim2.new(0.85, 0, 0, 30)
resetBtn.Position = UDim2.new(0.075, 0, 0.72, 0)
resetBtn.Text = "Reset (Normal)"
resetBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
resetBtn.BackgroundColor3 = Color3.fromRGB(200, 50, 50)
resetBtn.TextSize = 13
resetBtn.Font = Enum.Font.GothamBold
resetBtn.Parent = frame

local resetCorner = Instance.new("UICorner")
resetCorner.CornerRadius = UDim.new(0, 6)
resetCorner.Parent = resetBtn

-- Draggable logic
local dragging, dragInput, dragStart, startPos

title.InputBegan:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
        dragging = true
        dragStart = input.Position
        startPos = frame.Position
        
        input.Changed:Connect(function()
            if input.UserInputState == Enum.UserInputState.End then
                dragging = false
            end
        end)
    end
end)

title.InputChanged:Connect(function(input)
    if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
        dragInput = input
    end
end)

UserInputService.InputChanged:Connect(function(input)
    if input == dragInput and dragging then
        local delta = input.Position - dragStart
        frame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
    end
end)

-- Toggle visibility on INSERT key
UserInputService.InputBegan:Connect(function(input, gameProcessed)
    if input.KeyCode == Enum.KeyCode.Insert then
        frame.Visible = not frame.Visible
    end
end)

-- Speed logic and anti-reset loop
local targetSpeed = 16
local active = false

setBtn.MouseButton1Click:Connect(function()
    local val = tonumber(textBox.Text)
    if val then
        targetSpeed = val
        active = true
    end
end)

resetBtn.MouseButton1Click:Connect(function()
    targetSpeed = 16
    active = false
    textBox.Text = ""
    local char = player.Character
    if char and char:FindFirstChild("Humanoid") then
        char.Humanoid.WalkSpeed = 16
    end
end)

task.spawn(function()
    while true do
        task.wait(0.1)
        if active then
            local char = player.Character
            if char then
                local humanoid = char:FindFirstChild("Humanoid")
                if humanoid and humanoid.WalkSpeed ~= targetSpeed then
                    humanoid.WalkSpeed = targetSpeed
                end
            end
        end
    end
end)