Farm

local waitTime = 3.5
local found = false
local go = true

function findVehicle()
   while not found do
       local vehicles = Workspace.Vehicles:getChildren()
       for i=1,#vehicles do
           if vehicles[i]:findFirstChild'owner' then
               if vehicles[i].owner.Value == game:GetService'Players'.LocalPlayer.Name then
                   found = true
                   vehicle = vehicles[i]
                   vehStats = vehicle.Handling
                   vehStats.MaxSpeed.Value = 1200
                   vehStats.Torque.Value = 50000
                   vehStats.SteeringRadiusConstant.Value = 120000000
               end
           end
       end
       wait(1)
   end
   wait(2)
   vehicle.PrimaryPart = vehicle.Chassis.VehicleSeat
end

function farm()
   while wait(waitTime) do
       vehicle:SetPrimaryPartCFrame(CFrame.new(-1758.7, 40, 543))
       game:GetService'VirtualUser':SetKeyUp("w")
       game:GetService'VirtualUser':SetKeyDown("w")
   end
end
findVehicle()
while go do
   if not pcall(farm()) then
       found = false
       findVehicle()
   end
end