for i, v in ipairs(workspace:GetChildren()) do
  if v:IsA("BasePart") and v.Name ~= "BasePlate" then
    v:Destroy()
  end
end