list-find-help.pd 1.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263
  1. #N canvas 0 26 552 533 10;
  2. #X floatatom 159 259 5 0 0 0 - - -;
  3. #X obj 144 331 list-find;
  4. #X obj 202 293 loadbang;
  5. #X obj 101 449 print FOUND_AT;
  6. #X text 59 21 [list-find];
  7. #N canvas 516 236 450 300 collect 0;
  8. #X obj 195 37 inlet;
  9. #X obj 41 37 inlet;
  10. #X obj 41 144 outlet;
  11. #X msg 195 74 set;
  12. #X text 143 140 1993-2004 by Karlheinz Essl;
  13. #X text 143 160 vs. 1.1;
  14. #X obj 41 99 list trim;
  15. #X obj 41 74 list prepend add2;
  16. #X connect 0 0 3 0;
  17. #X connect 1 0 7 0;
  18. #X connect 3 0 2 0;
  19. #X connect 6 0 2 0;
  20. #X connect 7 0 6 0;
  21. #X restore 144 395 pd collect;
  22. #X obj 144 309 t a b;
  23. #X msg 159 237 0;
  24. #X msg 189 237 4;
  25. #X text 120 53 Find position(s) of a value in a list.;
  26. #X text 120 72 Inlet0: value to search;
  27. #X text 120 91 Inlet1: list to search in.;
  28. #X msg 144 184 seven;
  29. #X msg 202 315 0 1 2 3 4 5 6 seven eight 0 0;
  30. #X msg 144 206 symbol eight;
  31. #X msg 144 417;
  32. #X text 120 110 Outlet0: stream of found positions;
  33. #X floatatom 202 354 5 0 0 1 hits - -;
  34. #X msg 219 237 100;
  35. #X text 120 129 Outlet1: after list was completely scanned \, report
  36. number of elements found.;
  37. #N canvas 491 26 494 396 META 0;
  38. #X text 12 25 LICENSE SIBSD;
  39. #X text 12 145 AUTHOR Frank Barknecht;
  40. #X text 12 165 HELP_PATCH_AUTHORS Frank Barknecht. "pd meta" information
  41. added by Jonathan Wilkes for Pd version 0.42.;
  42. #X text 12 5 KEYWORDS control list_op;
  43. #X text 12 125 OUTLET_1 float;
  44. #X text 12 45 DESCRIPTION find position(s) of a value in a list;
  45. #X text 12 65 INLET_0 float;
  46. #X text 12 85 INLET_1 list;
  47. #X text 12 105 OUTLET_0 float;
  48. #X restore 483 503 pd META;
  49. #X connect 0 0 6 0;
  50. #X connect 1 0 3 0;
  51. #X connect 1 0 5 0;
  52. #X connect 1 1 17 0;
  53. #X connect 2 0 13 0;
  54. #X connect 5 0 15 0;
  55. #X connect 6 0 1 0;
  56. #X connect 6 1 5 1;
  57. #X connect 7 0 0 0;
  58. #X connect 8 0 0 0;
  59. #X connect 12 0 6 0;
  60. #X connect 13 0 1 1;
  61. #X connect 14 0 6 0;
  62. #X connect 18 0 0 0;