Subversion Repositories seema-scanner

function writeMeshLabALN(alnStruct, alnFileName)
% write meshlab aln file

fid = fopen(alnFileName, 'w');
nPointClouds = length(alnStruct);

fprintf(fid, '%d\n', nPointClouds);

for i=1:nPointClouds
    
    fprintf(fid, '%s\n#\n', alnStruct(i).FileName);
    
    TR = eye(4,4);
    TR(1:3,1:3) = alnStruct(i).Rotation;
    TR(1:3, 4) = alnStruct(i).Translation;
    
    TR = transpose(TR);
    
    fprintf(fid, '%f %f %f %f\n', TR);
end

fclose(fid);

end