pd-experiments/medowphysic.pd

49 lines
1.1 KiB
Plaintext

#N canvas 195 94 638 813 12;
#X obj 59 88 f;
#X obj 59 113 + 1;
#X obj 59 185 t f f, f 19;
#X obj 59 268 t f b;
#X obj 59 366 sel, f 5;
#X obj 59 391 t b b;
#X obj 91 319 tabread lengths;
#X obj 91 344 - 1;
#X obj 59 60 inlet;
#X obj 91 419 f \$1;
#X msg 91 450 row 0 \$1 0 0;
#X obj 189 213 t f b;
#X obj 221 238 f \$1;
#X obj 196 267 pack;
#X msg 221 307 lset \$1 \$2 8;
#X obj 200 16 r reset;
#X obj 91 294 f \$1;
#X obj 221 470 outlet;
#X obj 59 539 outlet;
#X obj 59 160 expr lengths[\$1]-$f1-1;
#X obj 59 135 expr fmod($f1 \, lengths[\$1]);
#X msg 200 68 0;
#X connect 0 0 1 0;
#X connect 1 0 20 0;
#X connect 2 0 3 0;
#X connect 2 1 11 0;
#X connect 3 0 4 0;
#X connect 3 1 16 0;
#X connect 4 0 5 0;
#X connect 5 0 18 0;
#X connect 5 1 9 0;
#X connect 6 0 7 0;
#X connect 7 0 4 1;
#X connect 8 0 0 0;
#X connect 9 0 10 0;
#X connect 10 0 17 0;
#X connect 11 0 13 0;
#X connect 11 1 12 0;
#X connect 12 0 13 1;
#X connect 13 0 14 0;
#X connect 14 0 17 0;
#X connect 15 0 21 0;
#X connect 16 0 6 0;
#X connect 19 0 2 0;
#X connect 20 0 0 1;
#X connect 20 0 19 0;
#X connect 21 0 0 1;