forked from patricksebastien/mtl
-
Notifications
You must be signed in to change notification settings - Fork 0
/
additive~.pd
171 lines (171 loc) · 3.86 KB
/
additive~.pd
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
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
#N canvas 1 163 1009 482 10;
#X obj 308 -17 inlet;
#X obj 210 225 unpack f f f f;
#X obj 72 -11 inlet;
#X obj 72 10 unpack f f;
#X obj 64 352 *~;
#X obj 62 418 outlet~;
#X obj 72 40 mtof;
#X obj 70 113 s \$0in;
#X obj 309 21 route adsr;
#N canvas 69 154 450 300 \$0dyn 0;
#X obj 0 0 r 1006in;
#X obj 0 100 throw~ 1006out;
#X obj 0 20 * 0.25;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.6;
#X obj 100 0 r 1006v0;
#X obj 0 20 * 0.333333;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.4;
#X obj 100 0 r 1006v1;
#X obj 0 20 * 0.5;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.7;
#X obj 100 0 r 1006v2;
#X obj 0 20 * 1;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.8;
#X obj 100 0 r 1006v3;
#X obj 0 20 * 2;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.4;
#X obj 100 0 r 1006v4;
#X obj 0 20 * 3;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.2;
#X obj 100 0 r 1006v5;
#X obj 0 20 * 4;
#X obj 50 20 osc~;
#X obj 100 20 *~ 0.3;
#X obj 100 0 r 1006v6;
#X connect 0 0 2 0;
#X connect 0 0 6 0;
#X connect 0 0 10 0;
#X connect 0 0 14 0;
#X connect 0 0 18 0;
#X connect 0 0 22 0;
#X connect 0 0 26 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 5 0 4 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 1 0;
#X connect 9 0 8 1;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 1 0;
#X connect 13 0 12 1;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 1 0;
#X connect 17 0 16 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 20 0 1 0;
#X connect 21 0 20 1;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 24 0 1 0;
#X connect 25 0 24 1;
#X connect 26 0 27 0;
#X connect 27 0 28 0;
#X connect 28 0 1 0;
#X connect 29 0 28 1;
#X restore 640 87 pd \$0dyn;
#X obj 649 469 send pd-\$0dyn;
#X obj 541 115 loadbang;
#X obj 539 166 iemlib/dollarg;
#X obj 539 198 tof/listUnfold;
#X obj 564 141 t b b;
#X obj 730 172 f \$0;
#X obj 561 250 + 1;
#X obj 656 212 * 4;
#X obj 656 233 + 2;
#X obj 660 262 + 1;
#X obj 661 289 + 1;
#X obj 671 317 + 1;
#X obj 539 353 pack f f \$0 f f f f f;
#X msg 535 388 obj 0 20 * \$2 \, obj 50 20 osc~ \, obj 100 20 *~ \$1
\, obj 100 0 r \$3v\$8 \, connect 0 0 \$4 0 \, connect \$4 0 \$5 0
\, connect \$5 0 \$6 0 \, connect \$6 0 1 0 \, connect \$7 0 \$6 1
;
#X obj 63 386 *~;
#X msg 321 334 1 \$1;
#X obj 322 358 /;
#X obj 403 49 tof/listUnfold;
#X obj 402 87 pack f f \$0;
#X msg 402 125 \; \$3v\$2 \$1;
#X obj 366 237 zexy/sum;
#X obj 485 179 t l l;
#X obj 399 26 t l l;
#X obj 731 138 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 593 232 / 2;
#X obj 558 304 moses 1;
#X obj 570 279 -;
#X msg 462 293 1 \$1;
#X obj 459 316 /;
#X obj 51 266 catch~ \$0out;
#X msg 731 205 clear \, obj 0 0 r \$1in \, obj 0 100 throw~ \$1out
;
#X obj 464 265 abs;
#X obj 602 261 int;
#X obj 478 238 - 2;
#X obj 201 265 mtl/adsr~ /id \$0-adsr;
#X connect 0 0 8 0;
#X connect 1 0 44 1;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 1 44 0;
#X connect 4 0 24 0;
#X connect 6 0 7 0;
#X connect 8 0 1 0;
#X connect 8 1 32 0;
#X connect 11 0 14 0;
#X connect 12 0 31 0;
#X connect 12 1 34 0;
#X connect 13 0 22 0;
#X connect 13 1 16 0;
#X connect 13 1 17 0;
#X connect 13 1 22 7;
#X connect 14 0 12 0;
#X connect 14 1 15 0;
#X connect 15 0 40 0;
#X connect 16 0 36 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 18 0 22 3;
#X connect 19 0 20 0;
#X connect 19 0 22 4;
#X connect 20 0 21 0;
#X connect 20 0 22 5;
#X connect 21 0 22 6;
#X connect 22 0 23 0;
#X connect 23 0 10 0;
#X connect 24 0 5 0;
#X connect 25 0 26 0;
#X connect 26 0 24 1;
#X connect 27 0 28 0;
#X connect 27 1 28 1;
#X connect 28 0 29 0;
#X connect 30 0 25 0;
#X connect 31 0 30 0;
#X connect 31 1 13 0;
#X connect 32 0 30 0;
#X connect 32 1 27 0;
#X connect 33 0 15 0;
#X connect 34 0 42 0;
#X connect 35 0 43 0;
#X connect 35 1 22 1;
#X connect 36 0 35 0;
#X connect 37 0 38 0;
#X connect 38 0 22 1;
#X connect 39 0 4 0;
#X connect 40 0 10 0;
#X connect 41 0 37 0;
#X connect 42 0 36 1;
#X connect 43 0 41 0;
#X connect 44 0 4 1;