From 57045df5fe3ec557e57dc7434ac1a07b5521bffc Mon Sep 17 00:00:00 2001 From: Guenter Geiger Date: Mon, 29 Jul 2002 17:06:19 +0000 Subject: This commit was generated by cvs2svn to compensate for changes in r58, which included commits to RCS files with non-trunk default branches. svn path=/trunk/; revision=59 --- pd/doc/7.stuff/audio-playpen/qsample.pd | 114 ++++++++++++++++++++++++++++++++ 1 file changed, 114 insertions(+) create mode 100644 pd/doc/7.stuff/audio-playpen/qsample.pd (limited to 'pd/doc/7.stuff/audio-playpen/qsample.pd') diff --git a/pd/doc/7.stuff/audio-playpen/qsample.pd b/pd/doc/7.stuff/audio-playpen/qsample.pd new file mode 100644 index 00000000..bc4ebb2f --- /dev/null +++ b/pd/doc/7.stuff/audio-playpen/qsample.pd @@ -0,0 +1,114 @@ +#N canvas 0 9 731 358 10; +#X obj 483 52 inlet; +#X obj 386 66 inlet; +#X obj 314 78 inlet; +#X obj 223 42 inlet; +#X obj 152 63 inlet; +#X obj 75 38 inlet; +#X obj 19 48 inlet~; +#X text 11 33 audio in; +#X msg 250 268 0 5; +#X floatatom 299 217; +#X floatatom 386 87; +#X floatatom 223 60; +#X msg 152 81 bang; +#X text 152 47 button; +#X obj 39 354 outlet~; +#X graph sample1-graph 0 -1 88200 1 404 352 704 202; +#X array sample1 88200 float; +#X pop; +#X obj 19 91 tabwrite~ sample1; +#X msg 75 56 bang; +#X text 74 12 record; +#X text 75 22 button; +#X text 157 33 play; +#X obj 39 299 tabread4~ sample1; +#X obj 39 317 *~; +#X obj 174 313 line~; +#X obj 39 335 hip~ 5; +#X obj 199 235 del 5; +#X msg 169 266 0 5; +#X msg 199 266 1 5; +#X floatatom 316 116; +#X text 211 22 transpose; +#X obj 223 78 mtof; +#X text 386 50 length; +#X obj 223 96 t b f; +#X obj 223 114 8.1758; +#X obj 223 132 /; +#X obj 299 143 t b f; +#X obj 250 250 del 2000; +#X obj 299 179 * 1980; +#X obj 299 161 f 1; +#X text 304 52 beginning; +#X text 314 62 point; +#X obj 39 281 line~; +#X obj 73 205 f; +#X obj 22 243 + 88200; +#X obj 22 261 pack; +#X obj 110 261 * 2000; +#X text 482 26 read; +#X text 483 38 file; +#X obj 73 223 t f f b; +#X floatatom 110 280; +#X obj 110 243 f 1; +#X obj 89 182 * 44.1; +#X obj 483 91 openpanel; +#X msg 483 73 bang; +#X obj 386 110 min 1980; +#X obj 315 96 max 1; +#X obj 484 133 soundfiler; +#X msg 485 114 read \$1 sample1; +#X obj 299 198 max 6; +#X connect 0 0 53 0; +#X connect 1 0 10 0; +#X connect 2 0 55 0; +#X connect 3 0 11 0; +#X connect 4 0 12 0; +#X connect 5 0 17 0; +#X connect 6 0 16 0; +#X connect 8 0 23 0; +#X connect 9 0 36 1; +#X connect 10 0 54 0; +#X connect 11 0 30 0; +#X connect 12 0 26 0; +#X connect 12 0 25 0; +#X connect 12 0 36 0; +#X connect 17 0 16 0; +#X connect 21 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 22 1; +#X connect 24 0 14 0; +#X connect 25 0 27 0; +#X connect 25 0 42 0; +#X connect 26 0 23 0; +#X connect 27 0 23 0; +#X connect 28 0 51 0; +#X connect 30 0 32 0; +#X connect 32 0 33 0; +#X connect 32 1 34 1; +#X connect 33 0 34 0; +#X connect 34 0 38 0; +#X connect 34 0 50 1; +#X connect 35 0 38 0; +#X connect 35 1 37 1; +#X connect 36 0 8 0; +#X connect 37 0 58 0; +#X connect 38 0 37 0; +#X connect 41 0 21 0; +#X connect 42 0 48 0; +#X connect 43 0 44 0; +#X connect 44 0 41 0; +#X connect 45 0 44 1; +#X connect 45 0 49 0; +#X connect 48 0 43 0; +#X connect 48 1 41 0; +#X connect 48 2 50 0; +#X connect 50 0 45 0; +#X connect 51 0 42 1; +#X connect 52 0 57 0; +#X connect 53 0 52 0; +#X connect 54 0 35 0; +#X connect 55 0 28 0; +#X connect 57 0 56 0; +#X connect 58 0 9 0; -- cgit v1.2.1