diff options
author | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2005-12-26 02:07:50 +0000 |
---|---|---|
committer | Hans-Christoph Steiner <eighthave@users.sourceforge.net> | 2005-12-26 02:07:50 +0000 |
commit | a3570a460160241c2690b0cff824d270e69ec33d (patch) | |
tree | 35fc3acd1d2213e23493754c204a63415331647a /linear_pan~.pd | |
parent | ffbeedb25bedaa0745bdd0552c78a1bfcbc2edaf (diff) |
added panning algorithms from http://www.csounds.com/ezine/autumn1999/beginners/
svn path=/trunk/externals/hcs/pan/; revision=4295
Diffstat (limited to 'linear_pan~.pd')
-rw-r--r-- | linear_pan~.pd | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/linear_pan~.pd b/linear_pan~.pd new file mode 100644 index 0000000..32d29a1 --- /dev/null +++ b/linear_pan~.pd @@ -0,0 +1,27 @@ +#N canvas 438 88 458 368 10; +#X obj 23 38 inlet~; +#X obj 193 36 inlet; +#X obj 23 262 outlet~; +#X obj 81 262 outlet~; +#X text 30 282 left; +#X text 84 282 right; +#X obj 193 112 expr if($f1 > 0 \, $f1 \, 0); +#X obj 193 93 expr if($f1 < 1 \, $f1 \, 1); +#X text 206 79 filter so 0 < f < 1; +#X obj 40 150 expr 1 - $f1; +#X text 130 318 (C) Copyright 2004 Hans-Christoph Steiner; +#X text 234 334 released under the GNU GPL; +#X text 10 17 [linearpan~]; +#X obj 23 203 pan_core~; +#X obj 268 32 loadbang; +#X msg 268 52 0.5; +#X connect 0 0 13 0; +#X connect 1 0 7 0; +#X connect 6 0 9 0; +#X connect 6 0 13 2; +#X connect 7 0 6 0; +#X connect 9 0 13 1; +#X connect 13 0 2 0; +#X connect 13 1 3 0; +#X connect 14 0 15 0; +#X connect 15 0 7 0; |