kollabs/anytabwrite.pd

#N canvas 195 114 577 439 10;
#X obj 130 536 s;
#X obj 282 65 inlet index;
#X text 345 319 (c)2013 Marian Weger;
#X obj 34 66 inlet data;
#X obj 34 108 route bang;
#X obj 91 135 t b a;
#X obj 91 166 list;
#X obj 282 464 list prepend \$1;
#X msg 282 486 symbol \$1/\$2/anytable/write;
#X obj 217 65 loadbang;
#X msg 304 166 0;
#X text 34 37 anytabwrite <table_name> (<resize>);
#X obj 91 278 kdemux2;
#X obj 130 310 t a b;
#X obj 130 166 list prepend \$2;
#X obj 130 211 route resize;
#X obj 130 188 list trim;
#X obj 217 87 t b b;
#X obj 130 233 b;
#X msg 130 255 1;
#X msg 157 464 resize \$1;
#X obj 157 486 s \$1;
#X obj 157 441 + 1;
#X obj 157 359 t f f;
#X obj 157 416 spigot;
#X obj 190 392 >= 0;
#X obj 211 359 r \$1/size;
#X obj 157 337 f 0;
#X connect 1 0 7 0;
#X connect 1 0 27 1;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 4 1 5 0;
#X connect 5 0 6 0;
#X connect 5 1 6 1;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 0 1;
#X connect 9 0 17 0;
#X connect 10 0 7 0;
#X connect 12 0 0 0;
#X connect 12 1 13 0;
#X connect 13 0 0 0;
#X connect 13 1 27 0;
#X connect 14 0 16 0;
#X connect 15 0 18 0;
#X connect 16 0 15 0;
#X connect 17 0 14 0;
#X connect 17 1 10 0;
#X connect 18 0 19 0;
#X connect 19 0 12 1;
#X connect 20 0 21 0;
#X connect 22 0 20 0;
#X connect 23 0 24 0;
#X connect 23 1 25 0;
#X connect 24 0 22 0;
#X connect 25 0 24 1;
#X connect 26 0 25 1;
#X connect 27 0 23 0;