aboutsummaryrefslogtreecommitdiff
path: root/aconnectgui.pd
blob: 86b84ae96c00270f8d62f26244bf187ced93b548 (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
#N canvas 106 279 785 487 10;
#X obj 717 423 zexy;
#X floatatom 90 306 5 0 200 2 spacing - -;
#X obj 90 324 s \$0-X-spacing;
#X obj 81 54 bng 30 250 50 0 empty empty init 0 -6 0 12 -241291 -1
-1;
#N canvas 0 0 450 300 createur 0;
#X obj 88 141 aconnect;
#X msg 87 119 devices;
#N canvas 0 0 535 702 cook 0;
#X obj 219 30 inlet;
#X obj 219 442 outlet;
#X obj 219 51 a2l;
#X obj 219 71 unpack s 0 s 0 s;
#X obj 272 92 s2l;
#X obj 272 113 l2s;
#X msg 299 113 symbol;
#X obj 383 72 loadbang;
#X obj 219 409 route list;
#X obj 242 287 l2s;
#X msg 272 288 symbol :;
#X obj 312 332 strcmp;
#X obj 242 308 t s l s;
#X obj 312 354 != 0;
#X obj 219 386 pack s s 0 0 0;
#X obj 110 182 t s s;
#X obj 242 266 pack s 0 s;
#X obj 140 203 select input output;
#X obj 242 243 symbol;
#X msg 140 223 I;
#X msg 204 224 O;
#X obj 110 160 spigot;
#X obj 245 137 t f f f;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 21 0;
#X connect 3 1 22 0;
#X connect 3 2 4 0;
#X connect 3 3 14 3;
#X connect 4 0 5 0;
#X connect 5 0 16 2;
#X connect 6 0 5 1;
#X connect 7 0 6 0;
#X connect 7 0 10 0;
#X connect 8 0 1 0;
#X connect 8 1 1 0;
#X connect 9 0 12 0;
#X connect 10 0 9 1;
#X connect 11 0 13 0;
#X connect 12 0 14 1;
#X connect 12 1 11 1;
#X connect 12 2 11 0;
#X connect 13 0 14 4;
#X connect 14 0 8 0;
#X connect 15 0 14 0;
#X connect 15 1 17 0;
#X connect 16 0 9 0;
#X connect 17 0 19 0;
#X connect 17 1 20 0;
#X connect 18 0 16 0;
#X connect 19 0 18 0;
#X connect 20 0 18 0;
#X connect 21 0 15 0;
#X connect 22 0 21 1;
#X connect 22 1 14 2;
#X connect 22 2 16 1;
#X restore 88 171 pd cook;
#X obj 88 201 route input output;
#N canvas 508 218 483 431 createinlets 0;
#X obj 117 20 inlet;
#X obj 117 41 a2l;
#X obj 117 61 unpack s 0 0 0;
#X obj 117 90 t s s;
#X obj 286 139 spigot;
#N canvas 0 0 503 383 create-new 0;
#X obj 127 62 inlet;
#X obj 155 118 i;
#X msg 271 85 0;
#X obj 127 92 t s b s;
#X obj 236 118 makefilename pd-%s;
#X obj 185 119 + 150;
#X obj 215 25 r \$0-X-spacing;
#X obj 271 57 r \$0-reset;
#X obj 236 161 outlet;
#X obj 127 154 pack s 0 s \$0;
#X msg 127 251 \; pd-aconnector obj \$2 50 pd \$1 \; \$3 obj 0 0 r
\$4-aconnect-bang \; \$3 vis 0;
#X connect 0 0 3 0;
#X connect 1 0 5 0;
#X connect 1 0 9 1;
#X connect 2 0 1 1;
#X connect 3 0 9 0;
#X connect 3 1 1 0;
#X connect 3 2 4 0;
#X connect 4 0 8 0;
#X connect 4 0 9 2;
#X connect 5 0 1 1;
#X connect 6 0 5 1;
#X connect 7 0 2 0;
#X connect 9 0 10 0;
#X restore 286 160 pd create-new;
#X obj 117 220 pack s 0 0 0 s 0 0;
#X obj 174 132 t f f f;
#X obj 238 153 * 2;
#X obj 238 173 t f f;
#X obj 238 196 + 1;
#X obj 268 196 + 2;
#X msg 117 252 \; \$5 msg \$4 50 \$2 \$3 \; \$5 obj \$4 90 outlet \$3-port
\; \$5 connect 0 0 \$6 0 \; \$5 connect \$6 0 \$7 0;
#X obj 196 156 * 100;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 6 1;
#X connect 2 2 7 0;
#X connect 2 3 4 1;
#X connect 3 0 6 0;
#X connect 3 1 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 4;
#X connect 6 0 12 0;
#X connect 7 0 6 2;
#X connect 7 1 13 0;
#X connect 7 2 8 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 1 11 0;
#X connect 10 0 6 5;
#X connect 11 0 6 6;
#X connect 13 0 6 3;
#X restore 88 258 pd createinlets;
#X obj 146 120 s \$0-reset;
#X obj 150 101 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#N canvas 508 218 483 431 createoutlets 0;
#X obj 117 20 inlet;
#X obj 117 41 a2l;
#X obj 117 61 unpack s 0 0 0;
#X obj 117 90 t s s;
#X obj 286 129 spigot;
#N canvas 0 0 503 383 create-new 0;
#X obj 127 62 inlet;
#X obj 155 118 i;
#X msg 271 85 0;
#X obj 127 92 t s b s;
#X obj 236 118 makefilename pd-%s;
#X obj 185 119 + 150;
#X obj 215 25 r \$0-X-spacing;
#X obj 271 57 r \$0-reset;
#X obj 236 161 outlet;
#X obj 127 154 pack s 0 s \$0;
#X msg 127 251 \; pd-aconnector obj \$2 200 pd \$1 \; \$3 obj 0 100
s \$4-aconnect-connection \; \$3 vis 0;
#X connect 0 0 3 0;
#X connect 1 0 5 0;
#X connect 1 0 9 1;
#X connect 2 0 1 1;
#X connect 3 0 9 0;
#X connect 3 1 1 0;
#X connect 3 2 4 0;
#X connect 4 0 8 0;
#X connect 4 0 9 2;
#X connect 5 0 1 1;
#X connect 6 0 5 1;
#X connect 7 0 2 0;
#X connect 9 0 10 0;
#X restore 286 155 pd create-new;
#X obj 117 250 pack s 0 0 0 s 0 0;
#X obj 174 132 t f f f;
#X obj 218 177 * 2;
#X obj 219 197 t f f;
#X obj 219 218 + 1;
#X obj 249 218 + 2;
#X msg 117 282 \; \$5 obj \$4 0 inlet \$3-port \; \$5 obj \$4 50 pack
0 0 \$2 \$3 \; \$5 connect \$6 0 \$7 0 \; \$5 connect \$7 0 0 0;
#X obj 196 156 * 100;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 6 1;
#X connect 2 2 7 0;
#X connect 2 3 4 1;
#X connect 3 0 6 0;
#X connect 3 1 4 0;
#X connect 4 0 5 0;
#X connect 5 0 6 4;
#X connect 6 0 12 0;
#X connect 7 0 6 2;
#X connect 7 1 13 0;
#X connect 7 2 8 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 1 11 0;
#X connect 10 0 6 5;
#X connect 11 0 6 6;
#X connect 13 0 6 3;
#X restore 148 233 pd createoutlets;
#X obj 87 71 inlet;
#N canvas 0 0 657 260 aconnector 0;
#X restore 274 83 pd aconnector;
#X obj 333 198 s pd-aconnector;
#X msg 333 152 clear \, vis 1;
#X obj 87 97 t b b b;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 7 0;
#X connect 6 0 5 0;
#X connect 8 0 12 0;
#X connect 11 0 10 0;
#X connect 12 0 1 0;
#X connect 12 1 5 0;
#X connect 12 2 11 0;
#X restore 81 84 pd createur;
#N canvas 0 0 592 235 connecteur 0;
#X obj 107 12 inlet;
#X obj 107 92 s \$0-aconnect-bang;
#X msg 107 68 bang;
#X obj 107 127 r \$0-aconnect-connection;
#X msg 107 150 connect \$1 \$2 \$3 \$4;
#X obj 107 171 aconnect;
#X obj 327 144 aconnect;
#X msg 327 119 bang;
#X msg 390 144 disconnect \$1 \$2 \$3 \$4;
#X text 369 118 disconnect all;
#X obj 327 95 r \$0-reset;
#X obj 107 46 t b b;
#X connect 0 0 11 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X connect 8 0 6 0;
#X connect 10 0 7 0;
#X connect 11 0 2 0;
#X connect 11 1 7 0;
#X restore 86 211 pd connecteur;
#X obj 86 181 bng 30 250 50 0 empty empty connect 0 -8 0 14 -24198
-1 -1;
#X text 640 423 depends on;
#X text 291 5 [aconnectGUI];
#X text 216 49 1 click on "init" to query all available devices;
#X text 215 107 2 connect the input and output ports in the "aconnector"-subpatch
;
#X text 214 166 3 to perform the actual connecting \, click on "connect"
;
#X text 219 249 4 iterate to 2 until you are happy;
#X text 219 308 you can change the spacing between the connector-objects
\, if you don't like the defaults;
#X text 77 402 copyright (C) IOhannes m zmoelnig 2005;
#X text 175 423 forum::fuer::umlaeute;
#X text 175 440 institute of electronic music and acoustics \, IEM
;
#X text 177 456 university of music and dramatic arts \, graz \, austria
;
#X obj 11 164 metro 1000;
#X obj 11 144 tgl 15 0 empty empty autoconnect 20 7 0 10 -262144 -1
-1 0 1;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 6 0 5 0;
#X connect 18 0 6 0;
#X connect 19 0 18 0;