Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24122
Modified Files: README list-math-help.pd list-rot.pd Added Files: list-moses-help.pd list-moses.pd Log Message: some new stuff like list-moses, some bugfixes
Index: list-rot.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-rot.pd,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** list-rot.pd 2 Nov 2005 19:09:44 -0000 1.3 --- list-rot.pd 15 Nov 2005 12:24:03 -0000 1.4 *************** *** 7,20 **** #X text 198 43 list to rotate; #X obj 151 250 outlet; - #X obj 151 70 t b l b; #X text 267 194 move right part of list to left.; #X obj 173 152 list-splat $1; #X connect 0 0 4 1; ! #X connect 1 0 7 0; ! #X connect 2 0 9 1; #X connect 4 0 6 0; ! #X connect 7 0 4 0; ! #X connect 7 1 9 0; ! #X connect 7 2 0 1; ! #X connect 9 0 0 0; ! #X connect 9 1 0 1; --- 7,20 ---- #X text 198 43 list to rotate; #X obj 151 250 outlet; #X text 267 194 move right part of list to left.; #X obj 173 152 list-splat $1; + #X obj 151 70 t b a b; #X connect 0 0 4 1; ! #X connect 1 0 9 0; ! #X connect 2 0 8 1; #X connect 4 0 6 0; ! #X connect 8 0 0 0; ! #X connect 8 1 0 1; ! #X connect 9 0 4 0; ! #X connect 9 1 8 0; ! #X connect 9 2 0 1;
Index: README =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/README,v retrieving revision 1.7 retrieving revision 1.8 diff -C2 -d -r1.7 -r1.8 *** README 14 Nov 2005 09:54:35 -0000 1.7 --- README 15 Nov 2005 12:24:03 -0000 1.8 *************** *** 84,87 **** --- 84,94 ---- find minimum and maximum float in a list.
+ list-moses.pd + + A [moses] for lists: Route incoming list according to how an element compares + against a test float. It's possible to set the position of the element to + compare using a zero-based index. (Not to be confused with the [listmoses] + external which does something completely different!) + list-mult.pd
Index: list-math-help.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/footils/list-abs/list-math-help.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** list-math-help.pd 1 Nov 2005 12:41:16 -0000 1.1 --- list-math-help.pd 15 Nov 2005 12:24:03 -0000 1.2 *************** *** 11,15 **** #X obj 160 226 list-math *; #X msg 159 167 1 2 3 4 a b c , 10 20 30 x y z; ! #X text 144 93 Use as "list-math operator" where operator is some binary operator , that expr can understand , like + , - , * or /; #X obj 406 373 print L; --- 11,15 ---- #X obj 160 226 list-math *; #X msg 159 167 1 2 3 4 a b c , 10 20 30 x y z; ! #X text 132 87 Use as "list-math operator" where operator is some binary operator , that expr can understand , like + , - , * or /; #X obj 406 373 print L; *************** *** 22,25 **** --- 22,32 ---- #X obj 164 332 list-math /; #X obj 406 340 list-math -; + #X msg 406 416 1 2 3 4 a b c; + #X floatatom 516 415 5 0 0 0 - - -; + #X obj 406 448 list-math - 2; + #X obj 406 481 print L-with-arg; + #X text 249 448 Using a default arg:; + #X text 131 125 A second argument is accepted to set a default scalar + to use.; #X connect 1 0 9 0; #X connect 2 0 9 1; *************** *** 35,36 **** --- 42,46 ---- #X connect 18 0 6 0; #X connect 19 0 12 0; + #X connect 20 0 22 0; + #X connect 21 0 22 1; + #X connect 22 0 23 0;
--- NEW FILE: list-moses-help.pd --- #N canvas 483 52 726 404 10; #X floatatom 95 93 5 0 0 0 - - -; #X obj 95 355 print smaller; #X obj 141 332 print bigger-or-equal; #X floatatom 141 227 5 0 0 2 split-value - -; #X text 57 38 list-moses: like [moses] for lists. Additionally you can set the element index , at which to compare , if it is bigger or smaller than the stored value.; #X text 338 217 arg1: comparison value; #X obj 188 255 hradio 15 1 0 8 empty empty split-index 0 -6 0 10 -262144 -1 -1 2; #X floatatom 128 148 5 0 0 0 - - -; #X obj 95 277 list-moses 4 2; #X text 337 252 arg2: which element to compare (zero based). Can be negative , too.; #X msg 128 172 1 TEST $1 4 5 6 7 8; #X obj 188 306 print not-a-float; #X msg 95 117 $1 $1 $1 $1 $1 $1 $1 $1; #X connect 0 0 12 0; #X connect 3 0 8 1; #X connect 6 0 8 2; #X connect 7 0 10 0; #X connect 8 0 1 0; #X connect 8 1 2 0; #X connect 8 2 11 0; #X connect 10 0 8 0; #X connect 12 0 8 0;
--- NEW FILE: list-moses.pd --- #N canvas 264 111 497 457 10; #X obj 66 63 inlet; #X obj 201 120 list-idx $2; #X obj 273 91 inlet; #X obj 231 210 inlet; #X obj 201 148 route float; #X obj 66 399 outlet; #X obj 90 369 outlet; #X obj 201 242 >= $1; #X obj 66 90 t a a; #X text 165 34 arg1: comparison value; #X text 165 59 arg2: which element to compare (zero based); #X obj 114 338 outlet; #X obj 273 210 b; #X obj 66 278 list prepend 2; #X obj 273 242 2; #X obj 66 308 route 0 1 2; #X connect 0 0 8 0; #X connect 1 0 4 0; #X connect 2 0 1 1; #X connect 3 0 7 1; #X connect 4 0 7 0; #X connect 4 1 12 0; #X connect 7 0 13 1; #X connect 8 0 13 0; #X connect 8 1 1 0; #X connect 12 0 14 0; #X connect 13 0 15 0; #X connect 14 0 13 1; #X connect 15 0 5 0; #X connect 15 1 6 0; #X connect 15 2 11 0;