From 3ef83bebe6152ad488d9daa6365758b0636b6e03 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?IOhannes=20m=20zm=C3=B6lnig?= Date: Thu, 30 Oct 2008 10:47:07 +0000 Subject: added interface to change Pd's own amidi ports svn path=/trunk/externals/iem/aconnect/; revision=10352 --- aconnectgui.pd | 66 +++++++++++++++++++++++++++++++++++++++++++--------------- 1 file changed, 49 insertions(+), 17 deletions(-) (limited to 'aconnectgui.pd') diff --git a/aconnectgui.pd b/aconnectgui.pd index 283aeff..cc1cdd7 100644 --- a/aconnectgui.pd +++ b/aconnectgui.pd @@ -1,9 +1,7 @@ -#N canvas 445 322 785 487 10; +#N canvas 1319 124 974 484 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; +#X obj 81 54 bng 30 250 50 0 \$0-init \$0-init 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; @@ -214,23 +212,23 @@ s \$4-aconnect-connection \; \$3 vis 0; #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; #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 obj 87 71 r \$0-init; #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 connect 10 0 9 0; +#X connect 11 0 1 0; +#X connect 11 1 5 0; +#X connect 11 2 10 0; +#X connect 12 0 11 0; #X restore 81 84 pd createur; #N canvas 0 0 946 694 connecteur 0; #X obj 107 12 inlet; @@ -297,11 +295,45 @@ 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 +#X text 185 292 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 15 0 6 0; -#X connect 16 0 15 0; +#X obj 70 291 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577 +0; +#X floatatom 90 306 5 0 200 2 spacing - #0-X-spacing; +#X obj 90 333 bng 15 250 50 0 \$0-init \$0-init re-init 17 7 0 10 -257985 +-1 -1; +#X text 616 278 change Pd's MIDI-settings; +#N canvas 649 332 600 432 Pd-midi 0; +#X obj 101 101 cnv 15 100 60 empty empty ALSA-midi 10 12 0 14 -233017 +-66577 0; +#X floatatom 104 124 3 0 8 1 Pd:midiIN - #0-numin; +#X floatatom 104 142 3 0 8 1 Pd:midiOUT - #0-numout; +#X obj 249 284 s pd; +#X obj 217 160 pack; +#X obj 302 143 t b f; +#X obj 217 117 r \$0-numout; +#X obj 217 324 s \$0-init; +#X obj 217 183 t b l; +#X obj 217 224 list prepend 0 0; +#X obj 217 203 del 500; +#X obj 217 244 t b l; +#X obj 302 117 r \$0-numin; +#X msg 249 265 midi-dialog 0 0 0 0 0 0 0 0 \$1 \$2; +#X connect 4 0 8 0; +#X connect 5 0 4 0; +#X connect 5 1 4 1; +#X connect 6 0 4 0; +#X connect 8 0 10 0; +#X connect 8 1 9 1; +#X connect 9 0 11 0; +#X connect 10 0 9 0; +#X connect 11 0 7 0; +#X connect 11 1 13 0; +#X connect 12 0 5 0; +#X connect 13 0 3 0; +#X coords 0 -1 1 1 102 62 2 100 100; +#X restore 654 299 pd Pd-midi; +#X connect 4 0 3 0; +#X connect 13 0 4 0; +#X connect 14 0 13 0; -- cgit v1.2.1