#N canvas 460 201 110 105 10;
#X obj 35 67 dac~;
#N canvas 610 284 508 366 sub 0;
#X obj 317 269 tabwrite~ \$0-bits;
#X obj 84 22 tabread~ \$0-bits;
#X obj 369 225 bang~;
#X obj 175 279 outlet~;
#X obj 175 167 mtof~;
#X obj 90 333 table \$0-bits 1;
#X obj 175 197 phasor~;
#X msg 278 198 0.5 \, 0 \$1;
#X obj 277 152 snapshot~;
#X obj 278 221 line~;
#X obj 190 333 block~ 3307;
#X obj 84 59 expr~ $v1 \; if (($v1*11)>5 \, 2*(int($v1*6.49))+52 \,
2*(int($v1*5.49))+53);
#X obj 277 176 expr 400-$f1;
#X obj 175 250 *~;
#X connect 1 0 11 0;
#X connect 2 0 0 0;
#X connect 2 0 8 0;
#X connect 4 0 6 0;
#X connect 4 0 8 0;
#X connect 6 0 0 0;
#X connect 6 0 13 0;
#X connect 7 0 9 0;
#X connect 8 0 12 0;
#X connect 9 0 13 1;
#X connect 11 1 4 0;
#X connect 12 0 7 0;
#X connect 13 0 3 0;
#X restore 46 18 pd sub;
#X connect 1 0 0 0;
#X connect 1 0 0 1;
