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/J08.classicsynth.pd | 135 +++++++++++++++++++++ 1 file changed, 135 insertions(+) create mode 100644 desiredata/doc/3.audio.examples/J08.classicsynth.pd (limited to 'desiredata/doc/3.audio.examples/J08.classicsynth.pd') diff --git a/desiredata/doc/3.audio.examples/J08.classicsynth.pd b/desiredata/doc/3.audio.examples/J08.classicsynth.pd new file mode 100644 index 00000000..ae9ce754 --- /dev/null +++ b/desiredata/doc/3.audio.examples/J08.classicsynth.pd @@ -0,0 +1,135 @@ +#N canvas 203 294 592 528 12; +#N canvas 158 4 781 654 16x 0; +#X obj 69 345 *~ 0.064; +#X obj 69 368 rpole~ 0.93538; +#X obj 69 391 *~ 0.00431; +#X obj 69 414 cpole~ 0.96559 0.05592; +#X obj 69 440 cpole~ 0.96559 -0.05592; +#X obj 69 463 *~ 0.125; +#X obj 69 486 rzero~ -1; +#X obj 69 509 rzero~ -1; +#X obj 69 532 rzero~ -1; +#X obj 63 97 phasor~; +#X obj 69 566 outlet~; +#X obj 86 151 wrap~; +#X obj 86 127 -~; +#X obj 86 175 *~; +#X obj 63 204 +~; +#X obj 271 156 phasor~; +#X obj 294 210 wrap~; +#X obj 294 186 -~; +#X obj 294 234 *~; +#X obj 271 263 +~; +#X obj 64 271 +~; +#X obj 457 31 block~ 1024 1 16; +#X obj 62 29 inlet; +#X obj 250 34 r osc-params; +#X obj 250 57 unpack 0 0 0 0 0 0; +#X obj 272 100 *~; +#X obj 272 128 +~; +#X msg 341 338 \; osc-params 0.5 -0.5 0.5 0.5 1 0.5; +#X obj 341 312 loadbang; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 1 4 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 10 0; +#X connect 9 0 12 0; +#X connect 9 0 14 0; +#X connect 11 0 13 0; +#X connect 12 0 11 0; +#X connect 13 0 14 1; +#X connect 14 0 20 0; +#X connect 15 0 17 0; +#X connect 15 0 19 0; +#X connect 16 0 18 0; +#X connect 17 0 16 0; +#X connect 18 0 19 1; +#X connect 19 0 20 1; +#X connect 20 0 0 0; +#X connect 22 0 9 0; +#X connect 22 0 25 0; +#X connect 23 0 24 0; +#X connect 24 0 12 1; +#X connect 24 1 13 1; +#X connect 24 2 17 1; +#X connect 24 3 18 1; +#X connect 24 4 25 1; +#X connect 24 5 26 1; +#X connect 25 0 26 0; +#X connect 26 0 15 0; +#X connect 28 0 27 0; +#X restore 41 160 pd 16x; +#X obj 44 255 output~; +#X text 333 501 Updated for Pd version 0.39; +#X text 151 7 THE CLASSIC SUBTRACTIVE SYNTH SOUND; +#X obj 152 132 *~; +#X obj 151 102 +~ 0.2; +#X obj 151 156 *~ 2000; +#X obj 108 221 *~; +#X obj 43 218 *~; +#X obj 41 122 mtof; +#X obj 41 13 r \$0-note; +#X obj 41 62 makenote 1; +#X obj 404 150 + 20; +#X obj 404 102 metro 300; +#X obj 404 80 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 404 201 s \$0-note; +#X obj 404 125 random 70; +#X obj 42 192 vcf~ 3; +#X floatatom 228 112 3 0 0 0 - - -; +#X floatatom 228 157 7 0 0 0 - - -; +#X obj 228 133 mtof; +#X obj 108 196 adsr 2 30 200 50 500; +#X obj 151 77 adsr 1 10 200 50 500; +#X obj 404 175 pack 0 200; +#X obj 41 92 poly 1 1; +#X obj 41 36 unpack; +#X floatatom 480 80 3 0 0 0 - - -; +#X floatatom 489 154 3 0 0 0 - - -; +#X text 31 323 Now that we can make reasonably high-quality classic +waveforms using upsampling \, we combine an upsampled oscillator with +a "vcf" filter and ADSR generators to control the filter resonant frequency +and the amplitude to make the classic subtractive synthesis sound. +Send an "s \$0-note" object a (pitch \, duration) pair to play a note. +(Classic VC synths did not have velocity sensitive keyboards!) You +can add controls to change the parameters of the ADSR envelopes and/or +the vcf~ "Q" parameter. THe oscillators' waveforms and tuning relationship +is controlled by other parameters set within the "pd 16x" window.; +#X connect 0 0 17 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X connect 5 0 4 1; +#X connect 6 0 17 1; +#X connect 7 0 8 1; +#X connect 8 0 1 0; +#X connect 8 0 1 1; +#X connect 9 0 0 0; +#X connect 10 0 25 0; +#X connect 11 0 24 0; +#X connect 11 1 24 1; +#X connect 12 0 23 0; +#X connect 13 0 16 0; +#X connect 14 0 13 0; +#X connect 16 0 12 0; +#X connect 17 0 8 0; +#X connect 18 0 20 0; +#X connect 19 0 6 1; +#X connect 20 0 19 0; +#X connect 21 0 7 0; +#X connect 21 0 7 1; +#X connect 22 0 5 0; +#X connect 23 0 15 0; +#X connect 24 1 9 0; +#X connect 24 2 22 0; +#X connect 24 2 21 0; +#X connect 25 0 11 0; +#X connect 25 1 11 2; +#X connect 26 0 13 1; +#X connect 27 0 23 1; -- cgit v1.2.1