From da201a3a6a4619925df69a14657e331a9aeb433c Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Sat, 30 Oct 2010 00:31:24 +0000
Subject: created readsf~ for framesync

svn path=/trunk/externals/framesync/; revision=14249
---
 fsreadsf~-help.pd |  24 ++++++++++
 fsreadsf~.pd      | 130 ++++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 154 insertions(+)
 create mode 100644 fsreadsf~-help.pd
 create mode 100644 fsreadsf~.pd

diff --git a/fsreadsf~-help.pd b/fsreadsf~-help.pd
new file mode 100644
index 0000000..5f743d6
--- /dev/null
+++ b/fsreadsf~-help.pd
@@ -0,0 +1,24 @@
+#N canvas 198 116 438 400 10;
+#X text 272 227 frame;
+#X text 313 263 bang when done;
+#X text 71 265 audio out;
+#X text 25 20 Plays a sound file til it ends \, synced up to the frame
+clock. Should stay in sync when randomly accessing different frame
+numbers.;
+#X text 96 227 name;
+#X text 271 216 start;
+#X obj 95 112 frameclock 400;
+#X obj 76 322 output~;
+#X obj 296 264 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X msg 108 82 78;
+#X msg 77 82 55;
+#X text 134 80 <-- try jumping to a frame;
+#X obj 95 243 fsreadsf~ ../../sound/voice.wav 40;
+#X text 177 308 arguments: soundfile startframe#;
+#X text 96 216 file;
+#X connect 9 0 6 0;
+#X connect 10 0 6 0;
+#X connect 12 0 7 0;
+#X connect 12 0 7 1;
+#X connect 12 1 8 0;
diff --git a/fsreadsf~.pd b/fsreadsf~.pd
new file mode 100644
index 0000000..6919c7b
--- /dev/null
+++ b/fsreadsf~.pd
@@ -0,0 +1,130 @@
+#N canvas 549 363 605 420 10;
+#X obj 280 21 inlet;
+#X obj 145 42 loadbang;
+#X obj 144 383 outlet~;
+#N canvas 998 355 601 426 play 0;
+#X obj 34 13 inlet;
+#X obj 90 375 outlet~;
+#X obj 90 336 readsf~;
+#X msg 79 301 1;
+#X msg 50 301 0;
+#X obj 34 70 select 0;
+#X obj 143 207 pack symbol symbol;
+#X obj 143 230 zexy/makesymbol %s/%s;
+#X obj 143 184 ggee/getdir 2;
+#X obj 143 160 trigger bang anything;
+#X obj 176 13 inlet;
+#X obj 143 138 symbol;
+#X obj 79 116 trigger bang bang bang;
+#X obj 143 282 pack symbol float;
+#X msg 143 303 open \$1 \$2;
+#N canvas 196 102 450 300 calc 0;
+#X obj 69 8 inlet;
+#X obj 73 266 outlet;
+#X obj 215 13 inlet;
+#X obj 356 13 inlet;
+#X text 254 13 start frame;
+#X text 405 9 end frame;
+#X text 101 12 filename;
+#X restore 242 260 pd calc position in soundfile;
+#X obj 325 13 inlet;
+#X obj 466 13 inlet;
+#X text 364 13 start frame;
+#X text 515 9 end frame;
+#X text 211 12 filename;
+#X connect 0 0 5 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X connect 4 0 2 0;
+#X connect 5 0 4 0;
+#X connect 5 1 12 0;
+#X connect 6 0 7 0;
+#X connect 7 0 13 0;
+#X connect 8 0 6 0;
+#X connect 9 0 8 0;
+#X connect 9 1 6 1;
+#X connect 10 0 11 1;
+#X connect 11 0 9 0;
+#X connect 12 0 3 0;
+#X connect 12 1 11 0;
+#X connect 12 2 15 0;
+#X connect 13 0 14 0;
+#X connect 14 0 2 0;
+#X connect 15 0 13 1;
+#X connect 16 0 15 1;
+#X connect 17 0 15 2;
+#X restore 144 341 pd play sample;
+#X obj 144 318 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
+1;
+#X obj 177 198 select;
+#X msg 177 221 1;
+#X text 334 23 start frame;
+#X msg 253 340 0 \, 1 \$1;
+#X obj 211 220 float;
+#X obj 253 383 outlet;
+#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 floatatom 159 211 5 0 0 0 - - -;
+#X obj 167 164 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 7 0 8 1;
+#X connect 8 0 2 0;
+#X connect 8 0 6 0;
+#X connect 9 0 7 0;
+#X restore 238 198 pd calc time;
+#X msg 32 281 0;
+#X obj 280 96 purepd/float_argument \$2;
+#X text 141 22 first arg is filename;
+#X obj 431 223 bang;
+#X msg 431 245 0;
+#X obj 32 176 bang;
+#X obj 32 139 receive framesync/frameclock;
+#X text 32 122 current frame #;
+#X obj 80 21 inlet;
+#X obj 80 96 purepd/symbol_argument \$1;
+#X obj 431 203 receive framesync/reset;
+#X obj 59 219 fps_ms;
+#X obj 32 260 delay;
+#X obj 59 198 loadbang;
+#X obj 59 240 * 2;
+#X obj 145 65 trigger bang bang;
+#X connect 0 0 13 0;
+#X connect 1 0 27 0;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 5 0 6 0;
+#X connect 5 0 9 0;
+#X connect 6 0 4 0;
+#X connect 8 0 10 0;
+#X connect 9 0 8 0;
+#X connect 11 0 9 1;
+#X connect 12 0 4 0;
+#X connect 12 0 3 0;
+#X connect 13 0 5 1;
+#X connect 13 0 11 0;
+#X connect 13 0 3 2;
+#X connect 15 0 16 0;
+#X connect 16 0 3 0;
+#X connect 17 0 24 0;
+#X connect 18 0 5 0;
+#X connect 18 0 17 0;
+#X connect 20 0 21 0;
+#X connect 21 0 3 1;
+#X connect 22 0 15 0;
+#X connect 23 0 26 0;
+#X connect 24 0 12 0;
+#X connect 25 0 23 0;
+#X connect 26 0 24 1;
+#X connect 27 0 21 0;
+#X connect 27 1 13 0;
-- 
cgit v1.2.1