view listeningTest/reportTest.m @ 1:b64c9fb34bd0

Response folder included in package (put README in it).
author Brecht <b.deman@qmul.ac.uk>
date Wed, 30 Jul 2014 12:38:47 +0100
parents 4fd284285159
children 5e72201496c8
line wrap: on
line source
function fid=reportTest(sesDat,rsl,typeTst)
% write report

fidInd=['responses/' sesDat.id,'_',sesDat.sesScript];
if (~sesDat.reREAD && (sesDat.noTst==1))
   fid=fopen(fidInd,'w');
else   
   fid=fopen(fidInd,'a');
end
eol(fid);

% title
fprintf(fid,'%%%%%%%%%%%% Module #%d : %s \t ID: %s  \t DATE: %s ',sesDat.noTst,typeTst,sesDat.id,date);eol(fid);eol(fid);

% elapsed time
min=floor(rsl.duration/60);
sec=floor(rsl.duration-min*60);
fprintf(fid,'%%%% ELAPSED TIME : %d min %d sec ',min,sec);eol(fid);
fprintf(fid,'Song: %s\n', sesDat.cuSndListFile);