annotate 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
rev   line source
b@0 1 function fid=reportTest(sesDat,rsl,typeTst)
b@0 2 % write report
b@0 3
b@0 4 fidInd=['responses/' sesDat.id,'_',sesDat.sesScript];
b@2 5 if (~sesDat.reREAD && (sesDat.noTst==1)) % if first time, just write
b@0 6 fid=fopen(fidInd,'w');
b@0 7 else
b@2 8 fid=fopen(fidInd,'a'); % if not first time, append
b@0 9 end
b@0 10 eol(fid);
b@0 11
b@0 12 % title
b@0 13 fprintf(fid,'%%%%%%%%%%%% Module #%d : %s \t ID: %s \t DATE: %s ',sesDat.noTst,typeTst,sesDat.id,date);eol(fid);eol(fid);
b@0 14
b@0 15 % elapsed time
b@0 16 min=floor(rsl.duration/60);
b@0 17 sec=floor(rsl.duration-min*60);
b@0 18 fprintf(fid,'%%%% ELAPSED TIME : %d min %d sec ',min,sec);eol(fid);
b@0 19 fprintf(fid,'Song: %s\n', sesDat.cuSndListFile);