From a3570a460160241c2690b0cff824d270e69ec33d Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Mon, 26 Dec 2005 02:07:50 +0000 Subject: added panning algorithms from http://www.csounds.com/ezine/autumn1999/beginners/ svn path=/trunk/externals/hcs/pan/; revision=4295 --- pan_core~.pd | 51 +++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 51 insertions(+) create mode 100644 pan_core~.pd (limited to 'pan_core~.pd') diff --git a/pan_core~.pd b/pan_core~.pd new file mode 100644 index 0000000..51b2007 --- /dev/null +++ b/pan_core~.pd @@ -0,0 +1,51 @@ +#N canvas 405 25 454 576 10; +#X obj 11 96 inlet~; +#X obj 216 116 inlet; +#X obj 70 443 *~; +#X obj 70 472 outlet~; +#X obj 200 442 *~; +#X obj 200 471 outlet~; +#X text 77 492 left; +#X text 203 491 right; +#X text 130 518 (C) Copyright 2004 Hans-Christoph Steiner; +#X text 234 534 released under the GNU GPL; +#X obj 216 418 line~; +#X obj 86 418 line~; +#X obj 307 183 loadbang; +#X floatatom 315 244 7 0 0 3 blocksize_in_ms - -; +#X obj 290 184 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 216 337 t f b; +#X obj 246 356 f; +#X obj 216 379 pack f f; +#X msg 216 399 \$1 \$2; +#X obj 86 337 t f b; +#X obj 116 356 f; +#X obj 86 379 pack f f; +#X msg 86 399 \$1 \$2; +#X obj 307 215 blocksize_in_ms; +#X obj 86 117 inlet; +#X text 10 17 [pan_core~]; +#X connect 0 0 2 0; +#X connect 0 0 4 0; +#X connect 1 0 15 0; +#X connect 2 0 3 0; +#X connect 4 0 5 0; +#X connect 10 0 4 1; +#X connect 11 0 2 1; +#X connect 12 0 23 0; +#X connect 14 0 23 0; +#X connect 15 0 17 0; +#X connect 15 1 16 0; +#X connect 16 0 17 1; +#X connect 17 0 18 0; +#X connect 18 0 10 0; +#X connect 19 0 21 0; +#X connect 19 1 20 0; +#X connect 20 0 21 1; +#X connect 21 0 22 0; +#X connect 22 0 11 0; +#X connect 23 0 13 0; +#X connect 23 0 16 1; +#X connect 23 0 20 1; +#X connect 24 0 19 0; -- cgit v1.2.1