diff options
Diffstat (limited to 'aconnectgui.pd')
-rw-r--r-- | aconnectgui.pd | 178 |
1 files changed, 109 insertions, 69 deletions
diff --git a/aconnectgui.pd b/aconnectgui.pd index 86b84ae..20967f6 100644 --- a/aconnectgui.pd +++ b/aconnectgui.pd @@ -9,20 +9,17 @@ #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 492 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 219 459 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 219 436 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; @@ -31,39 +28,55 @@ #X msg 204 224 O; #X obj 110 160 spigot; #X obj 245 137 t f f f; +#X obj 312 327 select symbol; +#X obj 368 346 t b s; +#X obj 312 366 f; +#X obj 242 308 t s s; +#X obj 261 49 print a; +#X msg 312 346 bang; +#X obj 312 392 + 1; +#X msg 368 366 -1; +#X obj 312 412 t 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 0 18 0; +#X connect 3 1 19 0; #X connect 3 2 4 0; -#X connect 3 3 14 3; +#X connect 3 3 11 3; #X connect 4 0 5 0; -#X connect 5 0 16 2; +#X connect 5 0 13 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 9 0 23 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 connect 11 0 8 0; +#X connect 12 0 11 0; +#X connect 12 1 14 0; +#X connect 13 0 9 0; +#X connect 14 0 16 0; +#X connect 14 1 17 0; +#X connect 15 0 13 0; +#X connect 16 0 15 0; +#X connect 17 0 15 0; +#X connect 18 0 12 0; +#X connect 19 0 18 1; +#X connect 19 1 11 2; +#X connect 19 2 13 1; +#X connect 20 0 25 0; +#X connect 20 1 21 0; +#X connect 21 0 27 0; +#X connect 21 1 20 1; +#X connect 22 0 26 0; +#X connect 23 0 11 1; +#X connect 23 1 20 0; +#X connect 25 0 22 0; +#X connect 26 0 28 0; +#X connect 27 0 22 0; +#X connect 28 0 11 4; +#X connect 28 1 22 1; #X restore 88 171 pd cook; #X obj 88 201 route input output; #N canvas 508 218 483 431 createinlets 0; @@ -100,39 +113,43 @@ #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 obj 196 154 * 100; +#X msg 195 337 \; \$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 323 118 == 0; +#X obj 210 83 t f f f; #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 2 2 6 2; +#X connect 2 3 15 0; #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 6 0 11 0; +#X connect 7 0 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 connect 8 1 10 0; +#X connect 9 0 6 5; +#X connect 10 0 6 6; +#X connect 12 0 6 3; +#X connect 14 0 4 1; +#X connect 15 0 12 0; +#X connect 15 1 7 0; +#X connect 15 2 14 0; #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; +#N canvas 83 297 483 431 createoutlets 0; #X obj 117 20 inlet; #X obj 117 41 a2l; #X obj 117 61 unpack s 0 0 0; @@ -166,7 +183,7 @@ s \$4-aconnect-connection \; \$3 vis 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 210 82 t f f f; #X obj 218 177 * 2; #X obj 219 197 t f f; #X obj 219 218 + 1; @@ -174,26 +191,28 @@ s \$4-aconnect-connection \; \$3 vis 0; #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 obj 323 106 == 0; #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 2 2 6 2; +#X connect 2 3 7 0; #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 7 0 13 0; +#X connect 7 1 8 0; +#X connect 7 2 14 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 connect 14 0 4 1; #X restore 148 233 pd createoutlets; #X obj 87 71 inlet; #N canvas 0 0 657 260 aconnector 0; @@ -213,53 +232,74 @@ s \$4-aconnect-connection \; \$3 vis 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; +#N canvas 0 0 946 694 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 obj 327 144 aconnect; +#X msg 393 145 disconnect \$1 \$2 \$3 \$4; +#N canvas 0 0 299 212 pipe 0; +#X obj 83 36 inlet; +#X obj 83 140 outlet; +#X obj 83 64 unpack 0 0 0 0; +#X obj 83 104 pack 0 0 0 0; +#X obj 83 84 pipe 0 0 0 0 0; +#X connect 0 0 2 0; +#X connect 2 0 4 0; +#X connect 2 1 4 1; +#X connect 2 2 4 2; +#X connect 2 3 4 3; +#X connect 3 0 1 0; +#X connect 4 0 3 0; +#X connect 4 1 3 1; +#X connect 4 2 3 2; +#X connect 4 3 3 3; +#X restore 327 167 pd pipe; +#X connect 0 0 9 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 6 0 10 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 connect 9 0 2 0; +#X connect 9 1 6 0; +#X connect 10 0 12 0; +#X connect 11 0 10 0; +#X connect 12 0 11 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 77 382 copyright (C) IOhannes m zmoelnig 2005; +#X text 175 403 forum::fuer::umlaeute; +#X text 175 420 institute of electronic music and acoustics \, IEM ; -#X text 177 456 university of music and dramatic arts \, graz \, austria +#X text 177 436 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 text 216 49 1 click on "init" to query all available devices and +to delete any existing connections between them.; +#X text 85 456 published under the GnuGPL v2.0; +#X text 215 107 2 connect/disconnect the input and output ports in +the "aconnector"-subpatch; +#X text 219 308 you can change the spacing between the connector-objects +\, if you don't like the defaults (==150); +#X text 217 338 re-click on "init" to perform the changes; #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; +#X connect 15 0 6 0; +#X connect 16 0 15 0; |