From 9c0e19a3be2288db79e2502e5fa450c3e20a668d Mon Sep 17 00:00:00 2001 From: Guenter Geiger Date: Fri, 9 May 2003 16:04:00 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r610, which included commits to RCS files with non-trunk default branches. svn path=/trunk/; revision=611 --- pd/doc/3.audio.examples/G03.delay.variable.pd | 129 ++++++++++++++++++++++++++ 1 file changed, 129 insertions(+) create mode 100644 pd/doc/3.audio.examples/G03.delay.variable.pd (limited to 'pd/doc/3.audio.examples/G03.delay.variable.pd') diff --git a/pd/doc/3.audio.examples/G03.delay.variable.pd b/pd/doc/3.audio.examples/G03.delay.variable.pd new file mode 100644 index 00000000..bb16de95 --- /dev/null +++ b/pd/doc/3.audio.examples/G03.delay.variable.pd @@ -0,0 +1,129 @@ +#N canvas 100 17 671 522 12; +#X obj 63 306 hip~ 10; +#X floatatom 331 222; +#X obj 331 270 line~; +#X obj 331 246 pack 0 100; +#X floatatom 256 192; +#X floatatom 442 297; +#X obj 442 369 line~; +#X obj 442 345 pack 0 100; +#X obj 442 321 * 0.01; +#X floatatom 143 167; +#X obj 143 238 line~; +#X obj 143 214 pack 0 100; +#X obj 63 258 *~; +#X obj 63 282 cos~; +#X floatatom 63 135; +#X obj 63 159 mtof; +#X obj 63 183 * 0.5; +#X obj 63 330 clip~ -0.2 0.2; +#X obj 143 190 * 0.01; +#X obj 426 444 delwrite~ delay1 1000; +#X obj 63 354 +~; +#X obj 426 396 *~; +#X obj 256 336 vd~ delay1; +#X obj 256 288 *~; +#X obj 256 216 / 100; +#X floatatom 93 419; +#N canvas 159 26 495 266 output 0; +#X obj 338 160 t b; +#X obj 338 110 f; +#X obj 338 60 inlet; +#X text 344 29 mute; +#X obj 338 185 f; +#X msg 425 178 0; +#X msg 338 85 bang; +#X obj 338 135 moses 1; +#X obj 425 153 t b f; +#X obj 397 117 moses 1; +#X obj 83 148 dbtorms; +#X obj 397 92 r master-lvl; +#X obj 83 42 r master-lvl; +#X obj 338 210 s master-lvl; +#X obj 22 181 inlet~; +#X obj 199 41 inlet; +#X text 199 18 level; +#X obj 199 100 s master-lvl; +#X msg 96 65 set \$1; +#X obj 96 89 outlet; +#X msg 214 64 \; pd dsp 1; +#X obj 83 194 line~; +#X obj 22 212 *~; +#X obj 22 241 dac~; +#X obj 83 171 pack 0 50; +#X text 20 158 audio; +#X text 93 110 show level; +#X connect 0 0 4 0; +#X connect 1 0 7 0; +#X connect 2 0 6 0; +#X connect 4 0 13 0; +#X connect 5 0 13 0; +#X connect 6 0 1 0; +#X connect 7 0 0 0; +#X connect 7 1 8 0; +#X connect 8 0 5 0; +#X connect 9 1 4 1; +#X connect 10 0 24 0; +#X connect 11 0 1 1; +#X connect 11 0 9 0; +#X connect 12 0 10 0; +#X connect 12 0 18 0; +#X connect 14 0 22 0; +#X connect 15 0 17 0; +#X connect 15 0 20 0; +#X connect 18 0 19 0; +#X connect 21 0 22 1; +#X connect 22 0 23 0; +#X connect 22 0 23 1; +#X connect 24 0 21 0; +#X restore 64 447 pd output; +#X msg 122 419 MUTE; +#X text 161 418 <-- output amplitude; +#X obj 63 378 hip~ 5; +#X text 401 505 updated for Pd version 0.26; +#X obj 256 264 +~ 1; +#X obj 256 240 osc~ 0; +#X obj 256 312 +~ 1.46; +#X obj 426 420 clip~ -5 5; +#X text 43 35 This is a fuzzed FM generator going into a delay loop \, this time using a variable delay object (vd~). You can get several interesting effects this way. We have taken the precaution if clipping inside the loop to avoid instabilities. You can push the loop gain past 1 if you want \, it will just uscillate.; +#X text 184 165 <-- timbre; +#X text 96 136 <-- pitch; +#X text 300 192 <-- cycle frequency (hundredths); +#X text 361 222 <-- cycle depth (msec); +#X text 491 298 <-- feedback (hundredths); +#X text 86 9 VARIABLE DELAYS; +#X obj 63 207 osc~ 0; +#X connect 0 0 17 0; +#X connect 1 0 3 0; +#X connect 2 0 23 1; +#X connect 3 0 2 0; +#X connect 4 0 24 0; +#X connect 5 0 8 0; +#X connect 6 0 21 1; +#X connect 7 0 6 0; +#X connect 8 0 7 0; +#X connect 9 0 18 0; +#X connect 10 0 12 1; +#X connect 11 0 10 0; +#X connect 12 0 13 0; +#X connect 13 0 0 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 42 0; +#X connect 17 0 20 0; +#X connect 18 0 11 0; +#X connect 20 0 29 0; +#X connect 21 0 34 0; +#X connect 22 0 20 1; +#X connect 23 0 33 0; +#X connect 24 0 32 0; +#X connect 25 0 26 1; +#X connect 26 0 25 0; +#X connect 27 0 26 2; +#X connect 29 0 26 0; +#X connect 29 0 21 0; +#X connect 31 0 23 0; +#X connect 32 0 31 0; +#X connect 33 0 22 0; +#X connect 34 0 19 0; +#X connect 42 0 12 0; -- cgit v1.2.1