image thumbnail
from Penarayuz by Ozgur Emekli
Tool (GUI) for music audio transcription

pencal(ostidx,oftidx,fd,w)
function pencal(ostidx,oftidx,fd,w)

% Notaalar fonksiyon. Giriler: temel frekans, harmonik katsaylar
% matrisi, harmoniklerin g matrisi ve notann alma sresi
% Bat mzii nota sisteminde, iki tam ses arasndaki frekans fark 9/8
%                              iki yarm ses arasndaki fark 256/243'tr.
%                              
fs=44100;
for i=1:length(ostidx)
    T=w*(oftidx(i)-ostidx(i))/fs;
t=[0:1/44100:T];

y=zeros(1,length(t));

y=sin(2*pi*fd(i)*t); 

soundsc(y,fs);

pause(T);

if i~=length(ostidx)
pause(w*(ostidx(i+1)-oftidx(i))/fs);
end

end

Contact us at files@mathworks.com