#N canvas 226 109 327 263 10;
#X obj 181 185 tabread~ buf;
#X obj 44 220 tabwrite buf;
#X obj 182 219 dac~;
#X obj 71 160 f;
#X obj 180 144 *~ 1024;
#X obj 206 164 table buf 1024;
#X obj 44 139 t f b;
#X obj 100 160 + 4;
#X obj 115 135 unsig~;
#X obj 44 200 expr ($f1%3)-1;
#X obj 43 98 samphold~;
#X obj 44 118 env~;
#X obj 44 10 adc~;
#X obj 44 30 hip~ 20;
#X obj 100 180 % 1024;
#X obj 44 49 expr~ if(($v1*300)>0 \, 1 \, 0) \; int(($v1*300)%6)+2
;
#X obj 180 82 phasor~ 1;
#X connect 0 0 2 0;
#X connect 0 0 2 1;
#X connect 3 0 1 1;
#X connect 3 0 7 0;
#X connect 4 0 0 0;
#X connect 6 0 9 0;
#X connect 6 1 3 0;
#X connect 7 0 14 0;
#X connect 8 0 7 1;
#X connect 9 0 1 0;
#X connect 10 0 11 0;
#X connect 11 0 6 0;
#X connect 12 0 13 0;
#X connect 13 0 15 0;
#X connect 14 0 3 1;
#X connect 15 0 10 0;
#X connect 15 1 8 0;
#X connect 16 0 4 0;
#X connect 16 0 10 1;
