From b25f226536efda8462316c452daccf4a41231b43 Mon Sep 17 00:00:00 2001
From: Davide Morelli <morellid@users.sourceforge.net>
Date: Thu, 8 Dec 2005 16:32:22 +0000
Subject: adding example

svn path=/trunk/externals/frankenstein/; revision=4172
---
 patches/sampleplayer.pd | 80 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 80 insertions(+)
 create mode 100755 patches/sampleplayer.pd

(limited to 'patches/sampleplayer.pd')

diff --git a/patches/sampleplayer.pd b/patches/sampleplayer.pd
new file mode 100755
index 0000000..adf6c9d
--- /dev/null
+++ b/patches/sampleplayer.pd
@@ -0,0 +1,80 @@
+#N canvas -35 33 1009 703 12;
+#X obj 476 599 outlet~;
+#X obj 504 481 line~;
+#X obj 402 281 line~;
+#X obj 476 548 *~;
+#X msg 424 142 bang;
+#X obj 425 192 delay 5;
+#X text 477 142 <-- play the sample;
+#X text 349 223 sound off;
+#X msg 393 245 0 5;
+#X msg 612 32 1 \, 4.41e+008 1e+007 \;;
+#X msg 428 244 1 5;
+#X text 617 9 set line to play sample;
+#X obj 476 574 *~ 1;
+#X obj 394 42 table \$1-sampletable;
+#X obj 476 520 tabread4~ \$1-sampletable;
+#X obj 712 257 openpanel;
+#X obj 712 416 soundfiler;
+#X msg 712 230 bang;
+#X text 756 230 read file;
+#X obj 712 283 t s b;
+#X obj 751 318 symbol \$1-sampletable;
+#X msg 712 387 read -resize \$1 \$2;
+#X obj 712 356 pack s s;
+#X obj 713 196 inlet;
+#X obj 400 92 inlet;
+#X obj 103 139 inlet;
+#X obj 760 68 inlet;
+#X obj 658 196 symbol;
+#X obj 689 499 outlet;
+#X obj 172 141 inlet;
+#X obj 278 191 delay 10000;
+#X obj 492 418 pack 0 0;
+#X obj 551 388 * 4.41e+008;
+#X msg 492 283 bang;
+#X msg 501 449 \$1 \, \$2 1e+007 \;;
+#X obj 492 336 int 1;
+#X obj 250 142 inlet;
+#X obj 304 140 inlet;
+#X obj 551 336 float 1;
+#X obj 602 298 / 100;
+#X connect 1 0 14 0;
+#X connect 2 0 3 1;
+#X connect 3 0 12 0;
+#X connect 4 0 5 0;
+#X connect 4 0 8 0;
+#X connect 4 0 30 0;
+#X connect 5 0 9 0;
+#X connect 5 0 10 0;
+#X connect 5 0 33 0;
+#X connect 8 0 2 0;
+#X connect 10 0 2 0;
+#X connect 12 0 0 0;
+#X connect 14 0 3 0;
+#X connect 15 0 19 0;
+#X connect 15 0 28 0;
+#X connect 17 0 15 0;
+#X connect 19 0 22 0;
+#X connect 19 1 20 0;
+#X connect 20 0 22 1;
+#X connect 21 0 16 0;
+#X connect 22 0 21 0;
+#X connect 23 0 17 0;
+#X connect 24 0 4 0;
+#X connect 25 0 12 1;
+#X connect 26 0 27 0;
+#X connect 27 0 19 0;
+#X connect 27 0 28 0;
+#X connect 29 0 30 1;
+#X connect 30 0 8 0;
+#X connect 31 0 34 0;
+#X connect 32 0 31 1;
+#X connect 33 0 35 0;
+#X connect 33 0 38 0;
+#X connect 34 0 1 0;
+#X connect 35 0 31 0;
+#X connect 36 0 35 1;
+#X connect 37 0 39 0;
+#X connect 38 0 32 0;
+#X connect 39 0 38 0;
-- 
cgit v1.2.1