#N canvas 704 23 897 1005 10; #X obj 31 -10 cnv 15 800 40 empty empty SAMPLE_MANIPULATION 20 12 0 14 -175625 -66577 0; #X obj 37 111 openpanel; #N canvas 0 22 450 300 (subpatch) 0; #X array soundfile 944000 float 2; #X coords 0 1 944000 -1 200 140 1; #X restore 395 74 graph; #X obj 37 87 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 37 156 soundfiler; #X floatatom 37 178 7 0 0 1 Number_of_samples_in_file - -; #X obj 159 207 / 44.1; #X floatatom 159 232 7 0 0 1 Sound_File_length_in_ms - -; #X msg 183 260 \; dura range 0 \$1 \;; #X msg 714 68 \; pd dsp \$1 \;; #X obj 714 47 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #X obj 34 57 cnv 15 150 20 empty empty empty 20 12 0 14 -175625 -66577 0; #X text 49 57 Open Sound File; #X obj 41 330 cnv 15 190 20 empty empty empty 20 12 0 14 -175625 -66577 0; #X obj 46 382 tgl 15 0 empty empty playback_on/off 17 7 0 10 -262144 -1 -1 1 1; #X obj 46 427 metro; #X obj 46 469 pack f f f; #X obj 253 364 hsl 128 15 0 944000 0 0 empty sample Beginning_point -2 -8 0 10 -262144 -1 -1 6900 1; #X obj 261 396 hsl 128 15 0 944000 0 0 empty sample End_point -2 -8 0 10 -262144 -1 -1 5100 1; #X floatatom 250 494 7 0 0 0 - - -; #X msg 37 255 \; sample range 0 \$1 \;; #X msg 37 135 read -resize \$1 soundfile; #X obj 250 449 expr ($f2 - $f1) / 44.1; #X obj 258 421 t b f; #X text 297 494 duration of specified part; #X msg 46 522 \$1 0 \, \$2 \$3; #X obj 46 558 vline~; #X obj 46 584 tabread4~ soundfile; #X obj 73 402 r \$0-pb-speed; #X obj 250 602 s \$0-pb-speed; #X obj 264 526 hsl 128 15 0.01 2 0 0 empty empty playback_speed -2 -8 0 10 -262144 -1 -1 5000 1; #X obj 250 573 *; #X obj 261 549 t b f; #X obj 248 330 cnv 15 190 20 empty empty empty 20 12 0 14 -175625 -66577 0; #X text 48 331 Using [vline~] for playback; #X obj 46 684 *~; #N canvas 572 203 441 363 volume 0; #X obj 100 102 vsl 20 50 0 1 0 0 empty empty empty 0 -9 0 10 -262144 -1 -1 4900 1; #X obj 111 213 vline~; #X msg 111 187 \$1 20; #X obj 111 237 outlet~; #X obj 110 25 inlet; #X connect 0 0 2 0; #X connect 1 0 3 0; #X connect 2 0 1 0; #X connect 4 0 0 0; #X coords 0 -1 1 1 20 55 2 100 100; #X restore 75 620 pd volume; #X text 258 331 Control over sample playback; #X obj 43 774 dac~; #X obj 250 471 abs; #X obj 492 329 cnv 15 190 20 empty empty empty 20 12 0 14 -175625 -66577 0; #X text 511 329 Audio in; #X obj 535 362 adc~; #X obj 535 390 *~; #X obj 571 362 hsl 60 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 4700 1; #X obj 535 488 tabwrite~ soundfile; #X msg 552 440 bang; #X msg 568 464 stop; #X text 585 439 start recording; #X text 600 463 stop recording; #X obj 548 412 s~ \$0-rec2; #X obj 492 624 cnv 15 190 20 empty empty empty 20 12 0 14 -175625 -66577 0; #X text 511 624 Recording; #X msg 457 741 start; #X msg 497 741 stop; #X msg 544 675 open record16.wav; #X obj 544 815 writesf~ 2; #X obj 581 764 r~ \$0-rec1; #X obj 601 785 r~ \$0-rec2; #X msg 551 702 open -bytes 3 record24.wav; #X msg 558 729 open -bytes 4 record32.wav; #X text 458 700 start/stop; #X text 461 716 recording; #X text 544 835 writes recieved audio to a soundfile; #X text 619 412 Sends audio to recorder; #X obj 503 887 cnv 15 250 90 empty empty empty 20 12 0 14 -175625 -66577 0; #X text 513 937 Media Lab \, Department of Media; #X text 510 901 Composing With Data Flow Programming; #X text 512 924 SOPI Research Group; #X text 512 949 Aalto University School of ARTS; #X msg 737 134 \; soundfile normalize; #X connect 1 0 21 0; #X connect 3 0 1 0; #X connect 4 0 5 0; #X connect 5 0 6 0; #X connect 5 0 20 0; #X connect 6 0 7 0; #X connect 10 0 9 0; #X connect 14 0 15 0; #X connect 15 0 16 0; #X connect 16 0 25 0; #X connect 17 0 22 0; #X connect 17 0 16 0; #X connect 18 0 23 0; #X connect 18 0 16 1; #X connect 19 0 31 0; #X connect 21 0 4 0; #X connect 22 0 39 0; #X connect 23 0 22 0; #X connect 23 1 22 1; #X connect 25 0 26 0; #X connect 26 0 27 0; #X connect 27 0 35 0; #X connect 28 0 15 1; #X connect 28 0 16 2; #X connect 30 0 32 0; #X connect 31 0 29 0; #X connect 32 0 31 0; #X connect 32 1 31 1; #X connect 35 0 38 0; #X connect 35 0 38 1; #X connect 36 0 35 1; #X connect 39 0 19 0; #X connect 42 0 43 0; #X connect 43 0 45 0; #X connect 43 0 50 0; #X connect 44 0 43 1; #X connect 46 0 45 0; #X connect 47 0 45 0; #X connect 53 0 56 0; #X connect 54 0 56 0; #X connect 55 0 56 0; #X connect 57 0 56 0; #X connect 57 0 56 1; #X connect 58 0 56 0; #X connect 58 0 56 1; #X connect 59 0 56 0; #X connect 60 0 56 0;