From 8f75adf8bcea9e8c52d07d11ac35b93a8bf8dd32 Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Wed, 10 Nov 2010 16:18:30 +0000 Subject: rename svn path=/trunk/externals/nusmuk/; revision=14367 --- nusmuk-audio/examples/analog_synth_emulation.pd | 237 ++++++++++++++++++++++++ 1 file changed, 237 insertions(+) create mode 100644 nusmuk-audio/examples/analog_synth_emulation.pd (limited to 'nusmuk-audio/examples/analog_synth_emulation.pd') diff --git a/nusmuk-audio/examples/analog_synth_emulation.pd b/nusmuk-audio/examples/analog_synth_emulation.pd new file mode 100644 index 0000000..eefd015 --- /dev/null +++ b/nusmuk-audio/examples/analog_synth_emulation.pd @@ -0,0 +1,237 @@ +#N canvas 333 22 523 667 10; +#X obj 66 468 *~ 0.1; +#X obj 67 496 dac~; +#X obj 65 126 vsl 15 128 -20 127 0 0 empty empty empty 0 -9 0 10 -262144 +-1 -1 5200 1; +#X obj 65 283 line~; +#X msg 65 261 \$1 20; +#X obj 134 476 oscillo~; +#X obj 66 324 ../saw~; +#X obj 66 345 ../distortion~; +#X obj 67 434 ../distortion~; +#N canvas 520 123 368 628 coef_lpf_biquad 0; +#X obj 50 32 inlet; +#X obj 211 31 inlet; +#X text 92 34 f; +#X text 256 31 Q; +#X obj 117 137 samplerate~; +#X obj 117 114 loadbang; +#X obj 174 115 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj 50 170 /; +#X obj 50 369 cos; +#X obj 199 296 sin; +#X obj 211 116 * 2; +#X obj 50 564 outlet; +#X obj 288 504 + 1; +#X obj 139 501 / 2; +#X obj 94 505 -; +#X msg 99 463 1 \$1; +#X msg 139 458 1 \$1; +#X obj 184 480 -; +#X obj 229 501 / 2; +#X msg 229 460 1 \$1; +#X obj 50 487 * -2; +#X obj 139 480 -; +#X msg 184 458 1 \$1; +#X obj 229 481 -; +#X obj 199 350 t f f; +#X obj 50 269 t f f; +#X obj 50 539 /; +#X obj 94 540 /; +#X obj 139 540 /; +#X obj 184 539 /; +#X obj 229 540 /; +#X obj 139 564 outlet; +#X obj 94 564 outlet; +#X obj 184 564 outlet; +#X obj 229 564 outlet; +#X obj 50 246 f; +#X obj 211 185 t b f; +#X obj 211 95 + 0.707; +#X obj 211 74 max 0; +#X obj 50 73 max 0; +#X obj 50 394 t f f b; +#X obj 50 115 * 3.14159; +#X obj 67 206 min 3.14; +#X obj 238 295 sinh; +#X obj 199 325 * 0.767; +#X msg 211 140 1 \$1; +#X obj 211 162 /; +#X obj 50 143 * 2; +#X obj 50 95 min 21000; +#X connect 0 0 39 0; +#X connect 1 0 38 0; +#X connect 4 0 7 1; +#X connect 5 0 4 0; +#X connect 6 0 4 0; +#X connect 7 0 35 0; +#X connect 8 0 40 0; +#X connect 9 0 44 0; +#X connect 10 0 45 0; +#X connect 12 0 26 1; +#X connect 12 0 27 1; +#X connect 12 0 28 1; +#X connect 12 0 29 1; +#X connect 12 0 30 1; +#X connect 13 0 28 0; +#X connect 14 0 27 0; +#X connect 15 0 14 0; +#X connect 16 0 21 0; +#X connect 17 0 29 0; +#X connect 18 0 30 0; +#X connect 19 0 23 0; +#X connect 20 0 26 0; +#X connect 21 0 13 0; +#X connect 22 0 17 0; +#X connect 23 0 18 0; +#X connect 24 0 15 0; +#X connect 24 1 12 0; +#X connect 25 0 8 0; +#X connect 25 1 9 0; +#X connect 26 0 11 0; +#X connect 27 0 32 0; +#X connect 28 0 31 0; +#X connect 29 0 33 0; +#X connect 30 0 34 0; +#X connect 35 0 25 0; +#X connect 36 0 35 0; +#X connect 36 1 43 0; +#X connect 37 0 10 0; +#X connect 38 0 37 0; +#X connect 39 0 48 0; +#X connect 40 0 20 0; +#X connect 40 1 16 0; +#X connect 40 1 22 0; +#X connect 40 1 19 0; +#X connect 40 2 14 0; +#X connect 41 0 47 0; +#X connect 42 0 35 0; +#X connect 43 0 44 1; +#X connect 44 0 24 0; +#X connect 45 0 46 0; +#X connect 46 0 36 0; +#X connect 47 0 7 0; +#X connect 48 0 41 0; +#X restore 244 253 pd coef_lpf_biquad; +#X obj 244 277 pack f f f f f; +#X obj 244 231 mtof; +#X floatatom 369 229 5 0 0 0 - - -; +#X obj 244 303 t a; +#N canvas 0 0 450 300 5_line~ 0; +#X obj 80 123 line~; +#X obj 79 147 outlet~; +#X obj 80 71 inlet; +#X obj 136 123 line~; +#X obj 135 147 outlet~; +#X obj 136 73 inlet; +#X obj 193 123 line~; +#X obj 192 147 outlet~; +#X obj 193 73 inlet; +#X obj 247 123 line~; +#X obj 246 147 outlet~; +#X obj 247 73 inlet; +#X obj 304 123 line~; +#X obj 303 147 outlet~; +#X obj 304 73 inlet; +#X msg 80 97 \$1 5; +#X msg 135 98 \$1 5; +#X msg 193 96 \$1 5; +#X msg 247 99 \$1 5; +#X msg 303 99 \$1 5; +#X connect 0 0 1 0; +#X connect 2 0 15 0; +#X connect 3 0 4 0; +#X connect 5 0 16 0; +#X connect 6 0 7 0; +#X connect 8 0 17 0; +#X connect 9 0 10 0; +#X connect 11 0 18 0; +#X connect 12 0 13 0; +#X connect 14 0 19 0; +#X connect 15 0 0 0; +#X connect 16 0 3 0; +#X connect 17 0 6 0; +#X connect 18 0 9 0; +#X connect 19 0 12 0; +#X restore 244 344 pd 5_line~; +#X obj 244 323 unpack f f f f f; +#X obj 66 388 bq~ ---------; +#X obj 244 96 vsl 15 128 -20 127 0 0 empty empty empty 0 -9 0 10 -262144 +-1 -1 8200 1; +#X obj 101 -39 metro 222; +#X obj 101 93 pack f f; +#X obj 101 -16 t b b; +#X obj 154 25 random 222; +#X obj 232 25 random 222; +#X obj 101 -58 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 179 71 pack f f; +#X obj 179 93 line; +#X obj 66 304 mtof~; +#X floatatom 132 323 5 0 0 0 - - -; +#X floatatom 114 415 5 0 0 0 - - -; +#X obj 359 38 random 222; +#X obj 306 104 pack f f; +#X obj 306 126 line; +#X obj 306 62 random 100; +#X obj 306 83 / 10; +#X obj 101 72 + 22; +#X obj 179 49 random 99; +#X obj 101 49 random 44; +#X obj 135 455 *~ 0.5; +#X connect 0 0 1 0; +#X connect 0 0 1 1; +#X connect 2 0 4 0; +#X connect 3 0 26 0; +#X connect 4 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 16 0; +#X connect 8 0 0 0; +#X connect 8 0 37 0; +#X connect 9 0 10 0; +#X connect 9 1 10 1; +#X connect 9 2 10 2; +#X connect 9 3 10 3; +#X connect 9 4 10 4; +#X connect 10 0 13 0; +#X connect 11 0 9 0; +#X connect 12 0 9 1; +#X connect 13 0 15 0; +#X connect 14 0 16 1; +#X connect 14 1 16 2; +#X connect 14 2 16 3; +#X connect 14 3 16 4; +#X connect 14 4 16 5; +#X connect 15 0 14 0; +#X connect 15 1 14 1; +#X connect 15 2 14 2; +#X connect 15 3 14 3; +#X connect 15 4 14 4; +#X connect 16 0 8 0; +#X connect 17 0 11 0; +#X connect 18 0 20 0; +#X connect 19 0 3 0; +#X connect 20 0 32 0; +#X connect 20 0 35 0; +#X connect 20 0 36 0; +#X connect 20 1 21 0; +#X connect 20 1 22 0; +#X connect 20 1 29 0; +#X connect 21 0 19 1; +#X connect 22 0 24 1; +#X connect 23 0 18 0; +#X connect 24 0 25 0; +#X connect 25 0 11 0; +#X connect 26 0 6 0; +#X connect 27 0 7 1; +#X connect 28 0 8 1; +#X connect 29 0 30 1; +#X connect 30 0 31 0; +#X connect 31 0 9 1; +#X connect 32 0 33 0; +#X connect 33 0 30 0; +#X connect 34 0 19 0; +#X connect 35 0 24 0; +#X connect 36 0 34 0; +#X connect 37 0 5 0; -- cgit v1.2.1