#N canvas 71 184 732 600 10;
#X obj 353 549 dac~;
#X obj 348 517 *~;
#X obj 375 517 *~;
#X obj 401 483 hsl 128 15 0.01 1 1 0 empty empty master_volume -2 -6
1 12 -262144 -1 -1 12100 0;
#X obj 18 16 loadbang;
#X obj 18 38 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X obj 295 450 catch~ outL;
#X obj 384 451 catch~ outR;
#N canvas 78 251 659 555 Anoise 0;
#X obj 258 189 envgen 200 140 1 0  ;
#X obj 216 363 *~;
#X obj 232 345 line~;
#X obj 216 406 *~;
#X obj 234 388 hsl 128 15 0.01 1 1 1 empty empty empty -2 -6 0 8 -262144
-1 -1 12700 0;
#X obj 200 306 noise~;
#X obj 256 132 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 216 439 pan~;
#X obj 248 420 hsl 128 15 -45 45 0 1 empty empty pan 4 9 1 12 -262144
-1 -1 6350 0;
#X obj 179 478 throw~ outL;
#X obj 261 478 throw~ outR;
#X obj 156 6 inlet;
#X obj 203 113 t b f;
#X msg 265 75 -45;
#X obj 293 46 del 100;
#X obj 349 46 del 100;
#X obj 263 19 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 305 74 45;
#X msg 348 74 0;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 1 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X connect 7 0 9 0;
#X connect 7 1 10 0;
#X connect 8 0 7 1;
#X connect 11 0 16 0;
#X connect 12 0 0 0;
#X connect 12 1 8 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 13 0;
#X connect 16 0 14 0;
#X connect 17 0 12 0;
#X connect 18 0 12 0;
#X restore 42 412 pd Anoise;
#N canvas 505 197 671 567 Bnoise 0;
#X obj 258 179 envgen 200 140 1 0  ;
#X obj 216 363 *~;
#X obj 232 345 line~;
#X obj 216 406 *~;
#X obj 234 388 hsl 128 15 0.01 1 1 1 empty empty empty -2 -6 0 8 -262144
-1 -1 12700 0;
#X obj 200 306 noise~;
#X obj 256 132 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 216 439 pan~;
#X obj 248 420 hsl 128 15 -45 45 0 1 empty empty pan 4 9 1 12 -262144
-1 -1 2117 0;
#X obj 179 478 throw~ outL;
#X obj 261 478 throw~ outR;
#X obj 156 6 inlet;
#X obj 203 113 t b f;
#X msg 203 66 -45;
#X obj 263 19 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 439 55 1;
#X obj 439 75 +;
#X floatatom 467 76 5 0 0 0 - - -;
#X obj 440 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 439 94 mod 90;
#X obj 439 114 - 45;
#X obj 359 119 mod 9;
#X obj 310 143 sel 1;
#X msg 362 46 0;
#X obj 283 45 del 900;
#X obj 439 33 metro 15;
#X obj 145 249 osc~ 250;
#X obj 134 312 *~ 0.4;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 1 1;
#X connect 3 0 7 0;
#X connect 4 0 3 1;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X connect 7 0 9 0;
#X connect 7 1 10 0;
#X connect 8 0 7 1;
#X connect 11 0 14 0;
#X connect 12 0 0 0;
#X connect 12 1 8 0;
#X connect 13 0 12 0;
#X connect 13 0 16 1;
#X connect 13 0 17 0;
#X connect 14 0 13 0;
#X connect 14 0 18 0;
#X connect 14 0 24 0;
#X connect 15 0 16 0;
#X connect 16 0 17 0;
#X connect 16 0 19 0;
#X connect 16 0 21 0;
#X connect 17 0 16 1;
#X connect 18 0 25 0;
#X connect 19 0 20 0;
#X connect 20 0 8 0;
#X connect 21 0 22 0;
#X connect 22 0 0 0;
#X connect 23 0 18 0;
#X connect 24 0 23 0;
#X connect 25 0 15 0;
#X connect 26 0 27 0;
#X connect 27 0 1 0;
#X restore 130 411 pd Bnoise;
#X msg 479 231 open \$1.wav;
#X symbolatom 523 272 0 0 0 0 - - -;
#X obj 478 271 t b a;
#X msg 460 294 start;
#X msg 539 363 stop;
#X obj 539 315 bng 45 250 50 0 empty empty stop 0 -6 1 8 -258049 -1
-1;
#X obj 479 210 +;
#X floatatom 507 211 5 0 0 0 - - -;
#X msg 478 188 1;
#X obj 523 254 list2symbol;
#X msg 425 160 6;
#X msg 426 325 1;
#X msg 548 382 0;
#X obj 425 370 tgl 35 0 empty empty empty 0 -6 0 8 -72960 -1 -1 0 1
;
#X msg 250 67 rewind;
#X obj 193 80 t b b b;
#X obj 200 138 qlist;
#X obj 473 48 r startrec;
#X obj 470 121 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 599 293 r stoprec;
#X obj 44 370 r anoise;
#X obj 51 389 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 136 390 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 129 371 r bnoise;
#X obj 505 98 +;
#X floatatom 533 99 5 0 0 0 - - -;
#X msg 504 76 1;
#X msg 537 76 0;
#X obj 509 128 nbx 5 22 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 24
-262144 -1 -1 0 256;
#X obj 162 44 button bang!;
#X obj 217 387 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 302 388 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 210 368 r atone;
#N canvas 202 89 903 701 Atone 0;
#X obj 230 572 *~;
#X obj 248 554 hsl 128 15 0.001 1 1 1 empty empty empty -2 -6 0 8 -262144
-1 -1 0 0;
#X obj 230 605 pan~;
#X obj 262 586 hsl 128 15 -45 45 0 1 empty empty pan 4 9 1 12 -262144
-1 -1 6350 0;
#X obj 193 644 throw~ outL;
#X obj 275 644 throw~ outR;
#X obj 156 6 inlet;
#X obj 203 113 t b f;
#X obj 263 19 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 348 74 0;
#N canvas 0 22 450 300 graph1 0;
#X array 29-sequence 9 float 1;
#A 0 315 30 115 40 100 170 60 280 165;
#X coords 0 500 8 0 200 100 1;
#X restore 621 42 graph;
#N canvas 0 22 450 300 graph1 0;
#X array 29-envelope 103 float 1;
#A 0 -0.0899997 -0.0549997 -0.0199997 2.38419e-07 0.0200002 0.0500002
0.0800002 0.11 0.143333 0.176667 0.21 0.235714 0.261429 0.287143 0.312857
0.338571 0.364286 0.39 0.414 0.438 0.462 0.486 0.51 0.52 0.55 0.56
0.64 0.71 0.799999 0.819999 0.819999 0.819999 0.819999 0.819999 0.821249
0.822499 0.823749 0.824999 0.826249 0.827499 0.828749 0.829999 0.859999
0.859999 0.829999 0.783333 0.736666 0.689999 0.65125 0.6125 0.57375
0.535 0.49625 0.4575 0.41875 0.38 0.342 0.0100002 0.0100002 0.0100002
0.0100002 0.0100002 0.0100002 0.0100002 0.0100002 0.0100002 0.0100002
0.0100002 0.0100002 0.0100002 0.0100002 0.0100002 0.0100002 0.0100002
0.0100002 0.0100002 0.0100002 0.0100002 0.0100002 0.0100002 0.0107145
0.0114288 0.0121431 0.0128574 0.0135717 0.0142859 0.0150002 0.0157145
0.0164288 0.0171431 0.0178574 0.0185717 0.0192859 0.0200002 0.0250002
0.0300002 0.0350002 0.0400002 0.0450002 0.0500002 0.18 0.0200002 0.0200002
;
#X coords 0 1 102 0 200 100 1;
#X restore 622 146 graph;
#N canvas 0 22 450 300 graph1 0;
#X array 29-sample 259 float 1;
#A 0 0.989177 1 0.989177 0.95694 0.903989 0.83147 0.740952 0.634394
0.514103 0.382684 0.242981 0.0980184 -0.0490663 -0.195089 -0.336888
-0.471395 -0.595698 -0.707105 -0.803206 -0.88192 -0.941543 -0.980785
-0.998795 -0.995185 -0.970032 -0.923881 -0.85773 -0.773013 -0.671561
-0.555573 -0.427558 -0.290288 -0.146734 -3.98038e-06 0.146726 0.290281
0.427551 0.555566 0.671556 -0.392888 -0.362888 -0.352888 -0.252888
-0.212888 -0.0928882 -0.0728883 -0.0528883 0.107112 0.147112 0.147112
0.187111 0.471402 0.336896 0.195097 0.0490743 -0.0980105 -0.242974
-0.382677 -0.514097 -0.634388 -0.740946 -0.831465 -0.903986 -0.956938
-0.989175 -1 -0.989178 -0.956943 -0.903993 0.730034 0.730034 0.720034
0.710034 0.710034 0.710034 0.710034 0.710034 0.710034 0.690034 0.650034
0.880034 0.878034 0.876034 0.874034 0.872034 0.870034 0.86458 0.859125
0.85367 0.848216 0.842761 0.837307 0.831852 0.826398 0.820943 0.815489
0.810034 0.810034 0.810034 0.810034 0.810034 -0.55556 -0.67155 -0.773002
-0.857722 -0.923875 -0.970028 -0.995183 -0.998796 -0.980788 -0.941549
-0.881928 -0.803216 -0.707117 -0.595711 -0.471409 -0.336903 -0.195104
-0.0490822 0.0980025 0.242966 0.38267 0.51409 0.634382 0.740941 0.831461
0.903983 0.956936 0.989174 1 0.989179 0.956945 0.903996 0.831479 0.740962
0.634406 0.514117 0.382699 0.242997 0.0980342 -0.0490504 -0.195073
-0.336873 -0.471381 -0.595685 -0.707094 -0.803197 -0.881913 -0.941538
-0.980782 -0.998795 -0.995187 -0.970036 -0.923887 -0.857738 -0.773023
-0.671573 -0.555586 -0.427573 -0.290303 -0.14675 -1.99019e-05 0.146711
0.290265 0.427537 0.555553 0.671544 0.772997 0.857718 0.923872 0.970026
0.995183 0.998797 0.980789 0.941551 0.881931 0.803221 0.707122 0.595717
0.471416 0.336911 0.195112 0.0490902 -0.0979946 -0.242958 -0.382662
-0.514083 -0.634375 -0.740936 -0.831457 -0.903979 -0.956933 -0.989173
-1 -0.98918 -0.956947 -0.904 -0.831483 -0.740968 -0.634412 -0.514124
-0.382706 -0.243004 -0.0980421 0.0490425 0.195065 0.336866 0.471374
0.595679 0.707088 0.803192 0.881909 0.941535 0.98078 0.998794 0.995187
0.970038 0.92389 0.857742 0.773028 0.671579 0.555593 0.42758 0.290311
0.146758 2.78627e-05 -0.146703 -0.290258 -0.42753 -0.555547 -0.671538
-0.772992 -0.857714 0.0528713 -0.207128 -0.267128 -0.327128 -0.387128
-0.447128 -0.507128 -0.687128 -0.687128 -0.595723 -0.471423 -0.336918
-0.19512 -0.0490981 0.0979867 0.24295 0.382655 0.514076 0.634369 0.74093
0.831452 0.903976 0.956931 0.989172 1 0.989181;
#X coords 0 1 258 -1 200 100 1;
#X restore 619 281 graph;
#N canvas 328 85 613 428 make-tables 0;
#X msg 109 52 bang;
#X obj 109 77 t b b;
#X obj 152 134 f;
#X obj 190 134 + 1;
#X msg 174 106 0;
#X obj 109 103 until;
#X obj 152 162 t f f;
#X obj 27 190 moses 10;
#X obj 18 272 tabwrite 29-envelope;
#X obj 75 159 sel 102;
#X obj 23 218 expr ($f1-1)/10;
#X obj 35 243 expr (101-$f1)/90;
#X msg 120 380 \; 29-sample cosinesum 256 0 0 0 0 0 0 1;
#X msg 120 338 \; 29-sequence 0 55 550 385 495 165 385 495 275 615
;
#X text 30 8 bang to recalculate the envelope table (I did this but
then went in and changed it with the mouse afterward.);
#X text 84 299 The sequence is just a list of specified frequencies
\; the wavetable is a cosine.;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 2 0 6 0;
#X connect 2 0 9 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 6 1 8 1;
#X connect 7 0 10 0;
#X connect 7 1 11 0;
#X connect 9 0 5 1;
#X connect 10 0 8 0;
#X connect 11 0 8 0;
#X restore 689 401 pd make-tables;
#X obj 100 447 *~;
#X obj 100 475 hip~ 5;
#X obj 99 239 tabread~ 29-sequence;
#X obj 179 262 wrap~;
#X obj 179 286 *~ 100;
#X obj 179 310 +~ 1;
#X obj 99 263 phasor~;
#X obj 99 287 -~ 0.5;
#X obj 100 398 cos~;
#X obj 157 357 *~;
#X obj 157 429 tabread4~ 29-sample;
#X obj 179 334 tabread4~ 29-envelope;
#X obj 157 381 *~ 128;
#X obj 157 405 +~ 129;
#X obj 100 422 +~ 1;
#X obj 99 191 phasor~ 0.6;
#X text 170 215 main loop: sawtooth of amplitude 9;
#X text 291 240 read frequency sequence;
#X text 235 262 9x original frequency sawtooth;
#X text 246 287 adjust for reading;
#X text 196 357 multiply envelope by audio-frequency sawtooth;
#X text 220 382 adjust amplitude and center for wavetable;
#X text 135 449 multiply by raised-cosine smoothing function;
#X obj 99 215 *~ 9;
#X obj 47 176 line~;
#X msg 226 532 0;
#X msg 84 153 0;
#X msg 12 75 1 600;
#X msg 61 78 0;
#X obj 52 23 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 140 75 0.1;
#X obj 42 50 t b b b;
#X obj 73 100 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 73 120 del 650;
#X msg 265 75 45;
#X msg 305 74 -45;
#X obj 293 46 del 200;
#X obj 349 45 del 300;
#X connect 0 0 2 0;
#X connect 1 0 0 1;
#X connect 2 0 4 0;
#X connect 2 1 5 0;
#X connect 3 0 2 1;
#X connect 6 0 8 0;
#X connect 7 1 3 0;
#X connect 8 0 48 0;
#X connect 8 0 45 0;
#X connect 8 0 50 0;
#X connect 9 0 7 0;
#X connect 14 0 15 0;
#X connect 15 0 0 0;
#X connect 16 0 20 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 19 0 25 0;
#X connect 20 0 21 0;
#X connect 21 0 23 0;
#X connect 21 0 22 0;
#X connect 22 0 28 0;
#X connect 23 0 26 0;
#X connect 24 0 14 1;
#X connect 25 0 23 1;
#X connect 26 0 27 0;
#X connect 27 0 24 0;
#X connect 28 0 14 0;
#X connect 37 0 16 0;
#X connect 37 0 17 0;
#X connect 38 0 37 0;
#X connect 39 0 1 0;
#X connect 39 0 0 1;
#X connect 40 0 38 0;
#X connect 41 0 38 0;
#X connect 42 0 38 0;
#X connect 42 0 46 0;
#X connect 43 0 45 0;
#X connect 44 0 1 0;
#X connect 45 0 41 0;
#X connect 45 1 42 0;
#X connect 45 2 44 0;
#X connect 46 0 47 0;
#X connect 47 0 40 0;
#X connect 47 0 39 0;
#X connect 48 0 7 0;
#X connect 49 0 7 0;
#X connect 50 0 49 0;
#X connect 50 0 51 0;
#X connect 51 0 9 0;
#X restore 208 410 pd Atone;
#X obj 295 369 r btone;
#N canvas 505 197 671 567 Btone 0;
#X obj 258 189 envgen 200 140 1 0  ;
#X obj 216 363 *~;
#X obj 232 345 line~;
#X obj 216 406 *~;
#X obj 234 388 hsl 128 15 0.01 1 1 1 empty empty empty -2 -6 0 8 -262144
-1 -1 12700 0;
#X obj 256 132 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 216 439 pan~;
#X obj 248 420 hsl 128 15 -45 45 0 1 empty empty pan 4 9 1 12 -262144
-1 -1 6350 0;
#X obj 179 478 throw~ outL;
#X obj 261 478 throw~ outR;
#X obj 156 6 inlet;
#X obj 203 113 t b f;
#X msg 203 66 -45;
#X obj 263 19 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 439 55 1;
#X obj 439 75 +;
#X floatatom 467 76 5 0 0 0 - - -;
#X obj 440 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 439 94 mod 90;
#X obj 439 114 - 45;
#X obj 359 119 mod 9;
#X obj 310 143 sel 1;
#X msg 362 46 0;
#X obj 283 45 del 900;
#X obj 160 277 osc~ 250;
#X obj 169 309 *~ 0.4;
#X obj 439 33 metro 10;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 1 1;
#X connect 3 0 6 0;
#X connect 4 0 3 1;
#X connect 5 0 0 0;
#X connect 6 0 8 0;
#X connect 6 1 9 0;
#X connect 7 0 6 1;
#X connect 10 0 13 0;
#X connect 11 0 0 0;
#X connect 11 1 7 0;
#X connect 12 0 11 0;
#X connect 12 0 15 1;
#X connect 12 0 16 0;
#X connect 13 0 12 0;
#X connect 13 0 17 0;
#X connect 13 0 23 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 0 18 0;
#X connect 15 0 20 0;
#X connect 16 0 15 1;
#X connect 17 0 26 0;
#X connect 18 0 19 0;
#X connect 19 0 7 0;
#X connect 20 0 21 0;
#X connect 21 0 0 0;
#X connect 22 0 17 0;
#X connect 23 0 22 0;
#X connect 24 0 25 0;
#X connect 25 0 1 0;
#X connect 26 0 14 0;
#X restore 296 409 pd Btone;
#X msg 255 117 read ABA-qlist.txt;
#X msg 264 92 read ABA-test.txt;
#X obj 639 26 r A;
#X obj 673 27 r B;
#X text 571 4 just to stop errors:;
#X obj 624 46 r separator;
#X msg 511 188 0;
#X obj 512 555 writesf~ 2;
#X msg 18 58 \; pd dsp \$1;
#X connect 1 0 0 0;
#X connect 1 0 53 0;
#X connect 2 0 0 1;
#X connect 2 0 53 1;
#X connect 3 0 2 1;
#X connect 3 0 1 1;
#X connect 4 0 5 0;
#X connect 5 0 54 0;
#X connect 6 0 1 0;
#X connect 7 0 2 0;
#X connect 10 0 19 0;
#X connect 10 0 12 0;
#X connect 12 0 13 0;
#X connect 12 1 53 0;
#X connect 13 0 21 0;
#X connect 13 0 53 0;
#X connect 14 0 22 0;
#X connect 14 0 53 0;
#X connect 15 0 14 0;
#X connect 16 0 17 0;
#X connect 16 0 10 0;
#X connect 17 0 16 1;
#X connect 18 0 16 0;
#X connect 19 0 11 0;
#X connect 20 0 16 0;
#X connect 21 0 23 0;
#X connect 22 0 23 0;
#X connect 24 0 26 0;
#X connect 25 0 26 0;
#X connect 25 1 24 0;
#X connect 25 2 46 0;
#X connect 27 0 28 0;
#X connect 27 0 36 0;
#X connect 28 0 18 0;
#X connect 29 0 15 0;
#X connect 30 0 31 0;
#X connect 31 0 8 0;
#X connect 32 0 9 0;
#X connect 33 0 32 0;
#X connect 34 0 35 0;
#X connect 34 0 38 0;
#X connect 35 0 34 1;
#X connect 36 0 34 0;
#X connect 37 0 34 0;
#X connect 37 0 34 1;
#X connect 37 0 35 0;
#X connect 39 0 25 0;
#X connect 40 0 43 0;
#X connect 41 0 45 0;
#X connect 42 0 40 0;
#X connect 44 0 41 0;
#X connect 46 0 26 0;
#X connect 47 0 26 0;
#X connect 52 0 16 1;
#X connect 52 0 17 0;