From e593b8e98687f93cced437c72c75e89608b8ce7a Mon Sep 17 00:00:00 2001 From: Franz Zotter Date: Mon, 28 Aug 2006 16:04:46 +0000 Subject: added multichannel soundfiler abstractions for reading and writing matrix rows into sound files. and some documentation for mtx_lin/logspace svn path=/trunk/externals/iem/iemmatrix/; revision=5763 --- abs/mtx_sfwrite.pd | 123 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 123 insertions(+) create mode 100644 abs/mtx_sfwrite.pd (limited to 'abs/mtx_sfwrite.pd') diff --git a/abs/mtx_sfwrite.pd b/abs/mtx_sfwrite.pd new file mode 100644 index 0000000..eaf3108 --- /dev/null +++ b/abs/mtx_sfwrite.pd @@ -0,0 +1,123 @@ +#N canvas 429 353 838 383 10; +#X obj 53 121 until 3; +#X obj 78 140 + 1; +#X text 425 51 reading multichannel soundfiles via soundfiler and dynamically +created table arrays into multichannel matrix; +#X obj 239 345 soundfiler; +#X obj 297 50 inlet; +#X obj 595 120 loadbang; +#X obj 401 285 t l; +#X obj 239 325 list trim; +#X obj 311 285 list prepend; +#X text 399 30 pd >=0.39-2; +#X obj 430 264 iem_send; +#N canvas 569 312 599 627 \$0-subpatch 0; +#X obj 100 100 table 1037-track1 3; +#X obj 100 120 table 1037-track2 3; +#X obj 100 140 table 1037-track3 3; +#X obj 100 160 table 1037-track4 3; +#X obj 100 180 table 1037-track5 3; +#X obj 100 200 table 1037-track6 3; +#X obj 100 220 table 1037-track7 3; +#X obj 100 240 table 1037-track8 3; +#X obj 100 260 table 1037-track9 3; +#X obj 100 280 table 1037-track10 3; +#X restore 430 285 pd \$0-subpatch; +#X obj 595 140 \$0; +#X obj 595 200 list trim; +#X obj 595 159 makefilename pd-%d-subpatch; +#X obj 595 180 list prepend set; +#X obj 34 23 inlet; +#X text 35 4 matrix; +#X obj 53 62 mtx_size; +#X text 235 50 filename; +#X obj 53 82 clip 1 64; +#X obj 53 224 mtx; +#X msg 53 204 row \$1; +#X obj 122 265 list prepend set; +#X obj 122 286 list trim; +#X obj 71 308 iem_send; +#X obj 53 244 list prepend 0; +#X obj 53 264 list trim; +#X msg 533 181 clear; +#X obj 430 142 until 3; +#X obj 469 181 * 20; +#X obj 501 181 + 80; +#X obj 430 201 makefilename \$0-track%d; +#X obj 430 122 t f b b; +#X obj 53 160 t f f; +#X obj 53 101 t f b f; +#X text 633 140 qualified subpatch; +#X text 427 78 dynamic table subpatch on dimension change; +#X obj 430 221 pack s 1 1; +#X msg 430 241 obj 100 \$2 table \$1 \$3; +#X msg 239 265 write -wave -bytes 4 \$1; +#X obj 239 305 list append; +#X obj 34 42 t b a a b; +#X text 396 15 requires iemlib \, iemmatrix; +#X msg 106 121 1; +#X obj 53 140 i; +#X msg 483 142 1; +#X obj 455 162 + 1; +#X obj 430 162 i; +#X obj 430 181 t f f; +#X text 102 5 writing matrix rows into multichannel; +#X text 102 22 audio files; +#X obj 239 245 symbol \$1; +#X text 535 28 \$1 ... filename; +#X obj 83 182 makefilename \$0-track%d; +#X connect 0 0 45 0; +#X connect 1 0 45 1; +#X connect 4 0 52 1; +#X connect 5 0 12 0; +#X connect 6 0 8 1; +#X connect 7 0 3 0; +#X connect 8 0 6 0; +#X connect 8 0 41 1; +#X connect 12 0 14 0; +#X connect 13 0 10 1; +#X connect 14 0 15 0; +#X connect 15 0 13 0; +#X connect 16 0 42 0; +#X connect 18 0 20 0; +#X connect 18 1 38 2; +#X connect 20 0 35 0; +#X connect 21 0 26 0; +#X connect 22 0 21 0; +#X connect 23 0 24 0; +#X connect 24 0 25 1; +#X connect 26 0 27 0; +#X connect 27 0 25 0; +#X connect 28 0 10 0; +#X connect 29 0 48 0; +#X connect 30 0 31 0; +#X connect 31 0 38 1; +#X connect 32 0 38 0; +#X connect 33 0 29 0; +#X connect 33 1 46 0; +#X connect 33 2 28 0; +#X connect 34 0 22 0; +#X connect 34 1 54 0; +#X connect 35 0 0 0; +#X connect 35 1 44 0; +#X connect 35 2 33 0; +#X connect 38 0 39 0; +#X connect 39 0 10 0; +#X connect 40 0 41 0; +#X connect 41 0 7 0; +#X connect 42 0 52 0; +#X connect 42 1 18 0; +#X connect 42 2 21 1; +#X connect 42 3 8 1; +#X connect 44 0 45 1; +#X connect 45 0 1 0; +#X connect 45 0 34 0; +#X connect 46 0 48 1; +#X connect 47 0 48 1; +#X connect 48 0 47 0; +#X connect 48 0 49 0; +#X connect 49 0 32 0; +#X connect 49 1 30 0; +#X connect 52 0 40 0; +#X connect 54 0 23 0; +#X connect 54 0 8 0; -- cgit v1.2.1