#N canvas 98 22 708 608 12;
#X obj 263 27 inlet;
#X obj 322 26 inlet;
#X obj 394 26 inlet;
#X obj 86 535 outlet;
#X obj 146 535 outlet;
#X obj 206 535 outlet;
#X obj 266 535 outlet;
#X obj 326 535 outlet;
#X obj 386 535 outlet;
#X obj 446 535 outlet;
#X obj 506 535 outlet;
#X obj 566 535 outlet;
#N canvas 0 0 1264 746 voice 0;
#X obj 268 283 f;
#X obj 306 285 + 1;
#X obj 253 33 table \$0-voicenr 128;
#X obj 153 414 select 0;
#X obj 153 447 f;
#X obj 274 251 0;
#X obj 189 595 tabwrite \$0-voicenr;
#X obj 269 312 t f f;
#X obj 149 310 del;
#X obj 149 283 bang;
#X obj 575 693 outlet;
#X obj 728 694 outlet;
#X obj 559 52 inlet;
#X obj 637 117 !=;
#X obj 545 148 list prepend;
#X obj 545 175 route 1 0;
#X obj 559 79 t f f;
#X obj 886 269 tabread \$0-voicenr;
#X obj 253 220 t b b f;
#X obj 575 597 t b b f;
#X obj 575 664 f;
#X obj 655 693 outlet;
#X obj 639 52 inlet;
#X obj 639 79 t f f;
#X obj 655 664 f;
#X obj 153 385 tabread \$0-voice-count;
#X obj 254 62 table \$0-voice-count 128;
#X obj 885 344 0;
#X obj 885 306 t b f f;
#X obj 776 378 tabwrite \$0-voice-count;
#X obj 154 476 t f f b f;
#X obj 216 548 tabwrite \$0-voice-count;
#X obj 216 522 1;
#X connect 0 0 1 0;
#X connect 0 0 7 0;
#X connect 1 0 0 1;
#X connect 3 0 4 0;
#X connect 3 1 9 0;
#X connect 4 0 30 0;
#X connect 5 0 0 1;
#X connect 7 0 25 0;
#X connect 7 1 4 1;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X connect 12 0 16 0;
#X connect 13 0 14 1;
#X connect 14 0 15 0;
#X connect 15 0 18 0;
#X connect 15 1 17 0;
#X connect 16 0 14 0;
#X connect 16 1 20 1;
#X connect 17 0 28 0;
#X connect 18 0 0 0;
#X connect 18 1 5 0;
#X connect 18 2 6 1;
#X connect 19 0 20 0;
#X connect 19 1 24 0;
#X connect 19 2 11 0;
#X connect 20 0 10 0;
#X connect 22 0 23 0;
#X connect 23 0 13 0;
#X connect 23 1 24 1;
#X connect 24 0 21 0;
#X connect 25 0 3 0;
#X connect 27 0 29 0;
#X connect 28 0 27 0;
#X connect 28 1 29 1;
#X connect 28 2 19 0;
#X connect 30 0 19 0;
#X connect 30 1 6 0;
#X connect 30 2 32 0;
#X connect 30 3 31 1;
#X connect 32 0 31 0;
#X restore 74 367 pd voice nr;
#N canvas 0 0 470 320 reset 0;
#X obj 359 115 s \$0-reset;
#X obj 359 58 inlet;
#X msg 359 88 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X restore 394 56 pd reset;
#N canvas 405 191 516 450 held 0;
#X obj 178 41 inlet;
#X obj 118 109 !=;
#X obj 39 162 select 1 0;
#X obj 250 140 r \$0-reset;
#X obj 63 220 f;
#X obj 93 220 + 1;
#X obj 133 220 f;
#X obj 163 220 + 1;
#X obj 130 284 -;
#X obj 130 252 t b f;
#X obj 309 385 outlet;
#X obj 36 36 inlet;
#X obj 214 378 f;
#X obj 214 402 outlet;
#X obj 44 378 f;
#X obj 44 402 outlet;
#X obj 181 76 t f f;
#X obj 39 78 t b f;
#X obj 44 346 t b b;
#X obj 130 311 t b f;
#X obj 39 116 f;
#X connect 0 0 16 0;
#X connect 1 0 20 1;
#X connect 2 0 4 0;
#X connect 2 1 6 0;
#X connect 3 0 6 1;
#X connect 3 0 4 1;
#X connect 4 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 4 1;
#X connect 6 0 7 0;
#X connect 6 0 9 0;
#X connect 7 0 6 1;
#X connect 8 0 19 0;
#X connect 9 0 8 0;
#X connect 9 1 8 1;
#X connect 11 0 17 0;
#X connect 12 0 13 0;
#X connect 14 0 15 0;
#X connect 16 0 1 0;
#X connect 16 1 12 1;
#X connect 17 0 20 0;
#X connect 17 1 14 1;
#X connect 18 0 14 0;
#X connect 18 1 12 0;
#X connect 19 0 18 0;
#X connect 19 1 10 0;
#X connect 20 0 2 0;
#X restore 77 302 pd held notes;
#N canvas 0 0 462 312 dublicate 0;
#X obj 125 47 inlet;
#X obj 125 78 t f f;
#X obj 125 144 outlet;
#X obj 258 145 outlet;
#X obj 195 47 inlet;
#X obj 195 78 t f f;
#X obj 195 144 outlet;
#X obj 328 145 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 1 7 0;
#X restore 156 252 pd dublicate;
#N canvas 0 0 526 499 complete 0;
#X obj 125 47 inlet;
#X obj 106 354 outlet;
#X obj 239 355 outlet;
#X obj 195 47 inlet;
#X obj 176 354 outlet;
#X obj 106 325 f;
#X obj 175 329 f;
#X obj 195 77 t f f;
#X obj 284 206 r \$0-reset;
#X obj 269 242 f;
#X obj 301 242 + 1;
#X obj 195 105 !=;
#X obj 180 204 select 1 0;
#X obj 181 175 f;
#X obj 125 93 t b f;
#X obj 269 271 t b f;
#X obj 114 274 t b b;
#X connect 0 0 14 0;
#X connect 3 0 7 0;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X connect 7 0 11 0;
#X connect 7 1 6 1;
#X connect 8 0 9 1;
#X connect 9 0 10 0;
#X connect 9 0 15 0;
#X connect 10 0 9 1;
#X connect 11 0 13 1;
#X connect 12 0 16 0;
#X connect 12 1 9 0;
#X connect 13 0 12 0;
#X connect 14 0 13 0;
#X connect 14 1 5 1;
#X connect 15 0 16 0;
#X connect 15 1 2 0;
#X connect 16 0 5 0;
#X connect 16 1 6 0;
#X restore 176 222 pd complete;
#N canvas 95 0 576 746 duration 0;
#X obj 145 87 inlet;
#X obj 136 614 outlet;
#X obj 269 615 outlet;
#X obj 215 87 inlet;
#X obj 206 614 outlet;
#X obj 136 585 f;
#X obj 205 589 f;
#X obj 215 117 t f f;
#X obj 22 219 r \$0-reset;
#X obj 20 274 timer;
#X obj 21 246 bang;
#X obj 145 120 t f f;
#X obj 145 213 list prepend;
#X obj 217 184 !=;
#X obj 144 241 route 1 0;
#X obj 27 35 table \$0-onset 128;
#X obj 45 332 tabwrite \$0-onset;
#X obj 124 271 t b f;
#X obj 292 269 r \$0-reset;
#X obj 249 374 timer;
#X obj 291 296 bang;
#X obj 187 272 t b f;
#X obj 302 375 tabread \$0-onset;
#X obj 289 415 -;
#X obj 100 435 t b b;
#X obj 289 517 t b f;
#X obj 10 300 t b f;
#X obj 443 348 \$0;
#X msg 443 383 \; \$1-onset const 0;
#X obj 447 318 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X connect 0 0 11 0;
#X connect 3 0 7 0;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X connect 7 0 13 0;
#X connect 7 1 6 1;
#X connect 8 0 10 0;
#X connect 9 0 26 0;
#X connect 10 0 9 0;
#X connect 11 0 12 0;
#X connect 11 1 5 1;
#X connect 12 0 14 0;
#X connect 13 0 12 1;
#X connect 14 0 17 0;
#X connect 14 1 21 0;
#X connect 17 0 9 1;
#X connect 17 1 16 1;
#X connect 18 0 20 0;
#X connect 19 0 23 0;
#X connect 20 0 19 0;
#X connect 20 0 27 0;
#X connect 21 0 19 1;
#X connect 21 1 22 0;
#X connect 22 0 23 1;
#X connect 23 0 25 0;
#X connect 24 0 5 0;
#X connect 24 1 6 0;
#X connect 25 0 24 0;
#X connect 25 1 2 0;
#X connect 26 0 24 0;
#X connect 26 1 16 0;
#X connect 27 0 28 0;
#X connect 29 0 27 0;
#X restore 186 192 pd duration;
#N canvas 405 191 709 446 note 0;
#X obj 328 51 inlet;
#X obj 167 120 !=;
#X obj 167 150 select 1 0;
#X obj 458 120 r \$0-reset;
#X obj 167 270 f;
#X obj 197 270 + 1;
#X obj 460 150 0;
#X obj 165 374 outlet;
#X obj 273 257 tabread \$0-note-count;
#X obj 200 336 tabwrite \$0-note-count;
#X obj 262 53 inlet;
#X obj 262 90 swap;
#X obj 165 302 t f f;
#X obj 160 21 table \$0-note-count 128;
#X obj 274 232 f;
#X connect 0 0 11 1;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 2 1 14 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 4 0 12 0;
#X connect 5 0 4 1;
#X connect 6 0 4 1;
#X connect 8 0 7 0;
#X connect 10 0 11 0;
#X connect 11 0 1 0;
#X connect 11 1 14 1;
#X connect 11 1 9 1;
#X connect 12 0 7 0;
#X connect 12 1 9 0;
#X connect 14 0 8 0;
#X restore 27 476 pd note count;
#N canvas 837 0 439 746 delta 0;
#X obj 155 87 inlet;
#X obj 171 614 outlet;
#X obj 304 615 outlet;
#X obj 225 87 inlet;
#X obj 241 614 outlet;
#X obj 171 585 f;
#X obj 240 589 f;
#X obj 225 117 t f f;
#X obj 90 274 timer;
#X obj 84 331 r \$0-reset;
#X obj 70 364 f;
#X obj 103 365 + 1;
#X obj 70 245 t b b b;
#X obj 364 615 outlet;
#X obj 211 145 !=;
#X obj 171 448 t b f;
#X obj 163 496 t b b;
#X obj 156 125 t b f;
#X obj 86 202 select 1 0;
#X obj 156 169 f;
#X connect 0 0 17 0;
#X connect 3 0 7 0;
#X connect 5 0 1 0;
#X connect 6 0 4 0;
#X connect 7 0 14 0;
#X connect 7 1 6 1;
#X connect 8 0 13 0;
#X connect 9 0 10 1;
#X connect 10 0 11 0;
#X connect 10 0 15 0;
#X connect 11 0 10 1;
#X connect 12 0 10 0;
#X connect 12 1 8 0;
#X connect 12 2 8 1;
#X connect 14 0 19 1;
#X connect 15 0 16 0;
#X connect 15 1 2 0;
#X connect 16 0 5 0;
#X connect 16 1 6 0;
#X connect 17 0 19 0;
#X connect 17 1 5 1;
#X connect 18 0 12 0;
#X connect 18 1 16 0;
#X connect 19 0 18 0;
#X restore 263 132 pd delta;
#N canvas 294 33 814 656 filter 0;
#X obj 40 40 inlet;
#X obj 343 39 inlet;
#X obj 171 353 outlet;
#X obj 38 124 t f f;
#X obj 343 119 t f f;
#X obj 318 345 outlet;
#X obj 171 321 f;
#X obj 316 319 f;
#X obj 235 285 t b b;
#X obj 195 528 table \$0-pitch 128;
#X obj 38 526 tabwrite \$0-pitch;
#X obj 38 223 tabread \$0-pitch;
#X obj 38 253 !=;
#X obj 343 151 !=;
#X obj 38 190 t f f;
#X obj 38 292 select 1;
#X obj 38 328 f;
#X obj 46 483 t b f;
#X obj 118 31 r \$0-reset;
#X obj 118 57 t b;
#X obj 193 126 t f b;
#X obj 230 157 0;
#N canvas 0 0 450 300 fire 0;
#X obj 148 22 inlet;
#X obj 148 186 until;
#X obj 148 228 f;
#X obj 180 228 + 1;
#X obj 171 160 0;
#X obj 148 346 outlet;
#X obj 148 286 /;
#X obj 148 136 t f b f;
#X obj 253 23 inlet;
#X obj 312 316 outlet;
#X obj 148 257 t f f;
#X obj 148 109 128;
#X obj 148 314 * 1;
#X connect 0 0 11 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 0 10 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 6 0 12 0;
#X connect 7 0 1 0;
#X connect 7 1 4 0;
#X connect 7 2 6 1;
#X connect 8 0 12 1;
#X connect 10 0 6 0;
#X connect 10 1 9 0;
#X connect 11 0 7 0;
#X connect 12 0 5 0;
#X restore 118 86 pd fire;
#X connect 0 0 3 0;
#X connect 1 0 4 0;
#X connect 3 0 14 0;
#X connect 3 1 6 1;
#X connect 4 0 13 0;
#X connect 4 1 7 1;
#X connect 6 0 2 0;
#X connect 7 0 5 0;
#X connect 8 0 6 0;
#X connect 8 1 7 0;
#X connect 11 0 12 0;
#X connect 12 0 15 0;
#X connect 13 0 12 1;
#X connect 13 0 16 1;
#X connect 14 0 11 0;
#X connect 14 1 10 1;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 8 0;
#X connect 17 1 10 0;
#X connect 18 0 19 0;
#X connect 19 0 22 0;
#X connect 20 0 3 0;
#X connect 20 1 21 0;
#X connect 21 0 4 0;
#X connect 22 1 20 0;
#X restore 263 93 pd filter;
#X connect 0 0 20 0;
#X connect 1 0 20 1;
#X connect 2 0 13 0;
#X connect 12 0 18 0;
#X connect 12 1 18 1;
#X connect 12 2 4 0;
#X connect 14 0 12 0;
#X connect 14 1 12 1;
#X connect 14 2 5 0;
#X connect 15 0 14 0;
#X connect 15 1 14 1;
#X connect 15 2 6 0;
#X connect 15 3 7 0;
#X connect 16 0 15 0;
#X connect 16 1 15 1;
#X connect 16 2 8 0;
#X connect 17 0 16 0;
#X connect 17 1 16 1;
#X connect 17 2 9 0;
#X connect 18 0 3 0;
#X connect 19 0 17 0;
#X connect 19 1 17 1;
#X connect 19 2 10 0;
#X connect 19 3 11 0;
#X connect 20 0 19 0;
#X connect 20 1 19 1;