list-seek.pd 1.1 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647
  1. #N canvas 443 126 634 604 10;
  2. #X obj 105 76 inlet;
  3. #X obj 300 74 inlet;
  4. #X obj 135 501 outlet;
  5. #X obj 300 500 outlet;
  6. #X text 349 72 list to manipulate;
  7. #X text 298 523 bang when done or index out of range;
  8. #X text 134 522 output value;
  9. #X obj 135 416 list;
  10. #X obj 300 438 bang;
  11. #X obj 135 317 moses;
  12. #X obj 127 239 + 1;
  13. #X msg 105 191 0;
  14. #X obj 165 294 list-len;
  15. #X obj 135 440 list-idx;
  16. #X obj 135 391 t b a;
  17. #X obj 89 239 f;
  18. #X obj 89 317 moses;
  19. #X obj 300 103 t b a a;
  20. #X obj 105 109 route set;
  21. #X obj 105 139 route bang;
  22. #X text 31 23 bang for next item \, float for index or set for no-output.
  23. ;
  24. #X connect 0 0 18 0;
  25. #X connect 1 0 17 0;
  26. #X connect 7 0 13 0;
  27. #X connect 8 0 3 0;
  28. #X connect 9 0 14 0;
  29. #X connect 9 1 8 0;
  30. #X connect 10 0 15 1;
  31. #X connect 11 0 15 1;
  32. #X connect 12 0 9 1;
  33. #X connect 13 0 2 0;
  34. #X connect 14 0 7 0;
  35. #X connect 14 1 13 1;
  36. #X connect 15 0 10 0;
  37. #X connect 15 0 16 0;
  38. #X connect 16 0 8 0;
  39. #X connect 16 1 9 0;
  40. #X connect 17 0 11 0;
  41. #X connect 17 1 12 0;
  42. #X connect 17 2 7 1;
  43. #X connect 18 0 19 0;
  44. #X connect 18 1 15 0;
  45. #X connect 19 0 11 0;
  46. #X connect 19 1 15 1;