view listeningTest/reportTest.m @ 15:24be5e9ce25b tip

Update README
author Brecht De Man <brecht.deman@bcu.ac.uk>
date Thu, 20 Sep 2018 12:23:20 +0200
parents 5e72201496c8
children
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)) % if first time, just write
   fid=fopen(fidInd,'w');
else   
   fid=fopen(fidInd,'a');                % if not first time, append
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);