Mercurial > hg > camir-ismir2012
diff toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/mirdemo.m @ 0:cc4b1211e677 tip
initial commit to HG from
Changeset:
646 (e263d8a21543) added further path and more save "camirversion.m"
author | Daniel Wolff |
---|---|
date | Fri, 19 Aug 2016 13:07:06 +0200 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/toolboxes/MIRtoolbox1.3.2/MIRToolboxDemos/mirdemo.m Fri Aug 19 13:07:06 2016 +0200 @@ -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