#N canvas 322 131 786 661 10;
#X obj 406 43 inlet;
#X obj 99 54 inlet;
#X obj 390 494 list;
#X obj 604 67 inlet;
#X obj 99 424 outlet;
#X obj 478 146 outlet;
#X obj 664 566 outlet;
#X obj 477 397 list-len;
#X obj 99 207 f 0;
#X obj 130 207 + 1;
#X obj 159 207 mod 9;
#X obj 390 425 f 0;
#X obj 418 425 + 1;
#X obj 447 425 mod 9;
#X obj 129 302 select 0;
#X msg 604 90 0;
#X obj 99 244 t a a;
#X obj 406 70 t b b a a a;
#X obj 664 536 select 0;
#X obj 390 462 t b f f;
#X text 205 209 Count up to current interval;
#X obj 422 587 s \$0-next-interval;
#X obj 189 169 r \$0-next-interval;
#X text 190 308 the next stored interval;
#X text 191 294 when interval was played \, select;
#X text 491 425 wrap around at end of list;
#X obj 422 553 list split 1;
#X obj 390 516 list split;
#X obj 314 513 outlet;
#N canvas 127 288 450 300 accum 0;
#X obj 212 193 f 0;
#X obj 182 192 + 1;
#X obj 212 168 0;
#X obj 182 53 inlet;
#X obj 182 81 t a b;
#X obj 182 140 route float;
#X obj 166 245 outlet;
#X obj 166 220 f;
#X text 116 23 list-accum: add all floats in a list;
#N canvas 0 0 533 407 drip 0;
#X obj 64 206 list split 1;
#X obj 64 123 until;
#X obj 64 181 list append;
#X obj 194 206 bang;
#X text 146 90 First store list \, then start the loop;
#X text 163 118 "until" bangs its output until told to stop by a "bang"
to its right inlet.;
#X text 182 160 Store the remaining list.;
#X text 239 205 third outlet of "split" tells us to stop.;
#X obj 64 243 outlet;
#X obj 64 57 inlet;
#X text 237 44 From list-help.pd;
#X obj 143 243 outlet;
#X obj 64 86 t b a;
#X connect 0 0 8 0;
#X connect 0 1 2 1;
#X connect 0 2 3 0;
#X connect 0 2 11 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 1 1;
#X connect 9 0 12 0;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X restore 182 109 pd drip;
#X connect 0 0 1 1;
#X connect 1 0 0 0;
#X connect 1 0 7 1;
#X connect 2 0 0 0;
#X connect 3 0 4 0;
#X connect 4 0 9 0;
#X connect 4 1 2 0;
#X connect 5 0 1 0;
#X connect 7 0 6 0;
#X connect 9 0 5 0;
#X connect 9 1 7 0;
#X restore 478 122 pd accum;
#X connect 0 0 17 0;
#X connect 1 0 8 0;
#X connect 2 0 27 0;
#X connect 3 0 15 0;
#X connect 7 0 13 1;
#X connect 8 0 16 0;
#X connect 9 0 10 0;
#X connect 10 0 8 1;
#X connect 11 0 12 0;
#X connect 11 0 19 0;
#X connect 12 0 13 0;
#X connect 13 0 11 1;
#X connect 14 0 11 0;
#X connect 15 0 8 1;
#X connect 15 0 11 1;
#X connect 16 0 9 0;
#X connect 16 0 4 0;
#X connect 16 1 14 0;
#X connect 17 2 2 1;
#X connect 17 3 7 0;
#X connect 17 4 29 0;
#X connect 18 0 6 0;
#X connect 19 0 2 0;
#X connect 19 1 27 1;
#X connect 19 1 28 0;
#X connect 19 2 18 0;
#X connect 22 0 10 1;
#X connect 26 0 21 0;
#X connect 27 1 26 0;
#X connect 29 0 5 0;