scan~.pd 677 B

123456789101112131415161718192021222324252627282930
  1. #N canvas 0 30 725 568 12;
  2. #N canvas 0 50 450 250 (subpatch) 0;
  3. #X array _\$0 80 float 2;
  4. #X coords 0 1 80 -1 80 60 1 0 0;
  5. #X restore 109 134 graph;
  6. #X obj 389 55 inlet~;
  7. #X obj 381 131 snapshot~;
  8. #X obj 295 16 loadbang;
  9. #X msg 199 22 bang;
  10. #X obj 549 142 +;
  11. #X msg 503 100 1;
  12. #X msg 576 72 0;
  13. #X obj 602 140 % 100;
  14. #X msg 382 184 \$1 0;
  15. #X obj 280 53 metro 30;
  16. #X obj 381 238 array set _\$0;
  17. #X connect 1 0 2 0;
  18. #X connect 2 0 9 0;
  19. #X connect 3 0 10 0;
  20. #X connect 4 0 10 0;
  21. #X connect 5 0 8 0;
  22. #X connect 5 0 11 1;
  23. #X connect 6 0 5 0;
  24. #X connect 7 0 5 1;
  25. #X connect 8 0 5 1;
  26. #X connect 9 0 11 0;
  27. #X connect 10 0 2 0;
  28. #X connect 10 0 6 0;
  29. #X coords 0 -1 1 1 100 100 1 100 100;