Update of /cvsroot/pure-data/externals/iem/aconnect In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv21311
Modified Files: aconnect-help.pd aconnect.c Added Files: aconnects-help.pd aconnects.pd Log Message: use "src"/"dst" instead of "input"/"output" added [aconnects] (depending on zexy), which can connect using symbolic names for ports,...
--- NEW FILE: aconnects.pd --- #N canvas 243 174 662 643 10; #X obj 190 579 zexy; #X text 113 579 depends on; #X text 34 453 copyright (C) IOhannes m zmoelnig 2005; #X text 132 474 forum::fuer::umlaeute; #X text 132 491 institute of electronic music and acoustics , IEM ; #X text 134 507 university of music and dramatic arts , graz , austria ; #X text 42 527 published under the GnuGPL v2.0; #X obj 88 91 aconnect; #X msg 88 47 devices; #X obj 88 68 t a b; #N canvas 0 0 469 393 input 0; #X obj 26 68 inlet; #N canvas 484 415 461 350 cook 0; #X obj 71 41 inlet; #X obj 71 292 outlet; #X obj 71 65 t l l l; #X msg 115 270 list $2 $1; #X msg 71 187 list $4 @ $2; #X obj 71 207 l2s; #X obj 71 236 pack s f; #X obj 122 141 * 256; #X obj 122 164 +; #X obj 122 120 unpack; #X msg 122 98 $1 $3; #X connect 0 0 2 0; #X connect 2 0 4 0; #X connect 2 1 10 0; #X connect 2 2 3 0; #X connect 3 0 1 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 1 0; #X connect 7 0 8 0; #X connect 8 0 6 1; #X connect 9 0 7 0; #X connect 9 1 8 1; #X connect 10 0 9 0; #X restore 267 108 pd cook; #X msg 293 150 reset; #X msg 267 129 add $1 $2; #N canvas 0 0 450 300 index 0; #X obj 110 158 index; #X obj 110 208 spigot; #X msg 179 157 0; #X msg 151 157 1; #X obj 118 131 t b a b; #X obj 172 88 inlet; #X obj 110 234 outlet; #X obj 84 89 inlet; #X connect 0 0 1 0; #X connect 1 0 6 0; #X connect 2 0 1 1; #X connect 3 0 1 1; #X connect 4 0 3 0; #X connect 4 1 0 0; #X connect 4 2 2 0; #X connect 5 0 4 0; #X connect 7 0 0 0; #X restore 163 186 pd index; #N canvas 0 0 450 300 getIDs 0; #X obj 122 25 inlet; #X obj 122 253 outlet; #X obj 274 43 inlet; #X obj 122 216 pack; #X obj 122 88 moses 256; #X obj 180 110 t f f; #X obj 180 134 / 256; #X obj 220 134 % 256; #X obj 122 51 t f b; #X msg 152 109 0; #X obj 180 156 i; #X connect 0 0 8 0; #X connect 2 0 3 1; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 4 1 5 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 6 0 10 0; #X connect 7 0 3 1; #X connect 8 0 4 0; #X connect 8 1 9 0; #X connect 9 0 3 1; #X connect 10 0 3 0; #X restore 163 252 pd getIDs; #N canvas 0 0 395 408 what 0; #X obj 82 32 inlet; #X obj 42 321 outlet; #X obj 158 321 outlet; #X text 209 49 list <id> <port#>; #X text 139 34 could be: list <id#> <port#>; #X text 209 64 list <id> <port>; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 42 148 pd float|symbol; #X obj 82 61 t l l; #X msg 82 95 $1; #X msg 112 95 $2; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 158 148 pd float|symbol; #X obj 207 285 l2s; #X obj 207 242 pack s s; #X msg 207 263 list $2 @ $1; #N canvas 0 0 450 300 demux 0; #X obj 64 50 inlet; #X obj 64 256 outlet; #X obj 167 257 outlet; #X obj 260 45 inlet; #X obj 260 73 t f f; #X obj 260 111 == 0; #X obj 300 111 != 0; #X obj 64 224 spigot; #X obj 167 225 spigot; #X obj 64 98 t a a; #X obj 326 39 loadbang; #X connect 0 0 9 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 6 0; #X connect 5 0 7 1; #X connect 6 0 8 1; #X connect 7 0 1 0; #X connect 8 0 2 0; #X connect 9 0 7 0; #X connect 9 1 8 0; #X connect 10 0 4 0; #X restore 142 219 pd demux; #X obj 158 175 t f b; #X obj 258 175 t s b; #X msg 288 197 1; #X msg 206 191 0; #X connect 0 0 7 0; #X connect 6 0 1 0; #X connect 6 1 14 0; #X connect 7 0 8 0; #X connect 7 1 9 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 15 0; #X connect 10 1 16 0; #X connect 11 0 1 0; #X connect 12 0 13 0; #X connect 13 0 11 0; #X connect 14 0 1 0; #X connect 14 1 12 0; #X connect 15 0 2 0; #X connect 15 1 18 0; #X connect 16 0 12 1; #X connect 16 1 17 0; #X connect 17 0 14 1; #X connect 18 0 14 1; #X restore 26 108 pd what is it ?; #X obj 26 134 route float; #X obj 163 281 outlet; #X obj 195 38 inlet; #X obj 195 63 route reset; #X msg 195 110 reset; #X connect 0 0 6 0; #X connect 1 0 3 0; #X connect 2 0 4 1; #X connect 3 0 4 1; #X connect 4 0 5 0; #X connect 5 0 8 0; #X connect 6 0 7 0; #X connect 6 1 5 1; #X connect 7 0 5 0; #X connect 7 1 4 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 10 1 1 0; #X connect 11 0 4 1; #X restore 88 188 pd input; #X msg 139 112 reset; #X obj 88 246 pack 0 0 0 0; #X obj 88 216 unpack; #X obj 176 216 unpack; #X msg 88 271 connect $1 $2 $3 $4; #X obj 281 33 inlet; #X obj 281 74 b; #X obj 281 53 route reset connect; #X obj 345 73 a2l; #X obj 345 93 t l l; #X msg 345 119 list $1 $2; #X msg 375 139 list $3 $4; #X obj 88 340 aconnect; #X obj 88 24 loadbang; #X obj 88 387 outlet; #X obj 139 387 outlet; #N canvas 0 0 469 393 output 0; #X obj 26 68 inlet; #N canvas 484 415 461 350 cook 0; #X obj 71 41 inlet; #X obj 71 292 outlet; #X obj 71 65 t l l l; #X msg 115 270 list $2 $1; #X msg 71 187 list $4 @ $2; #X obj 71 207 l2s; #X obj 71 236 pack s f; #X obj 122 141 * 256; #X obj 122 164 +; #X obj 122 120 unpack; #X msg 122 98 $1 $3; #X connect 0 0 2 0; #X connect 2 0 4 0; #X connect 2 1 10 0; #X connect 2 2 3 0; #X connect 3 0 1 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 6 0 1 0; #X connect 7 0 8 0; #X connect 8 0 6 1; #X connect 9 0 7 0; #X connect 9 1 8 1; #X connect 10 0 9 0; #X restore 267 108 pd cook; #X msg 293 150 reset; #X msg 267 129 add $1 $2; #N canvas 0 0 450 300 index 0; #X obj 110 158 index; #X obj 110 208 spigot; #X msg 179 157 0; #X msg 151 157 1; #X obj 118 131 t b a b; #X obj 172 88 inlet; #X obj 110 234 outlet; #X obj 84 89 inlet; #X connect 0 0 1 0; #X connect 1 0 6 0; #X connect 2 0 1 1; #X connect 3 0 1 1; #X connect 4 0 3 0; #X connect 4 1 0 0; #X connect 4 2 2 0; #X connect 5 0 4 0; #X connect 7 0 0 0; #X restore 163 186 pd index; #N canvas 0 0 450 300 getIDs 0; #X obj 122 25 inlet; #X obj 122 253 outlet; #X obj 274 43 inlet; #X obj 122 216 pack; #X obj 122 88 moses 256; #X obj 180 110 t f f; #X obj 180 134 / 256; #X obj 220 134 % 256; #X obj 122 51 t f b; #X msg 152 109 0; #X obj 180 156 i; #X connect 0 0 8 0; #X connect 2 0 3 1; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 4 1 5 0; #X connect 5 0 6 0; #X connect 5 1 7 0; #X connect 6 0 10 0; #X connect 7 0 3 1; #X connect 8 0 4 0; #X connect 8 1 9 0; #X connect 9 0 3 1; #X connect 10 0 3 0; #X restore 163 252 pd getIDs; #N canvas 0 0 395 408 what 0; #X obj 82 32 inlet; #X obj 42 321 outlet; #X obj 158 321 outlet; #X text 209 49 list <id> <port#>; #X text 139 34 could be: list <id#> <port#>; #X text 209 64 list <id> <port>; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 42 148 pd float|symbol; #X obj 82 61 t l l; #X msg 82 95 $1; #X msg 112 95 $2; #N canvas 0 0 450 300 float|symbol 0; #X obj 82 29 inlet; #X obj 82 186 outlet float; #X obj 154 156 outlet symbol; #X obj 82 97 route float; #X obj 154 133 symbol; #X obj 82 67 route list; #X connect 0 0 5 0; #X connect 3 0 1 0; #X connect 3 1 4 0; #X connect 4 0 2 0; #X connect 5 0 3 0; #X connect 5 1 3 0; #X restore 158 148 pd float|symbol; #X obj 207 285 l2s; #X obj 207 242 pack s s; #X msg 207 263 list $2 @ $1; #N canvas 0 0 450 300 demux 0; #X obj 64 50 inlet; #X obj 64 256 outlet; #X obj 167 257 outlet; #X obj 260 45 inlet; #X obj 260 73 t f f; #X obj 260 111 == 0; #X obj 300 111 != 0; #X obj 64 224 spigot; #X obj 167 225 spigot; #X obj 64 98 t a a; #X obj 326 39 loadbang; #X connect 0 0 9 0; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 4 1 6 0; #X connect 5 0 7 1; #X connect 6 0 8 1; #X connect 7 0 1 0; #X connect 8 0 2 0; #X connect 9 0 7 0; #X connect 9 1 8 0; #X connect 10 0 4 0; #X restore 142 219 pd demux; #X obj 158 175 t f b; #X obj 258 175 t s b; #X msg 288 197 1; #X msg 206 191 0; #X connect 0 0 7 0; #X connect 6 0 1 0; #X connect 6 1 14 0; #X connect 7 0 8 0; #X connect 7 1 9 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 15 0; #X connect 10 1 16 0; #X connect 11 0 1 0; #X connect 12 0 13 0; #X connect 13 0 11 0; #X connect 14 0 1 0; #X connect 14 1 12 0; #X connect 15 0 2 0; #X connect 15 1 18 0; #X connect 16 0 12 1; #X connect 16 1 17 0; #X connect 17 0 14 1; #X connect 18 0 14 1; #X restore 26 108 pd what is it ?; #X obj 26 134 route float; #X obj 163 281 outlet; #X obj 195 38 inlet; #X obj 195 63 route reset; #X msg 195 110 reset; #X connect 0 0 6 0; #X connect 1 0 3 0; #X connect 2 0 4 1; #X connect 3 0 4 1; #X connect 4 0 5 0; #X connect 5 0 8 0; #X connect 6 0 7 0; #X connect 6 1 5 1; #X connect 7 0 5 0; #X connect 7 1 4 0; #X connect 9 0 10 0; #X connect 10 0 11 0; #X connect 10 1 1 0; #X connect 11 0 4 1; #X restore 176 188 pd output; #X obj 88 131 route src dst; #X connect 7 0 28 0; #X connect 8 0 9 0; #X connect 9 0 7 0; #X connect 9 1 11 0; #X connect 10 0 13 0; #X connect 11 0 10 1; #X connect 11 0 27 1; #X connect 12 0 15 0; #X connect 13 0 12 0; #X connect 13 1 12 1; #X connect 14 0 12 2; #X connect 14 1 12 3; #X connect 15 0 23 0; #X connect 16 0 18 0; #X connect 17 0 8 0; #X connect 18 0 17 0; #X connect 18 1 19 0; #X connect 18 2 23 0; #X connect 19 0 20 0; #X connect 20 0 21 0; #X connect 20 1 22 0; #X connect 21 0 10 0; #X connect 22 0 27 0; #X connect 23 0 25 0; #X connect 23 1 26 0; #X connect 24 0 8 0; #X connect 27 0 14 0; #X connect 28 0 10 1; #X connect 28 1 27 1;
--- NEW FILE: aconnects-help.pd --- #N canvas 143 59 794 664 10; #X text 45 13 [aconnects] is [aconnect] with symbolic identifiers; #X obj 694 594 zexy; #X text 617 594 depends on; #X text 54 553 copyright (C) IOhannes m zmoelnig 2005; #X text 152 574 forum::fuer::umlaeute; #X text 152 591 institute of electronic music and acoustics , IEM ; #X text 154 607 university of music and dramatic arts , graz , austria ; #X text 62 627 published under the GnuGPL v2.0; #X msg 212 347 reset; #X obj 116 233 l2s; #X obj 193 232 l2s; #X msg 193 209 Midi Through; #X msg 116 292 connect $1 $2 $3 $4; #X msg 116 210 Pure Data; #X obj 116 260 pack s s s 0; #X obj 142 190 l2s; #X msg 142 167 Pure Data Midi-Out 1; #X obj 116 131 t b b b; #X msg 205 400 devices; #X obj 199 460 print error-code; #X obj 116 483 print aconnect; #X msg 116 97 bang; #X text 159 86 connect "Pure Data" , port "Pure Data Midi-Out 1" with "Midi Through" , port 0; #X text 256 348 re-read the symbolic identifiers; #X text 265 401 normal messages to [aconnect] work as expected; #X obj 116 432 aconnects; #X text 258 295 this is the "connect" message with symbolic identifiers ; #X obj 116 324 t a a; #X obj 156 324 print; #X text 315 237 i use [l2s] to make symbols with spaces; #X connect 8 0 25 0; #X connect 9 0 14 0; #X connect 10 0 14 2; #X connect 11 0 10 0; #X connect 12 0 27 0; #X connect 13 0 9 0; #X connect 14 0 12 0; #X connect 15 0 14 1; #X connect 16 0 15 0; #X connect 17 0 13 0; #X connect 17 1 16 0; #X connect 17 2 11 0; #X connect 18 0 25 0; #X connect 21 0 17 0; #X connect 25 0 20 0; #X connect 25 1 19 0; #X connect 27 0 25 0; #X connect 27 1 28 0;
Index: aconnect.c =================================================================== RCS file: /cvsroot/pure-data/externals/iem/aconnect/aconnect.c,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** aconnect.c 25 Jul 2005 10:14:13 -0000 1.4 --- aconnect.c 27 Oct 2005 13:14:09 -0000 1.5 *************** *** 114,118 **** snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("output"), seq, cinfo, pinfo); }
--- 114,118 ---- snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("dst"), seq, cinfo, pinfo); }
*************** *** 120,124 **** snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("input"), seq, cinfo, pinfo); }
--- 120,124 ---- snd_seq_port_info_t *pinfo) { ! print_port(x, gensym("src"), seq, cinfo, pinfo); }
*************** *** 233,240 **** return; } ! if(&s_==s || gensym("input")==s) do_search_port(x, seq, LIST_INPUT, print_input);
! if(&s_==s || gensym("output")==s) do_search_port(x, seq, LIST_OUTPUT, print_output);
--- 233,240 ---- return; } ! if(&s_==s || gensym("src")==s) do_search_port(x, seq, LIST_INPUT, print_input);
! if(&s_==s || gensym("dst")==s) do_search_port(x, seq, LIST_OUTPUT, print_output);
Index: aconnect-help.pd =================================================================== RCS file: /cvsroot/pure-data/externals/iem/aconnect/aconnect-help.pd,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** aconnect-help.pd 25 Jul 2005 10:14:13 -0000 1.2 --- aconnect-help.pd 27 Oct 2005 13:14:09 -0000 1.3 *************** *** 7,11 **** the clients; #X msg 145 125 devices; - #X obj 145 320 route input output; #X obj 145 384 print READBALE; #X obj 205 354 print WRITEABLE; --- 7,10 ---- *************** *** 84,109 **** #X text 50 621 copyleft (c) 2005 IOhannes m zmoelnig; #X text 52 637 published under the GnuGPL v2.0; ! #X connect 0 0 5 0; ! #X connect 0 1 29 0; #X connect 4 0 0 0; ! #X connect 5 0 6 0; ! #X connect 5 0 9 0; ! #X connect 5 1 7 0; ! #X connect 5 2 22 0; ! #X connect 9 0 10 0; ! #X connect 9 1 11 0; ! #X connect 9 2 12 0; ! #X connect 9 3 13 0; ! #X connect 14 0 0 0; ! #X connect 17 0 18 0; ! #X connect 17 1 19 0; ! #X connect 17 2 20 0; ! #X connect 17 3 21 0; ! #X connect 22 0 17 0; ! #X connect 22 1 16 0; ! #X connect 23 0 0 0; ! #X connect 25 0 30 0; ! #X connect 26 0 25 0; ! #X connect 27 0 25 0; ! #X connect 30 0 27 0; ! #X connect 33 0 0 0; --- 83,109 ---- #X text 50 621 copyleft (c) 2005 IOhannes m zmoelnig; #X text 52 637 published under the GnuGPL v2.0; ! #X obj 145 320 route src dst; ! #X connect 0 0 38 0; ! #X connect 0 1 28 0; #X connect 4 0 0 0; ! #X connect 8 0 9 0; ! #X connect 8 1 10 0; ! #X connect 8 2 11 0; ! #X connect 8 3 12 0; ! #X connect 13 0 0 0; ! #X connect 16 0 17 0; ! #X connect 16 1 18 0; ! #X connect 16 2 19 0; ! #X connect 16 3 20 0; ! #X connect 21 0 16 0; ! #X connect 21 1 15 0; ! #X connect 22 0 0 0; ! #X connect 24 0 29 0; ! #X connect 25 0 24 0; ! #X connect 26 0 24 0; ! #X connect 29 0 26 0; ! #X connect 32 0 0 0; ! #X connect 38 0 5 0; ! #X connect 38 0 8 0; ! #X connect 38 1 6 0; ! #X connect 38 2 21 0;