aboutsummaryrefslogtreecommitdiff
path: root/controctopus/midi-tentacle.pd
blob: 3e6f67f9596d3ca02012c5ce9797274aea76cedb (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
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
#N canvas 228 148 514 657 10;

#X obj 141 161 cnv 15 158 78 empty empty \$1\$2->\$3 4 14 0 10 -86277
-260097 0;
#X obj 145 188 popup 150 25 #ee0000 No-Destination press 'get' to load
parameters;
#X obj 65 126 r \$0popup;
#X obj 157 216 hradio 10 1 0 8 \$0chRow1 \$0chRow1R empty 0 -8 0 10
-166441 -166441 -166441 0;
#X obj 157 226 hradio 10 1 0 8 \$0chRow2 \$0chRow2R empty 0 -8 0 10
-166441 -166441 -166441 0;
#X obj 240 219 cnv 15 37 15 empty \$0channelDisp Omni 2 7 0 10 -66577
-260818 0;
#N canvas 259 247 434 288 init 0;
#X obj 41 81 s \$0assgnList;
#X obj 288 83 s \$0channelR;
#X obj 160 235 s \$0popup;
#X obj 41 37 initbang;
#X obj 288 41 initbang;
#X obj 160 127 initbang;
#X msg 160 149 bgcolour #ee0000;
#X msg 41 59 a b c d e f g h i j k l m n o p q;
#X msg 288 62 0;
#X obj 170 189 savebang;
#X msg 160 214 options press 'get' to load parameters;
#X msg 160 166 name No-Destination;
#X connect 3 0 7 0;
#X connect 4 0 8 0;
#X connect 5 0 11 0;
#X connect 5 0 6 0;
#X connect 5 0 10 0;
#X connect 6 0 2 0;
#X connect 7 0 0 0;
#X connect 8 0 1 0;
#X connect 9 0 10 0;
#X connect 10 0 2 0;
#X connect 11 0 2 0;
#X restore 31 361 pd init;
#X obj 288 257 s \$0popOut;
#X obj 288 134 r \$0setPopup;
#N canvas 667 135 208 415 memento 0;
#X obj 14 55 r \$0assgnList;
#X obj 14 109 s \$0assgnList;
#X obj 15 175 r \$0params;
#X obj 15 259 s \$0popup;
#X obj 14 82 commun-c \$2-assignments \$0;
#X obj 15 207 commun-c \$2-parameters \$0;
#X obj 15 231 list trim;
#X obj 14 10 originator-p \$1 \$0;
#X obj 16 361 commun-c \$2-channel \$0;
#X obj 16 338 r \$0channel;
#X obj 16 384 s \$0channelR;
#X connect 0 0 4 0;
#X connect 2 0 5 0;
#X connect 4 0 1 0;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X restore 31 339 pd memento;
#X obj 156 139 s \$0params;
#N canvas 738 69 632 552 listops 0;
#X obj 35 207 list-idx;
#X obj 35 119 r \$0channel;
#X obj 35 182 list;
#X obj 35 143 t b f;
#X obj 393 257 list-delete;
#X obj 330 355 list-insert;
#X obj 424 231 r \$0channel;
#X obj 361 301 r \$0channel;
#X obj 393 210 list;
#X obj 414 187 r \$0assgnList;
#X obj 330 193 t a b;
#X obj 330 381 s \$0assgnList;
#X obj 88 165 r \$0assgnList;
#X obj 330 161 r \$0popOut;
#X text 43 239 don't set the placeholders (see init);
#X obj 35 284 route a b c d;
#X obj 35 323 route e f g h;
#X obj 35 363 route i j k l;
#X obj 35 403 route m n o p;
#X obj 35 256 list trim;
#X obj 35 504 s \$0setPopup;
#X obj 35 464 list;
#X obj 142 379 s \$0popup;
#X obj 35 437 route q;
#X msg 142 357 name No-Destination;
#X connect 0 0 19 0;
#X connect 1 0 3 0;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 3 1 0 1;
#X connect 4 0 5 2;
#X connect 5 0 11 0;
#X connect 6 0 4 1;
#X connect 7 0 5 1;
#X connect 8 0 4 0;
#X connect 9 0 8 1;
#X connect 10 0 5 0;
#X connect 10 1 8 0;
#X connect 12 0 2 1;
#X connect 13 0 10 0;
#X connect 15 0 24 0;
#X connect 15 1 24 0;
#X connect 15 2 24 0;
#X connect 15 3 24 0;
#X connect 15 4 16 0;
#X connect 16 0 24 0;
#X connect 16 1 24 0;
#X connect 16 2 24 0;
#X connect 16 3 24 0;
#X connect 16 4 17 0;
#X connect 17 0 24 0;
#X connect 17 1 24 0;
#X connect 17 2 24 0;
#X connect 17 3 24 0;
#X connect 17 4 18 0;
#X connect 18 0 24 0;
#X connect 18 1 24 0;
#X connect 18 2 24 0;
#X connect 18 3 24 0;
#X connect 18 4 23 0;
#X connect 19 0 15 0;
#X connect 21 0 20 0;
#X connect 23 0 24 0;
#X connect 23 1 21 0;
#X connect 24 0 22 0;
#X restore 31 315 pd listops;
#X obj 31 478 s \$0channelR;
#X obj 166 64 list-extend;
#X obj 145 115 prepent options;
#X obj 283 221 bng 8 250 50 0 \$0getParams \$0getParamsR get 0 12 1
7 -249808 -1 -262144;
#X obj 31 527 r \$0getParams;
#N canvas 713 160 242 368 16channelOuts 0;
#X obj 18 23 rchannel \$0 \$1 \$2 \$3 1;
#X obj 18 43 rchannel \$0 \$1 \$2 \$3 2;
#X obj 18 63 rchannel \$0 \$1 \$2 \$3 3;
#X obj 18 83 rchannel \$0 \$1 \$2 \$3 4;
#X obj 18 103 rchannel \$0 \$1 \$2 \$3 5;
#X obj 18 123 rchannel \$0 \$1 \$2 \$3 6;
#X obj 18 143 rchannel \$0 \$1 \$2 \$3 7;
#X obj 18 163 rchannel \$0 \$1 \$2 \$3 8;
#X obj 18 183 rchannel \$0 \$1 \$2 \$3 9;
#X obj 18 203 rchannel \$0 \$1 \$2 \$3 10;
#X obj 18 223 rchannel \$0 \$1 \$2 \$3 11;
#X obj 18 263 rchannel \$0 \$1 \$2 \$3 13;
#X obj 18 283 rchannel \$0 \$1 \$2 \$3 14;
#X obj 18 303 rchannel \$0 \$1 \$2 \$3 15;
#X obj 18 323 rchannel \$0 \$1 \$2 \$3 16;
#X obj 18 243 rchannel \$0 \$1 \$2 \$3 12;
#X restore 31 293 pd 16channelOuts;
#X obj 241 64 r \$1/clearParams;
#X obj 145 220 hradio 12 1 0 1 \$0chRow0 \$0chRow0R empty 0 -8 0 10
-260818 -62784 -166441 0;
#N canvas 0 65 921 562 3RowRadio 0;
#X obj 258 324 r \$0chRow1;
#X obj 508 334 r \$0chRow2;
#X obj 258 454 s \$0chRow1R;
#X obj 508 455 s \$0chRow2R;
#X obj 297 53 r \$0chRow1;
#X obj 397 53 r \$0chRow2;
#X obj 368 189 s \$0channel;
#X obj 25 1 r \$0channelR;
#X obj 64 77 moses 9;
#X obj 108 100 - 9;
#X obj 64 144 s \$0chRow1R;
#X obj 108 122 s \$0chRow2R;
#X obj 64 109 - 1;
#X obj 397 87 + 8;
#X obj 297 86 + 0;
#X obj 379 235 r \$0channel;
#X msg 452 280 label Ch.\$1;
#X obj 379 302 s \$0channelDisp;
#X obj 433 167 s \$0channelSet;
#X msg 258 372 color -7.39328e+06 18 1;
#X msg 268 395 color -7.39328e+06 -7.39328e+06 1;
#X msg 508 372 color -7.39328e+06 18 1;
#X msg 518 395 color -7.39328e+06 -7.39328e+06 1;
#X obj 349 128 + 1;
#X obj 379 258 sel 0;
#X msg 379 280 label Omni;
#X obj 217 53 r \$0chRow0;
#X obj 28 334 r \$0chRow0;
#X obj 25 54 moses 1;
#X obj 25 166 s \$0chRow0R;
#X obj 28 454 s \$0chRow0R;
#X msg 284 419 color 1 1 1;
#X msg 38 395 color 1 1 1;
#X msg 534 419 color 1 1 1;
#X obj 288 167 == 0;
#X obj 288 189 s \$0omni;
#X obj 349 150 t a a a;
#X obj 559 199 r \$0omni;
#X obj 559 222 sel 0 1;
#X obj 559 282 s \$0channelDisp;
#X msg 559 250 color 2 7;
#X msg 623 250 color 2 14;
#X msg 28 372 color 14 18 1;
#X connect 0 0 19 0;
#X connect 0 0 20 0;
#X connect 0 0 31 0;
#X connect 1 0 21 0;
#X connect 1 0 22 0;
#X connect 1 0 33 0;
#X connect 4 0 14 0;
#X connect 5 0 13 0;
#X connect 7 0 28 0;
#X connect 8 0 12 0;
#X connect 8 1 9 0;
#X connect 9 0 11 0;
#X connect 12 0 10 0;
#X connect 13 0 23 0;
#X connect 14 0 23 0;
#X connect 15 0 24 0;
#X connect 16 0 17 0;
#X connect 19 0 2 0;
#X connect 20 0 3 0;
#X connect 21 0 3 0;
#X connect 22 0 2 0;
#X connect 23 0 36 0;
#X connect 24 0 25 0;
#X connect 24 1 16 0;
#X connect 25 0 17 0;
#X connect 26 0 36 0;
#X connect 27 0 42 0;
#X connect 27 0 32 0;
#X connect 28 0 29 0;
#X connect 28 1 8 0;
#X connect 31 0 30 0;
#X connect 32 0 2 0;
#X connect 32 0 3 0;
#X connect 33 0 30 0;
#X connect 34 0 35 0;
#X connect 36 0 34 0;
#X connect 36 1 6 0;
#X connect 36 2 18 0;
#X connect 37 0 38 0;
#X connect 38 0 40 0;
#X connect 38 1 41 0;
#X connect 40 0 39 0;
#X connect 41 0 39 0;
#X connect 42 0 30 0;
#X restore 31 383 pd 3RowRadio;
#X obj 31 433 r \$1/showChannel;
#X obj 166 42 r \$3/paramsList;
#X obj 31 456 clip 0 16;
#X obj 145 91 list;
#X obj 145 15 r \$0doneGettingParams;
#X obj 31 626 s \$0doneGettingParams;
#X obj 31 553 t b b b;
#X obj 50 600 s \$3/getParams;
#X obj 70 577 s \$1/clearParams;
#N canvas 0 22 450 300 omniOut 0;
#X obj 63 248 s PDOSC;
#X obj 63 220 prepent;
#X obj 198 23 r \$0popOut;
#X obj 63 93 r \$1\$2;
#X obj 198 179 list prepend \$3;
#X msg 198 203 \$1\$2;
#X obj 63 182 spigot 0;
#X obj 108 143 r \$0omni;
#X connect 1 0 0 0;
#X connect 2 0 4 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 1 1;
#X connect 6 0 1 0;
#X connect 7 0 6 1;
#X restore 134 293 pd omniOut;
#X obj 65 152 popup-fix;
#X text 159 328 [midi-tentacle /controller /control /system-name];
#X connect 1 0 31 1;
#X connect 1 1 7 0;
#X connect 2 0 31 0;
#X connect 8 0 1 1;
#X connect 13 0 24 1;
#X connect 14 0 10 0;
#X connect 14 0 31 0;
#X connect 16 0 27 0;
#X connect 18 0 13 1;
#X connect 21 0 23 0;
#X connect 22 0 13 0;
#X connect 23 0 12 0;
#X connect 24 0 14 0;
#X connect 25 0 24 0;
#X connect 27 0 26 0;
#X connect 27 1 28 0;
#X connect 27 2 29 0;
#X connect 31 0 1 0;
#X coords 0 -1 1 1 160 80 2 140 160;