aboutsummaryrefslogtreecommitdiff
path: root/doc/examples/example11.pd
diff options
context:
space:
mode:
Diffstat (limited to 'doc/examples/example11.pd')
-rw-r--r--doc/examples/example11.pd80
1 files changed, 80 insertions, 0 deletions
diff --git a/doc/examples/example11.pd b/doc/examples/example11.pd
new file mode 100644
index 0000000..c427e9a
--- /dev/null
+++ b/doc/examples/example11.pd
@@ -0,0 +1,80 @@
+#N canvas 210 529 680 275 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array mapping 64 float 1;
+#A 0 0.0916017 -0.201423 -0.477099 -0.711681 -0.884964 -0.982024 -0.9945
+-0.921318 -0.76878 -0.550026 -0.283897 0.00668462 0.296691 0.561142
+0.777261 0.926433 0.995809 0.979413 0.878658 0.702222 0.465302 0.188305
+-0.104911 -0.389091 -0.639758 -0.835322 -0.958937 -0.999957 -0.954848
+-0.827497 -0.628871 -0.37608 -0.0908956 0.202118 0.477722 0.712179
+0.885295 0.982158 0.994426 0.92104 0.768324 0.54943 0.283212 -0.00739881
+-0.297373 -0.561733 -0.777711 -0.926702 -0.995875 -0.979271 -0.87832
+-0.701718 -0.464675 -0.187609 0.105617 0.389745 0.640304 0.835712 0.959139
+0.999952 0.954637 0.827096 0.628316 0.375418;
+#X coords 0 1 63 -1 200 140 1;
+#X restore 242 21 graph;
+#X msg 50 142 approx mapping;
+#X obj 20 86 pdp_t;
+#X text 235 165 -1 ----------- 0 ----------- 1;
+#X obj 50 115 spigot;
+#X obj 87 92 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X obj 20 225 pdp_cheby 10;
+#X obj 515 138 tabsend~ mapping;
+#X obj 515 112 osc~;
+#X floatatom 515 65 5 0 0;
+#X floatatom 573 64 5 0 0;
+#N canvas 0 0 450 300 fblock 0;
+#X obj 36 36 inlet;
+#X obj 101 35 inlet;
+#X obj 42 196 outlet;
+#X obj 104 83 samplerate~;
+#X obj 59 158 +;
+#X obj 103 144 *;
+#X obj 103 59 t b b f;
+#X text 200 35 fblock: compute block relative frequencies;
+#X text 200 79 right inlet is also "active";
+#X text 201 119 main usage is to compute block synchronous frequencies
+;
+#X text 200 134 for spectral domain processing;
+#X text 201 49 out = left + right * (sys samplerate / blocksize);
+#X obj 101 115 / 64;
+#X connect 0 0 4 0;
+#X connect 1 0 6 0;
+#X connect 3 0 12 0;
+#X connect 4 0 2 0;
+#X connect 5 0 4 1;
+#X connect 6 0 4 0;
+#X connect 6 1 3 0;
+#X connect 6 2 5 1;
+#X connect 12 0 5 0;
+#X restore 515 89 pd fblock;
+#X obj 20 40 metro 40;
+#X obj 20 62 pdp_v4l;
+#X msg 515 37 0.17;
+#X text 236 208 send a signal to a table and use this as an intensity
+mapping function in pdp_cheby;
+#X obj 20 250 pdp_xv;
+#X obj 20 15 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X msg 573 36 3;
+#X msg 133 207 chanmask \$1;
+#X floatatom 133 185 5 0 0;
+#X msg 133 165 1;
+#X connect 1 0 6 0;
+#X connect 2 0 6 0;
+#X connect 2 1 4 0;
+#X connect 4 0 1 0;
+#X connect 5 0 4 1;
+#X connect 6 0 16 0;
+#X connect 8 0 7 0;
+#X connect 9 0 11 0;
+#X connect 10 0 11 1;
+#X connect 11 0 8 0;
+#X connect 12 0 13 0;
+#X connect 13 0 2 0;
+#X connect 14 0 9 0;
+#X connect 17 0 12 0;
+#X connect 18 0 10 0;
+#X connect 19 0 6 0;
+#X connect 20 0 19 0;
+#X connect 21 0 20 0;