Fixed and upgraded my sample abstractions

svn path=/trunk/externals/tof/; revision=13739

1 files changed, 30 insertions, 17 deletions

diff --git a/tof/sample_shifft~-help.pd b/tof/sample_shifft~-help.pd
index b7d3c4e..91d9f0c 100644
--- a/tof/sample_shifft~-help.pd
+++ b/tof/sample_shifft~-help.pd
@@ -1,26 +1,39 @@
-#N canvas 109 159 710 482 10;
-#X obj 87 407 dac~;
+#N canvas 1793 81 774 691 10;
+#X obj 66 427 dac~;
 #X obj 28 181 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
 -1;
-#X obj 44 216 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+#X obj 44 216 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X floatatom 175 331 5 0 0 0 - - -;
+#X floatatom 122 250 5 0 0 0 - - -;
 #X text 48 180 Inlet 1 \, bang: Play sample once;
 #X text 63 213 Inlet 1 \, float: Start/stop playing looped sample;
 #X text 34 28 Description: Pitchshifts or timestretches a sample with
 the FFT method;
 #X text 32 58 Tags: Sound Sample Play;
 #X obj 458 120 tof/sample smpfft amen.wav;
-#X text 213 329 Inlet 2 \, float: Pitch (1=normal);
-#X obj 28 372 tof/sample_shifft~ smpfft;
-#X text 171 239 Inlet 1 \, duration float: Set duration in ms;
-#X text 163 268 Inlet 1 \, duration: Reset the duration;
-#X msg 93 267 duration;
-#X msg 75 241 duration 10000;
-#X connect 1 0 10 0;
-#X connect 2 0 10 0;
-#X connect 3 0 10 1;
-#X connect 10 0 0 0;
-#X connect 10 1 0 1;
-#X connect 13 0 10 0;
-#X connect 14 0 10 0;
+#X text 160 248 Inlet 2 \, float: Pitch (1=normal);
+#X obj 457 97 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X floatatom 281 281 5 0 0 0 - - -;
+#X text 319 280 Inlet 3 \, float: Duration in milliseconds;
+#X obj 285 313 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X text 320 311 Inlet 3 \, bang: Reset to original duration;
+#X obj 196 416 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 133 435 cyclone/Snapshot~ 100;
+#X floatatom 134 457 5 0 0 0 - - -;
+#X obj 38 363 tof/sample_shifft~ smpfft;
+#X text 171 458 Outlet 3 \, signal: progress;
+#X text 225 413 Outlet 4 \, bang: done;
+#X connect 1 0 18 0;
+#X connect 2 0 18 0;
+#X connect 3 0 18 1;
+#X connect 10 0 8 0;
+#X connect 11 0 18 2;
+#X connect 13 0 18 2;
+#X connect 16 0 17 0;
+#X connect 18 0 0 0;
+#X connect 18 1 0 1;
+#X connect 18 2 16 0;
+#X connect 18 3 15 0;