Daniel@0: %%%% SEGMENTATION
Daniel@0: 
Daniel@0: m = mirmfcc('valse_triste_happy','Rank',2:10,'Frame',0.05,1)
Daniel@0: sim = mirsimatrix(m)
Daniel@0: n = mirnovelty(sim,'KernelSize',150)
Daniel@0: p = mirpeaks(n,'Contrast',.1,'Total',Inf,'NoBegin','NoEnd')
Daniel@0: seg = mirsegment('valse_triste_happy',p)
Daniel@0: mirplay(seg)
Daniel@0: 
Daniel@0: display('Strike any key to continue...');
Daniel@0: pause
Daniel@0: close all
Daniel@0: 
Daniel@0: [seg p m a] = mirsegment('valse_triste_happy','MFCC',2:10,...
Daniel@0:                                 'KernelSize',150,'Contrast',.1)
Daniel@0:        
Daniel@0: display('Strike any key to continue...');
Daniel@0: pause
Daniel@0: close all
Daniel@0:                                 
Daniel@0: %%%% TEMPO
Daniel@0:                                 
Daniel@0: fb = mirfilterbank('czardas')
Daniel@0: %mirplay(fb)
Daniel@0: e = mirenvelope(fb) 
Daniel@0: de = mirenvelope(e,'Diff','Halfwave')
Daniel@0: s = mirsum(de,'Centered') 
Daniel@0: f = mirframe(s,3,.2);
Daniel@0: ac = mirautocor(s,'Resonance','Enhanced') 
Daniel@0: p = mirpeaks(ac,'Total',1) 
Daniel@0: t = mirtempo(p)
Daniel@0: 
Daniel@0: display('Strike any key to continue...');
Daniel@0: pause
Daniel@0: close all
Daniel@0: 
Daniel@0: [t,p] = mirtempo('czardas','Periodicity','Frame')
Daniel@0: h = mirhisto(t)
Daniel@0: 
Daniel@0: display('Strike any key to continue...');
Daniel@0: pause
Daniel@0: close all
Daniel@0: 
Daniel@0: %%%% TONALITY
Daniel@0: 
Daniel@0: c = mirchromagram('vivaldi','Frame',2) 
Daniel@0: k = mirkeystrength(c) 
Daniel@0: p = mirpeaks(k,'Total',1) 
Daniel@0: 
Daniel@0: [k,p] = mirkey('vivaldi','Frame',1)