farm all

-- ClaimWins + Speed Farm
local CW = game:GetService("ReplicatedStorage").Remote.Event.Player.ClaimWins
local CS = game:GetService("CollectionService")
local RS = game:GetService("RunService")
local plr = game:GetService("Players").LocalPlayer
local E = {farm=false, tp=false}

local function getTreadmillPos()
    local treadmills = workspace:FindFirstChild("Treadmills")
    if treadmills then
        local world = treadmills:FindFirstChild("World1")
        if world then
            for _, tm in ipairs(world:GetChildren()) do
                local hb = tm:FindFirstChild("HitBox")
                if hb then return hb.CFrame end
            end
        end
    end
    return nil
end

local function getMyChar()
    local chars = workspace:FindFirstChild("Characters")
    return chars and chars:FindFirstChild(plr.Name.."Character")
end

pcall(function() plr.PlayerGui:FindFirstChild("CWinGUI"):Destroy() end)
local gui = Instance.new("ScreenGui"); gui.Name="CWinGUI"; gui.ResetOnSpawn=false; gui.Parent=plr.PlayerGui

local main = Instance.new("Frame"); main.Size=UDim2.new(0,220,0,125); main.Position=UDim2.new(0.5,-110,0,20)
main.BackgroundColor3=Color3.fromRGB(15,15,25); main.BorderSizePixel=0; main.Parent=gui

local dr,ds,sp
main.InputBegan:Connect(function(i)
    if i.UserInputType==Enum.UserInputType.MouseButton1 or i.UserInputType==Enum.UserInputType.Touch then
        dr=true;ds=i.Position;sp=main.Position
        i.Changed:Connect(function() if i.UserInputState==Enum.UserInputState.End then dr=false end end)
    end
end)
game:GetService("UserInputService").InputChanged:Connect(function(i)
    if dr and (i.UserInputType==Enum.UserInputType.MouseMovement or i.UserInputType==Enum.UserInputType.Touch) then
        local d=i.Position-ds; main.Position=UDim2.new(sp.X.Scale,sp.X.Offset+d.X,sp.Y.Scale,sp.Y.Offset+d.Y)
    end
end)

local t=Instance.new("TextLabel",main); t.Size=UDim2.new(1,-30,0,25); t.BackgroundColor3=Color3.fromRGB(60,30,120)
t.BorderSizePixel=0; t.Text=" Speed + Wins"; t.TextColor3=Color3.fromRGB(220,220,220); t.TextSize=13; t.Font=Enum.Font.GothamBold; t.TextXAlignment=Enum.TextXAlignment.Left
local x=Instance.new("TextButton",main); x.Size=UDim2.new(0,25,0,25); x.Position=UDim2.new(1,-27,0,0)
x.BackgroundColor3=Color3.fromRGB(180,50,50); x.Text="X"; x.TextColor3=Color3.fromRGB(255,255,255); x.TextSize=12; x.Font=Enum.Font.GothamBold; x.BorderSizePixel=0
x.MouseButton1Click:Connect(function() for k in pairs(E) do E[k]=false end; gui:Destroy() end)

local cf=Instance.new("Frame",main); cf.Size=UDim2.new(1,-10,1,-30); cf.Position=UDim2.new(0,5,0,28); cf.BackgroundTransparency=1
Instance.new("UIListLayout",cf).Padding=UDim.new(0,4)

local function tog(name, key)
    local btn=Instance.new("TextButton",cf); btn.Size=UDim2.new(1,0,0,28)
    btn.BackgroundColor3=Color3.fromRGB(40,40,55); btn.Text=name..": OFF"
    btn.TextColor3=Color3.fromRGB(200,200,200); btn.TextSize=13; btn.Font=Enum.Font.GothamBold; btn.BorderSizePixel=0
    btn.MouseButton1Click:Connect(function()
        E[key]=not E[key]
        btn.BackgroundColor3=E[key] and Color3.fromRGB(60,30,120) or Color3.fromRGB(40,40,55)
        btn.Text=name..": "..(E[key] and "ON" or "OFF")
    end)
end

tog("Auto Wins","farm")
tog("Auto Treadmill","tp")

-- Wins loop
task.spawn(function()
    while gui.Parent do
        if E.farm then
            for _, obj in ipairs(CS:GetTagged("WinGiver")) do
                if not E.farm then break end
                if obj.Parent then
                    pcall(function() CW:FireServer("Free", obj:GetPivot().Position) end)
                end
            end
            task.wait(1)
        else
            task.wait(0.5)
        end
    end
end)

-- Treadmill TP loop (every frame)
RS.Heartbeat:Connect(function()
    if E.tp then
        local myChar = getMyChar()
        local pos = getTreadmillPos()
        if myChar and pos then myChar.CFrame = pos end
    end
end)