#N canvas 390 22 890 744 10; #X obj 13 502 dac~; #X obj 13 477 catch~ sum-bus; #X obj 159 162 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 145 260 metro 10; #X obj 145 233 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X obj 153 37 openpanel; #X obj 153 14 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 153 59 loadspearfile; #X obj 164 478 table frqarray; #X obj 164 501 table magarray; #X floatatom 153 81 5 0 0 0 - - -; #X floatatom 228 82 5 0 0 0 - - -; #X text 142 98 partials; #X text 235 98 frame-count; #X floatatom 289 460 5 0 0 0 - - -; #X obj 289 480 tabread frqarray; #X floatatom 289 502 5 0 0 0 - - -; #X obj 228 120 s framecount; #X msg 121 307 0; #X floatatom 121 329 5 0 0 0 - - -; #X obj 161 307 f; #X obj 161 328 + 1; #X obj 121 397 s time; #X msg 126 207 0; #X obj 242 245 vsl 15 101 0.25 4 1 1 empty empty empty 0 -9 0 10 -262144 -1 -1 5000 1; #X obj 261 409 s fscale; #X msg 242 221 1; #X obj 242 199 loadbang; #X symbolatom 218 24 0 0 0 0 - - -; #X obj 27 398 s fadetime; #X obj 428 184 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 447 183 s allon; #X obj 508 183 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 527 183 s alloff; #X text 259 239 Frequency scale; #X obj 31 244 vsl 15 101 0.25 4 1 1 empty empty empty 0 -9 0 10 -262144 -1 -1 5000 1; #X msg 31 220 1; #X obj 31 198 loadbang; #X floatatom 16 377 5 0 0 0 - - -; #X text -59 238 Timebase scale; #X obj 29 356 * 10; #X text 118 287 Time counter; #X text 10 457 Gather up audio outputs; #X text 285 437 For debugging table; #X text 311 112 Partials need to know framecount; #X text 310 124 to find right point in tables; #X text 243 59 Read a SPEAR sinusoidal analysis file; #X text 263 70 into frqarray and magarray; #X text 461 166 OSCILLATOR BANK; #X text 162 456 Tables to hold data; #X text 22 11 CLICK HERE FIRST -->; #X text 24 24 to load the; #X text 24 36 analysis file; #X text 188 354 Detect end; #X obj 121 353 select 999; #X text 21 -38 Synthesize a sinusoidal analysis file (from SPEAR) with a bank of sinusoid oscillators.; #X text 14 538 2010-02-17 Dan Ellis dpwe@ee.columbia.edu; #X text 116 413 Update time point; #X text 115 425 for oscillators; #X obj 411 202 mypartial 0; #X text 236 7 Filename; #X obj 411 222 mypartial 1; #X obj 411 242 mypartial 2; #X obj 411 262 mypartial 3; #X obj 411 302 mypartial 5; #X obj 411 322 mypartial 6; #X obj 411 342 mypartial 7; #X obj 411 362 mypartial 8; #X obj 411 382 mypartial 9; #X obj 411 402 mypartial 10; #X obj 411 422 mypartial 11; #X obj 411 442 mypartial 12; #X obj 411 462 mypartial 13; #X obj 411 482 mypartial 14; #X obj 411 502 mypartial 15; #X obj 597 202 mypartial 16; #X obj 597 222 mypartial 17; #X obj 597 242 mypartial 18; #X obj 597 262 mypartial 19; #X obj 597 282 mypartial 20; #X obj 597 302 mypartial 21; #X obj 597 322 mypartial 22; #X obj 597 342 mypartial 23; #X obj 597 362 mypartial 24; #X obj 597 381 mypartial 25; #X obj 597 402 mypartial 26; #X obj 597 422 mypartial 27; #X obj 597 442 mypartial 28; #X obj 597 462 mypartial 29; #X obj 597 482 mypartial 30; #X obj 597 501 mypartial 31; #X obj 411 282 mypartial 4; #X text -24 124; #X obj -68 77 unpack 0 0; #X obj -2 113 select 0; #X obj -2 134 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text -99 89 note; #X text -4 91 velocity; #X obj -68 50 keybd; #X text 54 115 Note on; #X text 14 132 Note off; #X obj -68 103 mtof; #X obj -69 127 / 440; #X text 22 -54 additive+kbd.pd; #X obj 261 361 *; #X obj 261 383 *; #X obj 316 331 / 10; #X obj 316 351 exp; #X floatatom 332 404 5 0 0 0 - - -; #X obj 316 283 lfo; #X text 313 265 Vibrato LFO; #X obj 362 544 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 5100 1; #X obj 508 543 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 6200 1; #X obj 359 563 cmap 0 1; #X obj 505 564 cmap 0 1; #X obj 359 586 *; #X obj 504 587 *; #X obj 423 562 r framecount; #X text 359 528 loop start point; #X text 502 527 loop end point; #X obj 164 567 select 999; #X obj 164 590 spigot; #X obj 36 151 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X obj 343 628 f; #X floatatom 572 612 5 0 0 0 - - -; #X floatatom 390 613 5 0 0 0 - - -; #X obj 504 608 int; #X obj 358 606 int; #X obj 164 619 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X msg 160 207 1; #X text 53 150 Enables looping; #X text 161 639 set current time to loop start; #X text 232 568 Detect loop end; #X obj 36 170 s doloop; #X obj 222 591 r doloop; #X connect 1 0 0 0; #X connect 1 0 0 1; #X connect 2 0 18 0; #X connect 2 0 129 0; #X connect 3 0 20 0; #X connect 4 0 3 0; #X connect 5 0 7 0; #X connect 5 0 28 0; #X connect 6 0 5 0; #X connect 7 0 10 0; #X connect 7 1 11 0; #X connect 11 0 17 0; #X connect 11 0 54 1; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 18 0 19 0; #X connect 19 0 21 0; #X connect 19 0 22 0; #X connect 19 0 54 0; #X connect 19 0 120 0; #X connect 20 0 19 0; #X connect 21 0 20 1; #X connect 23 0 4 0; #X connect 24 0 104 1; #X connect 26 0 24 0; #X connect 27 0 26 0; #X connect 30 0 31 0; #X connect 32 0 33 0; #X connect 35 0 38 0; #X connect 35 0 40 0; #X connect 36 0 35 0; #X connect 37 0 36 0; #X connect 40 0 29 0; #X connect 40 0 3 1; #X connect 54 0 23 0; #X connect 93 0 101 0; #X connect 93 1 94 0; #X connect 94 0 95 0; #X connect 94 1 2 0; #X connect 94 1 122 0; #X connect 95 0 122 0; #X connect 98 0 93 0; #X connect 101 0 102 0; #X connect 102 0 104 0; #X connect 104 0 105 1; #X connect 105 0 25 0; #X connect 105 0 108 0; #X connect 106 0 107 0; #X connect 107 0 105 0; #X connect 109 0 106 0; #X connect 111 0 113 0; #X connect 112 0 114 0; #X connect 113 0 115 0; #X connect 114 0 116 0; #X connect 115 0 127 0; #X connect 116 0 126 0; #X connect 117 0 115 1; #X connect 117 0 116 1; #X connect 120 0 121 0; #X connect 121 0 123 0; #X connect 121 0 128 0; #X connect 122 0 133 0; #X connect 123 0 19 0; #X connect 126 0 124 0; #X connect 126 0 120 1; #X connect 127 0 123 1; #X connect 127 0 125 0; #X connect 129 0 4 0; #X connect 134 0 121 1;