Speed modifier and Auto collect

local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local CoreGui = game:GetService("CoreGui")
local UIS = game:GetService("UserInputService")
local Workspace = game:GetService("Workspace")

local lp = Players.LocalPlayer
local ativo = true
local velo_val = 16
local auto_click = false
local conexoes = {}
local cache_teclas = {}

-- função pra conectar eventos e salvar pra limpar depois
local function conectar(sig, func)
	local c = sig:Connect(func)
	table.insert(conexoes, c)
	return c
end

-- busca as teclas do teclado no mapa
local function pegar_teclas()
	table.clear(cache_teclas)
	for _, v in ipairs(Workspace:GetDescendants()) do
		if v:IsA("BindableEvent") and v.Name == "Event" and v.Parent and v.Parent.Name == "KeyModel" then
			table.insert(cache_teclas, v)
		end
	end
end

-- loop da velocidade (render pra nao lagar)
conectar(RunService.RenderStepped, function()
	if not ativo then return end
	if lp.Character and lp.Character:FindFirstChild("Humanoid") then
		lp.Character.Humanoid.WalkSpeed = velo_val
	end
end)

-- loop do autoclick (0.05s como voce pediu)
task.spawn(function()
	pegar_teclas()
	while ativo do
		if auto_click then
			if #cache_teclas == 0 then pegar_teclas() end
			for i = 1, #cache_teclas do
				local e = cache_teclas[i]
				if e and e.Parent then e:Fire() end
			end
		end
		task.wait(0.05)
	end
end)

-- interface compacta
local screen = Instance.new("ScreenGui")
screen.Name = "ZedMenuV2"
screen.Parent = (success and CoreGui or lp:WaitForChild("PlayerGui"))

local main = Instance.new("Frame")
main.Size = UDim2.new(0, 300, 0, 200)
main.Position = UDim2.new(0.5, -150, 0.4, -100)
main.BackgroundColor3 = Color3.fromRGB(25, 25, 25)
main.BorderSizePixel = 0
main.Active = true
main.Draggable = true
main.Parent = screen

Instance.new("UICorner", main).CornerRadius = UDim.new(0, 10)
local borda = Instance.new("UIStroke", main)
borda.Color = Color3.fromRGB(60, 60, 60)
borda.Thickness = 2

local titulo = Instance.new("TextLabel", main)
titulo.Size = UDim2.new(1, 0, 0, 40)
titulo.Text = "ZED MENU"
titulo.TextColor3 = Color3.fromRGB(0, 170, 255)
titulo.Font = Enum.Font.GothamBold
titulo.TextSize = 18
titulo.BackgroundTransparency = 1

local fechar = Instance.new("TextButton", main)
fechar.Size = UDim2.new(0, 30, 0, 30)
fechar.Position = UDim2.new(1, -35, 0, 5)
fechar.Text = "X"
fechar.TextColor3 = Color3.fromRGB(255, 80, 80)
fechar.BackgroundTransparency = 1
fechar.Font = Enum.Font.GothamBold
fechar.TextSize = 18

-- Botao Auto Collect
local btn_click = Instance.new("TextButton", main)
btn_click.Size = UDim2.new(0, 260, 0, 40)
btn_click.Position = UDim2.new(0, 20, 0, 50)
btn_click.BackgroundColor3 = Color3.fromRGB(40, 40, 40)
btn_click.Text = "Auto Collect: OFF"
btn_click.TextColor3 = Color3.fromRGB(255, 255, 255)
btn_click.Font = Enum.Font.GothamSemibold
btn_click.TextSize = 14
Instance.new("UICorner", btn_click).CornerRadius = UDim.new(0, 6)

btn_click.MouseButton1Click:Connect(function()
	auto_click = not auto_click
	btn_click.Text = auto_click and "Auto Collect: ON" or "Auto Collect: OFF"
	btn_click.BackgroundColor3 = auto_click and Color3.fromRGB(0, 120, 200) or Color3.fromRGB(40, 40, 40)
end)

-- Slider de Velocidade
local s_back = Instance.new("Frame", main)
s_back.Size = UDim2.new(0, 260, 0, 50)
s_back.Position = UDim2.new(0, 20, 0, 110)
s_back.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
Instance.new("UICorner", s_back).CornerRadius = UDim.new(0, 6)

local s_label = Instance.new("TextLabel", s_back)
s_label.Size = UDim2.new(1, 0, 0, 20)
s_label.Text = "Velocidade: 16"
s_label.TextColor3 = Color3.fromRGB(200, 200, 200)
s_label.Font = Enum.Font.Gotham
s_label.TextSize = 12
s_label.BackgroundTransparency = 1

local s_barra = Instance.new("Frame", s_back)
s_barra.Size = UDim2.new(0, 220, 0, 4)
s_barra.Position = UDim2.new(0.5, -110, 0, 35)
s_barra.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
s_barra.BorderSizePixel = 0

local s_bola = Instance.new("TextButton", s_barra)
s_bola.Size = UDim2.new(0, 14, 0, 14)
s_bola.Position = UDim2.new(0, 0, 0.5, -7)
s_bola.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
s_bola.Text = ""
Instance.new("UICorner", s_bola).CornerRadius = UDim.new(1, 0)

-- Lógica do Slider
local movendo = false
local function update_slider()
	local mouse_pos = UIS:GetMouseLocation().X
	local barra_pos = s_barra.AbsolutePosition.X
	local barra_width = s_barra.AbsoluteSize.X
	local percent = math.clamp((mouse_pos - barra_pos) / barra_width, 0, 1)
	
	s_bola.Position = UDim2.new(percent, -7, 0.5, -7)
	velo_val = math.floor(16 + (percent * 284)) -- vai de 16 a 300
	s_label.Text = "Velocidade: " .. velo_val
end

s_bola.MouseButton1Down:Connect(function() movendo = true end)
conectar(UIS.InputEnded, function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then movendo = false end
end)
conectar(RunService.Heartbeat, function()
	if movendo then update_slider() end
end)

-- Limpeza
fechar.MouseButton1Click:Connect(function()
	ativo = false
	for _, c in pairs(conexoes) do c:Disconnect() end
	if lp.Character and lp.Character:FindFirstChild("Humanoid") then
		lp.Character.Humanoid.WalkSpeed = 16
	end
	screen:Destroy()
end)