From 4d84d14ac1aa13958eaa2971b03f7f929a519105 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Fri, 8 Feb 2008 13:00:32 +0000 Subject: reorganized svn path=/trunk/; revision=9400 --- .../doc/3.audio.examples/D09.shepard.tone.pd | 108 +++++++++++++++++++++ 1 file changed, 108 insertions(+) create mode 100644 desiredata/doc/3.audio.examples/D09.shepard.tone.pd (limited to 'desiredata/doc/3.audio.examples/D09.shepard.tone.pd') diff --git a/desiredata/doc/3.audio.examples/D09.shepard.tone.pd b/desiredata/doc/3.audio.examples/D09.shepard.tone.pd new file mode 100644 index 00000000..8cb66603 --- /dev/null +++ b/desiredata/doc/3.audio.examples/D09.shepard.tone.pd @@ -0,0 +1,108 @@ +#N canvas 124 20 599 828 12; +#X floatatom 169 520 0 0 0 0 - - -; +#X floatatom 169 446 0 0 0 0 - - -; +#X text 462 208 START; +#X floatatom 190 303 0 0 0 0 - - -; +#X obj 190 280 r incr; +#X obj 168 255 metro 50; +#X floatatom 168 373 5 0 0 0 - - -; +#X obj 168 394 s phase; +#X obj 168 350 +; +#X obj 169 469 s dropoff+; +#X obj 169 622 s interval+; +#X floatatom 169 599 0 0 0 0 - - -; +#X obj 169 543 s pitch+; +#X obj 169 423 r dropoff; +#X obj 169 497 r pitch; +#X obj 169 576 r interval; +#X obj 168 212 r metro; +#X obj 228 345 f; +#X obj 12 212 shepvoice 0; +#X floatatom 83 708 0 0 0 0 - - -; +#X obj 83 685 r rev; +#X obj 138 685 r revtime; +#X floatatom 138 708 0 0 0 0 - - -; +#X obj 228 368 mod 10000; +#X obj 168 327 f; +#X obj 73 742 rev2~; +#X obj 12 769 output~; +#X obj 168 235 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 +1; +#X msg 446 225 \; dropoff 10 \; pitch 60 \; interval 120 \; metro 1 +\; rev 84 \; revtime 87 \; incr -2 \; pd dsp 1; +#X text 27 7 SHEPARD TONE; +#X text 339 804 updated for Pd version 0.37; +#X obj 12 235 shepvoice 500; +#X obj 12 258 shepvoice 1000; +#X obj 12 281 shepvoice 1500; +#X obj 12 304 shepvoice 2000; +#X obj 12 327 shepvoice 2500; +#X obj 12 350 shepvoice 3000; +#X obj 12 373 shepvoice 3500; +#X obj 12 396 shepvoice 4000; +#X obj 12 419 shepvoice 4500; +#X obj 12 442 shepvoice 5000; +#X obj 12 465 shepvoice 5500; +#X obj 12 488 shepvoice 6000; +#X obj 12 511 shepvoice 6500; +#X obj 12 534 shepvoice 7000; +#X obj 12 557 shepvoice 7500; +#X obj 12 580 shepvoice 8000; +#X obj 12 603 shepvoice 8500; +#X obj 12 626 shepvoice 9000; +#X obj 12 649 shepvoice 9500; +#X text 25 31 This patch is a bank of 20 sinusoids \, arranged so that +their frequencies sweep upward or downward in parallel \, and their +amplitudes fade in and out so that each one is quiet when it wraps +around from one end to the other. The overall "phase" computed here +is added to each voice's relative phase (its creation argument). The +"incr" parameter controlls how fast the phase changes \, "dropoff" +the slope at which the amplitudes fall off at the ends \, "pitch" the +center pitch of the cluster \, "interval" the number of (tenths of +halftones) between successive voices \, and "rev" and "revtime" the +reverberator at bottom.; +#X connect 0 0 12 0; +#X connect 1 0 9 0; +#X connect 3 0 24 1; +#X connect 4 0 3 0; +#X connect 5 0 24 0; +#X connect 6 0 7 0; +#X connect 8 0 17 0; +#X connect 8 0 6 0; +#X connect 11 0 10 0; +#X connect 13 0 1 0; +#X connect 14 0 0 0; +#X connect 15 0 11 0; +#X connect 16 0 27 0; +#X connect 17 0 23 0; +#X connect 18 0 31 0; +#X connect 19 0 25 1; +#X connect 20 0 19 0; +#X connect 21 0 22 0; +#X connect 22 0 25 2; +#X connect 23 0 8 1; +#X connect 24 0 8 0; +#X connect 25 0 26 0; +#X connect 25 1 26 1; +#X connect 27 0 5 0; +#X connect 31 0 32 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 34 0 35 0; +#X connect 35 0 36 0; +#X connect 36 0 37 0; +#X connect 37 0 38 0; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 40 0 41 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 43 0 44 0; +#X connect 44 0 45 0; +#X connect 45 0 46 0; +#X connect 46 0 47 0; +#X connect 47 0 48 0; +#X connect 48 0 49 0; +#X connect 49 0 25 0; +#X connect 49 0 26 0; +#X connect 49 0 26 1; -- cgit v1.2.1