--[[
    ROBLOX SPEED CONTROL SPAMMER v20
    Özellik: Hız kutusuna yazdığın sayı kadar katlayarak tıklar.
]]

local Players = game:GetService("Players")
local RunService = game:GetService("RunService")
local LocalPlayer = Players.LocalPlayer
local TargetGui = LocalPlayer:WaitForChild("PlayerGui")

-- Eski GUI varsa sil
if TargetGui:FindFirstChild("SpeedControlGUI") then
    TargetGui.SpeedControlGUI:Destroy()
end

-- 1. GUI TASARIMI
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "SpeedControlGUI"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = TargetGui

local MainFrame = Instance.new("Frame")
MainFrame.Size = UDim2.new(0, 300, 0, 420)
MainFrame.Position = UDim2.new(0.5, -150, 0.5, -210)
MainFrame.BackgroundColor3 = Color3.fromRGB(20, 20, 25)
MainFrame.BorderSizePixel = 2
MainFrame.BorderColor3 = Color3.fromRGB(255, 170, 0) -- Turuncu Tema
MainFrame.Active = true
MainFrame.Draggable = true
MainFrame.Parent = ScreenGui

-- Başlık
local Title = Instance.new("TextLabel")
Title.Text = "HIZ AYARLI SPAMMER v20"
Title.Size = UDim2.new(1, 0, 0, 40)
Title.BackgroundColor3 = Color3.fromRGB(200, 100, 0)
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.Font = Enum.Font.GothamBlack
Title.TextSize = 16
Title.Parent = MainFrame

local CloseBtn = Instance.new("TextButton")
CloseBtn.Text = "X"
CloseBtn.Size = UDim2.new(0, 40, 0, 40)
CloseBtn.Position = UDim2.new(1, -40, 0, 0)
CloseBtn.BackgroundColor3 = Color3.fromRGB(180, 0, 0)
CloseBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
CloseBtn.Parent = MainFrame
CloseBtn.MouseButton1Click:Connect(function() ScreenGui:Destroy() end)

-- Seçilen Bilgi
local InfoLabel = Instance.new("TextLabel")
InfoLabel.Text = "Seçilen: YOK"
InfoLabel.Size = UDim2.new(1, 0, 0, 30)
InfoLabel.Position = UDim2.new(0, 0, 0, 45)
InfoLabel.BackgroundTransparency = 1
InfoLabel.TextColor3 = Color3.fromRGB(255, 255, 0)
InfoLabel.Font = Enum.Font.GothamBold
InfoLabel.Parent = MainFrame

-- Liste
local Scroll = Instance.new("ScrollingFrame")
Scroll.Size = UDim2.new(1, -20, 1, -160)
Scroll.Position = UDim2.new(0, 10, 0, 80)
Scroll.BackgroundColor3 = Color3.fromRGB(30, 30, 35)
Scroll.BorderSizePixel = 0
Scroll.Parent = MainFrame

local UIList = Instance.new("UIListLayout")
UIList.Padding = UDim.new(0, 4)
UIList.Parent = Scroll
UIList:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
    Scroll.CanvasSize = UDim2.new(0, 0, 0, UIList.AbsoluteContentSize.Y)
end)

-- ALT AYAR PANELİ
local SettingsFrame = Instance.new("Frame")
SettingsFrame.Size = UDim2.new(1, 0, 0, 80)
SettingsFrame.Position = UDim2.new(0, 0, 1, -80)
SettingsFrame.BackgroundColor3 = Color3.fromRGB(25, 25, 30)
SettingsFrame.BorderSizePixel = 0
SettingsFrame.Parent = MainFrame

-- Hız Kutusu
local SpeedBox = Instance.new("TextBox")
SpeedBox.Text = "5" -- VARSAYILAN HIZ
SpeedBox.PlaceholderText = "Hız (1-50)"
SpeedBox.Size = UDim2.new(0.3, 0, 0, 30)
SpeedBox.Position = UDim2.new(0.65, 0, 0, 5)
SpeedBox.BackgroundColor3 = Color3.fromRGB(60, 60, 60)
SpeedBox.TextColor3 = Color3.fromRGB(255, 255, 255)
SpeedBox.Font = Enum.Font.GothamBold
SpeedBox.Parent = SettingsFrame

local SpeedLabel = Instance.new("TextLabel")
SpeedLabel.Text = "Hız Gücü (1-50):"
SpeedLabel.Size = UDim2.new(0.6, 0, 0, 30)
SpeedLabel.Position = UDim2.new(0.05, 0, 0, 5)
SpeedLabel.BackgroundTransparency = 1
SpeedLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
SpeedLabel.TextXAlignment = Enum.TextXAlignment.Left
SpeedLabel.Font = Enum.Font.Gotham
SpeedLabel.Parent = SettingsFrame

-- Butonlar
local RefreshBtn = Instance.new("TextButton")
RefreshBtn.Text = "YENİLE"
RefreshBtn.Size = UDim2.new(0.3, 0, 0, 40)
RefreshBtn.Position = UDim2.new(0, 0, 1, -40)
RefreshBtn.BackgroundColor3 = Color3.fromRGB(80, 80, 80)
RefreshBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
RefreshBtn.Font = Enum.Font.GothamBold
RefreshBtn.Parent = SettingsFrame

local ToggleBtn = Instance.new("TextButton")
ToggleBtn.Text = "SALDIR (BAŞLAT)"
ToggleBtn.Size = UDim2.new(0.7, 0, 0, 40)
ToggleBtn.Position = UDim2.new(0.3, 0, 1, -40)
ToggleBtn.BackgroundColor3 = Color3.fromRGB(0, 180, 0)
ToggleBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
ToggleBtn.Font = Enum.Font.GothamBlack
ToggleBtn.Parent = SettingsFrame

-- === MANTIK KISMI ===

local SelectedToolName = nil
local IsSpamming = false
local Connection = nil

-- Envanteri Listele
local function RefreshInv()
    for _, v in pairs(Scroll:GetChildren()) do if v:IsA("TextButton") then v:Destroy() end end
    
    local found = {}
    local function Add(loc)
        for _, t in pairs(loc:GetChildren()) do
            if t:IsA("Tool") and not found[t.Name] then
                found[t.Name] = true
                local btn = Instance.new("TextButton")
                btn.Size = UDim2.new(1, 0, 0, 35)
                btn.BackgroundColor3 = Color3.fromRGB(45, 45, 50)
                btn.TextColor3 = Color3.fromRGB(255, 255, 255)
                btn.Text = "  " .. t.Name
                btn.TextXAlignment = Enum.TextXAlignment.Left
                btn.Parent = Scroll
                
                btn.MouseButton1Click:Connect(function()
                    SelectedToolName = t.Name
                    InfoLabel.Text = "Seçilen: " .. t.Name
                    for _, b in pairs(Scroll:GetChildren()) do 
                        if b:IsA("TextButton") then b.BackgroundColor3 = Color3.fromRGB(45, 45, 50) end 
                    end
                    btn.BackgroundColor3 = Color3.fromRGB(255, 140, 0)
                end)
            end
        end
    end
    
    if LocalPlayer.Character then Add(LocalPlayer.Character) end
    Add(LocalPlayer.Backpack)
end

-- SALDIRI DÖNGÜSÜ
local function ToggleAction()
    if not SelectedToolName then 
        InfoLabel.Text = "LÜTFEN SEÇİM YAP!"
        InfoLabel.TextColor3 = Color3.fromRGB(255, 0, 0)
        task.wait(1)
        InfoLabel.TextColor3 = Color3.fromRGB(255, 255, 0)
        return 
    end
    
    IsSpamming = not IsSpamming
    
    if IsSpamming then
        ToggleBtn.Text = "DURDUR"
        ToggleBtn.BackgroundColor3 = Color3.fromRGB(200, 0, 0)
        
        -- Hız Değerini Al (Eğer sayı değilse 1 yap)
        local SpeedVal = tonumber(SpeedBox.Text) or 1
        
        -- Emniyet Kilidi (Çok abartılmasın diye max 100)
        if SpeedVal > 100 then SpeedVal = 100 end
        if SpeedVal < 1 then SpeedVal = 1 end
        
        Connection = RunService.RenderStepped:Connect(function()
            local Char = LocalPlayer.Character
            if not Char then return end
            
            local Tool = Char:FindFirstChild(SelectedToolName)
            if not Tool then
                local BTool = LocalPlayer.Backpack:FindFirstChild(SelectedToolName)
                if BTool then 
                    Char.Humanoid:EquipTool(BTool)
                    Tool = BTool
                end
            end
            
            if Tool and Tool.Parent == Char then
                -- HIZ DÖNGÜSÜ: Girilen sayı kadar tıkla
                for i = 1, SpeedVal do
                    Tool:Activate()
                end
            end
        end)
    else
        ToggleBtn.Text = "SALDIR (BAŞLAT)"
        ToggleBtn.BackgroundColor3 = Color3.fromRGB(0, 180, 0)
        if Connection then Connection:Disconnect() end
    end
end

RefreshBtn.MouseButton1Click:Connect(RefreshInv)
ToggleBtn.MouseButton1Click:Connect(ToggleAction)

RefreshInv()
print("Speed Control Spammer Hazır.")