From 57045df5fe3ec557e57dc7434ac1a07b5521bffc Mon Sep 17 00:00:00 2001
From: Guenter  Geiger <ggeiger@users.sourceforge.net>
Date: Mon, 29 Jul 2002 17:06:19 +0000
Subject: This commit was generated by cvs2svn to compensate for changes in
 r58, which included commits to RCS files with non-trunk default branches.

svn path=/trunk/; revision=59
---
 pd/doc/3.audio.examples/26.additive.pd | 92 ++++++++++++++++++++++++++++++++++
 1 file changed, 92 insertions(+)
 create mode 100644 pd/doc/3.audio.examples/26.additive.pd

(limited to 'pd/doc/3.audio.examples/26.additive.pd')

diff --git a/pd/doc/3.audio.examples/26.additive.pd b/pd/doc/3.audio.examples/26.additive.pd
new file mode 100644
index 00000000..9070b08b
--- /dev/null
+++ b/pd/doc/3.audio.examples/26.additive.pd
@@ -0,0 +1,92 @@
+#N canvas 59 99 696 468 12;
+#X floatatom 81 408 0 0 0;
+#N canvas 159 26 534 281 output 1;
+#X obj 338 160 t b;
+#X obj 338 110 f;
+#X obj 338 60 inlet;
+#X text 344 29 mute;
+#X obj 338 185 f;
+#X msg 425 178 0;
+#X msg 338 85 bang;
+#X obj 338 135 moses 1;
+#X obj 397 117 moses 1;
+#X obj 83 148 dbtorms;
+#X obj 397 92 r master-lvl;
+#X obj 83 42 r master-lvl;
+#X obj 338 210 s master-lvl;
+#X obj 22 181 inlet~;
+#X obj 199 41 inlet;
+#X text 199 18 level;
+#X obj 199 100 s master-lvl;
+#X msg 96 65 set \$1;
+#X obj 96 89 outlet;
+#X msg 214 64 \; pd dsp 1;
+#X obj 83 194 line~;
+#X obj 22 212 *~;
+#X obj 22 241 dac~;
+#X obj 83 171 pack 0 50;
+#X text 20 158 audio;
+#X text 93 110 show level;
+#X obj 425 153 t b;
+#X connect 0 0 4 0;
+#X connect 1 0 7 0;
+#X connect 2 0 6 0;
+#X connect 4 0 12 0;
+#X connect 5 0 12 0;
+#X connect 6 0 1 0;
+#X connect 7 0 0 0;
+#X connect 7 1 26 0;
+#X connect 8 1 4 1;
+#X connect 9 0 23 0;
+#X connect 10 0 1 1;
+#X connect 10 0 8 0;
+#X connect 11 0 9 0;
+#X connect 11 0 17 0;
+#X connect 13 0 21 0;
+#X connect 14 0 16 0;
+#X connect 14 0 19 0;
+#X connect 17 0 18 0;
+#X connect 20 0 21 1;
+#X connect 21 0 22 0;
+#X connect 21 0 22 1;
+#X connect 23 0 20 0;
+#X connect 26 0 5 0;
+#X restore 43 435 pd output;
+#X msg 119 408 MUTE;
+#X text 153 407 <-- output amplitude;
+#X obj 43 377 catch~ sum;
+#X obj 381 288 s frequency;
+#X floatatom 381 264 0 0 0;
+#X floatatom 495 265 0 0 0;
+#X obj 495 289 s duration;
+#X msg 260 276 \; trigger bang;
+#X obj 45 221 partial 0.67 0.56 0 1;
+#X obj 45 245 partial 1 0.56 1 0.9;
+#X obj 45 269 partial 1 0.92 0 0.65;
+#X obj 45 294 partial 1.8 0.94 0 0.55;
+#X floatatom 495 217 0 0 0;
+#X obj 495 241 * 100;
+#X obj 381 240 mtof;
+#X floatatom 381 216 0 0 0;
+#X text 87 15 ADDITIVE SYNTHESIS;
+#X text 32 73 This patch demonstrates using an abstraction \, "partial"
+\, to make a simple additive synthesis instrument.;
+#X text 28 114 Partial takes as arguments an amplitude \, a relative
+frequency \, a detuning frequency \, and a relative duration. You set
+absolute duration and pitch using the controls below. Hit hte trigger
+to make sound.;
+#X text 460 435 updated for Pd version 0.26;
+#X text 535 207 duration in tenths;
+#X text 535 222 of a second;
+#X text 419 215 pitch;
+#X text 251 253 click to start;
+#X connect 0 0 1 1;
+#X connect 1 0 0 0;
+#X connect 2 0 1 2;
+#X connect 4 0 1 0;
+#X connect 6 0 5 0;
+#X connect 7 0 8 0;
+#X connect 14 0 15 0;
+#X connect 15 0 7 0;
+#X connect 16 0 6 0;
+#X connect 17 0 16 0;
-- 
cgit v1.2.1