diff toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/mirdemo.m @ 0:e9a9cd732c1e tip

first hg version after svn

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/mirdemo.m	Tue Feb 10 15:05:51 2015 +0000
@@ -0,0 +1,50 @@
+%%%% SEGMENTATION
+
+m = mirmfcc('valse_triste_happy','Rank',2:10,'Frame',0.05,1)
+sim = mirsimatrix(m)
+n = mirnovelty(sim,'KernelSize',150)
+p = mirpeaks(n,'Contrast',.1,'Total',Inf,'NoBegin','NoEnd')
+seg = mirsegment('valse_triste_happy',p)
+mirplay(seg)
+
+display('Strike any key to continue...');
+pause
+close all
+
+[seg p m a] = mirsegment('valse_triste_happy','MFCC',2:10,...
+                                'KernelSize',150,'Contrast',.1)
+       
+display('Strike any key to continue...');
+pause
+close all
+                                
+%%%% TEMPO
+                                
+fb = mirfilterbank('czardas')
+%mirplay(fb)
+e = mirenvelope(fb) 
+de = mirenvelope(e,'Diff','Halfwave')
+s = mirsum(de,'Centered') 
+f = mirframe(s,3,.2);
+ac = mirautocor(s,'Resonance','Enhanced') 
+p = mirpeaks(ac,'Total',1) 
+t = mirtempo(p)
+
+display('Strike any key to continue...');
+pause
+close all
+
+[t,p] = mirtempo('czardas','Periodicity','Frame')
+h = mirhisto(t)
+
+display('Strike any key to continue...');
+pause
+close all
+
+%%%% TONALITY
+
+c = mirchromagram('vivaldi','Frame',2) 
+k = mirkeystrength(c) 
+p = mirpeaks(k,'Total',1) 
+
+[k,p] = mirkey('vivaldi','Frame',1)
\ No newline at end of file