#N canvas 402 22 954 771 10;
#X obj 51 105 soundfiler;
#X obj 51 61 openpanel;
#X obj 51 41 bng 15 250 50 0 empty empty select_audio_file 0 -6 0 8
-262144 -1 -1;
#X msg 51 83 read -resize \$1 audio;
#X floatatom 51 157 10 0 0 0 - - -;
#X obj 65 574 hsl 501 100 0 1 0 0 \$0-playpos-s \$0-playpos-r empty
-2 -6 0 8 -233017 -1 -355 0 1;
#N canvas 0 22 450 300 (subpatch) 0;
#X array audio 51723 float 2;
#X coords 0 1 51723 -1 500 100 1;
#X restore 65 574 graph;
#X obj 59 496 tabread4~ audio;
#X obj 59 518 dac~;
#X obj 51 176 value a_len;
#X obj 599 58 value a_sf;
#X msg 599 36 44100;
#X obj 599 14 loadbang;
#X obj 689 13 loadbang;
#X obj 689 57 value v_fr;
#N canvas 0 22 454 304 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 727 597 pd gemwin;
#X msg 727 577 destroy;
#X obj 328 336 gemhead;
#X obj 462 518 pix_texture;
#X obj 462 148 bng 15 250 50 0 empty empty select_video_file 0 -6 0
8 -262144 -1 -1;
#X floatatom 507 468 5 0 10000 1 frame# - -;
#X obj 462 168 openpanel;
#X msg 462 190 open \$1;
#X obj 462 540 rectangle 4 3;
#X obj 462 496 pix_film;
#X obj 171 459 snapshot~;
#X obj 328 358 t a b;
#X obj 171 518 s \$0-playpos-r;
#X obj 171 496 expr $f1/a_len;
#X text 590 -7 audio sfreq;
#X text 678 -5 video frate;
#X obj 507 446 f;
#X obj 271 496 expr int($f1/a_sf*v_fr+0.5);
#X obj 638 589 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X msg 657 580 \; pd dsp \$1;
#X text 729 560 gemwin;
#X text 667 558 audio;
#X msg 689 35 15;
#X obj 80 422 phasor~ 0.33;
#X obj 80 474 *~;
#X floatatom 80 396 5 0 0 0 - - -;
#X obj 124 341 expr 1/$f1;
#X text 175 319 (sampling rate);
#X obj 80 374 *;
#X obj 95 449 r \$0-length;
#X msg 81 253 1;
#X obj 81 228 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 126 176 s \$0-length;
#X obj 124 320 / 44100;
#X obj 128 202 r \$0-length;
#X text 599 -47 INITIALIZE;
#X text 51 -38 VIDEO + AUDIO PLAYER with adjustable speed;
#X text 50 -4 stc@basilar.net 2009;
#X obj 81 275 nbx 3 30 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 18
-1 -262144 -1 1 256;
#X text 150 281 PLAYBACK SPEED;
#X text 50 -20 based on some code snippets found on web;
#X connect 0 0 4 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X connect 4 0 9 0;
#X connect 4 0 47 0;
#X connect 7 0 8 0;
#X connect 11 0 10 0;
#X connect 12 0 11 0;
#X connect 13 0 37 0;
#X connect 15 0 16 0;
#X connect 16 0 15 0;
#X connect 17 0 26 0;
#X connect 18 0 23 0;
#X connect 19 0 21 0;
#X connect 20 0 24 1;
#X connect 21 0 22 0;
#X connect 22 0 24 0;
#X connect 24 0 18 0;
#X connect 25 0 28 0;
#X connect 25 0 32 0;
#X connect 26 0 24 0;
#X connect 26 1 25 0;
#X connect 28 0 27 0;
#X connect 31 0 20 0;
#X connect 32 0 31 0;
#X connect 33 0 34 0;
#X connect 37 0 14 0;
#X connect 38 0 39 0;
#X connect 39 0 7 0;
#X connect 39 0 25 0;
#X connect 40 0 38 0;
#X connect 41 0 43 1;
#X connect 43 0 40 0;
#X connect 44 0 39 1;
#X connect 45 0 53 0;
#X connect 46 0 45 0;
#X connect 48 0 41 0;
#X connect 49 0 46 0;
#X connect 49 0 48 0;
#X connect 53 0 43 0;