1 files changed, 150 insertions, 0 deletions
diff --git a/VCR.pd b/VCR.pd
new file mode 100644
index 0000000..6de44d3
--- /dev/null
+++ b/VCR.pd
@@ -0,0 +1,150 @@
+#N canvas 1079 50 947 563 10;
+#X obj 101 116 cnv 15 198 58 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 257 133 tgl 15 0 empty empty Autostart -14 -8 1 9 -195568 -1
+-1 1 1;
+#X obj 103 132 hradio 15 1 0 9 empty empty empty 4 -8 0 10 -195568
+-1 -1 4;
+#X obj -279 366 outlet;
+#X obj -279 -82 inlet;
+#X obj 195 -108 inlet;
+#X text 102 117 FRW -RW -0- Play FF;
+#X obj 105 157 hsl 128 15 0 1 0 0 empty empty Smoothing 132 10 1 9
+-195568 -1 -1 11600 0;
+#X obj 203 -24 route autostart smooth;
+#X obj 344 118 t b;
+#X obj 403 87 t b;
+#X msg 43 58 4;
+#X obj 462 97 t b;
+#X obj 521 96 t b;
+#X obj 580 115 t b;
+#X msg 262 222 autostart \$1;
+#X obj -215 364 outlet;
+#X msg 29 283 smooth \$1;
+#X msg -112 158 speed \$1;
+#X obj 444 194 f;
+#N canvas 128 137 974 631 VCR 0;
+#X obj -269 140 t a b;
+#X obj -153 134 r autostart\$0;
+#X obj 107 63 s autostart\$0;
+#X floatatom -36 469 5 0 0 0 - - -;
+#X text 5 468 Playback speed;
+#X obj -269 376 outlet;
+#X obj -269 -72 inlet;
+#X obj 205 -98 inlet;
+#X obj -36 493 outlet;
+#X text -254 81 catches the new filename and;
+#X text -254 98 starts playback (or not);
+#X obj 397 111 t b;
+#X obj 456 80 t b;
+#X msg -28 72 1;
+#X obj -28 196 metro 40;
+#X obj 515 90 t b;
+#X obj 574 89 t b;
+#X obj 633 108 t b;
+#X obj -36 441 change;
+#X obj 196 -15 route autostart smooth speed;
+#X obj -20 -23 loadbang;
+#X obj 83 405 t f f;
+#X obj -34 301 f;
+#X msg 397 137 -4;
+#X msg 515 134 0;
+#X msg 574 129 1;
+#X msg 456 106 -1;
+#X msg 633 136 4;
+#X obj 304 48 - 4;
+#X obj 397 55 route fastrewind rewind stop play fastforward;
+#X obj 65 295 clip 0 1;
+#X obj 64 317 pow 0.3;
+#X obj -35 348 expr $f3 + ((1-$f2) * ($f1-$f3));
+#X obj -240 185 zexy/demultiplex 0 1;
+#X msg -223 213 0;
+#X msg -112 218 1;
+#X obj -44 377 maxlib/split -0.01 0.01;
+#X msg -41 403 0;
+#X connect 0 0 5 0;
+#X connect 0 1 33 0;
+#X connect 1 0 33 1;
+#X connect 3 0 8 0;
+#X connect 6 0 0 0;
+#X connect 7 0 19 0;
+#X connect 11 0 23 0;
+#X connect 12 0 26 0;
+#X connect 13 0 14 0;
+#X connect 14 0 22 0;
+#X connect 15 0 24 0;
+#X connect 16 0 25 0;
+#X connect 17 0 27 0;
+#X connect 18 0 3 0;
+#X connect 19 0 2 0;
+#X connect 19 1 30 0;
+#X connect 19 2 28 0;
+#X connect 19 3 29 0;
+#X connect 20 0 13 0;
+#X connect 21 0 18 0;
+#X connect 21 1 32 2;
+#X connect 22 0 32 0;
+#X connect 23 0 22 1;
+#X connect 24 0 22 1;
+#X connect 25 0 22 1;
+#X connect 26 0 22 1;
+#X connect 27 0 22 1;
+#X connect 28 0 22 1;
+#X connect 29 0 11 0;
+#X connect 29 1 12 0;
+#X connect 29 2 15 0;
+#X connect 29 3 16 0;
+#X connect 29 4 17 0;
+#X connect 30 0 31 0;
+#X connect 31 0 32 1;
+#X connect 32 0 36 0;
+#X connect 33 0 34 0;
+#X connect 33 1 35 0;
+#X connect 34 0 22 1;
+#X connect 35 0 22 1;
+#X connect 36 0 37 0;
+#X connect 36 1 21 0;
+#X connect 37 0 21 0;
+#X restore -275 175 pd VCR;
+#X obj -13 -94 loadbang;
+#X msg 5 58 0.5;
+#X obj 344 62 route fastrewind rewind stop play fastforward;
+#X msg 344 144 -4;
+#X msg 403 113 -1;
+#X msg 462 141 0;
+#X msg 521 136 1;
+#X msg 580 143 4;
+#X connect 1 0 15 0;
+#X connect 2 0 18 0;
+#X connect 4 0 20 0;
+#X connect 5 0 8 0;
+#X connect 7 0 17 0;
+#X connect 8 0 1 0;
+#X connect 8 1 7 0;
+#X connect 8 2 23 0;
+#X connect 9 0 24 0;
+#X connect 10 0 25 0;
+#X connect 11 0 2 0;
+#X connect 12 0 26 0;
+#X connect 13 0 27 0;
+#X connect 14 0 28 0;
+#X connect 15 0 20 1;
+#X connect 17 0 20 1;
+#X connect 18 0 20 1;
+#X connect 19 0 2 0;
+#X connect 20 0 3 0;
+#X connect 20 1 16 0;
+#X connect 21 0 11 0;
+#X connect 21 0 22 0;
+#X connect 22 0 7 0;
+#X connect 23 0 9 0;
+#X connect 23 1 10 0;
+#X connect 23 2 12 0;
+#X connect 23 3 13 0;
+#X connect 23 4 14 0;
+#X connect 24 0 19 0;
+#X connect 25 0 19 0;
+#X connect 26 0 19 0;
+#X connect 27 0 19 0;
+#X connect 28 0 19 0;
+#X coords 0 -1 1 1 200 75 1 100 100;