aboutsummaryrefslogtreecommitdiff
path: root/examples/puredata/bark-example.pd
blob: e59b232630be8c4483d6752fd64c5691974edaeb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
#N canvas 191 188 450 625 10;
#N canvas 0 0 450 300 graph1 0;
#X array bark 26 float 5;
#A 0 0 0 0 0 0 0 0.00450555 0 0 0 0.0906432 0 0 0.154719 0 0.0683638
0.0384251 0.0569213 0.0220149 0.0976565 0.064886 0.067408 0.0374335
0.000314513 4.48489e-05 0;
#X coords 0 1 25 -1 200 140 1;
#X restore 236 -233 graph;
#X obj 273 104 xtract~ spectrum 64;
#X obj 272 73 xtract~ windowed 64;
#X obj 272 136 tabsend~ mags;
#N canvas 0 0 450 300 graph2 0;
#X array mags 32 float 5;
#A 0 0.00450555 0.0906432 0.154719 0.0683638 0.0384251 0.0569213 0.0220149
0.0423353 0.0553211 0.018837 0.046049 0.0530074 0.0144005 0.0165512
0.0167357 0.00365258 0.000494011 0.000160456 7.35776e-05 3.51928e-05
3.1222e-05 1.40643e-05 1.18581e-05 8.65756e-06 7.31448e-06 6.333e-06
2.75085e-06 4.85414e-06 3.08083e-06 2.56348e-06 3.22329e-06 1.50987e-08
;
#X coords 0 1 31 -1 200 140 1;
#X restore 16 -232 graph;
#N canvas 3 50 450 300 bark 0;
#X obj 364 19 block~ 32;
#X obj 144 160 tabsend~ bark;
#X obj 145 93 tabreceive~ mags;
#X obj 145 118 xtract~ bark_coefficients 32;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X restore 271 167 pd bark;
#N canvas 0 0 450 300 graph3 0;
#X array waveform 67 float 5;
#A 0 -0.304942 0 0.304942 0.578981 0.795978 0.938463 0.999999 0.985604
0.910237 0.795681 0.666471 0.545664 0.451213 0.393581 0.37492 0.389832
0.427409 0.474038 0.516335 0.543621 0.549513 0.532424 0.495019 0.442906
0.382948 0.321642 0.2639 0.212453 0.167896 0.129229 0.094662 0.062379
0.0310556 8.38604e-07 -0.031054 -0.0623773 -0.0946602 -0.129227 -0.167893
-0.212451 -0.263897 -0.321639 -0.382945 -0.442903 -0.495017 -0.532422
-0.549513 -0.543622 -0.516337 -0.474041 -0.427411 -0.389833 -0.37492
-0.393579 -0.451209 -0.545658 -0.666465 -0.795674 -0.910232 -0.985601
-1 -0.938469 -0.795988 -0.578994 -0.304958 -1.67721e-05 0.304926;
#X coords 0 1 66 -1 200 140 1;
#X restore 17 -56 graph;
#X obj 23 135 loadbang;
#X obj 271 47 tabosc4~ waveform;
#X obj 270 21 sig~ 2000;
#X msg 23 165 \; waveform sinesum 64 0.8 0.3 0.3 0.3 0.1 \; waveform
normalize 1;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 7 0 10 0;
#X connect 8 0 2 0;
#X connect 9 0 8 0;