aboutsummaryrefslogtreecommitdiff
path: root/pd/doc/3.audio.examples/H01.more.FM.pd
diff options
context:
space:
mode:
Diffstat (limited to 'pd/doc/3.audio.examples/H01.more.FM.pd')
-rw-r--r--pd/doc/3.audio.examples/H01.more.FM.pd132
1 files changed, 0 insertions, 132 deletions
diff --git a/pd/doc/3.audio.examples/H01.more.FM.pd b/pd/doc/3.audio.examples/H01.more.FM.pd
deleted file mode 100644
index 1b0e112b..00000000
--- a/pd/doc/3.audio.examples/H01.more.FM.pd
+++ /dev/null
@@ -1,132 +0,0 @@
-#N canvas 25 100 785 694 12;
-#X floatatom 197 602 0 0 0;
-#N canvas 159 26 541 274 output 0;
-#X obj 351 166 t b;
-#X obj 351 114 f;
-#X obj 351 62 inlet;
-#X text 358 30 mute;
-#X obj 351 192 f;
-#X msg 442 186 0;
-#X msg 351 88 bang;
-#X obj 351 140 moses 1;
-#X obj 413 114 moses 1;
-#X obj 86 153 dbtorms;
-#X obj 413 88 r master-lvl;
-#X obj 86 44 r master-lvl;
-#X obj 351 218 s master-lvl;
-#X obj 12 166 inlet~;
-#X obj 207 43 inlet;
-#X text 207 19 level;
-#X obj 207 104 s master-lvl;
-#X msg 100 67 set \$1;
-#X obj 100 93 outlet;
-#X msg 222 67 \; pd dsp 1;
-#X obj 86 205 line~;
-#X obj 12 218 *~;
-#X obj 12 244 dac~;
-#X obj 86 179 pack 0 50;
-#X text 12 142 audio;
-#X text 100 118 show level;
-#X obj 12 192 hip~ 1;
-#X connect 0 0 4 0;
-#X connect 1 0 7 0;
-#X connect 2 0 6 0;
-#X connect 4 0 12 0;
-#X connect 5 0 12 0;
-#X connect 6 0 1 0;
-#X connect 7 0 0 0;
-#X connect 7 1 5 0;
-#X connect 8 1 4 1;
-#X connect 9 0 23 0;
-#X connect 10 0 1 1;
-#X connect 10 0 8 0;
-#X connect 11 0 9 0;
-#X connect 11 0 17 0;
-#X connect 13 0 26 0;
-#X connect 14 0 16 0;
-#X connect 14 0 19 0;
-#X connect 17 0 18 0;
-#X connect 20 0 21 1;
-#X connect 21 0 22 0;
-#X connect 21 0 22 1;
-#X connect 23 0 20 0;
-#X connect 26 0 21 0;
-#X restore 158 630 pd output;
-#X msg 234 602 MUTE;
-#X text 528 618 updated for Pd version 0.34;
-#X text 277 601 <-- output;
-#X text 79 4 FM \, PWM \, PAF as formant generators;
-#X text 39 22 The next several patches illustrate "Synthesizing Sounds
-with Specified \, Time-Varying Spectra" presented at ICMC 2001 and
-reprinted on http://www.crca.ucsd.edu/~msp/publications.html.;
-#X obj 146 468 line~;
-#X obj 146 444 pack 0 50;
-#X floatatom 146 389 0 0 0;
-#X obj 124 493 *~;
-#X text 145 367 index;
-#X floatatom 248 398 0 0 0;
-#X text 250 370 carrier freq;
-#X obj 158 547 cos~;
-#X graph graph1 0 0 128 500 499 556 755 426;
-#X array spectrum 128 float 0;
-#X pop;
-#X msg 233 546 bang;
-#X text 271 543 <-- click to graph;
-#N canvas 204 17 358 238 fft 0;
-#X obj 46 48 inlet~;
-#X obj 159 181 tabwrite~ spectrum;
-#X obj 159 145 inlet;
-#X obj 46 78 rfft~;
-#X obj 46 111 *~;
-#X obj 77 111 *~;
-#X obj 46 141 sqrt~;
-#X obj 191 45 block~ 1024 1;
-#X connect 0 0 3 0;
-#X connect 2 0 1 0;
-#X connect 3 0 4 0;
-#X connect 3 0 4 1;
-#X connect 3 1 5 0;
-#X connect 3 1 5 1;
-#X connect 4 0 6 0;
-#X connect 5 0 6 0;
-#X connect 6 0 1 0;
-#X restore 187 574 pd fft;
-#X text 490 562 0;
-#X text 738 559 5512;
-#X obj 153 520 +~;
-#X obj 248 448 phasor~;
-#X obj 23 458 osc~ 172.266;
-#X obj 146 417 / 100;
-#X obj 248 422 * 172.266;
-#X text 34 93 First compare this phase modulation example with the
-ring modulation example from the section on processing (patch 51).
-Here we choose a convenient \, fixed modulation frequency and consider
-the effect of changing carrier frequency and modulation index. It's
-exactly as if the carrier frequency were a ring modulation frequency.
-;
-#X text 33 331 Next we'll look at two techniques for sliding a formant
-frequency without losing harmonicity.;
-#X text 33 191 Using either method we can synthesize the hat-shaped
-spectra called "formants." However \, if you try to move the formant
-up or down in frequency \, you'll lose harmonicity \; the partials
-are only integer multiples of the fundamental \, 172.266 \, when the
-carrier is an integer multiple. To hear this \, set index to 20 and
-carrier frequency to zero \, and scroll carrier through integers. Then
-shift-drag on the carrier frequency to change it in hundredths. Presto
-\, inharmonic sounds...;
-#X connect 0 0 1 1;
-#X connect 1 0 0 0;
-#X connect 2 0 1 2;
-#X connect 7 0 10 1;
-#X connect 8 0 7 0;
-#X connect 9 0 24 0;
-#X connect 10 0 21 0;
-#X connect 12 0 25 0;
-#X connect 14 0 1 0;
-#X connect 14 0 18 0;
-#X connect 16 0 18 1;
-#X connect 21 0 14 0;
-#X connect 22 0 21 1;
-#X connect 23 0 10 0;
-#X connect 24 0 8 0;
-#X connect 25 0 22 0;