kbuffer~-help.pd

#N canvas 487 22 464 484 10;
#X obj 44 210 kbuffer~ 512 8000;
#X text 170 207 args: ksampling rate \, storage time (in ms.);
#N canvas 0 22 466 316 more-messages 0;
#X msg 238 89 size 4000;
#X obj 173 154 outlet;
#X text 170 212 reset size or srate;
#X msg 275 124 info;
#X msg 137 91 ksrate 1024;
#X connect 0 0 1 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X restore 302 170 pd more-messages;
#X msg 43 165 record;
#X msg 98 166 play;
#X msg 143 167 stop;
#X msg 186 167 speed \$1;
#X msg 261 167 loop;
#X obj 44 273 phasor~;
#X floatatom 160 258 5 0 0 0 - - -, f 5;
#X floatatom 26 136 5 0 0 2 kb-input kb-input -, f 5;
#X obj 82 363 hsl 128 15 300 1000 0 0 kb-input empty empty -2 -6 0
8 -261119 -1 -1 0 1;
#X floatatom 131 127 5 0 0 0 - - -, f 5;
#X msg 129 104 1;
#X obj 44 392 *~ 0.1;
#X obj 44 422 dac~;
#X obj 129 83 loadbang;
#X text 177 122 try different playback speed \, negative OK;
#X text 80 335 hit record \; then perform some wiggles here:;
#X text 187 150 after done recording \, hit loop or play;
#X obj 22 9 cnv 15 160 25 empty empty LyonPotpourri 20 12 1 18 -260097
-204786 0;
#X obj 44 308 killdc~;
#N canvas 0 22 222 238 monitor-phase 0;
#X obj 101 116 metro 100;
#X obj 101 97 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X obj 101 144 snapshot~;
#X obj 101 42 loadbang;
#X msg 101 67 1;
#X obj 101 179 outlet;
#X obj 15 48 inlet~;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 6 0 2 0;
#X restore 160 234 pd monitor-phase;
#X text 21 45 kbuffer~ lets you sample gestures with a lower sampling
rate than the audio rate., f 68;
#X connect 0 0 8 0;
#X connect 0 1 22 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 21 0;
#X connect 10 0 0 0;
#X connect 12 0 6 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 14 0 15 1;
#X connect 16 0 13 0;
#X connect 21 0 14 0;
#X connect 22 0 9 0;