|
wolffd@0
|
1 help mirtoolbox
|
|
wolffd@0
|
2 help miraudio
|
|
wolffd@0
|
3 a = miraudio('ragtime','Center','Sampling',11025)
|
|
wolffd@0
|
4 mirplay(a)
|
|
wolffd@0
|
5 mirspectrum(a)
|
|
wolffd@0
|
6 mirgetdata(a)
|
|
wolffd@0
|
7 get(a,'Sampling')
|
|
wolffd@0
|
8
|
|
wolffd@0
|
9 a = miraudio('laksin')
|
|
wolffd@0
|
10 a = miraudio(a,'Trim')
|
|
wolffd@0
|
11 a = miraudio(a,'Extract',0,1)
|
|
wolffd@0
|
12 e = mirenvelope(a)
|
|
wolffd@0
|
13 e = mirenvelope(a,'Diff')
|
|
wolffd@0
|
14 e = mirenvelope(a,'HalfwaveDiff')
|
|
wolffd@0
|
15
|
|
wolffd@0
|
16 pause, close all
|
|
wolffd@0
|
17
|
|
wolffd@0
|
18 s = mirspectrum('Amin3')
|
|
wolffd@0
|
19 s = mirspectrum(s,'Max',3000)
|
|
wolffd@0
|
20 s = mirspectrum(s,'dB')
|
|
wolffd@0
|
21 s = mirspectrum('Amin3','Mel')
|
|
wolffd@0
|
22 mirpeaks(s)
|
|
wolffd@0
|
23
|
|
wolffd@0
|
24 pause, close all
|
|
wolffd@0
|
25
|
|
wolffd@0
|
26 ac = mirautocor('Amin3')
|
|
wolffd@0
|
27 ac = mirautocor(ac,'Enhanced',2:10)
|
|
wolffd@0
|
28 ac = mirautocor(ac,'Freq')
|
|
wolffd@0
|
29
|
|
wolffd@0
|
30 pause, close all
|
|
wolffd@0
|
31
|
|
wolffd@0
|
32 f = mirframe('ragtime',.1,.5)
|
|
wolffd@0
|
33 s = mirspectrum(f)
|
|
wolffd@0
|
34 s = mirspectrum('ragtime','frame',.1,.5)
|
|
wolffd@0
|
35 mirpeaks(s)
|
|
wolffd@0
|
36 mirflux(s)
|
|
wolffd@0
|
37 mirflux(mirautocor(a,'Frame'))
|
|
wolffd@0
|
38
|
|
wolffd@0
|
39 pause, close all
|
|
wolffd@0
|
40
|
|
wolffd@0
|
41 fb = mirfilterbank('ragtime','NbChannels',5)
|
|
wolffd@0
|
42 e = mirenvelope(fb)
|
|
wolffd@0
|
43 ae = mirautocor(e)
|
|
wolffd@0
|
44 sa = mirsum(ae)
|
|
wolffd@0
|
45
|
|
wolffd@0
|
46 pause, close all
|
|
wolffd@0
|
47
|
|
wolffd@0
|
48 r1 = mirrms('movie1','Frame')
|
|
wolffd@0
|
49 r2 = mirrms('movie2','Frame')
|
|
wolffd@0
|
50 mirlowenergy(r1)
|
|
wolffd@0
|
51 mirlowenergy(r2)
|
|
wolffd@0
|
52
|
|
wolffd@0
|
53 pause, close all
|
|
wolffd@0
|
54
|
|
wolffd@0
|
55 [t,ac] = mirtempo('ragtime')
|
|
wolffd@0
|
56 [t,ac] = mirtempo('czardas','frame')
|
|
wolffd@0
|
57
|
|
wolffd@0
|
58 pause, close all
|
|
wolffd@0
|
59
|
|
wolffd@0
|
60 at = mirattacks('ragtime')
|
|
wolffd@0
|
61 mirattackslope(at)
|
|
wolffd@0
|
62 mirbrightness('ragtime','frame')
|
|
wolffd@0
|
63 mirroughness('ragtime','frame')
|
|
wolffd@0
|
64
|
|
wolffd@0
|
65 pause, close all
|
|
wolffd@0
|
66
|
|
wolffd@0
|
67 [p,a] = mirpitch('ragtime','frame')
|
|
wolffd@0
|
68 mirchromagram('ragtime','wrap','no')
|
|
wolffd@0
|
69 mirchromagram('ragtime')
|
|
wolffd@0
|
70 mirkey('ragtime')
|
|
wolffd@0
|
71 k = mirkey('ragtime','frame')
|
|
wolffd@0
|
72 mirmode('ragtime')
|
|
wolffd@0
|
73 m = mirmode('ragtime','frame')
|
|
wolffd@0
|
74
|
|
wolffd@0
|
75 pause, close all
|
|
wolffd@0
|
76
|
|
wolffd@0
|
77 mirstat(m)
|
|
wolffd@0
|
78 mirhisto(m)
|
|
wolffd@0
|
79 mirexport('result.txt',k,m) |
