#N canvas 0 0 1185 874 10;
#X text 817 807 comment;
#X obj 731 85 soundfiler;
#X obj 622 838 dac~;
#X obj 554 547 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 9162 1;
#X obj 554 682 / 100;
#X obj 554 722 line~;
#X msg 554 702 \$1 1;
#X obj 541 749 *~;
#X obj 136 41 key;
#X obj 136 63 sel 32;
#X obj 136 85 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X floatatom 280 85 5 0 0 0 - - -;
#X floatatom 425 88 5 0 0 0 - - -;
#X text 287 68 stillness threshold (ms);
#X obj 272 129 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 425 129 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
1;
#X text 163 45 hit spacebar to calibrate \, then turn up volume;
#X obj 136 106 guppy_interface2 _________________________;
#X obj 182 212 hsl 128 15 -60 60 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 0 1;
#X obj 238 157 vsl 15 50 0 -50 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 1365 1;
#X text 255 171 main vol;
#X msg 731 63 read -resize ./reich.wav reich;
#N canvas 0 0 450 300 graph1 0;
#X array reich 4e+06 float 0;
#X coords 0 1 4e+06 -1 200 140 1;
#X restore 959 43 graph;
#X obj 72 620 hip~ 5;
#X obj 132 396 *~ 0;
#X obj 132 419 +~ 1;
#X obj 72 594 *~;
#X obj 155 514 line~;
#X obj 155 466 * 441;
#X floatatom 155 443 0 0 0 0 - - -;
#X obj 155 490 pack 0 100;
#X obj 133 548 +~;
#X obj 71 341 -~ 0.5;
#X obj 131 314 phasor~;
#X obj 71 365 *~ 0.5;
#X obj 71 388 cos~;
#X obj 132 574 tabread4~ reich;
#X msg 159 363 4e+06;
#X msg 131 281 0.01;
#X obj 558 72 bng 30 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 558 107 s init;
#X text 557 43 Initialize!!;
#X obj 179 258 r init;
#X obj 731 36 r init;
#X floatatom 330 252 5 0 0 0 - - -;
#X obj 330 210 * -2;
#X obj 330 231 expr 100-$f1;
#X text 1024 843 Jesse Fox \, 11/30/04;
#X text 165 280 <-- frequency (Hz.);
#X text 200 363 <-- chunk size (100ths of a second);
#X text 217 445 <-- read point (100ths of a second);
#X text 741 414 comment;
#X obj 330 271 s Lvol;
#X obj 555 521 r Lvol;
#X obj 739 655 hip~ 5;
#X obj 799 431 *~ 0;
#X obj 799 454 +~ 1;
#X obj 739 629 *~;
#X obj 822 549 line~;
#X obj 822 501 * 441;
#X floatatom 822 478 0 0 0 0 - - -;
#X obj 822 525 pack 0 100;
#X obj 800 583 +~;
#X obj 738 376 -~ 0.5;
#X obj 798 349 phasor~;
#X obj 738 400 *~ 0.5;
#X obj 738 423 cos~;
#X obj 799 609 tabread4~ reich;
#X msg 826 398 4e+06;
#X msg 798 316 0.01;
#X obj 846 293 r init;
#X text 832 315 <-- frequency (Hz.);
#X text 867 398 <-- chunk size (100ths of a second);
#X text 884 480 <-- read point (100ths of a second);
#X obj 829 237 hsl 128 15 -60 60 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 12700 1;
#X obj 885 182 vsl 15 50 0 -50 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 947 1;
#X floatatom 977 277 5 0 0 0 - - -;
#X obj 977 235 * -2;
#X obj 977 256 expr 100-$f1;
#X obj 977 296 s Rvol;
#X obj 668 554 vsl 15 128 0 100 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 10246 1;
#X obj 668 689 / 100;
#X obj 668 729 line~;
#X msg 668 709 \$1 1;
#X obj 655 756 *~;
#X obj 669 528 r Rvol;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 7 1;
#X connect 6 0 5 0;
#X connect 7 0 2 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 17 0;
#X connect 11 0 17 1;
#X connect 12 0 17 2;
#X connect 17 3 18 0;
#X connect 17 5 19 0;
#X connect 17 9 14 0;
#X connect 17 13 74 0;
#X connect 17 15 75 0;
#X connect 17 19 15 0;
#X connect 18 0 29 0;
#X connect 19 0 45 0;
#X connect 21 0 1 0;
#X connect 23 0 7 0;
#X connect 24 0 25 0;
#X connect 25 0 31 0;
#X connect 26 0 23 0;
#X connect 27 0 31 1;
#X connect 28 0 30 0;
#X connect 29 0 28 0;
#X connect 30 0 27 0;
#X connect 31 0 36 0;
#X connect 32 0 34 0;
#X connect 33 0 24 0;
#X connect 33 0 32 0;
#X connect 34 0 35 0;
#X connect 35 0 26 0;
#X connect 36 0 26 1;
#X connect 37 0 24 1;
#X connect 38 0 33 0;
#X connect 39 0 40 0;
#X connect 42 0 38 0;
#X connect 42 0 37 0;
#X connect 43 0 21 0;
#X connect 44 0 52 0;
#X connect 45 0 46 0;
#X connect 46 0 44 0;
#X connect 53 0 3 0;
#X connect 54 0 84 0;
#X connect 55 0 56 0;
#X connect 56 0 62 0;
#X connect 57 0 54 0;
#X connect 58 0 62 1;
#X connect 59 0 61 0;
#X connect 60 0 59 0;
#X connect 61 0 58 0;
#X connect 62 0 67 0;
#X connect 63 0 65 0;
#X connect 64 0 55 0;
#X connect 64 0 63 0;
#X connect 65 0 66 0;
#X connect 66 0 57 0;
#X connect 67 0 57 1;
#X connect 68 0 55 1;
#X connect 69 0 64 0;
#X connect 70 0 69 0;
#X connect 70 0 68 0;
#X connect 74 0 60 0;
#X connect 75 0 77 0;
#X connect 76 0 79 0;
#X connect 77 0 78 0;
#X connect 78 0 76 0;
#X connect 80 0 81 0;
#X connect 81 0 83 0;
#X connect 82 0 84 1;
#X connect 83 0 82 0;
#X connect 84 0 2 1;
#X connect 85 0 80 0;