midiciz(ostidx,oftidx,nad,fd,w,fs,data)

function midiciz(ostidx,oftidx,nad,fd,w,fs,data)

if min(length(data))>=2
    data=data(:,1);
end
fs=44100;

figure('Position',[ 739   357   511   343]);
L=length(data)/fs;  
axis([0 L 0 2000]);
P=get(gca,'position');
Ln=P(3);
Fn=P(4);
xlabel('time (s)');
ylabel('frequency (Hz)');

%rectangle('Position',[5,1000,3,15],'facecolor','b')
% 5: balang zaman(b), 1000:frekans(f), 3: Sre(s), 15: Ykseklik 
    
    
for i=1:length(ostidx)

    b=(ostidx(i)*w/fs);
    bn=b*Ln/L+0.13
    f=fd(i);
    fn=f*Fn/2000+0.11
    s=(oftidx(i)*w/fs)-b;
    sn=(oftidx(i)*w/fs)*Ln/L+0.13-bn
   
    rectangle('Position',[b,f,s,15],'facecolor','b')
    anno=annotation('textbox',[bn fn 0.05 0.05])
    set(anno,'String',nad{i},'Linestyle','none','Fontsize',8)

end