axes = { [1 0 0], [0 1 0], [0 0 1], [0.5 0.5 0], [0.2 0.8 0.2], [0 0.05 1], [0 0.1 1]};
	names = { 'x', 'y','z','a1','a2','a3','a4'};
	
	axes = { [1 0 0] };
	names = { 'x'};
	
	if true
		res03={};
		for i=1:numel(axes)
			res03{i} = h3d_test03(axes{i});
		end
	
		fprintf('press..\n');
		pause;
	end
	

	for i=1:numel(axes)
		h3d_test03_movie(res03{i}.hts, sprintf('h3d_test03_%s.avi', names{i}));
	end