Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2916
Added Files: list-round-help.pd list-round.pd Log Message: additions.
--- NEW FILE: list-round.pd --- #N canvas 402 152 538 563 10; #X obj 74 453 list; #X obj 97 409 list prepend; #X obj 74 104 t b a b; #X text 172 135 "Drip" (serialize) the list; #X text 121 450 Final result is built here; #X obj 74 35 inlet; #X obj 74 484 outlet; #X text 255 413 Repack the list; #X obj 193 410 t a; #X obj 97 134 list-drip; #X obj 97 230 route float; #X text 298 308 round it; #X obj 281 166 inlet; #X obj 281 232 f $1; #X obj 294 201 loadbang; #X obj 281 254 select 0; #X msg 281 274 1; #X obj 97 306 expr int(0.5 + $f1/$f2)*$f2; #X connect 0 0 6 0; #X connect 1 0 0 1; #X connect 1 0 8 0; #X connect 2 0 0 0; #X connect 2 1 9 0; #X connect 2 2 1 1; #X connect 5 0 2 0; #X connect 8 0 1 1; #X connect 9 0 10 0; #X connect 10 0 17 0; #X connect 10 1 1 0; #X connect 12 0 13 0; #X connect 13 0 15 0; #X connect 14 0 13 0; #X connect 15 0 16 0; #X connect 15 1 17 1; #X connect 16 0 17 1; #X connect 17 0 1 0;
--- NEW FILE: list-round-help.pd --- #N canvas 201 214 625 414 10; #N canvas 448 238 450 300 show 0; #X obj 41 39 inlet; #X obj 186 36 inlet; #X obj 41 124 outlet; #X msg 186 76 set; #X obj 41 59 list prepend set; #X obj 41 83 list trim; #X connect 0 0 4 0; #X connect 1 0 3 0; #X connect 3 0 2 0; #X connect 4 0 5 0; #X connect 5 0 2 0; #X restore 368 293 pd show; #X msg 368 318; #X obj 412 274 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X msg 394 170 1.2 3 4.5 6.7 eight 9; #X msg 368 144 1.2 3 4.5 6.7 8.9; #N canvas 448 238 450 300 show 0; #X obj 41 39 inlet; #X obj 186 36 inlet; #X obj 41 124 outlet; #X msg 186 76 set; #X obj 41 59 list prepend set; #X obj 41 83 list trim; #X connect 0 0 4 0; #X connect 1 0 3 0; #X connect 3 0 2 0; #X connect 4 0 5 0; #X connect 5 0 2 0; #X restore 65 289 pd show; #X msg 65 314 1 3 5 7 9; #X obj 109 270 bng 15 250 50 1 empty empty clear 0 -6 0 8 -262144 -1 -1; #X msg 91 166 1.2 3 4.5 6.7 eight 9; #X msg 62 136 1.2 3 4.5 6.7 8.9; #X text 56 34 round all numbers in a list to nearest multiple of first argument or number in second inlet. Using 0 as argument (or no argumement) will round to 1 (integer round).; #X text 44 15 list-round; #X obj 65 225 list-round; #X text 62 113 simple integer round; #X obj 368 229 list-round 3; #X floatatom 130 200 5 0 0 2 round-to? - -; #X floatatom 447 205 5 0 0 2 round-to? - -; #X text 154 224 == [list-round 1]; #X connect 0 0 1 0; #X connect 2 0 0 1; #X connect 3 0 14 0; #X connect 4 0 14 0; #X connect 5 0 6 0; #X connect 7 0 5 1; #X connect 8 0 12 0; #X connect 9 0 12 0; #X connect 12 0 5 0; #X connect 14 0 0 0; #X connect 15 0 12 1; #X connect 16 0 14 1;