local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")

local player = Players.LocalPlayer
local character = player.Character or player.CharacterAdded:Wait()
local humanoid = character:WaitForChild("Humanoid")

local speedEnabled = false
local normalWalkSpeed = 16
local speedValue = 50

-- Create ScreenGui
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "LucaTechSpeedGui"
screenGui.Parent = player:WaitForChild("PlayerGui")

-- Create main frame
local frame = Instance.new("Frame")
frame.Size = UDim2.new(0, 250, 0, 120)
frame.Position = UDim2.new(0, 20, 0, 20)
frame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
frame.BorderSizePixel = 0
frame.Parent = screenGui

-- Title
local title = Instance.new("TextLabel")
title.Size = UDim2.new(1, 0, 0, 30)
title.BackgroundTransparency = 1
title.Text = "LucaTech Speed"
title.TextColor3 = Color3.fromRGB(255, 255, 255)
title.Font = Enum.Font.GothamBold
title.TextSize = 24
title.Parent = frame

-- Subtitle
local subtitle = Instance.new("TextLabel")
subtitle.Size = UDim2.new(1, 0, 0, 20)
subtitle.Position = UDim2.new(0, 0, 0, 30)
subtitle.BackgroundTransparency = 1
subtitle.Text = "Mit Q an und aus schaltbar"
subtitle.TextColor3 = Color3.fromRGB(200, 200, 200)
subtitle.Font = Enum.Font.Gotham
subtitle.TextSize = 16
subtitle.Parent = frame

-- Speed label
local speedLabel = Instance.new("TextLabel")
speedLabel.Size = UDim2.new(1, -20, 0, 20)
speedLabel.Position = UDim2.new(0, 10, 0, 60)
speedLabel.BackgroundTransparency = 1
speedLabel.Text = "Speed: " .. speedValue
speedLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
speedLabel.Font = Enum.Font.Gotham
speedLabel.TextSize = 18
speedLabel.TextXAlignment = Enum.TextXAlignment.Left
speedLabel.Parent = frame

-- Slider frame
local sliderFrame = Instance.new("Frame")
sliderFrame.Size = UDim2.new(1, -20, 0, 20)
sliderFrame.Position = UDim2.new(0, 10, 0, 85)
sliderFrame.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
sliderFrame.BorderSizePixel = 0
sliderFrame.Parent = frame

-- Slider fill
local sliderFill = Instance.new("Frame")
sliderFill.Size = UDim2.new((speedValue - 16) / (200 - 16), 0, 1, 0)
sliderFill.BackgroundColor3 = Color3.fromRGB(0, 170, 255)
sliderFill.BorderSizePixel = 0
sliderFill.Parent = sliderFrame

-- Slider button
local sliderButton = Instance.new("TextButton")
sliderButton.Size = UDim2.new(0, 15, 1, 0)
sliderButton.Position = UDim2.new((speedValue - 16) / (200 - 16), -7, 0, 0)
sliderButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
sliderButton.BorderSizePixel = 0
sliderButton.AutoButtonColor = false
sliderButton.Text = ""
sliderButton.Parent = sliderFrame

local dragging = false

sliderButton.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		dragging = true
	end
end)

sliderButton.InputEnded:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		dragging = false
	end
end)

sliderFrame.InputChanged:Connect(function(input)
	if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then
		local relativeX = math.clamp(input.Position.X - sliderFrame.AbsolutePosition.X, 0, sliderFrame.AbsoluteSize.X)
		local percent = relativeX / sliderFrame.AbsoluteSize.X
		speedValue = math.floor(16 + percent * (200 - 16))
		speedLabel.Text = "Speed: " .. speedValue
		sliderFill.Size = UDim2.new(percent, 0, 1, 0)
		sliderButton.Position = UDim2.new(percent, -7, 0, 0)
		if speedEnabled then
			humanoid.WalkSpeed = speedValue
		end
	end
end)

-- Toggle speed with Q
UserInputService.InputBegan:Connect(function(input, gameProcessed)
	if not gameProcessed and input.KeyCode == Enum.KeyCode.Q then
		speedEnabled = not speedEnabled
		if speedEnabled then
			humanoid.WalkSpeed = speedValue
		else
			humanoid.WalkSpeed = normalWalkSpeed
		end
	end
end)

-- Reset WalkSpeed on character respawn
player.CharacterAdded:Connect(function(char)
	character = char
	humanoid = character:WaitForChild("Humanoid")
	if speedEnabled then
		humanoid.WalkSpeed = speedValue
	else
		humanoid.WalkSpeed = normalWalkSpeed
	end
end)