carlito.pd

#N canvas 1145 430 409 609 10;
#N canvas 624 75 345 97 NETPD 0;
#N canvas 315 75 433 126 abslist 0;
#X msg 18 13 chord-abs;
#X msg 17 44 roman_helpers;
#X msg 142 9 carlito-grid;
#X msg 143 35 carlito-cursor;
#X msg 16 73 untik-clock-consumer;
#X restore 11 36 pd abslist;
#X msg 12 8 version 0 1 0;
#X restore 10 14 pd NETPD 2 0;
#X obj 10 69 netpd_head \$1 carlito;
#N canvas 624 456 424 156 \$1-carlito 0;
#X obj 277 18 nbx 3 20 0 71 0 0 \$1-range/min \$1-range/min empty 0 12 0 14 #a6c8b1 #000000 #000000 0 256;
#X obj 244 18 hsl 31 20 0 127 0 0 \$0.blu \$0.range.min.label C4 0 10 0 14 #b9dbbb #b9dbbb #000000 0 1;
#X obj 366 18 nbx 3 20 61 127 0 0 \$1-range/max \$1-range/max empty 0 12 0 14 #a6c8b1 #000000 #ffffff 0 256;
#X obj 333 18 hsl 31 20 0 127 0 0 \$0.blu \$0.range.max.label C5 0 10 0 14 #b9dbbb #b9dbbb #000000 0 1;
#X symbolatom 11 19 16 0 0 0 - \$0.name.r \$0.name.s 12;
#X obj 34 90 hsl 15 10 0 127 0 0 \$0.func.1.on \$0.bli empty -2 -8 0 10 #9f9f9f #9f9f9f #000000 0 1;
#X obj 14 90 hsl 15 10 0 127 0 0 \$0.func.1.off \$0.bli 1 0 6 0 8 #ffffff #ffffff #000000 0 1;
#X obj 34 100 hsl 15 10 0 127 0 0 \$0.func.3.on \$0.bli empty -2 -8 0 10 #9f9f9f #9f9f9f #000000 0 1;
#X obj 14 100 hsl 15 10 0 127 0 0 \$0.func.3.off \$0.bli 3 0 6 0 8 #ffffff #ffffff #000000 0 1;
#X obj 34 110 hsl 15 10 0 127 0 0 \$0.func.5.on \$0.bli empty -2 -8 0 10 #9f9f9f #9f9f9f #000000 0 1;
#X obj 14 110 hsl 15 10 0 127 0 0 \$0.func.5.off \$0.bli 5 0 6 0 8 #ffffff #ffffff #000000 0 1;
#X obj 34 120 hsl 15 10 0 127 0 0 \$0.func.7.on \$0.bli empty -2 -8 0 10 #9f9f9f #9f9f9f #000000 0 1;
#X obj 14 120 hsl 15 10 0 127 0 0 \$0.func.7.off \$0.bli 7 0 6 0 8 #ffffff #ffffff #000000 0 1;
#X obj 34 130 hsl 15 10 0 127 0 0 \$0.func.9.on \$0.bli empty -2 -8 0 10 #9f9f9f #9f9f9f #000000 0 1;
#X obj 14 130 hsl 15 10 0 127 0 0 \$0.func.9.off \$0.bli 9 0 6 0 8 #ffffff #ffffff #000000 0 1;
#X obj 351 90 nbx 2 50 2 32 0 0 \$1-func/grid/cols \$1-func/grid/cols empty 0 -8 0 22 #c6ffc7 #000000 #000000 0 256;
#X obj 351 49 nbx 3 20 2 64 0 0 \$1-seq/steps \$1-seq/steps empty 0 -8 0 20 #c6ffc7 #000000 #000000 0 256;
#X obj 11 49 cnv 15 39 20 empty \$0.number.on.label \ 4 12 10 0 14 #496b43 #d0ebd3 0;
#X obj 51 46 carlito-cursor \$0.seq.cursor;
#X obj 51 49 carlito-grid \$0.seq 300 20 16 1;
#X obj 51 87 carlito-cursor \$0.func.cursor;
#X obj 51 90 carlito-grid \$0.functs 300 50 4 5;
#X obj 128 18 netpd-gui-dropdown \$0.clock.select 110 20 12 0 0 575 0 555 887;
#X restore 10 42 pd \$1-carlito;
#X obj 125 229 r carlo;
#X obj 125 252 route chordsym;
#X obj 25 277 chord-fromsymbol;
#X obj 25 351 chord-pitch-range;
#N canvas 714 85 453 317 gui.stuff 0;
#N canvas 573 86 200 283 range/min 0;
#X obj 36 102 rh_midi2notename;
#X obj 9 10 r \$1-range/min;
#X obj 9 33 route set;
#X obj 60 56 route float;
#X msg 36 125 label \$1;
#X obj 36 148 s \$0.range.min.label;
#X obj 9 78 t a a;
#X obj 9 175 + 1;
#X msg 9 200 range \$1 127;
#X obj 9 223 s \$1-range/max;
#X connect 0 0 4 0;
#X connect 1 0 2 0;
#X connect 2 0 6 0;
#X connect 2 1 3 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 6 0 7 0;
#X connect 6 1 0 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X restore 12 14 pd range/min;
#N canvas 840 153 219 275 range/max 0;
#X obj 50 105 rh_midi2notename;
#X obj 23 36 route set;
#X obj 74 59 route float;
#X msg 50 128 label \$1;
#X obj 23 13 r \$1-range/max;
#X obj 50 151 s \$0.range.max.label;
#X obj 23 81 t a a;
#X obj 21 177 - 1;
#X msg 21 202 range 0 \$1;
#X obj 21 225 s \$1-range/min;
#X connect 0 0 3 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 1 0;
#X connect 6 0 7 0;
#X connect 6 1 0 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X restore 14 42 pd range/max;
#N canvas 1035 216 852 342 picker 0;
#X obj 11 14 r \$0.pick.1;
#X obj 11 37 sel 0;
#X obj 51 37 t a;
#X obj 11 87 == 0;
#X obj 53 63 r \$1-pick/1;
#X obj 53 86 route float;
#X obj 67 108 route set;
#X obj 53 132 t a a;
#X obj 11 161 s \$1-pick/1;
#X msg 11 262 color \$1 \$1 #000000;
#X obj 11 186 sel 0 1;
#X msg 11 236 symbol #dfdfdf;
#X obj 11 287 s \$0.pick.1.r;
#X msg 30 213 symbol #ffcccc;
#X obj 151 37 sel 0;
#X obj 191 37 t a;
#X obj 151 87 == 0;
#X obj 193 86 route float;
#X obj 207 108 route set;
#X obj 193 132 t a a;
#X msg 151 262 color \$1 \$1 #000000;
#X obj 151 186 sel 0 1;
#X msg 151 236 symbol #dfdfdf;
#X msg 170 213 symbol #ffcccc;
#X obj 291 37 sel 0;
#X obj 331 37 t a;
#X obj 291 87 == 0;
#X obj 333 86 route float;
#X obj 347 108 route set;
#X obj 333 132 t a a;
#X msg 291 262 color \$1 \$1 #000000;
#X obj 291 186 sel 0 1;
#X msg 291 236 symbol #dfdfdf;
#X msg 310 213 symbol #ffcccc;
#X obj 431 37 sel 0;
#X obj 471 37 t a;
#X obj 431 87 == 0;
#X obj 473 86 route float;
#X obj 487 108 route set;
#X obj 473 132 t a a;
#X msg 431 262 color \$1 \$1 #000000;
#X obj 431 186 sel 0 1;
#X msg 431 236 symbol #dfdfdf;
#X msg 450 213 symbol #ffcccc;
#X obj 581 37 sel 0;
#X obj 621 37 t a;
#X obj 581 87 == 0;
#X obj 623 86 route float;
#X obj 637 108 route set;
#X obj 623 132 t a a;
#X msg 581 262 color \$1 \$1 #000000;
#X obj 581 186 sel 0 1;
#X msg 581 236 symbol #dfdfdf;
#X msg 600 213 symbol #ffcccc;
#X obj 151 14 r \$0.pick.3;
#X obj 193 63 r \$1-pick/3;
#X obj 151 161 s \$1-pick/3;
#X obj 151 287 s \$0.pick.3.r;
#X obj 291 14 r \$0.pick.5;
#X obj 333 63 r \$1-pick/5;
#X obj 291 161 s \$1-pick/5;
#X obj 291 287 s \$0.pick.5.r;
#X obj 431 14 r \$0.pick.7;
#X obj 473 63 r \$1-pick/7;
#X obj 431 161 s \$1-pick/7;
#X obj 431 287 s \$0.pick.7.r;
#X obj 581 14 r \$0.pick.9;
#X obj 623 63 r \$1-pick/9;
#X obj 581 161 s \$1-pick/9;
#X obj 581 287 s \$0.pick.9.r;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 1 1 2 0;
#X connect 2 0 1 1;
#X connect 3 0 8 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 5 1 6 0;
#X connect 6 0 7 0;
#X connect 7 0 3 1;
#X connect 7 1 10 0;
#X connect 9 0 12 0;
#X connect 10 0 11 0;
#X connect 10 1 13 0;
#X connect 11 0 9 0;
#X connect 13 0 9 0;
#X connect 14 0 16 0;
#X connect 14 1 15 0;
#X connect 15 0 14 1;
#X connect 16 0 56 0;
#X connect 17 0 19 0;
#X connect 17 1 18 0;
#X connect 18 0 19 0;
#X connect 19 0 16 1;
#X connect 19 1 21 0;
#X connect 20 0 57 0;
#X connect 21 0 22 0;
#X connect 21 1 23 0;
#X connect 22 0 20 0;
#X connect 23 0 20 0;
#X connect 24 0 26 0;
#X connect 24 1 25 0;
#X connect 25 0 24 1;
#X connect 26 0 60 0;
#X connect 27 0 29 0;
#X connect 27 1 28 0;
#X connect 28 0 29 0;
#X connect 29 0 26 1;
#X connect 29 1 31 0;
#X connect 30 0 61 0;
#X connect 31 0 32 0;
#X connect 31 1 33 0;
#X connect 32 0 30 0;
#X connect 33 0 30 0;
#X connect 34 0 36 0;
#X connect 34 1 35 0;
#X connect 35 0 34 1;
#X connect 36 0 64 0;
#X connect 37 0 39 0;
#X connect 37 1 38 0;
#X connect 38 0 39 0;
#X connect 39 0 36 1;
#X connect 39 1 41 0;
#X connect 40 0 65 0;
#X connect 41 0 42 0;
#X connect 41 1 43 0;
#X connect 42 0 40 0;
#X connect 43 0 40 0;
#X connect 44 0 46 0;
#X connect 44 1 45 0;
#X connect 45 0 44 1;
#X connect 46 0 68 0;
#X connect 47 0 49 0;
#X connect 47 1 48 0;
#X connect 48 0 49 0;
#X connect 49 0 46 1;
#X connect 49 1 51 0;
#X connect 50 0 69 0;
#X connect 51 0 52 0;
#X connect 51 1 53 0;
#X connect 52 0 50 0;
#X connect 53 0 50 0;
#X connect 54 0 14 0;
#X connect 55 0 17 0;
#X connect 58 0 24 0;
#X connect 59 0 27 0;
#X connect 62 0 34 0;
#X connect 63 0 37 0;
#X connect 66 0 44 0;
#X connect 67 0 47 0;
#X restore 13 67 pd picker;
#N canvas 1052 586 398 269 name 0;
#X obj 10 28 r \$0.name.s;
#X obj 10 137 s \$0.name.r;
#X obj 10 65 netpd_a \$1 name;
#X obj 89 17 loadbang;
#X msg 89 40 set carlito;
#X obj 10 88 list;
#X msg 10 111 set \$1;
#X connect 0 0 2 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 2 0;
#X connect 5 0 6 0;
#X connect 6 0 1 0;
#X restore 16 95 pd name;
#X restore 14 116 pd gui.stuff;
#X obj 25 397 chord-pick-fuzzy;
#X obj 74 300 netpd_f \$1 range/min 60;
#X obj 124 328 netpd_f \$1 range/max 72;
#X obj 25 420 rh_list_unzip 2;
#X obj 25 443 route 0;
#X obj 240 412 netpd_r \$1 name;
#X obj 25 492 list prepend;
#X obj 25 563 s unstep;
#N canvas 1167 491 395 180 unstep.com 0;
#X obj 20 7 r unstep;
#X obj 20 53 b;
#X obj 20 76 symbol;
#X obj 20 30 route get_sources;
#X msg 20 100 source \$1;
#X obj 20 123 s unstep;
#X obj 70 76 r \$0.source.name;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 6 0 2 1;
#X restore 159 561 pd unstep.com;
#X obj 25 538 list trim;
#X obj 240 436 list prepend \$1;
#X obj 240 482 s \$0.source.name;
#X obj 107 492 r \$0.source.name;
#X msg 240 459 symbol \$1-\$2;
#X obj 25 515 list prepend note;
#X obj 25 468 rh_list_serialize;
#N canvas 1088 544 890 591 func.grid 0;
#X obj 27 18 netpd_f \$1 func/grid/cols 4;
#X msg 27 40 columns \$1;
#X obj 27 63 s \$0.functs;
#X obj 51 226 netpd_r \$1 func/grid/cols;
#X obj 26 226 f;
#X obj 26 203 t b b a, f 14;
#X obj 26 249 until;
#X obj 26 272 f;
#X obj 26 295 t a a;
#X obj 67 284 + 1;
#X msg 66 249 0;
#X obj 26 319 list append, f 14;
#X obj 25 440 list prepend set;
#X obj 25 463 list trim;
#X obj 25 487 s \$0.functs;
#N canvas 536 132 277 175 on.off.1 0;
#X obj 17 15 r \$0.func.1.on;
#X obj 17 38 sel 0;
#X obj 54 38 t a;
#X obj 107 38 sel 0;
#X obj 144 38 t a;
#X obj 107 15 r \$0.func.1.off;
#X msg 17 61 1;
#X msg 107 61 0;
#X msg 17 87 0 \$1;
#X obj 17 110 outlet;
#X connect 0 0 1 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 1 1;
#X connect 3 0 7 0;
#X connect 3 1 4 0;
#X connect 4 0 3 1;
#X connect 5 0 3 0;
#X connect 6 0 8 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X restore 26 93 pd on.off.1;
#N canvas 536 132 277 175 on.off.3 0;
#X obj 17 38 sel 0;
#X obj 54 38 t a;
#X obj 107 38 sel 0;
#X obj 144 38 t a;
#X msg 17 61 1;
#X msg 107 61 0;
#X obj 17 110 outlet;
#X obj 17 15 r \$0.func.3.on;
#X obj 107 15 r \$0.func.3.off;
#X msg 17 87 1 \$1;
#X connect 0 0 4 0;
#X connect 0 1 1 0;
#X connect 1 0 0 1;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 5 0 9 0;
#X connect 7 0 0 0;
#X connect 8 0 2 0;
#X connect 9 0 6 0;
#X restore 36 114 pd on.off.3;
#N canvas 536 132 277 175 on.off.5 0;
#X obj 17 38 sel 0;
#X obj 54 38 t a;
#X obj 107 38 sel 0;
#X obj 144 38 t a;
#X msg 17 61 1;
#X msg 107 61 0;
#X obj 17 110 outlet;
#X obj 17 15 r \$0.func.5.on;
#X obj 107 15 r \$0.func.5.off;
#X msg 17 87 2 \$1;
#X connect 0 0 4 0;
#X connect 0 1 1 0;
#X connect 1 0 0 1;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 5 0 9 0;
#X connect 7 0 0 0;
#X connect 8 0 2 0;
#X connect 9 0 6 0;
#X restore 53 136 pd on.off.5;
#N canvas 536 132 277 175 on.off.7 0;
#X obj 17 38 sel 0;
#X obj 54 38 t a;
#X obj 107 38 sel 0;
#X obj 144 38 t a;
#X msg 17 61 1;
#X msg 107 61 0;
#X obj 17 110 outlet;
#X obj 17 15 r \$0.func.7.on;
#X obj 107 15 r \$0.func.7.off;
#X msg 17 87 3 \$1;
#X connect 0 0 4 0;
#X connect 0 1 1 0;
#X connect 1 0 0 1;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 5 0 9 0;
#X connect 7 0 0 0;
#X connect 8 0 2 0;
#X connect 9 0 6 0;
#X restore 69 157 pd on.off.7;
#N canvas 536 132 277 175 on.off.9 0;
#X obj 17 38 sel 0;
#X obj 54 38 t a;
#X obj 107 38 sel 0;
#X obj 144 38 t a;
#X msg 17 61 1;
#X msg 107 61 0;
#X obj 17 110 outlet;
#X obj 17 15 r \$0.func.9.on;
#X obj 107 15 r \$0.func.9.off;
#X msg 17 87 4 \$1;
#X connect 0 0 4 0;
#X connect 0 1 1 0;
#X connect 1 0 0 1;
#X connect 2 0 5 0;
#X connect 2 1 3 0;
#X connect 3 0 2 1;
#X connect 4 0 9 0;
#X connect 5 0 9 0;
#X connect 7 0 0 0;
#X connect 8 0 2 0;
#X connect 9 0 6 0;
#X restore 87 180 pd on.off.9;
#X obj 26 368 netpd_s \$1 func/grid/cell;
#X obj 25 413 netpd_r \$1 func/grid/cell;
#X obj 144 270 r \$0.functs;
#X obj 144 293 route cell;
#X obj 289 294 netpd_s \$1 func/grid/fullstate;
#X obj 272 359 netpd_r \$1 func/grid/fullstate;
#X obj 292 197 s \$0.functs;
#X obj 289 221 r \$0.functs;
#X msg 292 174 dump;
#X obj 289 269 spigot 0;
#X obj 257 142 t b b b, f 18;
#X msg 257 228 0;
#X msg 362 217 1;
#X obj 289 244 route fullstate;
#X obj 272 384 list prepend restore;
#X obj 272 407 list trim;
#X obj 272 430 s \$0.functs;
#X obj 257 113 netpd-dump \$1;
#X obj 481 17 inlet;
#X obj 540 163 s \$0.functs;
#X obj 540 184 r \$0.functs;
#X obj 540 208 spigot 0;
#X msg 508 165 0;
#X msg 613 163 1;
#X obj 508 86 t b a b, f 18;
#X obj 526 10 netpd_r \$1 func/grid/cols;
#X obj 481 40 mod, f 8;
#X msg 540 117 \$1 0 \, \$1 1 \, \$1 2 \, \$1 3 \, \$1 4;
#X msg 540 140 get \$1 \$2;
#X obj 540 232 route cell;
#X obj 540 309 sel 0 1 2 3 4;
#X msg 540 344 1;
#X msg 567 344 3;
#X msg 594 344 5;
#X msg 620 344 7;
#X msg 646 344 9;
#X msg 540 255 \$3 \$2;
#X obj 540 278 route 1;
#X msg 540 380 append \$1;
#X obj 508 438 list store;
#X obj 481 63 t b a;
#X obj 481 411 t b b;
#X obj 508 461 list prepend set;
#X obj 508 484 list trim;
#X obj 508 507 outlet;
#X msg 219 447 pos \$1;
#X msg 314 526 width 300 \, height 2 \, color 808;
#X obj 314 501 loadbang;
#X msg 245 511 steps \$1;
#X obj 245 557 s \$0.func.cursor;
#X obj 244 479 netpd_r \$1 func/grid/cols;
#X msg 111 524 vis \$1;
#X obj 607 493 loadbang;
#X msg 607 518 on_color 565 \, off_color 787 \, box_color 343;
#X obj 607 542 s \$0.functs;
#X obj 144 323 spigot 1;
#X obj 212 323 ==;
#X obj 111 501 r \$0.clock.run;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 5 1 10 0;
#X connect 5 2 11 1;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 11 0;
#X connect 8 1 9 0;
#X connect 9 0 7 1;
#X connect 10 0 7 1;
#X connect 11 0 20 0;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 15 0 5 0;
#X connect 16 0 5 0;
#X connect 17 0 5 0;
#X connect 18 0 5 0;
#X connect 19 0 5 0;
#X connect 21 0 12 0;
#X connect 22 0 23 0;
#X connect 23 0 75 0;
#X connect 25 0 34 0;
#X connect 27 0 33 0;
#X connect 28 0 26 0;
#X connect 29 0 24 0;
#X connect 30 0 31 0;
#X connect 30 1 28 0;
#X connect 30 2 32 0;
#X connect 31 0 29 1;
#X connect 32 0 29 1;
#X connect 33 0 29 0;
#X connect 34 0 35 0;
#X connect 35 0 36 0;
#X connect 37 0 30 0;
#X connect 38 0 46 0;
#X connect 40 0 41 0;
#X connect 41 0 49 0;
#X connect 42 0 41 1;
#X connect 42 0 76 0;
#X connect 43 0 41 1;
#X connect 43 0 76 0;
#X connect 44 0 42 0;
#X connect 44 1 47 0;
#X connect 44 2 43 0;
#X connect 45 0 46 1;
#X connect 46 0 60 0;
#X connect 47 0 48 0;
#X connect 48 0 39 0;
#X connect 49 0 56 0;
#X connect 50 0 51 0;
#X connect 50 1 52 0;
#X connect 50 2 53 0;
#X connect 50 3 54 0;
#X connect 50 4 55 0;
#X connect 51 0 58 0;
#X connect 52 0 58 0;
#X connect 53 0 58 0;
#X connect 54 0 58 0;
#X connect 55 0 58 0;
#X connect 56 0 57 0;
#X connect 57 0 50 0;
#X connect 58 0 59 0;
#X connect 59 0 62 0;
#X connect 60 0 61 0;
#X connect 60 1 44 0;
#X connect 60 1 65 0;
#X connect 61 0 59 1;
#X connect 61 1 59 0;
#X connect 62 0 63 0;
#X connect 63 0 64 0;
#X connect 65 0 69 0;
#X connect 66 0 69 0;
#X connect 67 0 66 0;
#X connect 68 0 69 0;
#X connect 70 0 68 0;
#X connect 71 0 69 0;
#X connect 72 0 73 0;
#X connect 73 0 74 0;
#X connect 75 0 20 0;
#X connect 76 0 75 1;
#X connect 77 0 71 0;
#X restore 25 180 pd func.grid;
#N canvas 904 549 694 669 seq 0;
#X obj 27 67 s \$0.seq;
#X obj 27 18 netpd_f \$1 seq/steps 16;
#X msg 27 44 columns \$1;
#X obj 40 159 netpd_r \$1 seq/steps;
#X obj 25 184 mod;
#X msg 71 283 get \$1 0;
#X obj 44 261 t b a;
#X obj 71 307 s \$0.seq;
#X obj 72 328 r \$0.seq;
#X msg 72 397 \$3;
#X obj 44 419 f;
#X obj 44 442 sel 1;
#X obj 247 161 list prepend set;
#X obj 247 184 list trim;
#X obj 220 67 route cell;
#X msg 474 76 dump;
#X obj 471 171 spigot 0;
#X obj 439 44 t b b b, f 18;
#X msg 439 130 0;
#X msg 544 119 1;
#X obj 471 146 route fullstate;
#X obj 471 246 list prepend restore;
#X obj 471 269 list trim;
#X obj 439 15 netpd-dump \$1;
#X obj 220 21 r \$0.seq;
#X obj 471 196 netpd_s \$1 seq/fullstate;
#X obj 471 221 netpd_r \$1 seq/fullstate;
#X obj 474 99 s \$0.seq;
#X obj 471 123 r \$0.seq;
#X obj 72 351 route cell;
#X obj 220 44 spigot 1;
#X msg 64 233 0;
#X msg 25 233 1;
#X obj 220 91 netpd_s \$1 seq/cell;
#X obj 220 116 netpd_r \$1 seq/cell;
#X obj 471 294 s \$0.seq;
#X obj 247 208 s \$0.seq;
#X obj 220 139 t b a;
#N canvas 452 408 407 474 get.number.of.on.cells 0;
#X msg 75 63 dump;
#X obj 72 158 spigot 0;
#X obj 40 31 t b b b, f 18;
#X msg 40 117 0;
#X msg 145 106 1;
#X obj 72 133 route fullstate;
#X obj 75 86 s \$0.seq;
#X obj 72 110 r \$0.seq;
#X obj 40 4 inlet;
#X obj 106 324 outlet;
#X obj 131 230 rh_list_serialize;
#X obj 72 181 list split 2;
#X obj 131 253 +;
#X obj 131 276 t a a;
#X msg 157 254 0;
#X obj 106 300 f;
#X obj 106 205 t b a b, f 9;
#X obj 180 299 - 1;
#X obj 180 325 pack f f, f 9;
#X obj 180 371 s \$0.seq.to.steps;
#X msg 180 348 \$2 \$1;
#X obj 260 296 netpd_r \$1 seq/steps;
#X msg 260 319 resize \$1;
#X connect 0 0 6 0;
#X connect 1 0 11 0;
#X connect 2 0 3 0;
#X connect 2 1 0 0;
#X connect 2 2 4 0;
#X connect 3 0 1 1;
#X connect 4 0 1 1;
#X connect 5 0 1 0;
#X connect 7 0 5 0;
#X connect 8 0 2 0;
#X connect 10 0 12 0;
#X connect 10 1 18 1;
#X connect 11 1 16 0;
#X connect 12 0 13 0;
#X connect 13 0 15 1;
#X connect 13 1 12 1;
#X connect 13 1 17 0;
#X connect 14 0 12 1;
#X connect 15 0 9 0;
#X connect 16 0 15 0;
#X connect 16 1 10 0;
#X connect 16 2 14 0;
#X connect 17 0 18 0;
#X connect 18 0 20 0;
#X connect 20 0 19 0;
#X connect 21 0 22 0;
#X connect 22 0 19 0;
#X restore 220 251 pd get.number.of.on.cells;
#X msg 247 323 label \$1;
#X obj 247 346 s \$0.number.on.label;
#X obj 312 182 netpd_r \$1 seq/steps 16;
#X obj 312 205 b;
#X obj 312 228 del 0;
#X obj 247 298 makefilename %2d;
#X obj 220 274 t a a;
#X obj 85 257 t a;
#X obj 72 374 t a a;
#X msg 99 397 \$1;
#X obj 44 465 f, f 9;
#X obj 25 133 t a a, f 19;
#X obj 136 208 div;
#X obj 136 236 *;
#X obj 208 395 table \$0.seq.to.steps 16;
#X obj 44 490 tabread \$0.seq.to.steps;
#X obj 44 513 +, f 16;
#X obj 44 630 outlet;
#X obj 305 541 s \$0.seq.cursor;
#X msg 228 480 pos \$1;
#X msg 374 510 width 300 \, height 2 \, color 808;
#X obj 305 447 netpd_r \$1 seq/steps;
#X obj 374 485 loadbang;
#X msg 305 470 steps \$1;
#X obj 25 207 t b a b a, f 10;
#X msg 170 549 vis \$1;
#X obj 415 386 s \$0.seq;
#X obj 415 337 loadbang;
#X msg 415 362 on_color 565 \, off_color 787 \, box_color 343;
#X obj 44 556 t b a, f 7;
#X obj 44 579 del 0;
#X obj 44 602 f, f 7;
#X text 106 595 <- make sure to be later than carlo;
#X obj 170 526 r \$0.clock.run;
#X obj 25 110 r \$0.clock.pos;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 4 1;
#X connect 3 0 51 1;
#X connect 4 0 63 0;
#X connect 5 0 7 0;
#X connect 6 0 10 0;
#X connect 6 1 5 0;
#X connect 8 0 29 0;
#X connect 9 0 10 1;
#X connect 10 0 11 0;
#X connect 11 0 49 0;
#X connect 12 0 13 0;
#X connect 13 0 36 0;
#X connect 14 0 33 0;
#X connect 15 0 27 0;
#X connect 16 0 25 0;
#X connect 17 0 18 0;
#X connect 17 1 15 0;
#X connect 17 2 19 0;
#X connect 18 0 16 1;
#X connect 19 0 16 1;
#X connect 20 0 16 0;
#X connect 21 0 22 0;
#X connect 22 0 35 0;
#X connect 23 0 17 0;
#X connect 24 0 30 0;
#X connect 26 0 21 0;
#X connect 28 0 20 0;
#X connect 29 0 47 0;
#X connect 30 0 14 0;
#X connect 31 0 46 0;
#X connect 32 0 46 0;
#X connect 34 0 37 0;
#X connect 37 0 38 0;
#X connect 37 1 12 0;
#X connect 38 0 45 0;
#X connect 39 0 40 0;
#X connect 41 0 42 0;
#X connect 42 0 43 0;
#X connect 43 0 38 0;
#X connect 44 0 39 0;
#X connect 45 0 52 1;
#X connect 45 1 44 0;
#X connect 46 0 30 1;
#X connect 47 0 9 0;
#X connect 47 1 48 0;
#X connect 48 0 49 1;
#X connect 49 0 54 0;
#X connect 50 0 4 0;
#X connect 50 1 51 0;
#X connect 51 0 52 0;
#X connect 52 0 55 1;
#X connect 54 0 55 0;
#X connect 55 0 68 0;
#X connect 58 0 57 0;
#X connect 59 0 57 0;
#X connect 60 0 62 0;
#X connect 61 0 59 0;
#X connect 62 0 57 0;
#X connect 63 0 32 0;
#X connect 63 1 6 0;
#X connect 63 2 31 0;
#X connect 63 3 58 0;
#X connect 64 0 57 0;
#X connect 66 0 67 0;
#X connect 67 0 65 0;
#X connect 68 0 69 0;
#X connect 68 1 70 1;
#X connect 69 0 70 0;
#X connect 70 0 56 0;
#X connect 72 0 64 0;
#X connect 73 0 50 0;
#X restore 25 154 pd seq;
#X obj 25 228 list append;
#X obj 25 203 t b a;
#X obj 52 374 t a;
#X obj 25 251 route bang;
#N canvas 1444 626 447 216 clock 0;
#X obj 25 26 untik-clock-consumer \$1 \$2/clock \$0.clock.select;
#X obj 25 55 route pos tempo run;
#X obj 25 169 s \$0.clock.pos;
#X obj 62 126 s \$0.clock.tempo;
#X obj 99 97 s \$0.clock.run;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 1 2 4 0;
#X restore 170 123 pd clock;
#X connect 3 0 4 0;
#X connect 4 0 26 1;
#X connect 5 0 6 0;
#X connect 6 0 8 0;
#X connect 8 0 11 0;
#X connect 9 0 6 1;
#X connect 10 0 6 2;
#X connect 11 0 12 0;
#X connect 12 0 23 0;
#X connect 13 0 18 0;
#X connect 14 0 22 0;
#X connect 17 0 15 0;
#X connect 18 0 21 0;
#X connect 20 0 14 1;
#X connect 21 0 19 0;
#X connect 22 0 17 0;
#X connect 23 0 14 0;
#X connect 24 0 27 0;
#X connect 25 0 24 0;
#X connect 26 0 29 0;
#X connect 27 0 26 0;
#X connect 27 1 28 0;
#X connect 28 0 8 0;
#X connect 29 1 5 0;