Update of /cvsroot/pure-data/abstractions/footils/list-abs In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv985
Added Files: list-extend-help.pd list-extend.pd list-fifo-help.pd list-fifo.pd Log Message: list-fifo based on Roman Haeflis patch added, list-extend as well.
--- NEW FILE: list-fifo-help.pd --- #N canvas 256 47 862 626 10; #X obj 192 535 print; #X obj 192 331 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X msg 299 357 1 2 3 4 5; #X symbolatom 312 378 10 0 0 0 - - -; #X floatatom 325 395 5 0 0 0 - - -; #X symbolatom 419 424 10 0 0 0 - - -; #X msg 109 412 clear; #X obj 250 505 bng 15 250 50 0 empty empty EOL 17 7 1 10 -262144 -1 -1; #X text 117 175 CAUTION:; #X text 118 193 When a message contains the delimiter symbol , it is falsely split into two parts.; #X text 117 110 [list-fifo] can be used to limit the number of messages passing during a certain time (might be usefull to limit the used network bandwidth). It also can be used as a sequencer.; #X text 81 29 [list-fifo]; #X text 118 228 Default delimiter between messages is the empty symbol. You can customize this with the first argument:; #X text 61 397 clear stored list; #X text 163 314 trigger output; #X text 288 315 store lists or elements; #X text 416 407 manually change delimiter symbol; #X text 119 55 [list-fifo] stores incoming (list-)messages and outputs them one by one on incoming bangs in the order they arrive like a FIFO: first in , first out.; #X text 104 580 Based on a patch and idea by Roman Haefli 2006; #X obj 192 476 list-fifo; #X msg 290 337 eins due trois four; #X obj 121 270 list-fifo MY_DELIMITER; #X connect 1 0 19 0; #X connect 2 0 19 1; #X connect 3 0 19 1; #X connect 4 0 19 1; #X connect 5 0 19 2; #X connect 6 0 19 0; #X connect 19 0 0 0; #X connect 19 1 7 0; #X connect 20 0 19 1;
--- NEW FILE: list-extend-help.pd --- #N canvas 329 163 570 457 10; #X msg 102 183 1 2 3; #X msg 156 290 bang; #X msg 101 215 bang; #X msg 102 161 a b c; #X msg 102 139 x y z; #X msg 154 259 A B C; #X obj 68 323 list-extend; #X obj 68 363 print LIST-EXTEND; #X text 44 27 list-extend; #X text 60 52 Build a list from incoming lists or elements.; #X floatatom 101 119 5 0 0 0 - - -; #X text 97 97 Add elements or lists and output stored list.; #X text 146 219 output stored list; #X text 201 261 set complete stored list; #X text 201 292 set stored list to empty list (==reset); #X connect 0 0 6 0; #X connect 1 0 6 1; #X connect 2 0 6 0; #X connect 3 0 6 0; #X connect 4 0 6 0; #X connect 5 0 6 1; #X connect 6 0 7 0; #X connect 10 0 6 0;
--- NEW FILE: list-fifo.pd --- #N canvas 252 152 752 488 10; #X obj 22 272 list split 1; #X obj 22 224 until; #X obj 259 67 list append [delim]; #X obj 22 395 list; #X obj 22 321 t b b; #X obj 22 26 inlet trigger; #X obj 259 25 inlet list; #X obj 423 26 inlet delimiter; #X obj 22 419 outlet; #X obj 101 420 outlet; #X obj 52 198 b; #X obj 423 78 symbol $1; #X obj 441 48 loadbang; #X obj 423 124 route symbol; #X obj 22 75 route bang clear; #X obj 22 250 list; #X obj 259 155 list-extend; #X obj 115 365 list-extend; #X obj 301 131 t b b; #X obj 157 338 t b b; #X obj 22 296 select [delim]; #X text 108 439 EOL; #X text 20 440 list; #X text 334 310 Based on a patch and idea by Roman Haefli 2006; #X connect 0 0 20 0; #X connect 0 1 15 1; #X connect 0 1 16 1; #X connect 0 2 9 0; #X connect 0 2 10 0; #X connect 1 0 15 0; #X connect 2 0 16 0; #X connect 3 0 8 0; #X connect 4 0 3 0; #X connect 4 1 1 1; #X connect 4 1 17 1; #X connect 5 0 14 0; #X connect 6 0 2 0; #X connect 7 0 11 0; #X connect 10 0 1 1; #X connect 11 0 13 0; #X connect 12 0 11 0; #X connect 13 0 2 1; #X connect 13 0 20 1; #X connect 14 0 1 0; #X connect 14 1 18 0; #X connect 14 1 19 0; #X connect 15 0 0 0; #X connect 16 0 15 1; #X connect 17 0 3 1; #X connect 18 0 16 0; #X connect 18 1 16 1; #X connect 19 0 17 0; #X connect 19 1 17 1; #X connect 20 0 4 0; #X connect 20 1 17 0;
--- NEW FILE: list-extend.pd --- #N canvas 354 269 450 300 10; #X obj 77 101 t b a; #X obj 77 41 inlet; #X obj 149 66 inlet; #X obj 77 257 outlet; #X obj 77 181 list append; #X obj 77 153 list append; #X text 72 21 add new elements to stored list and output it; #X text 149 47 set stored list , no output; #X connect 0 0 5 0; #X connect 0 1 4 1; #X connect 1 0 0 0; #X connect 2 0 5 1; #X connect 4 0 3 0; #X connect 4 0 5 1; #X connect 5 0 4 0;