From 257ee04252d7c298e2d7184f97a5ce29be9fe501 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Mon, 16 Nov 2009 22:11:44 +0000 Subject: readsf-based looper works with new fps framework, but still won't start playing on frame 0... svn path=/trunk/externals/framesync/; revision=12776 --- fsfilelooper~-help.pd | 26 ++++---- fsfilelooper~.pd | 164 +++++++++++++++++++++++++++----------------------- 2 files changed, 105 insertions(+), 85 deletions(-) diff --git a/fsfilelooper~-help.pd b/fsfilelooper~-help.pd index 1afec28..afa8f5b 100644 --- a/fsfilelooper~-help.pd +++ b/fsfilelooper~-help.pd @@ -1,13 +1,17 @@ -#N canvas 287 450 578 286 10; -#X text 15 109 frame counter; -#X text 173 92 start; -#X text 174 104 frame; -#X text 258 104 frame; -#X text 258 94 end; -#X text 69 143 audio out; -#X text 114 187 argument: filename startframe# endframe#; -#X text 45 20 loops a sound file between a startframe and endframe +#N canvas 293 407 578 286 10; +#X text 30 109 loops a sound file between a startframe and endframe ; -#X text 220 142 phasor (0-1) for position between startframe and endframe +#X obj 198 22 frameclock 100; +#X text 173 142 start; +#X text 174 154 frame; +#X text 258 154 frame; +#X text 258 144 end; +#X text 69 193 audio out; +#X text 114 237 argument: filename startframe# endframe#; +#X obj 88 220 dac~; +#X text 91 152 filename; +#X obj 96 171 fsfilelooper~ ../../sound/voice.wav 20 45; +#X text 220 192 line (0-1) for position between startframe and endframe ; -#X obj 96 121 fsfilelooper~ filename.wav 0 10; +#X connect 10 0 8 0; +#X connect 10 0 8 1; diff --git a/fsfilelooper~.pd b/fsfilelooper~.pd index 672435d..0788bb8 100644 --- a/fsfilelooper~.pd +++ b/fsfilelooper~.pd @@ -1,10 +1,8 @@ -#N canvas 395 422 715 368 10; -#X obj 265 11 inlet; -#X obj 300 36 loadbang; -#X obj 425 11 inlet; -#X obj 27 8 inlet; -#X text 67 8 frame #; -#X obj 129 318 outlet~; +#N canvas 897 548 605 420 10; +#X obj 265 21 inlet; +#X obj 180 42 loadbang; +#X obj 425 21 inlet; +#X obj 129 383 outlet~; #N canvas 679 332 352 429 play 0; #X obj 35 13 inlet; #X obj 90 375 outlet~; @@ -15,103 +13,121 @@ #X obj 79 95 spigot; #X obj 35 70 select 0; #X obj 35 47 trigger float float; -#X obj 178 138 symbol \$1; #X msg 178 263 open \$1; #X obj 178 207 pack symbol symbol; #X obj 178 230 zexy/makesymbol %s/%s; #X obj 178 184 ggee/getdir 2; #X obj 178 160 trigger bang anything; +#X obj 211 13 inlet; +#X obj 178 138 symbol; #X connect 0 0 8 0; #X connect 2 0 1 0; #X connect 2 1 6 0; #X connect 3 0 2 0; #X connect 4 0 2 0; #X connect 5 0 3 0; -#X connect 5 1 9 0; +#X connect 5 1 15 0; #X connect 6 0 5 0; #X connect 7 0 4 0; #X connect 7 1 6 0; #X connect 8 0 7 0; #X connect 8 1 6 1; -#X connect 9 0 14 0; -#X connect 10 0 2 0; -#X connect 11 0 12 0; +#X connect 9 0 2 0; +#X connect 10 0 11 0; +#X connect 11 0 9 0; #X connect 12 0 10 0; -#X connect 13 0 11 0; -#X connect 14 0 13 0; -#X connect 14 1 11 1; -#X restore 129 276 pd play sample; -#X obj 129 253 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 +#X connect 13 0 12 0; +#X connect 13 1 10 1; +#X connect 14 0 15 1; +#X connect 15 0 13 0; +#X restore 129 341 pd play sample; +#X obj 129 318 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; -#X obj 162 163 select; -#X msg 162 186 1; -#X obj 322 163 select; -#X msg 322 186 0; -#X text 319 13 start frame; -#X text 470 9 end frame; -#X msg 238 249 0 \, 1 \$1; -#X obj 196 185 float; -#X obj 238 318 outlet; -#X obj 238 273 line; -#N canvas 0 22 450 300 calc 0; +#X obj 162 198 select; +#X msg 162 221 1; +#X obj 322 198 select; +#X msg 322 221 0; +#X text 319 23 start frame; +#X text 470 19 end frame; +#X msg 238 314 0 \, 1 \$1; +#X obj 196 220 float; +#X obj 238 383 outlet; +#X obj 238 338 line; +#N canvas 258 306 450 300 calc 0; #X obj 89 12 inlet; #X obj 228 11 inlet; #X obj 152 273 outlet; #X obj 152 73 pack 0 0; #X msg 152 93 \$2 \$1; #X obj 152 115 -; -#X obj 203 154 receive TN_FPS_MS; #X floatatom 159 211 5 0 0 0 - - -; -#X obj 152 175 * 33.3333; -#X text 213 175 default to 30 fps; +#X obj 167 164 framesync/fps_ms; +#X obj 152 185 *; +#X obj 167 144 loadbang; #X connect 0 0 3 0; #X connect 1 0 3 1; #X connect 3 0 4 0; #X connect 4 0 5 0; #X connect 5 0 8 0; -#X connect 6 0 8 1; +#X connect 7 0 8 1; #X connect 8 0 2 0; -#X connect 8 0 7 0; -#X restore 223 163 pd calc time; -#X obj 99 164 select 0; -#X msg 99 184 0; -#X obj 300 59 trigger bang bang; -#X obj 265 86 purepd/float_argument \$2; -#X obj 425 86 purepd/float_argument \$3; -#X text 122 44 first arg is filename; -#X obj 416 168 receive TN_RESET; -#X obj 416 188 bang; -#X msg 416 210 0; -#X obj 32 165 delay 100; -#X obj 32 141 bang; -#X connect 0 0 22 0; -#X connect 1 0 21 0; -#X connect 2 0 23 0; -#X connect 3 0 8 0; -#X connect 3 0 10 0; -#X connect 3 0 19 0; -#X connect 3 0 29 0; -#X connect 6 0 5 0; -#X connect 7 0 6 0; -#X connect 8 0 9 0; -#X connect 8 0 15 0; +#X connect 8 0 6 0; #X connect 9 0 7 0; -#X connect 10 0 11 0; -#X connect 11 0 7 0; -#X connect 14 0 17 0; +#X restore 223 198 pd calc time; +#X obj 99 199 select 0; +#X msg 99 219 0; +#X obj 265 96 purepd/float_argument \$2; +#X obj 425 96 purepd/float_argument \$3; +#X text 126 22 first arg is filename; +#X obj 416 223 bang; +#X msg 416 245 0; +#X obj 32 200 delay 100; +#X obj 32 176 bang; +#X obj 32 139 receive framesync/frameclock; +#X text 29 122 current frame #; +#X obj 65 21 inlet; +#X obj 65 96 purepd/symbol_argument \$1; +#X obj 180 65 trigger bang bang bang; +#X floatatom 24 232 5 0 0 0 - - -; +#X obj 416 203 receive framesync/reset; +#X floatatom 239 223 5 0 0 0 - - -; +#X floatatom 275 123 5 0 0 0 - - -; +#X floatatom 431 123 5 0 0 0 - - -; +#X connect 0 0 19 0; +#X connect 1 0 30 0; +#X connect 2 0 20 0; +#X connect 4 0 3 0; +#X connect 5 0 4 0; +#X connect 6 0 7 0; +#X connect 6 0 13 0; +#X connect 7 0 5 0; +#X connect 8 0 9 0; +#X connect 9 0 5 0; +#X connect 12 0 15 0; +#X connect 13 0 12 0; #X connect 15 0 14 0; -#X connect 17 0 16 0; -#X connect 18 0 15 1; -#X connect 19 0 20 0; -#X connect 20 0 7 0; -#X connect 21 0 22 0; -#X connect 21 1 23 0; -#X connect 22 0 8 1; -#X connect 22 0 18 0; -#X connect 23 0 10 1; -#X connect 23 0 18 1; -#X connect 25 0 26 0; -#X connect 26 0 27 0; -#X connect 27 0 7 0; -#X connect 28 0 20 0; -#X connect 29 0 28 0; +#X connect 16 0 13 1; +#X connect 16 0 33 0; +#X connect 17 0 18 0; +#X connect 18 0 5 0; +#X connect 19 0 6 1; +#X connect 19 0 16 0; +#X connect 19 0 34 0; +#X connect 20 0 8 1; +#X connect 20 0 16 1; +#X connect 20 0 35 0; +#X connect 22 0 23 0; +#X connect 23 0 5 0; +#X connect 24 0 18 0; +#X connect 25 0 24 0; +#X connect 26 0 6 0; +#X connect 26 0 8 0; +#X connect 26 0 17 0; +#X connect 26 0 25 0; +#X connect 26 0 31 0; +#X connect 28 0 29 0; +#X connect 29 0 4 1; +#X connect 30 0 29 0; +#X connect 30 1 19 0; +#X connect 30 2 20 0; +#X connect 32 0 22 0; -- cgit v1.2.1