chose/extra/tof/sample_record~.pd

#N canvas 654 129 1026 720 10;
#X obj 47 58 inlet~;
#X obj 142 53 inlet~;
#X obj 295 30 inlet off/on;
#X obj 456 51 loadbang;
#X obj 461 98 symbol \$1;
#X msg 483 125 sample \$1;
#X obj 269 351 spigot;
#X obj 579 209 > 1;
#X msg 462 284 set 0-\$1;
#X msg 598 281 set 1-\$1;
#X obj 295 644 tof/sample_packel;
#X msg 300 596 start 0 \, end \$1;
#X obj 305 65 route sample;
#X obj 498 158 tof/sample_unpack;
#X obj 121 402 tabwrite~;
#X obj 262 402 tabwrite~;
#X msg 182 295 stop;
#X obj 252 485 timer;
#X obj 355 538 min;
#X obj 110 244 t b b;
#X obj 109 215 sel 0;
#X obj 157 244 t b b b;
#N canvas 0 22 450 300 msToSmp 0;
#X obj 142 120 samplerate~;
#X obj 145 146 / 1000;
#X obj 62 214 * 44.1;
#X obj 62 93 t f b;
#X obj 63 37 inlet;
#X obj 60 256 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 1;
#X connect 2 0 5 0;
#X connect 3 0 2 0;
#X connect 3 1 0 0;
#X connect 4 0 3 0;
#X restore 258 515 pd msToSmp;
#X connect 0 0 14 0;
#X connect 1 0 15 0;
#X connect 2 0 12 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 10 1;
#X connect 5 0 13 0;
#X connect 6 0 15 0;
#X connect 7 0 6 1;
#X connect 8 0 14 0;
#X connect 9 0 15 0;
#X connect 11 0 10 0;
#X connect 12 0 4 0;
#X connect 12 1 20 0;
#X connect 13 2 8 0;
#X connect 13 2 9 0;
#X connect 13 3 7 0;
#X connect 13 6 18 1;
#X connect 16 0 6 0;
#X connect 16 0 14 0;
#X connect 17 0 22 0;
#X connect 18 0 11 0;
#X connect 19 0 16 0;
#X connect 19 1 17 1;
#X connect 20 0 19 0;
#X connect 20 1 21 0;
#X connect 21 0 14 0;
#X connect 21 0 6 0;
#X connect 21 1 4 0;
#X connect 21 2 17 0;
#X connect 22 0 18 0;