aboutsummaryrefslogtreecommitdiff
path: root/pd/doc/3.audio.examples/D07.additive.pd
blob: c35a47fec7fb30cad507fe84b7af9f483a49311c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
#N canvas 9 13 684 547 12;
#X obj 37 449 catch~ sum;
#X obj 349 274 s frequency;
#X obj 463 274 s duration;
#X floatatom 463 224 0 0 0 0 - - -;
#X obj 463 249 * 100;
#X obj 349 249 mtof;
#X floatatom 349 224 0 0 0 0 - - -;
#X text 82 7 ADDITIVE SYNTHESIS;
#X text 501 214 duration in tenths;
#X text 503 230 of a second;
#X text 387 223 pitch;
#X text 433 518 updated for Pd version 0.37;
#X obj 37 488 output~;
#X text 26 83 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 the trigger
to make sound.;
#X obj 36 164 partial 1 1 0.56 0;
#X text 27 31 This patch demonstrates using an abstraction \, "partial"
\, to make a simple additive synthesis instrument originally from Jean-Claude
Risset.;
#X obj 349 169 loadbang;
#X msg 349 192 72;
#X msg 463 194 40;
#X obj 352 322 bng 25 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 385 324 <-- click to play a note;
#X obj 352 358 s trigger;
#X obj 36 189 partial 0.67 0.9 0.56 1;
#X obj 36 214 partial 1 0.65 0.92 0;
#X obj 36 239 partial 1.8 0.55 0.92 1.7;
#X obj 36 264 partial 2.67 0.325 1.19 0;
#X obj 36 289 partial 1.67 0.35 1.7 0;
#X obj 36 314 partial 1.46 0.25 2 0;
#X obj 36 339 partial 1.33 0.2 2.74 0;
#X obj 36 364 partial 1.33 0.15 3 0;
#X obj 36 389 partial 1 0.1 3.76 0;
#X obj 36 414 partial 1.33 0.075 4.07 0;
#X connect 0 0 12 0;
#X connect 0 0 12 1;
#X connect 3 0 4 0;
#X connect 4 0 2 0;
#X connect 5 0 1 0;
#X connect 6 0 5 0;
#X connect 16 0 17 0;
#X connect 16 0 18 0;
#X connect 17 0 6 0;
#X connect 18 0 3 0;
#X connect 19 0 21 0;