-
Notifications
You must be signed in to change notification settings - Fork 4
/
elorg.pd
293 lines (293 loc) · 9.06 KB
/
elorg.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
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
#N struct 4362.rectangle float id float x float y float w float h float txtclr float boxclr float bgclr symbol label;
#N struct 4343.vertgrid float x float y float w float h;
#N struct 4343.horizgrid float x float y float w float h float c symbol note float notevis;
#N struct 4343.vertline float x float y float h float c float n float nvis;
#N struct 4343.guibar float x float y float w;
#N struct 4343.gid.button float x float y float clr float gid;
#N struct 4343.vel float x float y float value;
#N struct 4343.dur float x float y float value;
#N struct 4343.mode.button float x float y float w float c symbol param;
#N struct 4343.show.selector float x float y float w float hilite float id symbol label;
#N struct 4343.cursor float x float y float h float vis;
#N struct 4343.pager float x float y float c float dir float num float nvis;
#N struct 4343.scroller float x float y float c float dir;
#N struct 4343.keyboard.toggle float x float y symbol label float hilite float ihilite;
#N canvas 143 307 326 348 10;
#N canvas 614 106 402 76 NETPD 0;
#N canvas 305 99 398 107 abslist 0;
#X msg 12 43 i2mx;
#X msg 106 40 elorg-voice;
#X msg 12 13 unpunch-plus;
#X restore 14 35 pd abslist;
#X msg 16 7 version 0 1 6;
#X restore 231 12 pd NETPD 2 0;
#X obj 11 39 netpd_head \$1 elorg;
#N canvas 713 208 386 278 \$1-elorg 1;
#X obj 5 3 cnv 15 370 270 empty empty empty 20 12 0 14 #381c00 #404040 0;
#X obj 10 8 cnv 1 360 260 empty empty E*L*O*R*G 5 16 2 22 #d4c4ac #381c00 0;
#X obj 279 13 bng 25 250 50 0 \$0.show.unpunch \$0.bli empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 15 43 cnv 15 350 220 empty empty empty 20 12 0 14 #381c00 #404040 0;
#X obj 20 47 vradio 20 1 0 9 \$1-partial/1 \$1-partial/1 empty 0 -8 0 10 #543410 #fcfcfc #000000 0;
#X obj 60 47 vradio 20 1 0 9 \$1-partial/3 \$1-partial/3 empty 0 -8 0 10 #543410 #fcfcfc #000000 0;
#X obj 100 47 vradio 20 1 0 9 \$1-partial/2 \$1-partial/2 empty 0 -8 0 10 #fcfcfc #404040 #000000 0;
#X obj 140 47 vradio 20 1 0 9 \$1-partial/4 \$1-partial/4 empty 0 -8 0 10 #fcfcfc #404040 #000000 0;
#X obj 180 47 vradio 20 1 0 9 \$1-partial/6 \$1-partial/6 empty 0 -8 0 10 #404040 #fcfcfc #000000 0;
#X obj 220 47 vradio 20 1 0 9 \$1-partial/8 \$1-partial/8 empty 0 -8 0 10 #fcfcfc #404040 #000000 0;
#X obj 260 47 vradio 20 1 0 9 \$1-partial/10 \$1-partial/10 empty 0 -8 0 10 #404040 #fcfcfc #000000 0;
#X obj 300 47 vradio 20 1 0 9 \$1-partial/12 \$1-partial/12 empty 0 -8 0 10 #404040 #fcfcfc #000000 0;
#X obj 340 47 vradio 20 1 0 9 \$1-partial/16 \$1-partial/16 empty 0 -8 0 10 #fcfcfc #404040 #000000 0;
#X obj 20 235 cnv 15 340 22 empty empty empty 20 12 0 14 #d4c4ac #404040 0;
#X text 21 237 16';
#X text 103 237 8';
#X text 142 237 4';
#X text 180 237 2⅔';
#X text 260 237 1⅗';
#X text 222 237 2';
#X text 300 237 1⅓';
#X text 343 237 1';
#X text 62 237 5⅔;
#X obj 304 13 bng 25 250 50 0 \$0.show.unpunch \$0.bli empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 321 13 bng 25 250 50 0 \$0.show.unpunch \$0.bli empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 340 13 bng 25 250 50 0 \$0.show.unpunch \$0.bli empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 279 13 cnv 15 86 25 empty empty *unpunch* 5 12 2 16 #381c00 #d4c4ac 0;
#X obj 222 13 hsl 50 25 0 1 0 0 \$1-leslie \$1-leslie LESLIE 2 12 2 14 #381c00 #d4c4ac #d4c4ac 0 1;
#X obj 162 13 hsl 50 25 0 1 0 0 \$1-human \$1-human HUMAN 2 12 2 14 #381c00 #d4c4ac #d4c4ac 0 1;
#X restore 10 12 pd \$1-elorg;
#X obj 11 317 i2mx \$1 elorg;
#X obj 11 159 pack f f f;
#X obj 11 185 s \$1-elorg-voice;
#N canvas 0 106 399 214 catch 0;
#X obj 11 104 catch~ \$1-sum/left;
#X obj 131 104 catch~ \$1-sum/right;
#X obj 21 19 inlet~;
#X obj 11 146 outlet~;
#X obj 131 146 outlet~;
#X connect 0 0 3 0;
#X connect 1 0 4 0;
#X restore 11 240 pd catch;
#N canvas 682 220 363 425 voices 0;
#X obj 16 22 elorg-voice \$1 1;
#X obj 16 42 elorg-voice \$1 2;
#X obj 16 62 elorg-voice \$1 3;
#X obj 16 82 elorg-voice \$1 4;
#X obj 16 102 elorg-voice \$1 5;
#X obj 16 122 elorg-voice \$1 6;
#X obj 16 142 elorg-voice \$1 7;
#X obj 16 162 elorg-voice \$1 8;
#X obj 18 367 outlet~;
#X obj 92 365 outlet;
#X obj 16 182 elorg-voice \$1 9;
#X obj 16 202 elorg-voice \$1 10;
#X obj 16 222 elorg-voice \$1 11;
#X obj 16 242 elorg-voice \$1 12;
#X obj 16 262 elorg-voice \$1 13;
#X obj 16 282 elorg-voice \$1 14;
#X obj 16 302 elorg-voice \$1 15;
#X obj 16 322 elorg-voice \$1 16;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 9 0;
#X restore 11 214 pd voices;
#X f 13;
#X obj 11 107 unpunch-plus \$1 elorg;
#X obj 11 80 r \$0.show.unpunch;
#N canvas 558 280 366 305 drawbars 0;
#X obj 17 106 netpd_f \$1 partial/4;
#X obj 17 137 netpd_f \$1 partial/6;
#X obj 17 166 netpd_f \$1 partial/8;
#X obj 17 17 netpd_f \$1 partial/1 8;
#X obj 17 46 netpd_f \$1 partial/3 7;
#X obj 17 77 netpd_f \$1 partial/2 6;
#X obj 17 197 netpd_f \$1 partial/10 3;
#X obj 17 226 netpd_f \$1 partial/12 2;
#X obj 17 256 netpd_f \$1 partial/16 2;
#X restore 237 42 pd drawbars;
#N canvas 525 450 401 182 dirt 0;
#X obj 9 13 inlet~;
#X obj 131 13 inlet~;
#X obj 9 123 outlet~;
#X obj 132 123 outlet~;
#X obj 258 29 inlet;
#X obj 258 113 outlet;
#X obj 258 52 t a a;
#X obj 285 84 switch~;
#X obj 10 57 expr~ tanh($v1*2);
#X obj 132 56 expr~ tanh($v1*2);
#X obj 10 80 *~ 0.5;
#X obj 133 80 *~ 0.5;
#X connect 0 0 8 0;
#X connect 1 0 9 0;
#X connect 4 0 6 0;
#X connect 6 0 5 0;
#X connect 6 1 7 0;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 2 0;
#X connect 11 0 3 0;
#X restore 11 262 pd dirt;
#X f 13;
#N canvas 331 391 517 474 leslie 0;
#X obj 9 13 inlet~;
#X obj 131 13 inlet~;
#X obj 9 417 outlet~;
#X obj 132 417 outlet~;
#X obj 418 22 inlet;
#X obj 418 106 outlet;
#X obj 418 45 t a a;
#X obj 445 77 switch~;
#N canvas 10 420 450 300 lesl 0;
#X obj 11 5 inlet~;
#X obj 13 175 outlet~;
#X obj 165 33 inlet~;
#N canvas 0 89 450 300 delwrite~ 0;
#X obj 14 15 inlet~;
#X obj 19 154 outlet~;
#X obj 13 52 delwrite~ \$0.leslie.l 3;
#X connect 0 0 2 0;
#X restore 12 59 pd delwrite~;
#N canvas 0 89 450 300 delread4~ 0;
#X obj 14 15 inlet~;
#X obj 19 154 outlet~;
#X obj 165 33 inlet~;
#X obj 165 80 delread4~ \$0.leslie.l;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X restore 13 104 pd delread4~;
#X connect 0 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X restore 9 77 pd lesl;
#X obj 242 127 phasor~;
#X obj 219 175 cos~;
#X floatatom 242 61 5 0 0 0 - - - 0;
#X obj 219 198 +~ 1;
#X obj 219 221 *~ 0.5;
#X msg 313 109 \$1 343;
#X obj 313 135 /;
#X obj 313 86 * 1000;
#X obj 219 244 *~ 0;
#X text 281 62 Hz;
#N canvas 20 428 450 300 lesl 0;
#X obj 11 5 inlet~;
#X obj 13 175 outlet~;
#X obj 165 33 inlet~;
#N canvas 0 89 450 300 delwrite~ 0;
#X obj 14 15 inlet~;
#X obj 19 154 outlet~;
#X obj 13 52 delwrite~ \$0.leslie.r 3;
#X connect 0 0 2 0;
#X restore 12 59 pd delwrite~;
#N canvas 0 89 450 300 delread4~ 0;
#X obj 14 15 inlet~;
#X obj 19 154 outlet~;
#X obj 165 33 inlet~;
#X obj 165 80 delread4~ \$0.leslie.r;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X restore 13 104 pd delread4~;
#X connect 0 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X restore 132 74 pd lesl;
#X obj 375 203 cos~;
#X obj 375 226 +~ 1;
#X obj 375 249 *~ 0.5;
#X obj 9 377 *~;
#X obj 133 376 *~;
#X obj 375 276 *~ 0.2;
#X obj 375 299 +~ 0.8;
#X obj 313 37 loadbang;
#X text 343 60 size(m);
#X obj 242 35 * 10;
#X obj 242 8 netpd_f \$1 leslie 0;
#X obj 273 195 cos~;
#X obj 273 218 +~ 1;
#X obj 273 241 *~ 0.5;
#X obj 273 264 *~ 0;
#X obj 262 167 +~ 0.25;
#X obj 376 181 +~ 0.75;
#X obj 445 203 cos~;
#X obj 445 226 +~ 1;
#X obj 445 249 *~ 0.5;
#X obj 445 276 *~ 0.2;
#X obj 445 299 +~ 0.8;
#X obj 446 180 +~ 0.5;
#X msg 313 60 0.3;
#X connect 0 0 8 0;
#X connect 1 0 19 0;
#X connect 4 0 6 0;
#X connect 6 0 5 0;
#X connect 6 1 7 0;
#X connect 8 0 23 0;
#X connect 9 0 10 0;
#X connect 9 0 35 0;
#X connect 9 0 36 0;
#X connect 9 0 42 0;
#X connect 10 0 12 0;
#X connect 11 0 9 0;
#X connect 12 0 13 0;
#X connect 13 0 17 0;
#X connect 14 0 15 0;
#X connect 15 0 17 1;
#X connect 15 0 34 1;
#X connect 16 0 14 0;
#X connect 17 0 8 1;
#X connect 19 0 24 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 22 0 25 0;
#X connect 23 0 2 0;
#X connect 24 0 3 0;
#X connect 25 0 26 0;
#X connect 26 0 23 1;
#X connect 27 0 43 0;
#X connect 29 0 11 0;
#X connect 30 0 29 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 34 0;
#X connect 34 0 19 1;
#X connect 35 0 31 0;
#X connect 36 0 20 0;
#X connect 37 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 41 0 24 1;
#X connect 42 0 37 0;
#X connect 43 0 16 0;
#X restore 11 290 pd leslie;
#X f 13;
#X obj 11 136 poly 16 1, f 10;
#X obj 196 69 netpd_f \$1 human 0;
#X connect 4 0 5 0;
#X connect 6 0 11 0;
#X connect 6 1 11 1;
#X connect 7 0 6 0;
#X connect 7 1 11 2;
#X connect 8 0 13 0;
#X connect 9 0 8 0;
#X connect 11 0 12 0;
#X connect 11 1 12 1;
#X connect 11 2 12 2;
#X connect 12 0 3 0;
#X connect 12 1 3 1;
#X connect 12 2 3 2;
#X connect 13 0 4 0;
#X connect 13 1 4 1;
#X connect 13 2 4 2;