From 89db37262cee46814540edef54a6db96096e1ee1 Mon Sep 17 00:00:00 2001 From: Thomas O Fredericks Date: Wed, 28 Oct 2009 13:28:46 +0000 Subject: Updated mtl abstractions svn path=/trunk/abstractions/mtl/; revision=12691 --- ambiZoomRead~.pd | 164 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 164 insertions(+) create mode 100644 ambiZoomRead~.pd (limited to 'ambiZoomRead~.pd') diff --git a/ambiZoomRead~.pd b/ambiZoomRead~.pd new file mode 100644 index 0000000..580da38 --- /dev/null +++ b/ambiZoomRead~.pd @@ -0,0 +1,164 @@ +#N canvas 462 92 957 600 10; +#X obj 155 264 readsf~ 2; +#X obj 232 261 readsf~ 2; +#X text 177 241 Front; +#X text 261 243 Rear; +#X msg 138 235 1; +#X obj 168 149 t b a; +#X msg 224 236 1; +#X obj 254 150 t b a; +#X obj 128 347 outlet~ FL; +#X obj 199 347 outlet~ FR; +#X obj 275 346 outlet~ RL; +#X obj 349 349 outlet~ RR; +#X obj 142 -17 inlet; +#N canvas 751 57 688 783 rm_extension 0; +#X obj 238 46 inlet list; +#X obj 406 647 outlet; +#X obj 175 641 outlet; +#X obj 221 358 t a a; +#X obj 166 503 list append 70 46 119 97 118; +#X obj 393 505 list append 82 46 119 97 118; +#X msg 352 85 helloF.wav; +#X obj 220 192 list trim; +#X obj 172 593 zexy/list2symbol; +#X obj 405 618 zexy/list2symbol; +#X obj 221 309 list split -5; +#X obj 220 215 hcs/ascii2int; +#X obj 393 537 int2ascii; +#X obj 167 533 int2ascii; +#X connect 0 0 7 0; +#X connect 3 0 4 0; +#X connect 3 1 5 0; +#X connect 4 0 13 0; +#X connect 5 0 12 0; +#X connect 6 0 7 0; +#X connect 7 0 11 0; +#X connect 8 0 2 0; +#X connect 9 0 1 0; +#X connect 10 0 3 0; +#X connect 11 0 10 0; +#X connect 12 0 9 0; +#X connect 13 0 8 0; +#X restore 79 36 pd rm_extension; +#X obj 148 194 spigot 1; +#X obj 232 201 spigot 1; +#X obj 288 15 route open autoplay play stop; +#X obj 348 229 t 0; +#X obj 167 83 symbol; +#X obj 360 79 symbol; +#X obj 332 52 t b b; +#X obj 310 -64 loadbang; +#X obj 499 200 print zoom.readsf~; +#X msg 439 315 done F; +#X msg 483 313 done R; +#X obj 439 351 outlet info; +#N canvas 132 192 636 647 wav_info 0; +#X msg 31 92 read \$1; +#X text 40 146 "read"-message needs a symbol (soundfile in wave format) +; +#X text 50 184 "list"-message output with 7 items; +#X text 91 224 4.item: header-size in bytes; +#X text 91 194 1.item: samplerate in Hz; +#X text 91 204 2.item: file-name; +#X text 91 234 5.item: number of channels; +#X text 91 254 7.item: endianness ("l" for little); +#X text 260 264 ("b" for big); +#X text 262 276 (eg. little endian "wav" is natural format on Intel-machines) +; +#X text 91 214 3.item: sound-data-length in samples; +#X text 91 244 6.item: sample-resolution in bytes; +#X obj 33 49 inlet; +#X obj 31 302 unpack f s f f f f s; +#X obj 26 489 outlet duration_ms; +#X text 132 49 NOTE: we could also use the wavinfo object.; +#X obj 180 482 outlet other_info; +#X msg 175 420 samplerate \$1; +#X msg 263 423 file_name \$1; +#X msg 348 423 header_size \$1; +#X msg 529 424 endianess \$1; +#X obj 31 166 iemlib/soundfile_info; +#X obj 37 434 ./smpToMs; +#X connect 0 0 21 0; +#X connect 12 0 0 0; +#X connect 13 0 17 0; +#X connect 13 1 18 0; +#X connect 13 2 22 0; +#X connect 13 3 19 0; +#X connect 13 6 20 0; +#X connect 17 0 16 0; +#X connect 18 0 16 0; +#X connect 19 0 16 0; +#X connect 20 0 16 0; +#X connect 21 0 13 0; +#X connect 22 0 14 0; +#X restore 767 182 pd wav_info; +#X text 783 200 duration (ms); +#X msg 645 378 duration \$1; +#X obj 740 428 timer; +#X obj 774 401 metro 50; +#X obj 787 349 sel 1; +#X msg 792 371 1; +#X obj 864 340 t b; +#X msg 844 379 0; +#X msg 669 468 elapsed \$1; +#X obj 775 293 f; +#X obj 310 -38 tof/arguments comma; +#X obj 168 115 cyclone/prepend open; +#X obj 320 116 cyclone/prepend open; +#X connect 0 0 8 0; +#X connect 0 1 9 0; +#X connect 0 2 23 0; +#X connect 0 2 33 0; +#X connect 1 0 10 0; +#X connect 1 1 11 0; +#X connect 1 2 24 0; +#X connect 1 2 33 0; +#X connect 4 0 0 0; +#X connect 5 0 14 0; +#X connect 5 1 0 0; +#X connect 5 1 22 0; +#X connect 6 0 1 0; +#X connect 6 0 36 0; +#X connect 7 0 15 0; +#X connect 7 1 1 0; +#X connect 7 1 22 0; +#X connect 12 0 16 0; +#X connect 13 0 18 0; +#X connect 13 1 19 0; +#X connect 14 0 4 0; +#X connect 15 0 6 0; +#X connect 16 0 13 0; +#X connect 16 1 15 1; +#X connect 16 1 14 1; +#X connect 16 2 20 0; +#X connect 16 3 17 0; +#X connect 17 0 1 0; +#X connect 17 0 0 0; +#X connect 17 0 36 0; +#X connect 18 0 38 0; +#X connect 19 0 26 0; +#X connect 19 0 39 0; +#X connect 20 0 6 0; +#X connect 20 0 4 0; +#X connect 20 1 19 0; +#X connect 20 1 18 0; +#X connect 21 0 37 0; +#X connect 23 0 25 0; +#X connect 24 0 25 0; +#X connect 26 0 28 0; +#X connect 26 1 25 0; +#X connect 28 0 25 0; +#X connect 29 0 35 0; +#X connect 30 0 29 1; +#X connect 31 0 29 0; +#X connect 31 0 32 0; +#X connect 31 1 33 0; +#X connect 32 0 30 0; +#X connect 33 0 34 0; +#X connect 34 0 30 0; +#X connect 35 0 25 0; +#X connect 36 0 31 0; +#X connect 37 0 16 0; +#X connect 38 0 5 0; +#X connect 39 0 7 0; -- cgit v1.2.1