[maxmsp] messages from coll _ select Letters...

Kasper T Toeplitz schrieb:
> i found a way for doing it but it seems to me its far from being the 
> best one (with spell, zl group, unpack, sel....)

Don't know if its better, but its different... ;-)

Stefan

#P window setfont "Sans Serif" 9.;
#P window linecount 1;
#N vpatcher 10 59 610 459;
#P window setfont "Sans Serif" 9.;
#P newex 50 114 64 196617 fromsymbol;
#P newex 50 92 32 196617 itoa;
#P newex 50 71 86 196617 substitute 95 32;
#P newex 50 50 32 196617 atoi;
#P inlet 50 30 15 0;
#P outlet 50 136 15 0;
#P connect 1 0 2 0;
#P connect 2 0 3 0;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P connect 5 0 0 0;
#P pop;
#P newobj 87 188 123 196617 p substitute _ with blank;
#N vpatcher 10 59 610 459;
#P window setfont "Sans Serif" 9.;
#P message 103 114 16 196617  ;
#P message 85 114 16 196617 B;
#P newex 85 93 28 196617 sel 1;
#P newex 85 72 28 196617 > 0;
#P newex 50 50 45 196617 zl sub B;
#P inlet 50 30 15 0;
#P outlet 85 134 15 0;
#P connect 1 0 2 0;
#P connect 2 1 3 0;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P connect 6 0 0 0;
#P connect 5 0 0 0;
#P connect 4 1 6 0;
#P pop;
#P newobj 156 272 65 196617 p contains B;
#N vpatcher 10 59 610 459;
#P window setfont "Sans Serif" 9.;
#P message 105 114 16 196617  ;
#P message 85 114 16 196617 A;
#P newex 85 93 30 196617 sel 1;
#P newex 85 72 30 196617 > 0;
#P newex 50 50 45 196617 zl sub A;
#P inlet 50 30 15 0;
#P outlet 85 134 15 0;
#P connect 1 0 2 0;
#P connect 2 1 3 0;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P connect 6 0 0 0;
#P connect 5 0 0 0;
#P connect 4 1 6 0;
#P pop;
#P newobj 87 272 65 196617 p contains A;
#P message 290 404 149 196617 ouverture extremes;
#B color 5;
#P newex 290 214 62 196617 prepend set;
#P message 220 404 50 196617 25'20;
#B color 5;
#P message 406 112 176 196617 tam_A_B 25'20 ouverture extremes;
#P message 290 112 114 196617 tam_B 8'30 del_simple;
#P message 87 112 201 196617 tam_A 0'10 start ppp del_Multi crescendo;
#P newex 156 343 62 196617 prepend set;
#P newex 87 343 62 196617 prepend set;
#P message 156 404 50 196617 B;
#B color 5;
#P message 87 404 50 196617 A;
#B color 5;
#P newex 220 214 62 196617 prepend set;
#P newex 220 188 80 196617 zl slice 1;
#P newex 87 162 143 196617 zl slice 1;
#P window linecount 4;
#P comment 8 272 72 196617 turn these into a subpatcher with argument....;
#P connect 16 0 14 0;
#P connect 16 0 15 0;
#P connect 1 1 2 0;
#P connect 1 0 16 0;
#P connect 15 0 7 0;
#P connect 14 0 6 0;
#P connect 2 0 3 0;
#P connect 6 0 4 0;
#P connect 7 0 5 0;
#P fasten 10 0 1 0 411 144 92 144;
#P connect 8 0 1 0;
#P fasten 9 0 1 0 295 144 92 144;
#P connect 3 0 11 0;
#P connect 12 0 13 0;
#P connect 2 1 12 0;
#P window clipboard copycount 17;


-- 
Stefan Tiedje------------x-------
--_____-----------|--------------
--(_|_ ----|\-----|-----()-------
-- _|_)----|-----()--------------
----------()--------www.ccmix.com