#N canvas 664 220 706 399 10; #X declare -lib Gem; #X obj 163 316 pix_texture; #N canvas 701 135 571 725 sync 0; #X obj 39 521 dac~; #X obj 39 356 vline~; #X obj 256 569 pix_film; #X obj 39 51 bng 15 250 50 0 \$0-load_video empty empty 17 7 0 10 -262144 -1 -1; #X obj 358 491 openpanel; #X msg 358 522 open \$1; #X obj 278 593 unpack f f f; #X obj 39 247 *; #X msg 39 269 \$1 50; #X obj 42 107 hsl 480 15 0 1 0 0 empty scratch empty -2 -8 0 10 -262144 -1 -1 0 1; #X obj 283 458 *; #X obj 283 372 snapshot~; #X obj 256 341 t a b; #X obj 283 416 /; #X obj 284 505 int; #X obj 284 527 change; #X obj 54 224 r \$0-samples; #X obj 298 436 r \$0-frames; #X obj 298 393 r \$0-samples; #X obj 278 615 s \$0-frames; #X obj 39 448 tabread4~ \$0-soundfile; #X text 32 725 Max Neupert \, GMU - Bauhaus-University Weimar 2009 ; #X obj 17 47 cnv 15 20 20 empty empty 3 6 10 0 14 -261234 -66577 0 ; #X obj 16 104 cnv 15 20 20 empty empty 4 6 10 0 14 -261234 -66577 0 ; #X obj 45 317 cnv 15 20 20 empty empty 4 6 10 0 14 -261234 -66577 0 ; #N canvas 0 50 258 187 init 0; #X obj -56 -11 declare -lib Gem; #X obj -56 12 loadbang; #X msg -57 35 \; pd dsp 1; #X connect 1 0 2 0; #X restore 458 11 pd init; #X obj 284 483 + 0.5; #X text 23 73 load video; #X text 24 132 scrub; #X obj 256 637 outlet; #X obj 113 51 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 105 73 start; #X msg 67 319 1 \, 3.9552e+006 82400 \;; #N canvas 762 50 284 234 start 0; #X obj 57 179 outlet; #X obj 57 82 pack f f; #X obj 57 105 trigger list bang bang; #X msg 186 142 set 1; #X msg 121 142 addcomma; #X msg 57 141 add \$2 \$1; #X obj 57 32 r \$0-miliseconds; #X obj 102 57 r \$0-samples; #X connect 1 0 2 0; #X connect 2 0 5 0; #X connect 2 1 4 0; #X connect 2 2 3 0; #X connect 3 0 0 0; #X connect 4 0 0 0; #X connect 5 0 0 0; #X connect 6 0 1 0; #X connect 7 0 1 1; #X restore 67 294 pd start; #X msg 167 242 833978 \, 3.9552e+006 65025.5 \;; #N canvas 224 390 374 520 scratch 0; #X obj 117 375 outlet; #X obj 117 232 pack f f; #X obj 117 255 trigger list bang bang; #X msg 181 292 addcomma; #X msg 117 291 add \$2 \$1; #X obj 123 101 r \$0-miliseconds; #X obj 187 151 r \$0-samples; #X obj 50 -6 inlet; #X text 33 -32 0 ---- 1; #X obj 108 172 *; #X obj 172 192 *; #X msg 246 334 set \$1; #X obj 246 308 f; #X obj 261 225 -; #X obj 49 21 - 1; #X obj 48 47 * -1; #X obj 261 255 * -1; #X obj 50 74 t f f; #X connect 1 0 2 0; #X connect 2 0 4 0; #X connect 2 1 3 0; #X connect 2 2 12 0; #X connect 3 0 0 0; #X connect 4 0 0 0; #X connect 5 0 9 1; #X connect 6 0 10 1; #X connect 6 0 13 1; #X connect 6 0 1 1; #X connect 7 0 14 0; #X connect 9 0 1 0; #X connect 10 0 13 0; #X connect 11 0 0 0; #X connect 12 0 11 0; #X connect 13 0 16 0; #X connect 14 0 15 0; #X connect 15 0 17 0; #X connect 16 0 12 1; #X connect 17 0 9 0; #X connect 17 1 10 0; #X restore 167 204 pd scratch; #X obj 113 131 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X text 105 153 start; #X obj 358 465 r \$0-load_video; #X obj 256 276 inlet; #X connect 1 0 11 0; #X connect 1 0 20 0; #X connect 2 0 29 0; #X connect 2 1 6 0; #X connect 4 0 5 0; #X connect 5 0 2 0; #X connect 6 0 19 0; #X connect 7 0 8 0; #X connect 8 0 1 0; #X connect 9 0 7 0; #X connect 9 0 35 0; #X connect 10 0 26 0; #X connect 11 0 13 0; #X connect 12 0 2 0; #X connect 12 1 11 0; #X connect 13 0 10 0; #X connect 14 0 15 0; #X connect 15 0 2 1; #X connect 16 0 7 1; #X connect 17 0 10 1; #X connect 18 0 13 1; #X connect 20 0 0 0; #X connect 20 0 0 1; #X connect 26 0 14 0; #X connect 30 0 32 0; #X connect 32 0 1 0; #X connect 33 0 32 0; #X connect 34 0 1 0; #X connect 35 0 34 0; #X connect 36 0 34 0; #X connect 38 0 4 0; #X connect 39 0 12 0; #X coords 0 -1 1 1 520 140 2 10 40; #X restore 163 138 pd sync; #N canvas 761 171 450 596 audio2ram 0; #X obj 48 338 soundfiler; #X obj 48 185 openpanel; #X obj 128 105 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 48 451 / 48; #X obj 48 359 t f f; #N canvas 0 50 450 300 sample 0; #N canvas 0 50 450 300 (subpatch) 0; #X array \$0-soundfile 3.9552e+006 float 2; #X coords 0 1 3.9552e+006 -1 200 140 1; #X restore 17 27 graph; #X restore 47 42 pd sample; #X text 114 44 Storage for the sample; #X text 221 136 loading the audio into the buffer; #X obj 67 260 symbol \$0-soundfile; #X obj 48 292 pack s s; #X msg 48 314 read -resize \$1 \$2; #X obj 75 398 s \$0-samples; #X obj 48 472 s \$0-miliseconds; #X text 107 130 load audio; #X obj 102 103 cnv 15 20 20 empty empty 2 6 10 0 14 -261234 -66577 0; #X obj 300 473 samplerate~; #X obj 300 448 loadbang; #X obj 300 280 soundfile_info; #X obj 300 349 / 1000; #X obj 48 208 t a b a; #X msg 300 251 read \$1; #X floatatom 300 376 5 0 0 0 - - -; #X obj 300 317 list split 1; #X connect 0 0 4 0; #X connect 1 0 19 0; #X connect 2 0 1 0; #X connect 3 0 12 0; #X connect 4 0 3 0; #X connect 4 1 11 0; #X connect 8 0 9 1; #X connect 9 0 10 0; #X connect 10 0 0 0; #X connect 16 0 15 0; #X connect 17 0 22 0; #X connect 18 0 3 1; #X connect 18 0 21 0; #X connect 19 0 9 0; #X connect 19 1 8 0; #X connect 19 2 20 0; #X connect 20 0 17 0; #X connect 22 0 18 0; #X coords 0 -1 1 1 85 60 2 100 100; #X restore 162 23 pd audio2ram; #X obj 163 117 gemhead; #X obj 163 92 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X text 184 91 blank; #N canvas 0 0 450 300 gemwin 0; #X obj 132 136 gemwin; #X obj 67 89 outlet; #X obj 67 10 inlet; #X msg 67 70 set destroy; #X msg 132 112 create \, 1; #X msg 198 112 destroy; #X msg 156 71 set create; #X obj 67 41 route create; #X connect 2 0 7 0; #X connect 3 0 1 0; #X connect 4 0 0 0; #X connect 5 0 0 0; #X connect 6 0 1 0; #X connect 7 0 3 0; #X connect 7 0 4 0; #X connect 7 1 6 0; #X connect 7 1 5 0; #X restore 369 78 pd gemwin; #X msg 369 40 create; #X text 365 19 Create window:; #X obj 163 351 rectangle 4 3; #X obj 81 27 loadbang; #X msg 81 58 1; #X obj 262 23 cnv 15 100 60 empty empty 1_>>>>> 20 12 0 14 -261234 -1 0; #X connect 0 0 9 0; #X connect 1 0 0 0; #X connect 3 0 1 0; #X connect 4 0 3 0; #X connect 6 0 7 0; #X connect 7 0 6 0; #X connect 10 0 11 0; #X connect 11 0 4 0; #X coords 0 399 1 398 60 20 0;