ktabdump.pd 1.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152
  1. #N canvas 223 136 574 532 10;
  2. #X obj 256 422 tabread dummy;
  3. #X obj 102 192 list prepend set;
  4. #X obj 102 234 list trim;
  5. #X obj 169 450 list_accumulate;
  6. #X text 344 486 (c)2013 Marian Weger;
  7. #X obj 346 78 loadbang;
  8. #X obj 346 100 list prepend \$1;
  9. #X msg 169 234 clear;
  10. #X obj 346 122 route 0;
  11. #X obj 327 258 expr size("$s1");
  12. #X obj 256 357 until;
  13. #X obj 256 325 t f b;
  14. #X obj 256 389 f;
  15. #X obj 299 389 + 1;
  16. #X msg 299 357 0;
  17. #X obj 169 472 outlet data;
  18. #X obj 256 296 f;
  19. #X obj 327 236 symbol dummy;
  20. #X text 70 20 tabdump (<table name>);
  21. #X obj 239 100 route bang set;
  22. #X obj 239 192 t b b b b;
  23. #X text 71 47 Pd-Vanilla compatible replacement for zexy/tabdump;
  24. #X obj 239 78 inlet;
  25. #X connect 0 0 3 1;
  26. #X connect 1 0 2 0;
  27. #X connect 2 0 0 0;
  28. #X connect 3 0 15 0;
  29. #X connect 5 0 6 0;
  30. #X connect 6 0 8 0;
  31. #X connect 7 0 3 0;
  32. #X connect 8 1 1 0;
  33. #X connect 8 1 17 0;
  34. #X connect 9 0 16 1;
  35. #X connect 10 0 12 0;
  36. #X connect 11 0 10 0;
  37. #X connect 11 1 14 0;
  38. #X connect 12 0 13 0;
  39. #X connect 12 0 0 0;
  40. #X connect 13 0 12 1;
  41. #X connect 14 0 12 1;
  42. #X connect 16 0 11 0;
  43. #X connect 17 0 9 0;
  44. #X connect 19 0 20 0;
  45. #X connect 19 1 17 0;
  46. #X connect 19 1 1 0;
  47. #X connect 20 0 3 0;
  48. #X connect 20 1 16 0;
  49. #X connect 20 2 7 0;
  50. #X connect 20 3 17 0;
  51. #X connect 22 0 19 0;