#N canvas 175 204 1003 398 10; #X obj 32 48 r \$0list; #X obj 76 340 s \$0list; #X obj 14 341 s \$0list; #X msg 14 314 mode \$1; #X obj 14 288 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X text 21 265 random output pattern; #X obj 14 237 s \$0list; #X text 12 186 outputs one item every 1001ms; #X obj 117 98 t b b; #X obj 117 120 timer; #X floatatom 117 142 5 0 0 0 - - -; #X msg 14 211 reset \, ft1 8008 \, 0 1 2 3 4 5 6 7; #N canvas 382 11 614 474 sequencing 0; #X obj 117 59 tgl 20 0 empty empty empty 17 7 0 10 -258113 -1 -1 0 1; #X msg 195 238 ft1 \$1; #X obj 195 352 s \$0list; #X obj 117 531 s \$0list; #X obj 117 413 metro 1000; #X obj 144 479 print TICK; #X obj 117 449 t b b; #X text 161 155 time setting; #X msg 144 108 reset; #X obj 117 87 t a b; #X obj 144 129 s \$0list; #X msg 279 403 50 51 54 55 57 58 61 62; #X msg 297 432 61 57 54; #X obj 117 504 list append 48 48 50 48; #X msg 304 464; #X text 289 369 change pattern here; #X obj 174 209 expr (60/$f1)*1000; #X floatatom 174 190 5 10 500 2 BPM - -; #X text 253 236 default ft1 (0) mode follows metro's behavior for smooth changing value \, the time interval changes at each bang; #X msg 217 325 ft1mod \$1; #X obj 217 288 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X text 248 285 the other ft1 mode (1) changes time interval at each list item; #X text 56 11 giving time object the same argument over ft1 will synchronize the list tuplet with [metro]; #X connect 0 0 9 0; #X connect 1 0 2 0; #X connect 4 0 6 0; #X connect 6 0 13 0; #X connect 6 1 5 0; #X connect 8 0 10 0; #X connect 9 0 4 0; #X connect 9 1 8 0; #X connect 11 0 13 1; #X connect 12 0 13 1; #X connect 13 0 3 0; #X connect 14 0 13 1; #X connect 16 0 4 1; #X connect 16 0 1 0; #X connect 17 0 16 0; #X connect 19 0 2 0; #X connect 20 0 19 0; #X restore 340 158 pd sequencing patterns; #X text 134 12 outputs list items symmetrically over time; #X text 44 12 list-tuplet; #X obj 541 371 s \$0list; #X msg 568 210 stop; #X msg 567 236 reset; #X msg 530 40 ft1 \$1; #X floatatom 531 18 5 0 0 0 - - -; #X msg 559 184 mode \$1; #X obj 559 161 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X msg 541 87 beats 2; #N canvas 456 2 646 300 nesting 0; #X obj 123 269 s \$0list; #X msg 113 68 0; #X msg 130 99 1; #X text 54 22 nested 1 prepares a message for another list-tuplet instance ; #X text 157 98 randomize; #X text 152 65 normal; #X obj 331 223 print NESTED; #X obj 123 167 list-tuplet 1000; #X obj 216 220 list-tuplet; #X msg 122 133 reset \, mode \$1 \, ft1 2000 \, beats 2 \, nested 1 \, separator - \, 1 2 3 - 1 2 3 4 - 1 2 3 4 5 - 1 2 3 4 5 6 - 1 2 3 4 5 6 7; #X connect 1 0 9 0; #X connect 2 0 9 0; #X connect 7 0 0 0; #X connect 7 1 6 0; #X connect 7 1 8 0; #X connect 8 0 0 0; #X connect 9 0 7 0; #X restore 340 197 pd nesting tuplets; #X msg 536 62 separator -; #X obj 32 98 print TUPLET; #X text 8 375 patko 2010; #X msg 553 140 nested \$1; #X obj 553 119 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X obj 32 70 list-tuplet 1000; #X msg 116 311 mode 1 \, 0 1 2 3 4 5 6 7; #X msg 76 288 mode 0 \, un deux trois quatre cinq six sept huit; #X text 273 311 random; #X msg 584 308 1 - - 2 3 quatre; #X msg 576 283 reset \, ft1 1000 \, beats 1 \, separator - \, 1 - 2 - 3 - quatre; #X text 616 34 set time interval; #X text 617 61 character separating items; #X text 619 88 beats divide time interval; #X text 620 137 tells list-tuplet to send at second outlet for nesting ; #X text 621 183 set 1 for random mode; #X text 616 210 stop delay scheduling; #X text 618 236 set everything to defaults; #X connect 0 0 29 0; #X connect 3 0 2 0; #X connect 4 0 3 0; #X connect 8 0 9 0; #X connect 8 1 9 1; #X connect 9 0 10 0; #X connect 11 0 6 0; #X connect 16 0 15 0; #X connect 17 0 15 0; #X connect 18 0 15 0; #X connect 19 0 18 0; #X connect 20 0 15 0; #X connect 21 0 20 0; #X connect 22 0 15 0; #X connect 24 0 15 0; #X connect 27 0 15 0; #X connect 28 0 27 0; #X connect 29 0 8 0; #X connect 29 0 25 0; #X connect 30 0 1 0; #X connect 31 0 1 0; #X connect 33 0 15 0; #X connect 34 0 15 0;