emmanouil@6: function [melody] = loadMelodyFile(filename)
emmanouil@6: 
emmanouil@6: % Open raw file
emmanouil@6: fid = fopen(filename,'r+');
emmanouil@6: 
emmanouil@6: % Read 1st line
emmanouil@6: tline = fgetl(fid);
yading@10: onset_pitch(:,1) = sscanf(tline, '%*s %f %f');
emmanouil@6: 
emmanouil@6: % Read rest of the lines
emmanouil@6: i=1;
emmanouil@6: while ischar(tline)
emmanouil@6:     i = i+1;
emmanouil@6:     tline = fgetl(fid);
emmanouil@6:     if (ischar(tline))
emmanouil@6:         onset_pitch(:,i) = sscanf(tline, '%f\t%f');
emmanouil@6:     end;
emmanouil@6: end
emmanouil@6: melody = onset_pitch;
emmanouil@6: 
emmanouil@6: % Close file
emmanouil@6: fclose(fid);
emmanouil@6: