local ScreenGui = Instance.new("ScreenGui")
local IntroFrame = Instance.new("Frame")
local IntroText = Instance.new("TextLabel")
local IntroCredit = Instance.new("TextLabel")

ScreenGui.Parent = game.CoreGui
ScreenGui.ResetOnSpawn = false

local function addBorder(obj)
    local stroke = Instance.new("UIStroke")
    stroke.Thickness = 2
    stroke.Color = Color3.fromRGB(0, 0, 80)
    stroke.ApplyStrokeMode = Enum.ApplyStrokeMode.Border
    stroke.Transparency = 1
    stroke.Parent = obj
    return stroke
end

IntroFrame.Parent = ScreenGui
IntroFrame.Size = UDim2.new(1, 0, 1, 0)
IntroFrame.BackgroundTransparency = 1

IntroText.Parent = IntroFrame
IntroText.Size = UDim2.new(1, 0, 0, 100)
IntroText.Position = UDim2.new(0, 0, 0.2, 0) 
IntroText.BackgroundTransparency = 1
IntroText.Text = "A simple Speedhacks GUI"
IntroText.TextColor3 = Color3.fromRGB(173, 216, 230) 
IntroText.Font = Enum.Font.SourceSansBold
IntroText.TextSize = 55 
IntroText.TextTransparency = 1

IntroCredit.Parent = IntroFrame
IntroCredit.Size = UDim2.new(1, 0, 0, 30)
IntroCredit.Position = UDim2.new(0, 0, 1, -50)
IntroCredit.BackgroundTransparency = 1
IntroCredit.Text = "Made by CalinYT29 and a little Ai help"
IntroCredit.TextColor3 = Color3.new(0.8, 0.8, 0.8)
IntroCredit.Font = Enum.Font.SourceSansItalic
IntroCredit.TextSize = 18
IntroCredit.TextTransparency = 1

local Frame = Instance.new("Frame")
local UICorner = Instance.new("UICorner")
local Content = Instance.new("Frame")
local Title = Instance.new("TextLabel")
local Credit = Instance.new("TextLabel")
local IncreaseBtn = Instance.new("TextButton")
local DecreaseBtn = Instance.new("TextButton")
local ResetBtn = Instance.new("TextButton")
local SpeedInput = Instance.new("TextBox")
local ApplyBtn = Instance.new("TextButton")
local CloseBtn = Instance.new("TextButton")
local MinBtn = Instance.new("TextButton")

Frame.Name = "Main"
Frame.Parent = ScreenGui
Frame.BackgroundColor3 = Color3.fromRGB(0, 0, 128)
Frame.Position = UDim2.new(0.5, -75, 0.1, 0) 
Frame.Size = UDim2.new(0, 160, 0, 280)
Frame.Active = true
Frame.Draggable = true
Frame.BackgroundTransparency = 1 
Frame.Visible = false

UICorner.CornerRadius = UDim.new(0, 12)
UICorner.Parent = Frame
local MainStroke = addBorder(Frame)

Title.Parent = Frame
Title.BackgroundTransparency = 1
Title.Position = UDim2.new(0, 10, 0, 5)
Title.Size = UDim2.new(0, 80, 0, 25)
Title.Text = "Speedhacks"
Title.TextColor3 = Color3.new(1, 1, 1)
Title.Font = Enum.Font.SourceSansBold
Title.TextSize = 16
Title.TextXAlignment = Enum.TextXAlignment.Left
Title.TextTransparency = 1

Content.Parent = Frame
Content.BackgroundTransparency = 1
Content.Size = UDim2.new(1, 0, 1, 0)

Credit.Parent = Content
Credit.BackgroundTransparency = 1
Credit.Position = UDim2.new(0, 0, 0, 255)
Credit.Size = UDim2.new(1, 0, 0, 20)
Credit.Text = "Made by CalinYT29"
Credit.TextColor3 = Color3.fromRGB(220, 220, 220)
Credit.Font = Enum.Font.SourceSansBold
Credit.TextSize = 10 
Credit.TextTransparency = 1

local function style(btn, text, color, pos)
    btn.Parent = Content
    btn.BackgroundColor3 = color
    btn.Size = UDim2.new(1, -20, 0, 35)
    btn.Position = pos
    btn.Text = text
    btn.TextColor3 = Color3.new(1, 1, 1)
    btn.Font = Enum.Font.SourceSansBold
    btn.TextSize = 16
    btn.BackgroundTransparency = 1
    btn.TextTransparency = 1
    local c = Instance.new("UICorner")
    c.CornerRadius = UDim.new(0, 8)
    c.Parent = btn
    addBorder(btn)
end

style(IncreaseBtn, "+5 Speed", Color3.fromRGB(46, 204, 113), UDim2.new(0, 10, 0, 45))
style(DecreaseBtn, "-5 Speed", Color3.fromRGB(231, 76, 60), UDim2.new(0, 10, 0, 85))
style(ResetBtn, "Reset", Color3.fromRGB(127, 140, 141), UDim2.new(0, 10, 0, 125))

SpeedInput.Parent = Content
SpeedInput.Size = UDim2.new(1, -20, 0, 30)
SpeedInput.Position = UDim2.new(0, 10, 0, 170)
SpeedInput.PlaceholderText = "Custom Speed"
SpeedInput.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
SpeedInput.TextSize = 14
SpeedInput.BackgroundTransparency = 1
SpeedInput.TextTransparency = 1
local sc = Instance.new("UICorner")
sc.CornerRadius = UDim.new(0, 8)
sc.Parent = SpeedInput
addBorder(SpeedInput)

style(ApplyBtn, "Apply", Color3.fromRGB(44, 62, 80), UDim2.new(0, 10, 0, 210))
ApplyBtn.TextSize = 18

CloseBtn.Parent = Frame
CloseBtn.BackgroundColor3 = Color3.fromRGB(192, 57, 43)
CloseBtn.Size = UDim2.new(0, 25, 0, 25)
CloseBtn.Position = UDim2.new(1, -30, 0, 5)
CloseBtn.Text = "X"
CloseBtn.TextColor3 = Color3.new(1, 1, 1)
CloseBtn.BackgroundTransparency = 1
CloseBtn.TextTransparency = 1
local cc = Instance.new("UICorner")
cc.CornerRadius = UDim.new(0, 8)
cc.Parent = CloseBtn
addBorder(CloseBtn)

MinBtn.Parent = Frame
MinBtn.BackgroundColor3 = Color3.fromRGB(52, 73, 94)
MinBtn.Size = UDim2.new(0, 25, 0, 25)
MinBtn.Position = UDim2.new(1, -60, 0, 5)
MinBtn.Text = "-"
MinBtn.TextColor3 = Color3.new(1, 1, 1)
MinBtn.BackgroundTransparency = 1
MinBtn.TextTransparency = 1
local mc = Instance.new("UICorner")
mc.CornerRadius = UDim.new(0, 8)
mc.Parent = MinBtn
addBorder(MinBtn)

local player = game.Players.LocalPlayer
local defaultSpeed = 16
local currentSpeed = 16

local function getHum() 
    return player.Character and player.Character:FindFirstChildOfClass("Humanoid") 
end

player.CharacterAdded:Connect(function(character)
    local h = character:WaitForChild("Humanoid")
    h.WalkSpeed = currentSpeed
end)

task.spawn(function()
    local char = player.Character or player.CharacterAdded:Wait()
    local hum = char:WaitForChild("Humanoid")
    defaultSpeed = hum.WalkSpeed
    currentSpeed = hum.WalkSpeed
end)

IncreaseBtn.MouseButton1Click:Connect(function() 
    local h = getHum() 
    if h then 
        currentSpeed = h.WalkSpeed + 5 
        h.WalkSpeed = currentSpeed
    end 
end)

DecreaseBtn.MouseButton1Click:Connect(function() 
    local h = getHum() 
    if h then 
        currentSpeed = h.WalkSpeed - 5 
        h.WalkSpeed = currentSpeed
    end 
end)

ResetBtn.MouseButton1Click:Connect(function() 
    local h = getHum() 
    if h then 
        currentSpeed = defaultSpeed
        h.WalkSpeed = currentSpeed
    end 
end)

ApplyBtn.MouseButton1Click:Connect(function() 
    local h = getHum() 
    local val = tonumber(SpeedInput.Text) 
    if h and val then 
        currentSpeed = val
        h.WalkSpeed = currentSpeed
    end 
end)

CloseBtn.MouseButton1Click:Connect(function() ScreenGui:Destroy() end)

local minimized = false
MinBtn.MouseButton1Click:Connect(function()
    minimized = not minimized
    Content.Visible = not minimized
    Frame:TweenSize(minimized and UDim2.new(0, 160, 0, 35) or UDim2.new(0, 160, 0, 280), "Out", "Quad", 0.3, true)
end)

local ts = game:GetService("TweenService")
local info = TweenInfo.new(1.2, Enum.EasingStyle.Quart, Enum.EasingDirection.Out)

ts:Create(IntroText, info, {TextTransparency = 0}):Play()
ts:Create(IntroCredit, info, {TextTransparency = 0}):Play()
task.wait(3.8)

Frame.Visible = true
ts:Create(IntroText, info, {TextTransparency = 1}):Play()
ts:Create(IntroCredit, info, {TextTransparency = 1}):Play()

ts:Create(Frame, info, {BackgroundTransparency = 0, Position = UDim2.new(0.5, -75, 0.02, 0)}):Play()
ts:Create(Title, info, {TextTransparency = 0}):Play()
ts:Create(Credit, info, {TextTransparency = 0}):Play()

local toFade = {IncreaseBtn, DecreaseBtn, ResetBtn, ApplyBtn, CloseBtn, MinBtn, SpeedInput}
for _, item in pairs(toFade) do
    ts:Create(item, info, {BackgroundTransparency = 0, TextTransparency = 0}):Play()
    local stroke = item:FindFirstChildOfClass("UIStroke")
    if stroke then ts:Create(stroke, info, {Transparency = 0}):Play() end
end
ts:Create(MainStroke, info, {Transparency = 0}):Play()

task.wait(1.2)
IntroFrame:Destroy()