added panning algorithms from http://www.csounds.com/ezine/autumn1999/beginners/

svn path=/trunk/externals/hcs/pan/; revision=4295

1 files changed, 26 insertions, 0 deletions

diff --git a/equal_power_pan~-help.pd b/equal_power_pan~-help.pd
new file mode 100644
index 0000000..de2d17b
--- /dev/null
+++ b/equal_power_pan~-help.pd
@@ -0,0 +1,26 @@
+#N canvas 219 32 485 328 10;
+#X obj 5 2 cnv 15 450 20 empty empty [equal_power_pan~] 2 11 1 18 -233017
+-66577 0;
+#X obj 422 3 pddp;
+#X text 27 270 (C) Copyright 2004 Hans-Christoph Steiner <hans@at.or.at>
+;
+#X text 244 284 released under the GNU GPL;
+#X obj 224 149 hsl 128 20 0 1 0 1 empty empty pan_position 6 10 1 11
+-262131 -1 -1 0 0;
+#X obj 113 131 osc~ 250;
+#X obj 113 152 *~ 0.5;
+#X obj 362 186 tgl 25 0 empty empty DSP 3 12 1 9 -24198 -1 -1 0 1;
+#X msg 362 218 \; pd dsp \$1;
+#X text 16 71 The left inlet takes the audio signal and the right inlet
+takes the control signal with 0 = left \, 1 = right \, and 0.5 = center.
+;
+#X text 16 37 Pan a mono signal using square root panning to smooth
+out the dead spot in the middle somewhat.;
+#X obj 141 234 dac~ 1 2;
+#X obj 113 187 equal_power_pan~;
+#X connect 4 0 12 1;
+#X connect 5 0 6 0;
+#X connect 6 0 12 0;
+#X connect 7 0 8 0;
+#X connect 12 0 11 0;
+#X connect 12 1 11 1;