SF.net SVN: pure-data:[10447] trunk/externals/iemlib/iemabs
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10447
http://pure-data.svn.sourceforge.net/pure-data/?rev=10447&view=rev
Author: tmusil
Date: 2008-12-11 19:47:25 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
single or double precision for filter~, lp1_d~ lp10_butt_d~
Modified Paths:
--------------
trunk/externals/iemlib/iemabs/lp10_butt~-help.pd
trunk/externals/iemlib/iemabs/lp1~-help.pd
trunk/externals/iemlib/iemabs/lp1~.pd
Added Paths:
-----------
trunk/externals/iemlib/iemabs/lp10_butt_d~-help.pd
trunk/externals/iemlib/iemabs/lp10_butt_d~.pd
trunk/externals/iemlib/iemabs/lp1_d~-help.pd
trunk/externals/iemlib/iemabs/lp1_d~.pd
trunk/externals/iemlib/iemabs/lp2c_d~.pd
Added: trunk/externals/iemlib/iemabs/lp10_butt_d~-help.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp10_butt_d~-help.pd (rev 0)
+++ trunk/externals/iemlib/iemabs/lp10_butt_d~-help.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -0,0 +1,56 @@
+#N canvas 608 71 405 456 10;
+#X text 2 232 ~signal_in~;
+#X text 27 20 dsp ON/OFF;
+#X floatatom 112 164 3 15 133 0 - - -;
+#X obj 112 183 mtof;
+#X floatatom 112 202 9 0 22000 0 - - -;
+#X text 176 203 Hz;
+#X text 57 261 ~signal_out~;
+#X floatatom 205 263 7 0 0 0 - - -;
+#X text 257 264 dB;
+#X floatatom 118 130 9 0 22000 0 - - -;
+#X text 182 131 Hz;
+#X floatatom 45 91 3 -15 133 0 - - -;
+#X floatatom 10 60 5 0 0 0 - - -;
+#X text 49 62 % cpu;
+#X floatatom 179 227 5 2 9999 0 - - -;
+#X text 220 228 ms;
+#X obj 10 40 dsp;
+#X obj 10 20 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1
+;
+#X obj 45 281 gainvu~ 300;
+#X obj 257 141 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
+#X obj 329 150 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
+-1 -1 8000 1;
+#X obj 45 110 testtone~ 200;
+#X obj 109 74 init 69;
+#X text 72 92 midi;
+#X text 40 329 1.arg:<float> cutoff_freq. [Hz];
+#X text 40 339 2.arg:<float> interpolation_time [ms];
+#X floatatom 305 298 7 0 0 0 - - -;
+#X text 357 299 dB;
+#X text 157 246 <- double-click;
+#X text 106 395 IEM KUG;
+#X text 90 383 musil;
+#X text 120 383 @;
+#X text 126 383 iem.at;
+#X text 89 405 Graz \, Austria;
+#X text 81 -5 lowpass 10.order with butterworth characteristic;
+#X text 5 -5 lp10_butt~;
+#X text 41 372 (c) Thomas Musil 2000 - 2008;
+#X obj 45 247 lp10_butt_d~ 440 200;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 37 1;
+#X connect 11 0 21 0;
+#X connect 14 0 37 2;
+#X connect 16 0 12 0;
+#X connect 17 0 16 0;
+#X connect 18 1 26 0;
+#X connect 18 2 19 0;
+#X connect 19 1 7 0;
+#X connect 20 0 18 1;
+#X connect 21 0 37 0;
+#X connect 21 1 9 0;
+#X connect 22 0 11 0;
+#X connect 37 0 18 0;
Added: trunk/externals/iemlib/iemabs/lp10_butt_d~.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp10_butt_d~.pd (rev 0)
+++ trunk/externals/iemlib/iemabs/lp10_butt_d~.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -0,0 +1,40 @@
+#N canvas 350 22 416 312 10;
+#X obj 22 42 inlet~;
+#X obj 53 66 inlet;
+#X obj 22 230 outlet~;
+#X text 62 42 ~signal_in~;
+#X text 90 67 <float> cutoff_frequency [Hz];
+#X text 183 86 <float> interpolation_time [ms];
+#X text 33 208 ~filtered signal_out~;
+#X obj 149 86 inlet;
+#X text 5 5 lp10_butt~;
+#X text 81 5 lowpass 10.order with butterworth characteristic;
+#X text 86 226 1.arg: <float> cutoff_frequency [Hz];
+#X text 86 236 2.arg: <float> interpolation_time [ms] (opt.);
+#X text 176 275 IEM KUG;
+#X text 160 263 musil;
+#X text 190 263 @;
+#X text 196 263 iem.at;
+#X text 111 252 (c) Thomas Musil 2000 - 2005;
+#X text 159 285 Graz \, Austria;
+#X obj 22 107 lp2c_d~ \$1 0.312869 1 \$2;
+#X obj 22 127 lp2c_d~ \$1 0.907981 1 \$2;
+#X obj 22 146 lp2c_d~ \$1 1.41421 1 \$2;
+#X obj 22 167 lp2c_d~ \$1 1.78201 1 \$2;
+#X obj 22 187 lp2c_d~ \$1 1.97538 1 \$2;
+#X connect 0 0 18 0;
+#X connect 1 0 18 1;
+#X connect 7 0 18 4;
+#X connect 18 0 19 0;
+#X connect 18 1 19 1;
+#X connect 18 4 19 4;
+#X connect 19 0 20 0;
+#X connect 19 1 20 1;
+#X connect 19 4 20 4;
+#X connect 20 0 21 0;
+#X connect 20 1 21 1;
+#X connect 20 4 21 4;
+#X connect 21 0 22 0;
+#X connect 21 1 22 1;
+#X connect 21 4 22 4;
+#X connect 22 0 2 0;
Modified: trunk/externals/iemlib/iemabs/lp10_butt~-help.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp10_butt~-help.pd 2008-12-11 19:43:26 UTC (rev 10446)
+++ trunk/externals/iemlib/iemabs/lp10_butt~-help.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -1,59 +1,56 @@
-#N canvas 280 180 397 448 10;
-#X text 2 232 ~signal_in~;
-#X text 27 20 dsp ON/OFF;
-#X floatatom 96 164 3 15 133 0 - - -;
-#X obj 96 183 mtof;
-#X floatatom 96 202 9 0 22000 0 - - -;
-#X text 160 203 Hz;
-#X text 57 261 ~signal_out~;
-#X floatatom 205 263 7 0 0 0 - - -;
-#X text 257 264 dB;
-#X floatatom 118 130 9 0 22000 0 - - -;
-#X text 182 131 Hz;
-#X floatatom 45 91 3 15 133 0 - - -;
-#X floatatom 10 60 5 0 0 0 - - -;
-#X text 49 62 % cpu;
-#X floatatom 148 227 5 2 9999 0 - - -;
-#X text 189 228 ms;
-#X obj 10 40 dsp;
-#X obj 10 20 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1
-;
-#X obj 45 306 dac~;
-#X obj 45 281 gainvu~ 300;
-#X obj 257 141 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
-#X obj 329 150 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
--1 -1 8000 1;
-#X obj 45 110 testtone~ 200;
-#X obj 109 74 init 69;
-#X text 72 92 midi;
-#X text 40 329 1.arg:<float> cutoff_freq. [Hz];
-#X text 40 339 2.arg:<float> interpolation_time [ms];
-#X floatatom 305 298 7 0 0 0 - - -;
-#X text 357 299 dB;
-#X text 157 246 <- double-click;
-#X obj 45 247 lp10_butt~ 440 200;
-#X text 106 395 IEM KUG;
-#X text 90 383 musil;
-#X text 120 383 @;
-#X text 126 383 iem.at;
-#X text 41 372 (c) Thomas Musil 2000 - 2005;
-#X text 89 405 Graz \, Austria;
-#X text 81 -5 lowpass 10.order with butterworth characteristic;
-#X text 5 -5 lp10_butt~;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 30 1;
-#X connect 11 0 22 0;
-#X connect 14 0 30 2;
-#X connect 16 0 12 0;
-#X connect 17 0 16 0;
-#X connect 19 0 18 0;
-#X connect 19 0 18 1;
-#X connect 19 1 27 0;
-#X connect 19 2 20 0;
-#X connect 20 1 7 0;
-#X connect 21 0 19 1;
-#X connect 22 0 30 0;
-#X connect 22 1 9 0;
-#X connect 23 0 11 0;
-#X connect 30 0 19 0;
+#N canvas 1033 70 405 456 10;
+#X text 2 232 ~signal_in~;
+#X text 27 20 dsp ON/OFF;
+#X floatatom 96 164 3 15 133 0 - - -;
+#X obj 96 183 mtof;
+#X floatatom 96 202 9 0 22000 0 - - -;
+#X text 160 203 Hz;
+#X text 57 261 ~signal_out~;
+#X floatatom 205 263 7 0 0 0 - - -;
+#X text 257 264 dB;
+#X floatatom 118 130 9 0 22000 0 - - -;
+#X text 182 131 Hz;
+#X floatatom 45 91 3 -15 133 0 - - -;
+#X floatatom 10 60 5 0 0 0 - - -;
+#X text 49 62 % cpu;
+#X floatatom 148 227 5 2 9999 0 - - -;
+#X text 189 228 ms;
+#X obj 10 40 dsp;
+#X obj 10 20 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1
+;
+#X obj 45 281 gainvu~ 300;
+#X obj 257 141 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
+#X obj 329 150 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
+-1 -1 8000 1;
+#X obj 45 110 testtone~ 200;
+#X obj 109 74 init 69;
+#X text 72 92 midi;
+#X text 40 329 1.arg:<float> cutoff_freq. [Hz];
+#X text 40 339 2.arg:<float> interpolation_time [ms];
+#X floatatom 305 298 7 0 0 0 - - -;
+#X text 357 299 dB;
+#X text 157 246 <- double-click;
+#X obj 45 247 lp10_butt~ 440 200;
+#X text 106 395 IEM KUG;
+#X text 90 383 musil;
+#X text 120 383 @;
+#X text 126 383 iem.at;
+#X text 89 405 Graz \, Austria;
+#X text 81 -5 lowpass 10.order with butterworth characteristic;
+#X text 5 -5 lp10_butt~;
+#X text 41 372 (c) Thomas Musil 2000 - 2008;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 29 1;
+#X connect 11 0 21 0;
+#X connect 14 0 29 2;
+#X connect 16 0 12 0;
+#X connect 17 0 16 0;
+#X connect 18 1 26 0;
+#X connect 18 2 19 0;
+#X connect 19 1 7 0;
+#X connect 20 0 18 1;
+#X connect 21 0 29 0;
+#X connect 21 1 9 0;
+#X connect 22 0 11 0;
+#X connect 29 0 18 0;
Added: trunk/externals/iemlib/iemabs/lp1_d~-help.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp1_d~-help.pd (rev 0)
+++ trunk/externals/iemlib/iemabs/lp1_d~-help.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -0,0 +1,56 @@
+#N canvas 257 125 385 468 10;
+#X text 13 245 ~signal_in~;
+#X text 38 33 dsp ON/OFF;
+#X floatatom 103 164 3 15 133 0 - - -;
+#X obj 103 183 mtof;
+#X floatatom 103 202 9 0 22000 0 - - -;
+#X text 167 203 Hz;
+#X text 68 274 ~signal_out~;
+#X floatatom 195 258 7 0 0 0 - - -;
+#X text 246 259 dB;
+#X floatatom 129 143 9 0 22000 0 - - -;
+#X text 193 144 Hz;
+#X floatatom 56 104 3 15 133 0 - - -;
+#X floatatom 21 73 5 0 0 0 - - -;
+#X text 60 74 % cpu;
+#X floatatom 149 235 5 2 9999 0 - - -;
+#X text 190 236 ms;
+#X obj 21 53 dsp;
+#X obj 21 33 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 1 1
+;
+#X obj 56 294 gainvu~ 300;
+#X obj 234 136 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
+#X obj 295 163 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
+-1 -1 8000 1;
+#X obj 56 123 testtone~ 200;
+#X obj 120 89 init 69;
+#X text 83 105 midi;
+#X text 21 344 1.arg:<float> cutoff_freq. [Hz];
+#X text 21 354 2.arg:<float> interpolation_time [ms];
+#X floatatom 266 309 7 0 0 0 - - -;
+#X text 317 310 dB;
+#X obj 13 13 cnv 8 1 1 empty empty lp1_d~ 1 2 1 18 -262144 -1109 0
+;
+#X text 106 415 IEM KUG;
+#X text 90 403 musil;
+#X text 120 403 @;
+#X text 126 403 iem.at;
+#X text 89 425 Graz \, Austria;
+#X text 83 6 lowpass 1.order with double precission;
+#X obj 56 260 lp1_d~ 440 200;
+#X text 41 391 (c) Thomas Musil 2000 - 2008;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 35 1;
+#X connect 11 0 21 0;
+#X connect 14 0 35 2;
+#X connect 16 0 12 0;
+#X connect 17 0 16 0;
+#X connect 18 1 26 0;
+#X connect 18 2 19 0;
+#X connect 19 1 7 0;
+#X connect 20 0 18 1;
+#X connect 21 0 35 0;
+#X connect 21 1 9 0;
+#X connect 22 0 11 0;
+#X connect 35 0 18 0;
Added: trunk/externals/iemlib/iemabs/lp1_d~.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp1_d~.pd (rev 0)
+++ trunk/externals/iemlib/iemabs/lp1_d~.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -0,0 +1,24 @@
+#N canvas 327 244 391 297 10;
+#X obj 22 42 inlet~;
+#X obj 52 63 inlet;
+#X obj 22 186 outlet~;
+#X text 62 42 ~signal_in~;
+#X text 89 64 <float> cutoff_frequency [Hz];
+#X obj 143 85 inlet;
+#X text 181 84 <float> interpolation_time [ms];
+#X text 32 153 ~filtered signal_out~;
+#X text 92 192 2.arg: <float> interpolation_time [ms] (opt.);
+#X text 92 182 1.arg: <float> cutoff_frequency [Hz];
+#X text 176 245 IEM KUG;
+#X text 160 233 musil;
+#X text 190 233 @;
+#X text 196 233 iem.at;
+#X text 159 255 Graz \, Austria;
+#X obj 22 123 filter~ dlp1 \$1 1 0 \$2;
+#X text 12 7 lp1_d~;
+#X text 60 8 lowpass 1.order with double precission;
+#X text 111 222 (c) Thomas Musil 2000 - 2008;
+#X connect 0 0 15 0;
+#X connect 1 0 15 1;
+#X connect 5 0 15 4;
+#X connect 15 0 2 0;
Modified: trunk/externals/iemlib/iemabs/lp1~-help.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp1~-help.pd 2008-12-11 19:43:26 UTC (rev 10446)
+++ trunk/externals/iemlib/iemabs/lp1~-help.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -1,58 +1,55 @@
-#N canvas 257 125 381 464 10;
-#X text 13 245 ~signal_in~;
-#X text 38 33 dsp ON/OFF;
-#X floatatom 89 162 3 15 133 0 - - -;
-#X obj 89 181 mtof;
-#X floatatom 89 200 9 0 22000 0 - - -;
-#X text 153 201 Hz;
-#X text 68 274 ~signal_out~;
-#X floatatom 195 258 7 0 0 0 - - -;
-#X text 246 259 dB;
-#X floatatom 129 143 9 0 22000 0 - - -;
-#X text 193 144 Hz;
-#X floatatom 56 104 3 15 133 0 - - -;
-#X floatatom 21 73 5 0 0 0 - - -;
-#X text 60 74 % cpu;
-#X floatatom 123 235 5 2 9999 0 - - -;
-#X text 164 236 ms;
-#X obj 21 53 dsp;
-#X obj 21 33 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1
-;
-#X obj 56 319 dac~;
-#X obj 56 294 gainvu~ 300;
-#X obj 234 136 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
-#X obj 295 163 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
--1 -1 8000 1;
-#X obj 56 123 testtone~ 200;
-#X obj 120 89 init 69;
-#X text 83 105 midi;
-#X text 21 344 1.arg:<float> cutoff_freq. [Hz];
-#X text 21 354 2.arg:<float> interpolation_time [ms];
-#X obj 56 260 lp1~ 440 200;
-#X floatatom 266 309 7 0 0 0 - - -;
-#X text 317 310 dB;
-#X obj 13 13 cnv 8 1 1 empty empty lp1~ 1 2 1 18 -262144 -1109 0;
-#X text 83 6 lowpass 1.order;
-#X text 106 415 IEM KUG;
-#X text 90 403 musil;
-#X text 120 403 @;
-#X text 126 403 iem.at;
-#X text 41 392 (c) Thomas Musil 2000 - 2005;
-#X text 89 425 Graz \, Austria;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
-#X connect 4 0 27 1;
-#X connect 11 0 22 0;
-#X connect 14 0 27 2;
-#X connect 16 0 12 0;
-#X connect 17 0 16 0;
-#X connect 19 0 18 0;
-#X connect 19 0 18 1;
-#X connect 19 1 28 0;
-#X connect 19 2 20 0;
-#X connect 20 1 7 0;
-#X connect 21 0 19 1;
-#X connect 22 0 27 0;
-#X connect 22 1 9 0;
-#X connect 23 0 11 0;
-#X connect 27 0 19 0;
+#N canvas 730 124 385 468 10;
+#X text 13 245 ~signal_in~;
+#X text 38 33 dsp ON/OFF;
+#X floatatom 94 162 3 15 133 0 - - -;
+#X obj 94 181 mtof;
+#X floatatom 94 200 9 0 22000 0 - - -;
+#X text 153 201 Hz;
+#X text 68 274 ~signal_out~;
+#X floatatom 195 258 7 0 0 0 - - -;
+#X text 246 259 dB;
+#X floatatom 129 143 9 0 22000 0 - - -;
+#X text 193 144 Hz;
+#X floatatom 56 104 3 15 133 0 - - -;
+#X floatatom 21 73 5 0 0 0 - - -;
+#X text 60 74 % cpu;
+#X floatatom 134 235 5 2 9999 0 - - -;
+#X text 175 236 ms;
+#X obj 21 53 dsp;
+#X obj 21 33 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 0 1
+;
+#X obj 56 294 gainvu~ 300;
+#X obj 234 136 vu 15 120 empty empty 8 -8 0 10 -66577 -1 1 0;
+#X obj 295 163 vsl 15 128 0 127 0 1 empty empty empty 8 -8 0 10 -262144
+-1 -1 8000 1;
+#X obj 56 123 testtone~ 200;
+#X obj 120 89 init 69;
+#X text 83 105 midi;
+#X text 21 344 1.arg:<float> cutoff_freq. [Hz];
+#X text 21 354 2.arg:<float> interpolation_time [ms];
+#X obj 56 260 lp1~ 440 200;
+#X floatatom 266 309 7 0 0 0 - - -;
+#X text 317 310 dB;
+#X obj 13 13 cnv 8 1 1 empty empty lp1~ 1 2 1 18 -262144 -1109 0;
+#X text 83 6 lowpass 1.order;
+#X text 106 415 IEM KUG;
+#X text 90 403 musil;
+#X text 120 403 @;
+#X text 126 403 iem.at;
+#X text 89 425 Graz \, Austria;
+#X text 41 392 (c) Thomas Musil 2000 - 2008;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 26 1;
+#X connect 11 0 21 0;
+#X connect 14 0 26 2;
+#X connect 16 0 12 0;
+#X connect 17 0 16 0;
+#X connect 18 1 27 0;
+#X connect 18 2 19 0;
+#X connect 19 1 7 0;
+#X connect 20 0 18 1;
+#X connect 21 0 26 0;
+#X connect 21 1 9 0;
+#X connect 22 0 11 0;
+#X connect 26 0 18 0;
Modified: trunk/externals/iemlib/iemabs/lp1~.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp1~.pd 2008-12-11 19:43:26 UTC (rev 10446)
+++ trunk/externals/iemlib/iemabs/lp1~.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -1,24 +1,24 @@
-#N canvas 327 244 379 285 10;
-#X obj 22 42 inlet~;
-#X obj 52 63 inlet;
-#X obj 22 186 outlet~;
-#X text 62 42 ~signal_in~;
-#X text 89 64 <float> cutoff_frequency [Hz];
-#X text 12 7 lp1~;
-#X obj 22 123 filter~ lp1 \$1 1 0 \$2;
-#X obj 143 85 inlet;
-#X text 181 84 <float> interpolation_time [ms];
-#X text 60 8 lowpass 1.order;
-#X text 32 153 ~filtered signal_out~;
-#X text 92 192 2.arg: <float> interpolation_time [ms] (opt.);
-#X text 92 182 1.arg: <float> cutoff_frequency [Hz];
-#X text 176 245 IEM KUG;
-#X text 160 233 musil;
-#X text 190 233 @;
-#X text 196 233 iem.at;
-#X text 111 222 (c) Thomas Musil 2000 - 2005;
-#X text 159 255 Graz \, Austria;
-#X connect 0 0 6 0;
-#X connect 1 0 6 1;
-#X connect 6 0 2 0;
-#X connect 7 0 6 4;
+#N canvas 327 244 383 289 10;
+#X obj 22 42 inlet~;
+#X obj 52 63 inlet;
+#X obj 22 186 outlet~;
+#X text 62 42 ~signal_in~;
+#X text 89 64 <float> cutoff_frequency [Hz];
+#X text 12 7 lp1~;
+#X obj 22 123 filter~ lp1 \$1 1 0 \$2;
+#X obj 143 85 inlet;
+#X text 181 84 <float> interpolation_time [ms];
+#X text 60 8 lowpass 1.order;
+#X text 32 153 ~filtered signal_out~;
+#X text 92 192 2.arg: <float> interpolation_time [ms] (opt.);
+#X text 92 182 1.arg: <float> cutoff_frequency [Hz];
+#X text 176 245 IEM KUG;
+#X text 160 233 musil;
+#X text 190 233 @;
+#X text 196 233 iem.at;
+#X text 159 255 Graz \, Austria;
+#X text 111 222 (c) Thomas Musil 2000 - 2008;
+#X connect 0 0 6 0;
+#X connect 1 0 6 1;
+#X connect 6 0 2 0;
+#X connect 7 0 6 4;
Added: trunk/externals/iemlib/iemabs/lp2c_d~.pd
===================================================================
--- trunk/externals/iemlib/iemabs/lp2c_d~.pd (rev 0)
+++ trunk/externals/iemlib/iemabs/lp2c_d~.pd 2008-12-11 19:47:25 UTC (rev 10447)
@@ -0,0 +1,40 @@
+#N canvas 400 218 417 389 10;
+#X obj 22 42 inlet~;
+#X obj 56 63 inlet;
+#X obj 22 194 outlet~;
+#X text 62 42 ~signal_in~;
+#X text 93 64 <float> cutoff_frequency [Hz];
+#X obj 91 87 inlet;
+#X text 195 136 <float> interpolation_time [ms];
+#X text 32 176 ~filtered signal_out~;
+#X obj 126 111 inlet;
+#X text 12 8 lp2c~;
+#X text 60 8 lowpass 2.order for filter-cascades;
+#X obj 161 136 inlet;
+#X text 127 87 <float> damping [-];
+#X text 162 111 <float> frequency-shift [-];
+#X obj 56 211 outlet;
+#X obj 88 236 outlet;
+#X obj 119 255 outlet;
+#X obj 161 274 outlet;
+#X text 129 235 dummy;
+#X text 159 254 dummy;
+#X text 128 190 1.arg: <float> cutoff_frequency [Hz];
+#X text 128 199 2.arg: <float> damping [-];
+#X text 128 208 3.arg: <float> frequency-shift [-];
+#X text 128 218 4.arg: <float> interpolation_time [ms] (opt.);
+#X text 176 325 IEM KUG;
+#X text 160 313 musil;
+#X text 190 313 @;
+#X text 196 313 iem.at;
+#X text 111 302 (c) Thomas Musil 2000 - 2005;
+#X text 159 335 Graz \, Austria;
+#X obj 22 157 filter~ dlp2c \$1 \$2 \$3 \$4;
+#X connect 0 0 30 0;
+#X connect 1 0 14 0;
+#X connect 1 0 30 1;
+#X connect 5 0 30 2;
+#X connect 8 0 30 3;
+#X connect 11 0 17 0;
+#X connect 11 0 30 4;
+#X connect 30 0 2 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10446] trunk/externals/iemlib/iemlib1/src/filter~.c
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10446
http://pure-data.svn.sourceforge.net/pure-data/?rev=10446&view=rev
Author: tmusil
Date: 2008-12-11 19:43:26 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
single or double precision for filter~
Modified Paths:
--------------
trunk/externals/iemlib/iemlib1/src/filter~.c
Modified: trunk/externals/iemlib/iemlib1/src/filter~.c
===================================================================
--- trunk/externals/iemlib/iemlib1/src/filter~.c 2008-12-11 19:38:44 UTC (rev 10445)
+++ trunk/externals/iemlib/iemlib1/src/filter~.c 2008-12-11 19:43:26 UTC (rev 10446)
@@ -1,7 +1,7 @@
/* For information on usage and redistribution, and for a DISCLAIMER OF ALL
* WARRANTIES, see the file, "LICENSE.txt," in this distribution.
-iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2006 */
+iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2008 */
#include "m_pd.h"
@@ -10,40 +10,82 @@
/* ---------- filter~ - slow dynamic filter-kernel 1. and 2. order ----------- */
+/* ---------- with double precision option ----------------------------------- */
+typedef struct _float_filter_para_tilde
+{
+ t_float wn1;// old wn of biquad recursion
+ t_float wn2;// two times old wn of biquad recursion
+ t_float a0;// wn factor of numerator term of biquad recursion
+ t_float a1;// wn1 factor of numerator term of biquad recursion
+ t_float a2;// wn2 factor of numerator term of biquad recursion
+ t_float b1;// wn1 factor of denominator term of biquad recursion
+ t_float b2;// wn2 factor of denominator term of biquad recursion
+ t_float pi_over_sr;// pi/samplerate
+ t_float cur_f;// current frequency
+ t_float cur_l;// current bilinear transformed frequency
+ t_float cur_a;// current damping
+ t_float cur_b;// current freqency shifting factor
+ t_float delta_f;// frequency ratio from previous to current frequency
+ t_float delta_a;// damping ratio from previous to current damping
+ t_float delta_b;// freqency shift ratio from previous to current freqency shift
+ t_float end_f;// destination frequency
+ t_float end_a;// destination damping
+ t_float end_b;// destination freqency shift
+ t_float ticks_per_interpol_time;// dsp ticks per interpolation time intervall
+ t_float rcp_ticks;// reciprocal number of dsp ticks within intervall
+ t_float interpol_time;// interpolation time
+ int ticks;// number of dsp ticks within intervall
+ int counter_f;// number of dsp ticks to compute new frequency
+ int counter_a;// number of dsp ticks to compute new damping
+ int counter_b;// number of dsp ticks to compute new frequency shift
+ int inlet3_is_Q1_or_damping0;// if flag is HIGH, the third inlet (Q) has to be inverted to damping
+ int filter_function_is_highpass;// flag is HIGH if filter has highpass characteristic
+ int filter_function_is_first_order;// flag is HIGH if filter is first order
+ int event_mask;// a three bit mask: Bit 0 is HIGH during frequency ramp, Bit 1 is HIGH during damping ramp, Bit 2 is HIGH during frequency shift ramp
+ void (*calc)();
+} t_float_filter_para_tilde;
+
+typedef struct _double_filter_para_tilde
+{
+ double wn1;// old wn of biquad recursion
+ double wn2;// two times old wn of biquad recursion
+ double a0;// wn factor of numerator term of biquad recursion
+ double a1;// wn1 factor of numerator term of biquad recursion
+ double a2;// wn2 factor of numerator term of biquad recursion
+ double b1;// wn1 factor of denominator term of biquad recursion
+ double b2;// wn2 factor of denominator term of biquad recursion
+ double pi_over_sr;// pi/samplerate
+ double cur_f;// current frequency
+ double cur_l;// current bilinear transformed frequency
+ double cur_a;// current damping
+ double cur_b;// current freqency shifting factor
+ double delta_f;// frequency ratio from previous to current frequency
+ double delta_a;// damping ratio from previous to current damping
+ double delta_b;// freqency shift ratio from previous to current freqency shift
+ double end_f;// destination frequency
+ double end_a;// destination damping
+ double end_b;// destination freqency shift
+ double ticks_per_interpol_time;// dsp ticks per interpolation time intervall
+ double rcp_ticks;// reciprocal number of dsp ticks within intervall
+ double interpol_time;// interpolation time
+ int ticks;// number of dsp ticks within intervall
+ int counter_f;// number of dsp ticks to compute new frequency
+ int counter_a;// number of dsp ticks to compute new damping
+ int counter_b;// number of dsp ticks to compute new frequency shift
+ int inlet3_is_Q1_or_damping0;// if flag is HIGH, the third inlet (Q) has to be inverted to damping
+ int filter_function_is_highpass;// flag is HIGH if filter has highpass characteristic
+ int filter_function_is_first_order;// flag is HIGH if filter is first order
+ int event_mask;// a three bit mask: Bit 0 is HIGH during frequency ramp, Bit 1 is HIGH during damping ramp, Bit 2 is HIGH during frequency shift ramp
+ void (*calc)();
+} t_double_filter_para_tilde;
+
typedef struct _filter_tilde
{
t_object x_obj;
- t_float wn1;
- t_float wn2;
- t_float a0;
- t_float a1;
- t_float a2;
- t_float b1;
- t_float b2;
- t_float sr;
- t_float cur_f;
- t_float cur_l;
- t_float cur_a;
- t_float cur_b;
- t_float delta_f;
- t_float delta_a;
- t_float delta_b;
- t_float end_f;
- t_float end_a;
- t_float end_b;
- t_float ticks_per_interpol_time;
- t_float rcp_ticks;
- t_float interpol_time;
- int ticks;
- int counter_f;
- int counter_a;
- int counter_b;
- int inv;
- int hp;
- int first_order;
- int event_mask;
- void (*calc)();
+ t_float_filter_para_tilde fp;
+ t_double_filter_para_tilde dp;
+ int precision_d1_f0;
void *x_debug_outlet;
t_atom x_at[5];
t_float x_msi;
@@ -51,12 +93,12 @@
static t_class *filter_tilde_class;
-static void filter_tilde_snafu(t_filter_tilde *x)
+static void filter_tilde_snafu(t_float_filter_para_tilde *x)
{
}
-static void filter_tilde_lp1(t_filter_tilde *x)
+static void filter_tilde_lp1(t_float_filter_para_tilde *x)
{
t_float al;
@@ -66,7 +108,7 @@
x->b1 = (al - 1.0f)*x->a0;
}
-static void filter_tilde_lp2(t_filter_tilde *x)
+static void filter_tilde_lp2(t_float_filter_para_tilde *x)
{
t_float l, al, bl2, rcp;
@@ -81,7 +123,7 @@
x->b2 = rcp*(al - bl2);
}
-static void filter_tilde_hp1(t_filter_tilde *x)
+static void filter_tilde_hp1(t_float_filter_para_tilde *x)
{
t_float al, rcp;
@@ -92,7 +134,7 @@
x->b1 = rcp*(al - 1.0f);
}
-static void filter_tilde_hp2(t_filter_tilde *x)
+static void filter_tilde_hp2(t_float_filter_para_tilde *x)
{
t_float l, al, bl2, rcp;
@@ -107,7 +149,7 @@
x->b2 = rcp*(al - bl2);
}
-static void filter_tilde_rp2(t_filter_tilde *x)
+static void filter_tilde_rp2(t_float_filter_para_tilde *x)
{
t_float l, al, l2, rcp;
@@ -121,7 +163,7 @@
x->b2 = rcp*(al - l2);
}
-static void filter_tilde_bp2(t_filter_tilde *x)
+static void filter_tilde_bp2(t_float_filter_para_tilde *x)
{
t_float l, al, l2, rcp;
@@ -135,7 +177,7 @@
x->b2 = rcp*(al - l2);
}
-static void filter_tilde_bs2(t_filter_tilde *x)
+static void filter_tilde_bs2(t_float_filter_para_tilde *x)
{
t_float l, al, l2, rcp;
@@ -150,7 +192,7 @@
x->b2 = rcp*(al - l2);
}
-static void filter_tilde_rpw2(t_filter_tilde *x)
+static void filter_tilde_rpw2(t_float_filter_para_tilde *x)
{
t_float l, al, l2, rcp;
@@ -164,7 +206,7 @@
x->b2 = rcp*(al - l2);
}
-static void filter_tilde_bpw2(t_filter_tilde *x)
+static void filter_tilde_bpw2(t_float_filter_para_tilde *x)
{
t_float l, al, l2, rcp;
@@ -178,7 +220,7 @@
x->b2 = rcp*(al - l2);
}
-static void filter_tilde_bsw2(t_filter_tilde *x)
+static void filter_tilde_bsw2(t_float_filter_para_tilde *x)
{
t_float l, al, l2, rcp;
@@ -193,7 +235,7 @@
x->b2 = rcp*(al - l2);
}
-static void filter_tilde_ap1(t_filter_tilde *x)
+static void filter_tilde_ap1(t_float_filter_para_tilde *x)
{
t_float al;
@@ -202,7 +244,7 @@
x->b1 = -x->a0;
}
-static void filter_tilde_ap2(t_filter_tilde *x)
+static void filter_tilde_ap2(t_float_filter_para_tilde *x)
{
t_float l, al, bl2, rcp;
@@ -230,8 +272,168 @@
x->b2 = rcp*(l2 - al);
}*/
-static void filter_tilde_dsp_tick(t_filter_tilde *x)
+static void filter_tilde_dlp1(t_double_filter_para_tilde *x)
{
+ double al;
+
+ al = x->cur_a * x->cur_l;
+ x->a0 = 1.0/(1.0 + al);
+ x->a1 = x->a0;
+ x->b1 = (al - 1.0)*x->a0;
+}
+
+static void filter_tilde_dlp2(t_double_filter_para_tilde *x)
+{
+ double l, al, bl2, rcp;
+
+ l = x->cur_l;
+ al = l*x->cur_a;
+ bl2 = l*l*x->cur_b + 1.0;
+ rcp = 1.0/(al + bl2);
+ x->a0 = rcp;
+ x->a1 = 2.0*rcp;
+ x->a2 = x->a0;
+ x->b1 = rcp*2.0*(bl2 - 2.0);
+ x->b2 = rcp*(al - bl2);
+}
+
+static void filter_tilde_dhp1(t_double_filter_para_tilde *x)
+{
+ double al, rcp;
+
+ al = x->cur_a * x->cur_l;
+ rcp = 1.0/(1.0 + al);
+ x->a0 = rcp*al;
+ x->a1 = -x->a0;
+ x->b1 = rcp*(al - 1.0);
+}
+
+static void filter_tilde_dhp2(t_double_filter_para_tilde *x)
+{
+ double l, al, bl2, rcp;
+
+ l = x->cur_l;
+ bl2 = l*l*x->cur_b + 1.0;
+ al = l*x->cur_a;
+ rcp = 1.0/(al + bl2);
+ x->a0 = rcp*(bl2 - 1.0);
+ x->a1 = -2.0*x->a0;
+ x->a2 = x->a0;
+ x->b1 = rcp*2.0*(bl2 - 2.0);
+ x->b2 = rcp*(al - bl2);
+}
+
+static void filter_tilde_drp2(t_double_filter_para_tilde *x)
+{
+ double l, al, l2, rcp;
+
+ l = x->cur_l;
+ l2 = l*l + 1.0;
+ al = l*x->cur_a;
+ rcp = 1.0/(al + l2);
+ x->a0 = rcp*l;
+ x->a2 = -x->a0;
+ x->b1 = rcp*2.0*(l2 - 2.0);
+ x->b2 = rcp*(al - l2);
+}
+
+static void filter_tilde_dbp2(t_double_filter_para_tilde *x)
+{
+ double l, al, l2, rcp;
+
+ l = x->cur_l;
+ l2 = l*l + 1.0;
+ al = l*x->cur_a;
+ rcp = 1.0/(al + l2);
+ x->a0 = rcp*al;
+ x->a2 = -x->a0;
+ x->b1 = rcp*2.0*(l2 - 2.0);
+ x->b2 = rcp*(al - l2);
+}
+
+static void filter_tilde_dbs2(t_double_filter_para_tilde *x)
+{
+ double l, al, l2, rcp;
+
+ l = x->cur_l;
+ l2 = l*l + 1.0;
+ al = l*x->cur_a;
+ rcp = 1.0/(al + l2);
+ x->a0 = rcp*l2;
+ x->a1 = rcp*2.0*(2.0 - l2);
+ x->a2 = x->a0;
+ x->b1 = -x->a1;
+ x->b2 = rcp*(al - l2);
+}
+
+static void filter_tilde_drpw2(t_double_filter_para_tilde *x)
+{
+ double l, al, l2, rcp;
+
+ l = x->cur_l;
+ l2 = l*l + 1.0;
+ al = l*x->cur_a/x->cur_f;
+ rcp = 1.0/(al + l2);
+ x->a0 = rcp*l;
+ x->a2 = -x->a0;
+ x->b1 = rcp*2.0*(l2 - 2.0);
+ x->b2 = rcp*(al - l2);
+}
+
+static void filter_tilde_dbpw2(t_double_filter_para_tilde *x)
+{
+ double l, al, l2, rcp;
+
+ l = x->cur_l;
+ l2 = l*l + 1.0;
+ al = l*x->cur_a/x->cur_f;
+ rcp = 1.0/(al + l2);
+ x->a0 = rcp*al;
+ x->a2 = -x->a0;
+ x->b1 = rcp*2.0*(l2 - 2.0);
+ x->b2 = rcp*(al - l2);
+}
+
+static void filter_tilde_dbsw2(t_double_filter_para_tilde *x)
+{
+ double l, al, l2, rcp;
+
+ l = x->cur_l;
+ l2 = l*l + 1.0;
+ al = l*x->cur_a/x->cur_f;
+ rcp = 1.0/(al + l2);
+ x->a0 = rcp*l2;
+ x->a1 = rcp*2.0*(2.0 - l2);
+ x->a2 = x->a0;
+ x->b1 = -x->a1;
+ x->b2 = rcp*(al - l2);
+}
+
+static void filter_tilde_dap1(t_double_filter_para_tilde *x)
+{
+ double al;
+
+ al = x->cur_a * x->cur_l;
+ x->a0 = (1.0 - al)/(1.0 + al);
+ x->b1 = -x->a0;
+}
+
+static void filter_tilde_dap2(t_double_filter_para_tilde *x)
+{
+ double l, al, bl2, rcp;
+
+ l = x->cur_l;
+ bl2 = l*l*x->cur_b + 1.0;
+ al = l*x->cur_a;
+ rcp = 1.0/(al + bl2);
+ x->a1 = rcp*2.0*(2.0 - bl2);
+ x->a0 = rcp*(bl2 - al);
+ x->b1 = -x->a1;
+ x->b2 = -x->a0;
+}
+
+static void filter_tilde_dsp_tick(t_float_filter_para_tilde *x)
+{
if(x->event_mask)
{
if(x->counter_f)
@@ -249,7 +451,7 @@
x->counter_f--;
x->cur_f *= x->delta_f;
}
- l = x->cur_f * x->sr;
+ l = x->cur_f * x->pi_over_sr;
if(l < 1.0e-20f)
x->cur_l = 1.0e20f;
else if(l > 1.57079632f)
@@ -293,7 +495,7 @@
(*(x->calc))(x);
/* stability check */
- if(x->first_order)
+ if(x->filter_function_is_first_order)
{
if(x->b1 <= -0.9999998f)
x->b1 = -0.9999998f;
@@ -322,20 +524,117 @@
x->b2 = 0.9999998f + x->b1;
}
}
+ //post("float a0=%f, a1=%f, a2=%f, b1=%f, b2=%f", x->a0, x->a1, x->a2, x->b1, x->b2);
}
}
+static void filter_tilde_dsp_dtick(t_double_filter_para_tilde *x)
+{
+ if(x->event_mask)
+ {
+ if(x->counter_f)
+ {
+ double l, si, co;
+
+ if(x->counter_f <= 1)
+ {
+ x->cur_f = x->end_f;
+ x->counter_f = 0;
+ x->event_mask &= 6;/*set event_mask_bit 0 = 0*/
+ }
+ else
+ {
+ x->counter_f--;
+ x->cur_f *= x->delta_f;
+ }
+ l = x->cur_f * x->pi_over_sr;
+ if(l < 1.0e-20)
+ x->cur_l = 1.0e20;
+ else if(l > 1.57079632)
+ x->cur_l = 0.0;
+ else
+ {
+ si = sin(l);
+ co = cos(l);
+ x->cur_l = co/si;
+ }
+ }
+ if(x->counter_a)
+ {
+ if(x->counter_a <= 1)
+ {
+ x->cur_a = x->end_a;
+ x->counter_a = 0;
+ x->event_mask &= 5;/*set event_mask_bit 1 = 0*/
+ }
+ else
+ {
+ x->counter_a--;
+ x->cur_a *= x->delta_a;
+ }
+ }
+ if(x->counter_b)
+ {
+ if(x->counter_b <= 1)
+ {
+ x->cur_b = x->end_b;
+ x->counter_b = 0;
+ x->event_mask &= 3;/*set event_mask_bit 2 = 0*/
+ }
+ else
+ {
+ x->counter_b--;
+ x->cur_b *= x->delta_b;
+ }
+ }
+
+ (*(x->calc))(x);
+
+ /* stability check */
+ if(x->filter_function_is_first_order)
+ {
+ if(x->b1 <= -0.9999998)
+ x->b1 = -0.9999998;
+ else if(x->b1 >= 0.9999998)
+ x->b1 = 0.9999998;
+ }
+ else
+ {
+ double discriminant = x->b1 * x->b1 + 4.0 * x->b2;
+
+ if(x->b1 <= -1.9999996)
+ x->b1 = -1.9999996;
+ else if(x->b1 >= 1.9999996)
+ x->b1 = 1.9999996;
+
+ if(x->b2 <= -0.9999998)
+ x->b2 = -0.9999998;
+ else if(x->b2 >= 0.9999998)
+ x->b2 = 0.9999998;
+
+ if(discriminant >= 0.0)
+ {
+ if(0.9999998 - x->b1 - x->b2 < 0.0)
+ x->b2 = 0.9999998 - x->b1;
+ if(0.9999998 + x->b1 - x->b2 < 0.0)
+ x->b2 = 0.9999998 + x->b1;
+ }
+ }
+ //post("double a0=%f, a1=%f, a2=%f, b1=%f, b2=%f", (t_float)x->a0, (t_float)x->a1, (t_float)x->a2, (t_float)x->b1, (t_float)x->b2);
+ }
+}
+
static t_int *filter_tilde_perform_2o(t_int *w)
{
t_float *in = (float *)(w[1]);
t_float *out = (float *)(w[2]);
t_filter_tilde *x = (t_filter_tilde *)(w[3]);
int i, n = (t_int)(w[4]);
- t_float wn0, wn1=x->wn1, wn2=x->wn2;
- t_float a0=x->a0, a1=x->a1, a2=x->a2;
- t_float b1=x->b1, b2=x->b2;
+ t_float wn0, wn1=x->fp.wn1, wn2=x->fp.wn2;
+ t_float a0=x->fp.a0, a1=x->fp.a1, a2=x->fp.a2;
+ t_float b1=x->fp.b1, b2=x->fp.b2;
- filter_tilde_dsp_tick(x);
+ filter_tilde_dsp_tick(&x->fp);
for(i=0; i<n; i++)
{
wn0 = *in++ + b1*wn1 + b2*wn2;
@@ -349,8 +648,8 @@
if(IEM_DENORMAL(wn1))
wn1 = 0.0f;
- x->wn1 = wn1;
- x->wn2 = wn2;
+ x->fp.wn1 = wn1;
+ x->fp.wn2 = wn2;
return(w+5);
}
/* yn0 = *out;
@@ -371,12 +670,12 @@
t_filter_tilde *x = (t_filter_tilde *)(w[3]);
int i, n = (t_int)(w[4]);
t_float wn[10];
- t_float a0=x->a0, a1=x->a1, a2=x->a2;
- t_float b1=x->b1, b2=x->b2;
+ t_float a0=x->fp.a0, a1=x->fp.a1, a2=x->fp.a2;
+ t_float b1=x->fp.b1, b2=x->fp.b2;
- filter_tilde_dsp_tick(x);
- wn[0] = x->wn2;
- wn[1] = x->wn1;
+ filter_tilde_dsp_tick(&x->fp);
+ wn[0] = x->fp.wn2;
+ wn[1] = x->fp.wn1;
for(i=0; i<n; i+=8, in+=8, out+=8)
{
wn[2] = in[0] + b1*wn[1] + b2*wn[0];
@@ -404,8 +703,8 @@
if(IEM_DENORMAL(wn[1]))
wn[1] = 0.0f;
- x->wn1 = wn[1];
- x->wn2 = wn[0];
+ x->fp.wn1 = wn[1];
+ x->fp.wn2 = wn[0];
return(w+5);
}
@@ -415,11 +714,11 @@
t_float *out = (float *)(w[2]);
t_filter_tilde *x = (t_filter_tilde *)(w[3]);
int i, n = (t_int)(w[4]);
- t_float wn0, wn1=x->wn1;
- t_float a0=x->a0, a1=x->a1;
- t_float b1=x->b1;
+ t_float wn0, wn1=x->fp.wn1;
+ t_float a0=x->fp.a0, a1=x->fp.a1;
+ t_float b1=x->fp.b1;
- filter_tilde_dsp_tick(x);
+ filter_tilde_dsp_tick(&x->fp);
for(i=0; i<n; i++)
{
wn0 = *in++ + b1*wn1;
@@ -430,7 +729,7 @@
if(IEM_DENORMAL(wn1))
wn1 = 0.0f;
- x->wn1 = wn1;
+ x->fp.wn1 = wn1;
return(w+5);
}
@@ -441,11 +740,11 @@
t_filter_tilde *x = (t_filter_tilde *)(w[3]);
int i, n = (t_int)(w[4]);
t_float wn[9];
- t_float a0=x->a0, a1=x->a1;
- t_float b1=x->b1;
+ t_float a0=x->fp.a0, a1=x->fp.a1;
+ t_float b1=x->fp.b1;
- filter_tilde_dsp_tick(x);
- wn[0] = x->wn1;
+ filter_tilde_dsp_tick(&x->fp);
+ wn[0] = x->fp.wn1;
for(i=0; i<n; i+=8, in+=8, out+=8)
{
wn[1] = in[0] + b1*wn[0];
@@ -470,125 +769,439 @@
if(IEM_DENORMAL(wn[0]))
wn[0] = 0.0f;
- x->wn1 = wn[0];
+ x->fp.wn1 = wn[0];
return(w+5);
}
-static void filter_tilde_ft4(t_filter_tilde *x, t_floatarg t)
+static t_int *filter_tilde_dperform_2o(t_int *w)
{
- int i = (int)((x->ticks_per_interpol_time)*t+0.49999f);
+ t_float *in = (t_float *)(w[1]);
+ t_float *out = (t_float *)(w[2]);
+ t_filter_tilde *x = (t_filter_tilde *)(w[3]);
+ int i, n = (t_int)(w[4]);
+ double wn0, wn1=x->dp.wn1, wn2=x->dp.wn2;
+ double a0=x->dp.a0, a1=x->dp.a1, a2=x->dp.a2;
+ double b1=x->dp.b1, b2=x->dp.b2;
- x->interpol_time = t;
- if(i <= 0)
+ filter_tilde_dsp_dtick(&x->dp);
+ for(i=0; i<n; i++)
{
- x->ticks = 1;
- x->rcp_ticks = 1.0;
+ wn0 = (double)(*in++) + b1*wn1 + b2*wn2;
+ *out++ = (t_float)(a0*wn0 + a1*wn1 + a2*wn2);
+ wn2 = wn1;
+ wn1 = wn0;
}
- else
+ /* NAN protect */
+ // if(IEM_DENORMAL(wn2))
+ // wn2 = 0.0f;
+ // if(IEM_DENORMAL(wn1))
+ // wn1 = 0.0f;
+
+ x->dp.wn1 = wn1;
+ x->dp.wn2 = wn2;
+ return(w+5);
+}
+/* yn0 = *out;
+xn0 = *in;
+*************
+yn0 = a0*xn0 + a1*xn1 + a2*xn2 + b1*yn1 + b2*yn2;
+yn2 = yn1;
+yn1 = yn0;
+xn2 = xn1;
+xn1 = xn0;
+*************************
+y/x = (a0 + a1*z-1 + a2*z-2)/(1 - b1*z-1 - b2*z-2);*/
+
+static t_int *filter_tilde_dperf8_2o(t_int *w)
+{
+ t_float *in = (t_float *)(w[1]);
+ t_float *out = (t_float *)(w[2]);
+ t_filter_tilde *x = (t_filter_tilde *)(w[3]);
+ int i, n = (t_int)(w[4]);
+ double wn[10];
+ double a0=x->dp.a0, a1=x->dp.a1, a2=x->dp.a2;
+ double b1=x->dp.b1, b2=x->dp.b2;
+
+ filter_tilde_dsp_dtick(&x->dp);
+ wn[0] = x->dp.wn2;
+ wn[1] = x->dp.wn1;
+ for(i=0; i<n; i+=8, in+=8, out+=8)
{
- x->ticks = i;
- x->rcp_ticks = 1.0 / (t_float)i;
+ wn[2] = (double)(in[0]) + b1*wn[1] + b2*wn[0];
+ out[0] = (t_float)(a0*wn[2] + a1*wn[1] + a2*wn[0]);
+ wn[3] = (double)(in[1]) + b1*wn[2] + b2*wn[1];
+ out[1] = (t_float)(a0*wn[3] + a1*wn[2] + a2*wn[1]);
+ wn[4] = (double)(in[2]) + b1*wn[3] + b2*wn[2];
+ out[2] = (t_float)(a0*wn[4] + a1*wn[3] + a2*wn[2]);
+ wn[5] = (double)(in[3]) + b1*wn[4] + b2*wn[3];
+ out[3] = (t_float)(a0*wn[5] + a1*wn[4] + a2*wn[3]);
+ wn[6] = (double)(in[4]) + b1*wn[5] + b2*wn[4];
+ out[4] = (t_float)(a0*wn[6] + a1*wn[5] + a2*wn[4]);
+ wn[7] = (double)(in[5]) + b1*wn[6] + b2*wn[5];
+ out[5] = (t_float)(a0*wn[7] + a1*wn[6] + a2*wn[5]);
+ wn[8] = (double)(in[6]) + b1*wn[7] + b2*wn[6];
+ out[6] = (t_float)(a0*wn[8] + a1*wn[7] + a2*wn[6]);
+ wn[9] = (double)(in[7]) + b1*wn[8] + b2*wn[7];
+ out[7] = (t_float)(a0*wn[9] + a1*wn[8] + a2*wn[7]);
+ wn[0] = wn[8];
+ wn[1] = wn[9];
}
+ /* NAN protect */
+ // if(IEM_DENORMAL(wn[0]))
+ // wn[0] = 0.0f;
+ // if(IEM_DENORMAL(wn[1]))
+ // wn[1] = 0.0f;
+
+ /*BIGORSMALL:
+ tabfudge union double long[2]
+ if((long[0]&0x7c000000==0x0x40000000)||(long[0]&0x7c000000==0x0x3c000000))
+ double=0.0;
+
+ erstes bit ist signum
+ die naechsten 11 bit sind exponent
+ +2.0 ist 0x400
+ +4.0 ist 0x401
+ -4.0 ist 0xC01
+ ca. +8.0e+019 ist Sprung von 0x43F auf 0x440 0100.0011.1111 - 0100.0100.0000
+ ca. -8.0e+019 ist Sprung von 0xC3F auf 0xC40 1100.0011.1111 - 1100.0100.0000
+ ca. +8.0e-019 ist Sprung von 0x3C0 auf 0x3BF 0011.1100.0000 - 0011.1011.1111
+ ca. -8.0e-019 ist Sprung von 0xBC0 auf 0xBBF 1011.1100.0000 - 1011.1011.1111
+
+ 0100.0100.0000
+ 0100.0011.1111
+ 0011.1100.0000
+ 0011.1011.1111
+
+ mask = 0x7c
+
+ 100.01
+ 100.00}\
+ 011.11}/
+ 011.10
+
+
+ */
+
+ x->dp.wn1 = wn[1];
+ x->dp.wn2 = wn[0];
+ return(w+5);
}
-static void filter_tilde_ft3(t_filter_tilde *x, t_floatarg b)
+static t_int *filter_tilde_dperform_1o(t_int *w)
{
- if(b <= 0.0f)
- b = 0.000001f;
- if(x->hp)
- b = 1.0 / b;
- if(b != x->cur_b)
+ t_float *in = (t_float *)(w[1]);
+ t_float *out = (t_float *)(w[2]);
+ t_filter_tilde *x = (t_filter_tilde *)(w[3]);
+ int i, n = (t_int)(w[4]);
+ double wn0, wn1=x->dp.wn1;
+ double a0=x->dp.a0, a1=x->dp.a1;
+ double b1=x->dp.b1;
+
+ filter_tilde_dsp_dtick(&x->dp);
+ for(i=0; i<n; i++)
{
- x->end_b = b;
- x->counter_b = x->ticks;
- x->delta_b = exp(log(b/x->cur_b)*x->rcp_ticks);
- x->event_mask |= 4;/*set event_mask_bit 2 = 1*/
+ wn0 = (double)(*in++) + b1*wn1;
+ *out++ = (t_float)(a0*wn0 + a1*wn1);
+ wn1 = wn0;
}
+ /* NAN protect */
+ // if(IEM_DENORMAL(wn1))
+ // wn1 = 0.0f;
+
+ x->dp.wn1 = wn1;
+ return(w+5);
}
-static void filter_tilde_ft2(t_filter_tilde *x, t_floatarg a)
+static t_int *filter_tilde_dperf8_1o(t_int *w)
{
- if(a <= 0.0f)
- a = 0.000001f;
- if(x->inv)
- a = 1.0f / a;
- if(x->hp)
- a /= x->cur_b;
- if(a != x->cur_a)
+ t_float *in = (t_float *)(w[1]);
+ t_float *out = (t_float *)(w[2]);
+ t_filter_tilde *x = (t_filter_tilde *)(w[3]);
+ int i, n = (t_int)(w[4]);
+ double wn[9];
+ double a0=x->dp.a0, a1=x->dp.a1;
+ double b1=x->dp.b1;
+
+ filter_tilde_dsp_dtick(&x->dp);
+ wn[0] = x->dp.wn1;
+ for(i=0; i<n; i+=8, in+=8, out+=8)
{
- x->end_a = a;
- x->counter_a = x->ticks;
- x->delta_a = exp(log(a/x->cur_a)*x->rcp_ticks);
- x->event_mask |= 2;/*set event_mask_bit 1 = 1*/
+ wn[1] = (double)(in[0]) + b1*wn[0];
+ out[0] = (t_float)(a0*wn[1] + a1*wn[0]);
+ wn[2] = (double)(in[1]) + b1*wn[1];
+ out[1] = (t_float)(a0*wn[2] + a1*wn[1]);
+ wn[3] = (double)(in[2]) + b1*wn[2];
+ out[2] = (t_float)(a0*wn[3] + a1*wn[2]);
+ wn[4] = (double)(in[3]) + b1*wn[3];
+ out[3] = (t_float)(a0*wn[4] + a1*wn[3]);
+ wn[5] = (double)(in[4]) + b1*wn[4];
+ out[4] = (t_float)(a0*wn[5] + a1*wn[4]);
+ wn[6] = (double)(in[5]) + b1*wn[5];
+ out[5] = (t_float)(a0*wn[6] + a1*wn[5]);
+ wn[7] = (double)(in[6]) + b1*wn[6];
+ out[6] = (t_float)(a0*wn[7] + a1*wn[6]);
+ wn[8] = (double)(in[7]) + b1*wn[7];
+ out[7] = (t_float)(a0*wn[8] + a1*wn[7]);
+ wn[0] = wn[8];
}
+ /* NAN protect */
+ // if(IEM_DENORMAL(wn[0]))
+ // wn[0] = 0.0f;
+
+ x->dp.wn1 = wn[0];
+ return(w+5);
}
-static void filter_tilde_ft1(t_filter_tilde *x, t_floatarg f)
+static void filter_tilde_ft4(t_filter_tilde *x, t_float t)
{
- if(f <= 0.0f)
- f = 0.000001f;
- if(f != x->cur_f)
+ if(x->precision_d1_f0)
{
- x->end_f = f;
- x->counter_f = x->ticks;
- x->delta_f = exp(log(f/x->cur_f)*x->rcp_ticks);
- x->event_mask |= 1;/*set event_mask_bit 0 = 1*/
+ double dt=(double)t;
+ int di = (int)((x->dp.ticks_per_interpol_time)*dt+0.49999);
+
+ x->dp.interpol_time = dt;
+ if(di <= 0)
+ {
+ x->dp.ticks = 1;
+ x->dp.rcp_ticks = 1.0;
+ }
+ else
+ {
+ x->dp.ticks = di;
+ x->dp.rcp_ticks = 1.0 / (double)di;
+ }
}
+ else
+ {
+ int i = (int)((x->fp.ticks_per_interpol_time)*t+0.49999f);
+
+ x->fp.interpol_time = t;
+ if(i <= 0)
+ {
+ x->fp.ticks = 1;
+ x->fp.rcp_ticks = 1.0;
+ }
+ else
+ {
+ x->fp.ticks = i;
+ x->fp.rcp_ticks = 1.0 / (t_float)i;
+ }
+ }
}
-static void filter_tilde_print(t_filter_tilde *x)
+static void filter_tilde_ft3(t_filter_tilde *x, t_float b)
{
- // post("fb1 = %g, fb2 = %g, ff1 = %g, ff2 = %g, ff3 = %g", x->b1, x->b2, x->a0, x->a1, x->a2);
- x->x_at[0].a_w.w_float = x->b1;
- x->x_at[1].a_w.w_float = x->b2;
- x->x_at[2].a_w.w_float = x->a0;
- x->x_at[3].a_w.w_float = x->a1;
- x->x_at[4].a_w.w_float = x->a2;
- outlet_list(x->x_debug_outlet, &s_list, 5, x->x_at);
+ if(x->precision_d1_f0)
+ {
+ double db=(double)b;
+
+ if(db <= 0.0)
+ db = 0.000001;
+ if(x->dp.filter_function_is_highpass)
+ db = 1.0 / db;
+ if(db != x->dp.cur_b)
+ {
+ x->dp.end_b = db;
+ x->dp.counter_b = x->dp.ticks;
+ x->dp.delta_b = exp(log(db/x->dp.cur_b)*x->dp.rcp_ticks);
+ x->dp.event_mask |= 4;/*set event_mask_bit 2 = 1*/
+ }
+ }
+ else
+ {
+ if(b <= 0.0f)
+ b = 0.000001f;
+ if(x->fp.filter_function_is_highpass)
+ b = 1.0f / b;
+ if(b != x->fp.cur_b)
+ {
+ x->fp.end_b = b;
+ x->fp.counter_b = x->fp.ticks;
+ x->fp.delta_b = exp(log(b/x->fp.cur_b)*x->fp.rcp_ticks);
+ x->fp.event_mask |= 4;/*set event_mask_bit 2 = 1*/
+ }
+ }
}
-static void filter_tilde_dsp(t_filter_tilde *x, t_signal **sp)
+static void filter_tilde_ft2(t_filter_tilde *x, t_float a)
{
- t_float si, co, f;
- int i, n=(int)sp[0]->s_n;
-
- x->sr = 3.14159265358979323846f / (t_float)(sp[0]->s_sr);
- x->ticks_per_interpol_time = 0.001f * (t_float)(sp[0]->s_sr) / (t_float)n;
- i = (int)((x->ticks_per_interpol_time)*(x->interpol_time)+0.49999f);
- if(i <= 0)
+ if(x->precision_d1_f0)
{
- x->ticks = 1;
- x->rcp_ticks = 1.0f;
+ double da=(double)a;
+
+ if(da <= 0.0)
+ da = 0.000001;
+ if(x->dp.inlet3_is_Q1_or_damping0)
+ da = 1.0 / da;
+ if(x->dp.filter_function_is_highpass)
+ da /= x->dp.cur_b;
+ if(da != x->dp.cur_a)
+ {
+ x->dp.end_a = da;
+ x->dp.counter_a = x->dp.ticks;
+ x->dp.delta_a = exp(log(da/x->dp.cur_a)*x->dp.rcp_ticks);
+ x->dp.event_mask |= 2;/*set event_mask_bit 1 = 1*/
+ }
}
else
{
- x->ticks = i;
- x->rcp_ticks = 1.0f / (t_float)i;
+ if(a <= 0.0f)
+ a = 0.000001f;
+ if(x->fp.inlet3_is_Q1_or_damping0)
+ a = 1.0f / a;
+ if(x->fp.filter_function_is_highpass)
+ a /= x->fp.cur_b;
+ if(a != x->fp.cur_a)
+ {
+ x->fp.end_a = a;
+ x->fp.counter_a = x->fp.ticks;
+ x->fp.delta_a = exp(log(a/x->fp.cur_a)*x->fp.rcp_ticks);
+ x->fp.event_mask |= 2;/*set event_mask_bit 1 = 1*/
+ }
}
- f = x->cur_f * x->sr;
- if(f < 1.0e-20f)
- x->cur_l = 1.0e20f;
- else if(f > 1.57079632f)
- x->cur_l = 0.0f;
+}
+
+static void filter_tilde_ft1(t_filter_tilde *x, t_float f)
+{
+ if(x->precision_d1_f0)
+ {
+ double df=(double)f;
+
+ if(df <= 0.0)
+ df = 0.000001;
+ if(df != x->dp.cur_f)
+ {
+ x->dp.end_f = df;
+ x->dp.counter_f = x->dp.ticks;
+ x->dp.delta_f = exp(log(df/x->dp.cur_f)*x->dp.rcp_ticks);
+ x->dp.event_mask |= 1;/*set event_mask_bit 0 = 1*/
+ }
+ }
else
{
- si = sin(f);
- co = cos(f);
- x->cur_l = co/si;
+ if(f <= 0.0f)
+ f = 0.000001f;
+ if(f != x->fp.cur_f)
+ {
+ x->fp.end_f = f;
+ x->fp.counter_f = x->fp.ticks;
+ x->fp.delta_f = exp(log(f/x->fp.cur_f)*x->fp.rcp_ticks);
+ x->fp.event_mask |= 1;/*set event_mask_bit 0 = 1*/
+ }
}
- if(x->first_order)
+}
+
+static void filter_tilde_print(t_filter_tilde *x)
+{
+ // post("fb1 = %g, fb2 = %g, ff1 = %g, ff2 = %g, ff3 = %g", x->b1, x->b2, x->a0, x->a1, x->a2);
+ if(x->precision_d1_f0)
{
- if(n&7)
- dsp_add(filter_tilde_perform_1o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ x->x_at[0].a_w.w_float = (t_float)x->dp.b1;
+ x->x_at[1].a_w.w_float = (t_float)x->dp.b2;
+ x->x_at[2].a_w.w_float = (t_float)x->dp.a0;
+ x->x_at[3].a_w.w_float = (t_float)x->dp.a1;
+ x->x_at[4].a_w.w_float = (t_float)x->dp.a2;
+ }
+ else
+ {
+ x->x_at[0].a_w.w_float = x->fp.b1;
+ x->x_at[1].a_w.w_float = x->fp.b2;
+ x->x_at[2].a_w.w_float = x->fp.a0;
+ x->x_at[3].a_w.w_float = x->fp.a1;
+ x->x_at[4].a_w.w_float = x->fp.a2;
+ }
+ outlet_list(x->x_debug_outlet, &s_list, 5, x->x_at);
+}
+
+static void filter_tilde_dsp(t_filter_tilde *x, t_signal **sp)
+{
+ int i, n=(int)sp[0]->s_n;
+
+ if(x->precision_d1_f0)
+ {
+ double si, co, f;
+
+ x->dp.pi_over_sr = 3.14159265358979323846 / (double)(sp[0]->s_sr);
+ x->dp.ticks_per_interpol_time = 0.001 * (double)(sp[0]->s_sr) / (double)n;
+ i = (int)((x->dp.ticks_per_interpol_time)*(x->dp.interpol_time)+0.49999);
+ if(i <= 0)
+ {
+ x->dp.ticks = 1;
+ x->dp.rcp_ticks = 1.0;
+ }
else
- dsp_add(filter_tilde_perf8_1o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ {
+ x->dp.ticks = i;
+ x->dp.rcp_ticks = 1.0 / (double)i;
+ }
+ f = x->dp.cur_f * x->dp.pi_over_sr;
+ if(f < 1.0e-20)
+ x->dp.cur_l = 1.0e20;
+ else if(f > 1.57079632)
+ x->dp.cur_l = 0.0;
+ else
+ {
+ si = sin(f);
+ co = cos(f);
+ x->dp.cur_l = co/si;
+ }
+ if(x->dp.filter_function_is_first_order)
+ {
+ if(n&7)
+ dsp_add(filter_tilde_dperform_1o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ else
+ dsp_add(filter_tilde_dperf8_1o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ }
+ else
+ {
+ if(n&7)
+ dsp_add(filter_tilde_dperform_2o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ else
+ dsp_add(filter_tilde_dperf8_2o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ }
}
else
{
- if(n&7)
- dsp_add(filter_tilde_perform_2o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ t_float si, co, f;
+
+ x->fp.pi_over_sr = 3.14159265358979323846f / (t_float)(sp[0]->s_sr);
+ x->fp.ticks_per_interpol_time = 0.001f * (t_float)(sp[0]->s_sr) / (t_float)n;
+ i = (int)((x->fp.ticks_per_interpol_time)*(x->fp.interpol_time)+0.49999f);
+ if(i <= 0)
+ {
+ x->fp.ticks = 1;
+ x->fp.rcp_ticks = 1.0f;
+ }
else
- dsp_add(filter_tilde_perf8_2o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ {
+ x->fp.ticks = i;
+ x->fp.rcp_ticks = 1.0f / (t_float)i;
+ }
+ f = x->fp.cur_f * x->fp.pi_over_sr;
+ if(f < 1.0e-20f)
+ x->fp.cur_l = 1.0e20f;
+ else if(f > 1.57079632f)
+ x->fp.cur_l = 0.0f;
+ else
+ {
+ si = sin(f);
+ co = cos(f);
+ x->fp.cur_l = co/si;
+ }
+ if(x->fp.filter_function_is_first_order)
+ {
+ if(n&7)
+ dsp_add(filter_tilde_perform_1o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ else
+ dsp_add(filter_tilde_perf8_1o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ }
+ else
+ {
+ if(n&7)
+ dsp_add(filter_tilde_perform_2o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ else
+ dsp_add(filter_tilde_perf8_2o, 4, sp[0]->s_vec, sp[1]->s_vec, x, n);
+ }
}
}
@@ -596,7 +1209,6 @@
{
t_filter_tilde *x = (t_filter_tilde *)pd_new(filter_tilde_class);
int i;
- t_float si, co, f=0.0f, a=0.0f, b=0.0f, interpol=0.0f;
t_symbol *filt_typ=gensym("");
inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("ft1"));
@@ -613,187 +1225,393 @@
x->x_at[3].a_type = A_FLOAT;
x->x_at[4].a_type = A_FLOAT;
- x->event_mask = 1;
- x->counter_f = 1;
- x->counter_a = 0;
- x->counter_b = 0;
- x->delta_f = 0.0f;
- x->delta_a = 0.0f;
- x->delta_b = 0.0f;
- x->interpol_time = 0.0f;
- x->wn1 = 0.0f;
- x->wn2 = 0.0f;
- x->a0 = 0.0f;
- x->a1 = 0.0f;
- x->a2 = 0.0f;
- x->b1 = 0.0f;
- x->b2 = 0.0f;
- x->sr = 3.14159265358979323846f / 44100.0f;
- x->calc = filter_tilde_snafu;
- x->first_order = 0;
- if((argc == 5)&&IS_A_FLOAT(argv,4)&&IS_A_FLOAT(argv,3)&&IS_A_FLOAT(argv,2)&&IS_A_FLOAT(argv,1)&&IS_A_SYMBOL(argv,0))
- {
+ x->dp.delta_f = 0.0;
+ x->dp.delta_a = 0.0;
+ x->dp.delta_b = 0.0;
+ x->dp.interpol_time = 0.0;
+ x->dp.wn1 = 0.0;
+ x->dp.wn2 = 0.0;
+ x->dp.a0 = 0.0;
+ x->dp.a1 = 0.0;
+ x->dp.a2 = 0.0;
+ x->dp.b1 = 0.0;
+ x->dp.b2 = 0.0;
+ x->dp.pi_over_sr = 3.14159265358979323846 / 44100.0;
+ x->dp.event_mask = 1;
+ x->dp.counter_f = 1;
+ x->dp.counter_a = 0;
+ x->dp.counter_b = 0;
+ x->dp.filter_function_is_first_order = 0;
+
+ x->fp.delta_f = 0.0f;
+ x->fp.delta_a = 0.0f;
+ x->fp.delta_b = 0.0f;
+ x->fp.interpol_time = 0.0f;
+ x->fp.wn1 = 0.0f;
+ x->fp.wn2 = 0.0f;
+ x->fp.a0 = 0.0f;
+ x->fp.a1 = 0.0f;
+ x->fp.a2 = 0.0f;
+ x->fp.b1 = 0.0f;
+ x->fp.b2 = 0.0f;
+ x->fp.pi_over_sr = 3.14159265358979323846f / 44100.0f;
+ x->fp.event_mask = 1;
+ x->fp.counter_f = 1;
+ x->fp.counter_a = 0;
+ x->fp.counter_b = 0;
+ x->fp.filter_function_is_first_order = 0;
+
+ if((argc >= 1) && IS_A_SYMBOL(argv,0))
filt_typ = atom_getsymbolarg(0, argc, argv);
- f = (t_float)atom_getfloatarg(1, argc, argv);
- a = (t_float)atom_getfloatarg(2, argc, argv);
- b = (t_float)atom_getfloatarg(3, argc, argv);
- interpol = (t_float)atom_getfloatarg(4, argc, argv);
- }
- x->cur_f = f;
- f *= x->sr;
- if(f < 1.0e-20f)
- x->cur_l = 1.0e20f;
- else if(f > 1.57079632f)
- x->cur_l = 0.0f;
- else
- {
- si = sin(f);
- co = cos(f);
- x->cur_l = co/si;
- }
- if(a <= 0.0f)
- a = 0.000001f;
- if(b <= 0.0f)
- b = 0.000001f;
- x->cur_b = b;
- if(interpol <= 0.0f)
- interpol = 0.0f;
- x->interpol_time = interpol;
- x->ticks_per_interpol_time = 0.001f * 44100.0f / 64.0f;
- i = (int)((x->ticks_per_interpol_time)*(x->interpol_time)+0.49999f);
- if(i <= 0)
- {
- x->ticks = 1;
- x->rcp_ticks = 1.0f;
- }
+ if(filt_typ->s_name[0] == 'd')
+ x->precision_d1_f0 = 1;
else
- {
- x->ticks = i;
- x->rcp_ticks = 1.0f / (t_float)i;
- }
+ x->precision_d1_f0 = 0;
- x->calc = filter_tilde_snafu;
-
- x->cur_a = 1.0f/a; /*a was Q*/
- x->inv = 1;
- x->hp = 0;
-
- if(filt_typ->s_name)
+ if(x->precision_d1_f0)
{
- if(filt_typ == gensym("ap1"))
+ double si, co, f=0.0, a=0.0, b=0.0, interpol=0.0;
+
+ if((argc >= 5) && IS_A_FLOAT(argv,4) && IS_A_FLOAT(argv,3) && IS_A_FLOAT(argv,2) && IS_A_FLOAT(argv,1))
{
- x->calc = filter_tilde_ap1;
- x->a1 = 1.0f;
- x->first_order = 1;
+ f = (double)atom_getfloatarg(1, argc, argv);
+ a = (double)atom_getfloatarg(2, argc, argv);
+ b = (double)atom_getfloatarg(3, argc, argv);
+ interpol = (double)atom_getfloatarg(4, argc, argv);
}
- else if(filt_typ == gensym("ap2"))
+ x->dp.cur_f = f;
+ f *= x->dp.pi_over_sr;
+ if(f < 1.0e-20)
+ x->dp.cur_l = 1.0e20;
+ else if(f > 1.57079632)
+ x->dp.cur_l = 0.0;
+ else
{
- x->calc = filter_tilde_ap2;
- x->a2 = 1.0f;
+ si = sin(f);
+ co = cos(f);
+ x->dp.cur_l = co/si;
}
- else if(filt_typ == gensym("ap1c"))
+ if(a <= 0.0)
+ a = 0.000001;
+ if(b <= 0.0)
+ b = 0.000001;
+
+ if(interpol <= 0.0)
+ interpol = 0.0;
+ x->dp.interpol_time = interpol;
+ x->dp.ticks_per_interpol_time = 0.001 * 44100.0 / 64.0;
+ i = (int)((x->dp.ticks_per_interpol_time)*(x->dp.interpol_time)+0.49999);
+ if(i <= 0)
{
- x->calc = filter_tilde_ap1;
- x->a1 = 1.0f;
- x->inv = 0;
- x->cur_a = a; /*a was damping*/
- x->first_order = 1;
+ x->dp.ticks = 1;
+ x->dp.rcp_ticks = 1.0;
}
- else if(filt_typ == gensym("ap2c"))
+ else
{
- x->calc = filter_tilde_ap2;
- x->a2 = 1.0f;
- x->inv = 0;
- x->cur_a = a; /*a was damping*/
+ x->dp.ticks = i;
+ x->dp.rcp_ticks = 1.0 / (double)i;
}
- else if(filt_typ == gensym("bpq2"))
+
+ x->dp.cur_b = b;
+ x->dp.cur_a = 1.0/a; /*"a" is default Q*/
+ x->dp.inlet3_is_Q1_or_damping0 = 1;
+ x->dp.filter_function_is_highpass = 0;
+ x->dp.calc = filter_tilde_snafu;
+
+ if(filt_typ->s_name)
{
- x->calc = filter_tilde_bp2;
+ if(filt_typ == gensym("dap1"))
+ {
+ x->dp.calc = filter_tilde_dap1;
+ x->dp.a1 = 1.0;
+ x->dp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("dap2"))
+ {
+ x->dp.calc = filter_tilde_dap2;
+ x->dp.a2 = 1.0;
+ }
+ else if(filt_typ == gensym("dap1c"))
+ {
+ x->dp.calc = filter_tilde_dap1;
+ x->dp.a1 = 1.0;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was damping*/
+ x->dp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("dap2c"))
+ {
+ x->dp.calc = filter_tilde_dap2;
+ x->dp.a2 = 1.0;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was damping*/
+ }
+ else if(filt_typ == gensym("dbpq2"))
+ {
+ x->dp.calc = filter_tilde_dbp2;
+ }
+ else if(filt_typ == gensym("drbpq2"))
+ {
+ x->dp.calc = filter_tilde_drp2;
+ }
+ else if(filt_typ == gensym("dbsq2"))
+ {
+ x->dp.calc = filter_tilde_dbs2;
+ }
+ else if(filt_typ == gensym("dbpw2"))
+ {
+ x->dp.calc = filter_tilde_dbpw2;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was bw*/
+ }
+ else if(filt_typ == gensym("drbpw2"))
+ {
+ x->dp.calc = filter_tilde_drpw2;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was bw*/
+ }
+ else if(filt_typ == gensym("dbsw2"))
+ {
+ x->dp.calc = filter_tilde_dbsw2;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was bw*/
+ }
+ else if(filt_typ == gensym("dhp1"))
+ {
+ x->dp.calc = filter_tilde_dhp1;
+ x->dp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("dhp2"))
+ {
+ x->dp.calc = filter_tilde_dhp2;
+ }
+ else if(filt_typ == gensym("dlp1"))
+ {
+ x->dp.calc = filter_tilde_dlp1;
+ x->dp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("dlp2"))
+ {
+ x->dp.calc = filter_tilde_dlp2;
+ }
+ else if(filt_typ == gensym("dhp1c"))
+ {
+ x->dp.calc = filter_tilde_dhp1;
+ x->dp.cur_a = 1.0 / a;
+ x->dp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("dhp2c"))
+ {
+ x->dp.calc = filter_tilde_dhp2;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a / b;
+ x->dp.cur_b = 1.0 / b;
+ x->dp.filter_function_is_highpass = 1;
+ }
+ else if(filt_typ == gensym("dlp1c"))
+ {
+ x->dp.calc = filter_tilde_dlp1;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was damping*/
+ x->dp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("dlp2c"))
+ {
+ x->dp.calc = filter_tilde_dlp2;
+ x->dp.inlet3_is_Q1_or_damping0 = 0;
+ x->dp.cur_a = a; /*"a" was damping*/
+ }
+ else
+ {
+ post("filter~-Error: 1. initial-arguments: <sym> kind: \
+lp1, lp2, hp1, hp2, \
+lp1c, lp2c, hp1c, hp2c, \
+ap1, ap2, ap1c, ap2c, \
+bpq2, rbpq2, bsq2, \
+bpw2, rbpw2, bsw2, \
+dlp1, dlp2, dhp1, dhp2, \
+dlp1c, dlp2c, dhp1c, dhp2c, \
+dap1, dap2, dap1c, dap2c, \
+dbpq2, drbpq2, dbsq2, \
+dbpw2, drbpw2, dbsw2 !");
+ }
+ x->dp.end_f = x->dp.cur_f;
+ x->dp.end_a = x->dp.cur_a;
+ x->dp.end_b = x->dp.cur_b;
}
- else if(filt_typ == gensym("rbpq2"))
+ }
+ else
+ {
+ t_float si, co, f=0.0f, a=0.0f, b=0.0f, interpol=0.0f;
+
+ if((argc >= 5) && IS_A_FLOAT(argv,4) && IS_A_FLOAT(argv,3) && IS_A_FLOAT(argv,2) && IS_A_FLOAT(argv,1))
{
- x->calc = filter_tilde_rp2;
+ f = (t_float)atom_getfloatarg(1, argc, argv);
+ a = (t_float)atom_getfloatarg(2, argc, argv);
+ b = (t_float)atom_getfloatarg(3, argc, argv);
+ interpol = (t_float)atom_getfloatarg(4, argc, argv);
}
- else if(filt_typ == gensym("bsq2"))
+ x->fp.cur_f = f;
+ f *= x->fp.pi_over_sr;
+ if(f < 1.0e-20f)
+ x->fp.cur_l = 1.0e20f;
+ else if(f > 1.57079632f)
+ x->fp.cur_l = 0.0f;
+ else
{
- x->calc = filter_tilde_bs2;
+ si = sin(f);
+ co = cos(f);
+ x->fp.cur_l = co/si;
}
- else if(filt_typ == gensym("bpw2"))
+ if(a <= 0.0f)
+ a = 0.000001f;
+ if(b <= 0.0f)
+ b = 0.000001f;
+
+ if(interpol <= 0.0f)
+ interpol = 0.0f;
+ x->fp.interpol_time = interpol;
+ x->fp.ticks_per_interpol_time = 0.001f * 44100.0f / 64.0f;
+ i = (int)((x->fp.ticks_per_interpol_time)*(x->fp.interpol_time)+0.49999f);
+ if(i <= 0)
{
- x->calc = filter_tilde_bpw2;
- x->inv = 0;
- x->cur_a = a; /*a was bw*/
+ x->fp.ticks = 1;
+ x->fp.rcp_ticks = 1.0f;
}
- else if(filt_typ == gensym("rbpw2"))
+ else
{
- x->calc = filter_tilde_rpw2;
- x->inv = 0;
- x->cur_a = a; /*a was bw*/
+ x->fp.ticks = i;
+ x->fp.rcp_ticks = 1.0f / (t_float)i;
}
- else if(filt_typ == gensym("bsw2"))
+
+ x->fp.cur_b = b;
+ x->fp.cur_a = 1.0f/a; /*"a" is default Q*/
+ x->fp.inlet3_is_Q1_or_damping0 = 1;
+ x->fp.filter_function_is_highpass = 0;
+ x->fp.calc = filter_tilde_snafu;
+
+ if(filt_typ->s_name)
{
- x->calc = filter_tilde_bsw2;
- x->inv = 0;
- x->cur_a = a; /*a was bw*/
- }
- else if(filt_typ == gensym("hp1"))
- {
- x->calc = filter_tilde_hp1;
- x->first_order = 1;
- }
- else if(filt_typ == gensym("hp2"))
- {
- x->calc = filter_tilde_hp2;
- }
- else if(filt_typ == gensym("lp1"))
- {
- x->calc = filter_tilde_lp1;
- x->first_order = 1;
- }
- else if(filt_typ == gensym("lp2"))
- {
- x->calc = filter_tilde_lp2;
- }
- else if(filt_typ == gensym("hp1c"))
- {
- x->calc = filter_tilde_hp1;
- x->cur_a = 1.0f / a;
- x->first_order = 1;
- }
- else if(filt_typ == gensym("hp2c"))
- {
- x->calc = filter_tilde_hp2;
- x->inv = 0;
- x->cur_a = a / b;
- x->cur_b = 1.0f / b;
- x->hp = 1;
- }
- else if(filt_typ == gensym("lp1c"))
- {
- x->calc = filter_tilde_lp1;
- x->inv = 0;
- x->cur_a = a; /*a was damping*/
- x->first_order = 1;
- }
- else if(filt_typ == gensym("lp2c"))
- {
- x->calc = filter_tilde_lp2;
- x->inv = 0;
- x->cur_a = a; /*a was damping*/
- }
- else
- {
- post("filter~-Error: 1. initial-arguments: <sym> kind: \
+ if(filt_typ == gensym("ap1"))
+ {
+ x->fp.calc = filter_tilde_ap1;
+ x->fp.a1 = 1.0f;
+ x->fp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("ap2"))
+ {
+ x->fp.calc = filter_tilde_ap2;
+ x->fp.a2 = 1.0f;
+ }
+ else if(filt_typ == gensym("ap1c"))
+ {
+ x->fp.calc = filter_tilde_ap1;
+ x->fp.a1 = 1.0f;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was damping*/
+ x->fp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("ap2c"))
+ {
+ x->fp.calc = filter_tilde_ap2;
+ x->fp.a2 = 1.0f;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was damping*/
+ }
+ else if(filt_typ == gensym("bpq2"))
+ {
+ x->fp.calc = filter_tilde_bp2;
+ }
+ else if(filt_typ == gensym("rbpq2"))
+ {
+ x->fp.calc = filter_tilde_rp2;
+ }
+ else if(filt_typ == gensym("bsq2"))
+ {
+ x->fp.calc = filter_tilde_bs2;
+ }
+ else if(filt_typ == gensym("bpw2"))
+ {
+ x->fp.calc = filter_tilde_bpw2;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was bw*/
+ }
+ else if(filt_typ == gensym("rbpw2"))
+ {
+ x->fp.calc = filter_tilde_rpw2;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was bw*/
+ }
+ else if(filt_typ == gensym("bsw2"))
+ {
+ x->fp.calc = filter_tilde_bsw2;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was bw*/
+ }
+ else if(filt_typ == gensym("hp1"))
+ {
+ x->fp.calc = filter_tilde_hp1;
+ x->fp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("hp2"))
+ {
+ x->fp.calc = filter_tilde_hp2;
+ }
+ else if(filt_typ == gensym("lp1"))
+ {
+ x->fp.calc = filter_tilde_lp1;
+ x->fp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("lp2"))
+ {
+ x->fp.calc = filter_tilde_lp2;
+ }
+ else if(filt_typ == gensym("hp1c"))
+ {
+ x->fp.calc = filter_tilde_hp1;
+ x->fp.cur_a = 1.0f / a;
+ x->fp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("hp2c"))
+ {
+ x->fp.calc = filter_tilde_hp2;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a / b;
+ x->fp.cur_b = 1.0f / b;
+ x->fp.filter_function_is_highpass = 1;
+ }
+ else if(filt_typ == gensym("lp1c"))
+ {
+ x->fp.calc = filter_tilde_lp1;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was damping*/
+ x->fp.filter_function_is_first_order = 1;
+ }
+ else if(filt_typ == gensym("lp2c"))
+ {
+ x->fp.calc = filter_tilde_lp2;
+ x->fp.inlet3_is_Q1_or_damping0 = 0;
+ x->fp.cur_a = a; /*"a" was damping*/
+ }
+ else
+ {
+ post("filter~-Error: 1. initial-arguments: <sym> kind: \
lp1, lp2, hp1, hp2, \
lp1c, lp2c, hp1c, hp2c, \
ap1, ap2, ap1c, ap2c, \
bpq2, rbpq2, bsq2, \
-bpw2, rbpw2, bsw2!");
+bpw2, rbpw2, bsw2, \
+dlp1, dlp2, dhp1, dhp2, \
+dlp1c, dlp2c, dhp1c, dhp2c, \
+dap1, dap2, dap1c, dap2c, \
+dbpq2, drbpq2, dbsq2, \
+dbpw2, drbpw2, dbsw2 !");
+ }
+ x->fp.end_f = x->fp.cur_f;
+ x->fp.end_a = x->fp.cur_a;
+ x->fp.end_b = x->fp.cur_b;
}
- x->end_f = x->cur_f;
- x->end_a = x->cur_a;
- x->end_b = x->cur_b;
}
return (x);
}
@@ -809,5 +1627,4 @@
class_addmethod(filter_tilde_class, (t_method)filter_tilde_ft3, gensym("ft3"), A_FLOAT, 0);
class_addmethod(filter_tilde_class, (t_method)filter_tilde_ft4, gensym("ft4"), A_FLOAT, 0);
class_addmethod(filter_tilde_class, (t_method)filter_tilde_print, gensym("print"), 0);
-// class_sethelpsymbol(filter_tilde_class, gensym("iemhelp/help-filter~"));
}
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10445] trunk/externals/iemlib/iemlib1
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10445
http://pure-data.svn.sourceforge.net/pure-data/?rev=10445&view=rev
Author: tmusil
Date: 2008-12-11 19:38:44 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
soundfile_info puts out a 8th float: format code
Modified Paths:
--------------
trunk/externals/iemlib/iemlib1/soundfile_info-help.pd
trunk/externals/iemlib/iemlib1/src/iemlib1.c
trunk/externals/iemlib/iemlib1/src/soundfile_info.c
Modified: trunk/externals/iemlib/iemlib1/soundfile_info-help.pd
===================================================================
--- trunk/externals/iemlib/iemlib1/soundfile_info-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
+++ trunk/externals/iemlib/iemlib1/soundfile_info-help.pd 2008-12-11 19:38:44 UTC (rev 10445)
@@ -1,36 +1,40 @@
-#N canvas 153 56 725 412 10;
-#X obj 31 45 openpanel;
-#X obj 31 26 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
--1;
-#X msg 31 92 read \$1;
-#X obj 31 166 soundfile_info;
-#X obj 31 217 print;
-#X text 40 146 "read"-message needs a symbol (soundfile in wave format)
-;
-#X symbolatom 131 75 66 0 0 0 - - -;
-#X text 50 184 "list"-message output with 7 items;
-#X text 91 224 4.item: <float> header-size in bytes;
-#X text 91 194 1.item: <float> samplerate in Hz;
-#X text 91 204 2.item: <symbol> file-name;
-#X text 91 234 5.item: <float> number of channels;
-#X text 7 2 soundfile_info;
-#X text 130 2 show the header-data of a wav-file;
-#X text 91 254 7.item: <symbol> endianness ("l" for little);
-#X text 260 264 ("b" for big);
-#X text 214 279 (eg. little endian "wav" is natural format on Intel-machines)
-;
-#X text 214 314 (eg. big endian "aiff" is natural format on Macintosh-machines)
-;
-#X text 91 214 3.item: <float> sound-data-length in samples;
-#X text 91 244 6.item: <float> sample-resolution in bytes;
-#X text 95 328 IEM KUG;
-#X text 79 316 musil;
-#X text 109 316 @;
-#X text 115 316 iem.at;
-#X text 30 305 (c) Thomas Musil 2000 - 2005;
-#X text 78 338 Graz \, Austria;
-#X connect 0 0 2 0;
-#X connect 0 0 6 0;
-#X connect 1 0 0 0;
-#X connect 2 0 3 0;
-#X connect 3 0 4 0;
+#N canvas 153 56 730 458 10;
+#X obj 31 45 openpanel;
+#X obj 31 26 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 31 92 read \$1;
+#X obj 31 166 soundfile_info;
+#X obj 31 217 print;
+#X text 40 146 "read"-message needs a symbol (soundfile in wave format)
+;
+#X symbolatom 131 75 66 0 0 0 - - -;
+#X text 50 184 "list"-message output with 7 items;
+#X text 91 224 4.item: <float> header-size in bytes;
+#X text 91 194 1.item: <float> samplerate in Hz;
+#X text 91 204 2.item: <symbol> file-name;
+#X text 91 234 5.item: <float> number of channels;
+#X text 7 2 soundfile_info;
+#X text 130 2 show the header-data of a wav-file;
+#X text 91 254 7.item: <symbol> endianness ("l" for little);
+#X text 260 264 ("b" for big);
+#X text 214 279 (eg. little endian "wav" is natural format on Intel-machines)
+;
+#X text 214 304 (eg. big endian "aiff" is natural format on Macintosh-machines)
+;
+#X text 91 214 3.item: <float> sound-data-length in samples;
+#X text 91 244 6.item: <float> sample-resolution in bytes;
+#X text 75 388 IEM KUG;
+#X text 55 376 musil;
+#X text 89 376 @;
+#X text 97 376 iem.at;
+#X text 58 398 Graz \, Austria;
+#X text 10 365 (c) Thomas Musil 2000 - 2008;
+#X text 90 325 8.item: <float> format code (1 .. linear PCM);
+#X text 286 335 (3 .. IEEE-float);
+#X text 286 345 (6 .. 8 bit ALAW);
+#X text 286 355 (7 .. 8 bit MULAW);
+#X connect 0 0 2 0;
+#X connect 0 0 6 0;
+#X connect 1 0 0 0;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
Modified: trunk/externals/iemlib/iemlib1/src/iemlib1.c
===================================================================
--- trunk/externals/iemlib/iemlib1/src/iemlib1.c 2008-12-11 19:11:28 UTC (rev 10444)
+++ trunk/externals/iemlib/iemlib1/src/iemlib1.c 2008-12-11 19:38:44 UTC (rev 10445)
@@ -75,6 +75,6 @@
v2db_setup();
vcf_filter_tilde_setup();
- post("iemlib1 (R-1.17) library loaded! (c) Thomas Musil 03.2008");
+ post("iemlib1 (R-1.17) library loaded! (c) Thomas Musil 11.2008");
post(" musil%ciem.at iem KUG Graz Austria", '@');
}
Modified: trunk/externals/iemlib/iemlib1/src/soundfile_info.c
===================================================================
--- trunk/externals/iemlib/iemlib1/src/soundfile_info.c 2008-12-11 19:11:28 UTC (rev 10444)
+++ trunk/externals/iemlib/iemlib1/src/soundfile_info.c 2008-12-11 19:38:44 UTC (rev 10445)
@@ -1,7 +1,7 @@
/* For information on usage and redistribution, and for a DISCLAIMER OF ALL
* WARRANTIES, see the file, "LICENSE.txt," in this distribution.
-iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2006 */
+iemlib1 written by Thomas Musil, Copyright (c) IEM KUG Graz Austria 2000 - 2008 */
#include "m_pd.h"
#include "iemlib.h"
@@ -17,8 +17,9 @@
#define SFI_HEADER_CHANNELS 4
#define SFI_HEADER_BYTES_PER_SAMPLE 5
#define SFI_HEADER_ENDINESS 6
+#define SFI_HEADER_FORMAT_CODE 7
-#define SFI_HEADER_SIZE 7
+#define SFI_HEADER_SIZE 8
@@ -143,16 +144,17 @@
cvec += 4;
ss = soundfile_info_str2short(cvec);
/* format */
- if(ss != 1) /* PCM = 1 */
+ if((ss != 1) && (ss != 3) && (ss != 6) && (ss != 7)) /* PCM = 1 ; IEEE-FLOAT = 3 ; ALAW = 6 ; MULAW = 7 */
{
- post("soundfile_info_read-error: %s is not PCM-format coded", completefilename);
+ post("soundfile_info_read-error: %s has unknown format code", completefilename);
goto soundfile_info_end;
}
+ SETFLOAT(x->x_atheader+SFI_HEADER_FORMAT_CODE, (t_float)ss);
header_size += 2;
cvec += 2;
ss = soundfile_info_str2short(cvec);
/* channels */
- if((ss < 1) || (ss > 100))
+ if((ss < 1) || (ss > 1000))
{
post("soundfile_info_read-error: %s has no common channel-number", completefilename);
goto soundfile_info_end;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10444] trunk/externals/iem/iem_tab
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10444
http://pure-data.svn.sourceforge.net/pure-data/?rev=10444&view=rev
Author: tmusil
Date: 2008-12-11 19:11:28 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iem_tab/tab_abs-help.pd
trunk/externals/iem/iem_tab/tab_add-help.pd
trunk/externals/iem/iem_tab/tab_add_scalar-help.pd
trunk/externals/iem/iem_tab/tab_carth2polar-help.pd
trunk/externals/iem/iem_tab/tab_complex_inv-help.pd
trunk/externals/iem/iem_tab/tab_complex_mul-help.pd
trunk/externals/iem/iem_tab/tab_const-help.pd
trunk/externals/iem/iem_tab/tab_conv-help.pd
trunk/externals/iem/iem_tab/tab_copy-help.pd
trunk/externals/iem/iem_tab/tab_counter-help.pd
trunk/externals/iem/iem_tab/tab_cross_corr-help.pd
trunk/externals/iem/iem_tab/tab_div-help.pd
trunk/externals/iem/iem_tab/tab_eq-help.pd
trunk/externals/iem/iem_tab/tab_eq_scalar-help.pd
trunk/externals/iem/iem_tab/tab_fft-help.pd
trunk/externals/iem/iem_tab/tab_find_exact_peaks-help.pd
trunk/externals/iem/iem_tab/tab_find_peaks-help.pd
trunk/externals/iem/iem_tab/tab_ge-help.pd
trunk/externals/iem/iem_tab/tab_ge_scalar-help.pd
trunk/externals/iem/iem_tab/tab_gt-help.pd
trunk/externals/iem/iem_tab/tab_gt_scalar-help.pd
trunk/externals/iem/iem_tab/tab_ifft-help.pd
trunk/externals/iem/iem_tab/tab_le-help.pd
trunk/externals/iem/iem_tab/tab_le_scalar-help.pd
trunk/externals/iem/iem_tab/tab_lt-help.pd
trunk/externals/iem/iem_tab/tab_lt_scalar-help.pd
trunk/externals/iem/iem_tab/tab_max_index-help.pd
trunk/externals/iem/iem_tab/tab_min_index-help.pd
trunk/externals/iem/iem_tab/tab_min_max-help.pd
trunk/externals/iem/iem_tab/tab_mul-help.pd
trunk/externals/iem/iem_tab/tab_mul_scalar-help.pd
trunk/externals/iem/iem_tab/tab_ne-help.pd
trunk/externals/iem/iem_tab/tab_ne_scalar-help.pd
trunk/externals/iem/iem_tab/tab_reverse-help.pd
trunk/externals/iem/iem_tab/tab_rfft-help.pd
trunk/externals/iem/iem_tab/tab_rifft-help.pd
trunk/externals/iem/iem_tab/tab_sqrt-help.pd
trunk/externals/iem/iem_tab/tab_sub-help.pd
trunk/externals/iem/iem_tab/tab_sum-help.pd
Removed Paths:
-------------
trunk/externals/iem/iem_tab/help/
Added: trunk/externals/iem/iem_tab/tab_abs-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_abs-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_abs-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,61 @@
+#N canvas 116 92 782 409 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.485715 0.442858 0.357144 0.242858 0.185715
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 166 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 301 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 59 211 50 20 50;
+#X text 44 154 list of 3 floats:;
+#X text 162 273 1.arg: <symbol> source-name;
+#X text 162 286 2.arg: <symbol> destination-name;
+#X msg 154 213 src src;
+#X msg 185 234 dst dst;
+#X obj 61 78 tab_abs src dst;
+#X obj 59 264 tab_abs src dst;
+#X text 78 365 IEM KUG;
+#X text 62 353 musil;
+#X text 92 353 @;
+#X text 98 353 iem.at;
+#X text 61 375 Graz \, Austria;
+#X text 13 342 (c) Thomas Musil 2000 - 2006;
+#X text 12 3 tab_abs;
+#X text 90 29 <bang> copy absolute-value from src to dst;
+#X text 56 165 1.) src onset;
+#X text 56 175 2.) dst onset;
+#X text 171 261 initial arguments:;
+#X text 68 283 <bang> output;
+#X text 208 213 <src> xxx : change source name;
+#X text 240 233 <dst> xxx : change destination name;
+#X text 175 69 (the number of samples which are copied are:;
+#X text 188 83 the minimum of both array lengths);
+#X text 56 185 3.) n samples to copy;
+#X text 190 185 absolute value;
+#X connect 2 0 11 0;
+#X connect 5 0 12 0;
+#X connect 9 0 12 0;
+#X connect 10 0 12 0;
+#X connect 11 0 3 0;
+#X connect 12 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_add-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_add-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_add-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,83 @@
+#N canvas 116 92 855 560 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.485715 0.442858 0.357144 0.242858 0.185715
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 358 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 276 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.428564 0.457135 0.485707 0.499992
+0.514278 0.499992 0.471421 0.44285 0.414279 0.357136 0.285708 0.171423
+0.0999952 0.0142815 -0.100003 -0.214288 -0.314288 -0.385716 -0.457144
+-0.471429 -0.514286 -0.500001 -0.47143 -0.442858 -0.414287 -0.37143
+-0.300002 -0.228574 -0.157146 -0.0714324 0.0571381 0.128566 0.199994
+0.271422 0.34285 0.414278 0.457135 0.485707 0.499992 0.528563 0.542849
+0.499992 0.457135 0.428564 0.371422 0.314279 0.242851 0.0857095 -0.0857178
+-0.271431 -0.400001 -0.514286 -0.542858 -0.557143 -0.585714 -0.585714
+-0.6 -0.6 -0.614286 -0.614286 -0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 161 graph;
+#X msg 136 233 src1 src1;
+#X msg 195 255 src2 src2;
+#X msg 59 211 50 50 20 50;
+#X text 45 139 list of 4 floats:;
+#X text 212 353 3.arg: <symbol> destination-name;
+#X text 90 29 <bang> add the 2 src-arrays to dst-array;
+#X obj 61 78 tab_add src1 src2 dst;
+#X obj 59 301 tab_add src1 src2 dst;
+#X text 78 435 IEM KUG;
+#X text 62 423 musil;
+#X text 92 423 @;
+#X text 98 423 iem.at;
+#X text 61 445 Graz \, Austria;
+#X text 13 412 (c) Thomas Musil 2000 - 2006;
+#X text 234 312 initial arguments:;
+#X text 72 319 <bang> output;
+#X text 306 275 <dst> xxx : change destination name;
+#X text 12 3 tab_add;
+#X text 208 86 the minimum of the 3 array lengths);
+#X text 56 177 3.) dst onset;
+#X text 56 155 1.) src_1 onset;
+#X text 56 166 2.) src_2 onset;
+#X text 56 187 4.) n samples to add;
+#X text 199 233 <src1> xxx : change source name 1;
+#X text 257 255 <src2> xxx : change source name 2;
+#X text 211 326 1.arg: <symbol> source-name 1;
+#X text 211 339 2.arg: <symbol> source-name 2;
+#X text 195 72 (the number of samples which were added are:;
+#X connect 2 0 13 0;
+#X connect 5 0 14 0;
+#X connect 7 0 14 0;
+#X connect 8 0 14 0;
+#X connect 9 0 14 0;
+#X connect 13 0 3 0;
+#X connect 14 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_add_scalar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_add_scalar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_add_scalar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,63 @@
+#N canvas 115 92 860 564 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.485715 0.442858 0.357144 0.242858 0.185715
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 46 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 325 graph;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 211 336 1.arg: <symbol> source-name;
+#X msg 197 270 dst dst;
+#X msg 47 36 0.5;
+#X msg 145 247 src src;
+#X msg 82 37 -0.5;
+#X obj 61 78 tab_add_scalar src dst;
+#X obj 59 301 tab_add_scalar src dst;
+#X msg 48 227 50 20 50 -0.8;
+#X text 211 349 2.arg: <symbol> destination-name;
+#X text 129 29 <float> add the src-array with this scalar to dst-array
+;
+#X text 31 163 list of 4 floats:;
+#X text 78 475 IEM KUG;
+#X text 62 463 musil;
+#X text 92 463 @;
+#X text 98 463 iem.at;
+#X text 61 485 Graz \, Austria;
+#X text 13 452 (c) Thomas Musil 2000 - 2006;
+#X text 234 322 initial arguments:;
+#X text 71 322 <bang> output;
+#X text 250 271 <dst> xxx : change destination name;
+#X text 12 3 tab_add_scalar;
+#X text 218 86 the minimum of both array lengths);
+#X text 197 246 <src> xxx : change source name;
+#X text 42 179 1.) src onset;
+#X text 42 190 2.) dst onset;
+#X text 42 200 3.) n samples to add;
+#X text 42 210 4.) added scalar value;
+#X text 205 72 (the number of samples which were added are:;
+#X connect 5 0 10 0;
+#X connect 6 0 9 0;
+#X connect 7 0 10 0;
+#X connect 8 0 9 0;
+#X connect 9 0 2 0;
+#X connect 10 0 3 0;
+#X connect 11 0 10 0;
Added: trunk/externals/iem/iem_tab/tab_carth2polar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_carth2polar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_carth2polar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,77 @@
+#N canvas 132 30 854 520 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array real 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 451 29 graph;
+#X obj 61 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 40 381 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array imag 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 451 71 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array mag 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 596 29 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array arg 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 596 71 graph;
+#X msg 696 220 2;
+#X floatatom 647 276 5 0 0 0 - - -;
+#X floatatom 730 277 5 0 0 0 - - -;
+#X obj 710 131 loadbang;
+#X text 96 444 IEM KUG;
+#X text 80 432 musil;
+#X text 110 432 @;
+#X text 116 432 iem.at;
+#X text 79 454 Graz \, Austria;
+#X text 31 421 (c) Thomas Musil 2000 - 2006;
+#X text 324 276 initial arguments:;
+#X text 81 39 <bang> invert the complex src-arrays to the complex dst-arrays
+;
+#X text 98 113 the minimum of the 4 array lengths);
+#X text 85 99 (the number of samples which were inverted are:;
+#X text 302 288 1.arg: <symbol> real_source-name;
+#X text 302 300 2.arg: <symbol> imag_source-name;
+#X text 53 160 list of 5 floats:;
+#X msg 40 229 0 0 0 0 64;
+#X text 12 7 tab_carth2polar;
+#X obj 730 297 * 360;
+#X floatatom 730 322 5 0 0 0 - - -;
+#X text 74 179 2.) src_imag-onset;
+#X text 74 169 1.) src_real-onset;
+#X text 74 209 5.) number of samples to convert;
+#X msg 710 152 \; real const 0.75 \; imag const -0.75;
+#X msg 599 154 \; real const 0.75 \; imag const 0.75;
+#X text 302 312 3.arg: <symbol> magnitude_destination-name;
+#X text 302 323 4.arg: <symbol> phase_argument_destination-name;
+#X text 74 189 3.) dst_magnitude-onset;
+#X text 74 199 4.) dst_phase_argument-onset;
+#X obj 647 254 tabread mag;
+#X obj 730 253 tabread arg;
+#X obj 61 78 tab_carth2polar real imag mag arg;
+#X obj 40 360 tab_carth2polar real imag mag arg;
+#X msg 143 331 dst_arg arg;
+#X msg 110 306 dst_mag mag;
+#X msg 91 279 src_im imag;
+#X msg 74 253 src_re real;
+#X connect 1 0 39 0;
+#X connect 7 0 37 0;
+#X connect 7 0 38 0;
+#X connect 9 0 26 0;
+#X connect 10 0 31 0;
+#X connect 24 0 40 0;
+#X connect 26 0 27 0;
+#X connect 37 0 8 0;
+#X connect 38 0 9 0;
+#X connect 39 0 2 0;
+#X connect 40 0 3 0;
+#X connect 41 0 40 0;
+#X connect 42 0 40 0;
+#X connect 43 0 40 0;
+#X connect 44 0 40 0;
Added: trunk/externals/iem/iem_tab/tab_complex_inv-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_complex_inv-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_complex_inv-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,72 @@
+#N canvas 132 30 854 520 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array re1 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 451 29 graph;
+#X obj 61 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 40 381 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array im1 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 451 71 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array re2 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 596 29 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array im2 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 596 71 graph;
+#X msg 700 247 2;
+#X floatatom 661 303 5 0 0 0 - - -;
+#X floatatom 734 304 5 0 0 0 - - -;
+#X obj 710 131 loadbang;
+#X text 96 444 IEM KUG;
+#X text 80 432 musil;
+#X text 110 432 @;
+#X text 116 432 iem.at;
+#X text 79 454 Graz \, Austria;
+#X text 31 421 (c) Thomas Musil 2000 - 2006;
+#X text 324 276 initial arguments:;
+#X text 12 7 tab_complex_inv;
+#X text 81 39 <bang> invert the complex src-arrays to the complex dst-arrays
+;
+#X obj 61 78 tab_complex_inv re1 im1 re2 im2;
+#X text 128 113 the minimum of the 4 array lengths);
+#X text 115 99 (the number of samples which were inverted are:;
+#X msg 74 253 src_re re1;
+#X msg 91 279 src_im im1;
+#X msg 110 306 dst_re re2;
+#X msg 143 331 dst_im im2;
+#X obj 40 360 tab_complex_inv re1 im1 re2 im2;
+#X text 302 312 3.arg: <symbol> real_destination-name;
+#X text 302 323 4.arg: <symbol> imag_destination-name;
+#X text 302 288 1.arg: <symbol> real_source-name;
+#X text 302 300 2.arg: <symbol> imag_source-name;
+#X obj 661 280 tabread re2;
+#X obj 734 280 tabread im2;
+#X msg 710 152 \; re1 const 0.8 \; im1 const -0.6;
+#X text 105 155 1.) src_re-onset;
+#X text 105 165 2.) src_im-onset;
+#X text 105 175 3.) dst_re-onset;
+#X text 105 185 4.) dst_im-onset;
+#X text 105 195 5.) number of samples to multiply;
+#X text 84 146 list of 5 floats:;
+#X msg 40 229 0 0 0 0 64;
+#X connect 1 0 20 0;
+#X connect 7 0 32 0;
+#X connect 7 0 33 0;
+#X connect 10 0 34 0;
+#X connect 20 0 2 0;
+#X connect 23 0 27 0;
+#X connect 24 0 27 0;
+#X connect 25 0 27 0;
+#X connect 26 0 27 0;
+#X connect 27 0 3 0;
+#X connect 32 0 8 0;
+#X connect 33 0 9 0;
+#X connect 41 0 27 0;
Added: trunk/externals/iem/iem_tab/tab_complex_mul-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_complex_mul-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_complex_mul-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,119 @@
+#N canvas 132 30 858 630 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array re1 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 451 29 graph;
+#X obj 61 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 54 439 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array im1 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 451 71 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array re2 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 596 29 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array im2 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 596 71 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array re3 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 735 28 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array im3 100 float 0;
+#X coords 0 1 99 -1 100 40 1;
+#X restore 735 70 graph;
+#X msg 710 152 \; re1 const 0.9 \; im1 const 0.6 \; re2 const 0.7 \;
+im2 const -0.8;
+#X obj 61 78 tab_complex_mul re1 im1 re2 im2 re3 im3;
+#X obj 672 472 tabread re3;
+#X obj 745 472 tabread im3;
+#X msg 711 439 2;
+#X floatatom 672 495 5 0 0 0 - - -;
+#X floatatom 745 496 5 0 0 0 - - -;
+#X obj 692 350 *;
+#X obj 715 350 *;
+#X obj 760 350 *;
+#X obj 783 350 *;
+#X obj 767 372 +;
+#X obj 698 372 -;
+#X msg 692 304 0.9 0.7;
+#X msg 715 328 0.6 -0.8;
+#X floatatom 699 395 5 0 0 0 - - -;
+#X msg 760 305 0.9 -0.8;
+#X msg 777 329 0.6 0.7;
+#X floatatom 767 394 5 0 0 0 - - -;
+#X obj 54 418 tab_complex_mul re1 im1 re2 im2 re3 im3;
+#X msg 74 258 src1_re re1;
+#X msg 191 368 dst_re re3;
+#X msg 232 391 dst_im im3;
+#X msg 91 284 src1_im im1;
+#X msg 143 309 src2_re re2;
+#X msg 161 335 src2_im im2;
+#X msg 40 234 0 0 0 0 0 0 64;
+#X text 84 146 list of 7 floats:;
+#X text 303 419 1.arg: <symbol> real_source1-name;
+#X text 303 431 2.arg: <symbol> imag_source1-name;
+#X text 303 443 3.arg: <symbol> real_source2-name;
+#X text 304 454 4.arg: <symbol> imag_source2-name;
+#X text 304 466 5.arg: <symbol> real_destination-name;
+#X text 304 477 6.arg: <symbol> imag_destination-name;
+#X obj 728 281 t b b b b;
+#X obj 728 257 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 710 131 loadbang;
+#X text 87 537 IEM KUG;
+#X text 71 525 musil;
+#X text 101 525 @;
+#X text 107 525 iem.at;
+#X text 70 547 Graz \, Austria;
+#X text 22 514 (c) Thomas Musil 2000 - 2006;
+#X text 12 7 tab_complex_mul;
+#X text 325 407 initial arguments:;
+#X text 115 99 (the number of samples which were multiplied are:;
+#X text 105 155 1.) src1_re-onset;
+#X text 105 165 2.) src1_im-onset;
+#X text 105 175 3.) src2_re-onset;
+#X text 105 185 4.) src2_im-onset;
+#X text 105 195 5.) dst_re-onset;
+#X text 105 205 6.) dst_im-onset;
+#X text 105 215 7.) number of samples to multiply;
+#X text 81 39 <bang> multiply the complex src1-arrays with the complex
+src2-arrays to complex dst-array;
+#X text 128 113 the minimum of the 6 array lengths);
+#X connect 1 0 10 0;
+#X connect 10 0 2 0;
+#X connect 11 0 14 0;
+#X connect 12 0 15 0;
+#X connect 13 0 11 0;
+#X connect 13 0 12 0;
+#X connect 16 0 21 0;
+#X connect 17 0 21 1;
+#X connect 18 0 20 0;
+#X connect 19 0 20 1;
+#X connect 20 0 27 0;
+#X connect 21 0 24 0;
+#X connect 22 0 16 0;
+#X connect 23 0 17 0;
+#X connect 25 0 18 0;
+#X connect 26 0 19 0;
+#X connect 28 0 3 0;
+#X connect 29 0 28 0;
+#X connect 30 0 28 0;
+#X connect 31 0 28 0;
+#X connect 32 0 28 0;
+#X connect 33 0 28 0;
+#X connect 34 0 28 0;
+#X connect 35 0 28 0;
+#X connect 43 0 22 0;
+#X connect 43 1 23 0;
+#X connect 43 2 25 0;
+#X connect 43 3 26 0;
+#X connect 44 0 43 0;
+#X connect 45 0 9 0;
Added: trunk/externals/iem/iem_tab/tab_const-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_const-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_const-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,54 @@
+#N canvas 117 93 786 444 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 1;
+#A 0 0 0 0 0 0 0 0.0428571 0.1 0.128571 0.185714 0.257143 0.3 0.371429
+0.428571 0.471429 0.557143 0.614286 0.671429 0.4 0.171429 0.0714286
+-0.0857142 -0.285714 -0.557143 -0.542857 -0.485714 -0.457143 -0.428571
+-0.357143 -0.314286 -0.271429 -0.221429 -0.171429 -0.128571 -0.0857143
+-0.0428571 1.49012e-008 0.0428572 0.0857143 0.128571 0.171429 0.271429
+0.357143 0.442857 0.471429 -0.514286 -0.514286 -0.485714 -0.428571
+-0.342857 -0.292857 -0.242857 -0.2 -0.157143 -0.0285715 0.0357142 0.1
+0.152381 0.204762 0.257143 0.321429 0.385714 0.435714 0.485714 0.528571
+0.571429 0.621429 -0.242857 -0.414286 -0.414286 -0.4 -0.357143 -0.328571
+-0.3 -0.257143 -0.214286 -0.185714 -0.157143 -0.128571 -0.0785714 -0.0285714
+0.00476191 0.0380952 0.0714286 0.114286 0.157143 0.2 0.242857 0.278571
+0.314286 -0.228571 -0.242857 -0.214286 -0.2 -0.142857 -0.114286 -0.0714285
+-0.0285714 3.53903e-008 0.114286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 518 36 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 130 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 60 302 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 122 218 dst dst;
+#X obj 61 102 tab_const dst;
+#X msg 60 195 30 50 0.5;
+#X text 172 270 1.arg: <symbol> destination-name;
+#X obj 60 261 tab_const dst;
+#X msg 82 59 -0.7;
+#X msg 114 78 0.8;
+#X text 11 6 tab_const;
+#X text 90 29 <bang> set all samples of array to zero;
+#X text 114 58 <float> set all samples of array to this float value
+;
+#X text 55 163 1.) dst onset;
+#X text 55 174 2.) n samples to set;
+#X text 190 257 initial arguments:;
+#X text 174 219 <dst> xxx : change destination name;
+#X text 75 374 IEM KUG;
+#X text 59 362 musil;
+#X text 89 362 @;
+#X text 95 362 iem.at;
+#X text 58 384 Graz \, Austria;
+#X text 10 351 (c) Thomas Musil 2000 - 2006;
+#X text 65 280 <bang> output;
+#X text 43 153 list of 2 floats:;
+#X connect 1 0 5 0;
+#X connect 4 0 8 0;
+#X connect 5 0 2 0;
+#X connect 6 0 8 0;
+#X connect 8 0 3 0;
+#X connect 9 0 5 0;
+#X connect 10 0 5 0;
Added: trunk/externals/iem/iem_tab/tab_conv-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_conv-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_conv-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,96 @@
+#N canvas 52 27 959 534 10;
+#X obj 55 51 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 55 92 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 703 524 init_tables 0;
+#X obj 45 132 dsp;
+#X obj 45 113 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 45 174 5 0 0 0 - - -;
+#X floatatom 58 156 5 0 0 0 - - -;
+#X obj 168 162 noise~;
+#X obj 114 193 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 149 15 inlet;
+#X obj 149 37 t b;
+#X obj 188 99 del 100;
+#X msg 53 82 1;
+#X msg 188 122 0;
+#X obj 167 64 del 100;
+#X obj 228 152 dirac~;
+#X obj 134 234 tabwrite~ in;
+#X obj 228 235 tabwrite~ filt;
+#X obj 229 180 *~ 10;
+#X obj 228 208 bpq2~ 1000 10 100;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 13 0;
+#X connect 5 0 13 0;
+#X connect 5 0 14 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 0;
+#X connect 7 0 11 0;
+#X connect 8 0 10 0;
+#X connect 9 0 1 0;
+#X connect 10 0 1 0;
+#X connect 11 0 8 0;
+#X connect 11 0 5 0;
+#X connect 11 0 12 0;
+#X connect 12 0 15 0;
+#X connect 15 0 16 0;
+#X connect 16 0 14 0;
+#X restore 779 202 pd init_tables;
+#X obj 779 157 loadbang;
+#N canvas 0 0 450 300 graph1 0;
+#X array in 800 float 0;
+#X coords 0 1 799 -1 199 100 1;
+#X restore 443 20 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array filt 200 float 0;
+#X coords 0 0.1 199 -0.1 199 100 1;
+#X restore 443 134 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array out 1000 float 0;
+#X coords 0 1 999 -1 199 100 1;
+#X restore 443 247 graph;
+#X text 94 459 IEM KUG;
+#X text 78 447 musil;
+#X text 108 447 @;
+#X text 114 447 iem.at;
+#X text 77 469 Graz \, Austria;
+#X text 29 436 (c) Thomas Musil 2000 - 2006;
+#X text 340 351 initial arguments:;
+#X text 77 37 <bang> correlates the 2nd array "measured" with the 1st
+array "reference" to the destination array "cross_corr";
+#X text 78 92 (the number of samples which were correlated are: the
+positive minimum of the difference (src1-src2) and dst array lengths)
+;
+#X text 318 363 1.arg: <symbol> source1-name;
+#X text 318 375 2.arg: <symbol> source2-name;
+#X text 318 387 3.arg: <symbol> destination-name;
+#X text 318 399 4.arg: <float> norming factor;
+#X text 493 422 calculation in ms;
+#X text 318 411 5.arg: <float> delay time per destination sample;
+#X msg 63 318 bang;
+#X msg 135 361 dst cross_corr;
+#X msg 124 340 src2 meas;
+#X msg 109 319 src1 ref;
+#X obj 779 181 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 63 389 tab_cross_corr ref meas cross_corr 0.02 1;
+#X text 62 155 !! array length of src1 > array length of src2 !!;
+#X text 12 7 tab_conv;
+#X obj 55 70 tab_conv in filt out;
+#X msg 60 225 10 10 10 500 190;
+#X text 100 9 WORK IN PROGRESS;
+#X connect 0 0 30 0;
+#X connect 3 0 26 0;
+#X connect 22 0 27 0;
+#X connect 23 0 27 0;
+#X connect 24 0 27 0;
+#X connect 25 0 27 0;
+#X connect 26 0 2 0;
+#X connect 30 0 1 0;
+#X connect 31 0 27 0;
Added: trunk/externals/iem/iem_tab/tab_copy-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_copy-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_copy-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,60 @@
+#N canvas 116 92 780 479 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.485715 0.442858 0.357144 0.242858 0.185715
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 533 14 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 533 180 graph;
+#X obj 60 35 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 60 110 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 58 345 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 58 215 50 20 50;
+#X text 194 318 1.arg: <symbol> source-name;
+#X text 194 331 2.arg: <symbol> destination-name;
+#X msg 115 235 src src;
+#X msg 165 253 dst dst;
+#X text 184 73 (the number of samples which are copied are:;
+#X text 197 87 the minimum of both array lengths);
+#X text 43 168 list of 3 floats:;
+#X text 77 419 IEM KUG;
+#X text 61 407 musil;
+#X text 91 407 @;
+#X text 97 407 iem.at;
+#X text 60 429 Graz \, Austria;
+#X text 12 396 (c) Thomas Musil 2000 - 2006;
+#X text 55 179 1.) src onset;
+#X text 55 189 2.) dst onset;
+#X text 225 306 initial arguments:;
+#X text 73 323 <bang> output;
+#X text 172 233 <src> xxx : change source name;
+#X text 218 252 <dst> xxx : change destination name;
+#X text 11 7 tab_copy;
+#X text 89 33 <bang> copy value from src to dst;
+#X obj 60 82 tab_copy src dst;
+#X text 55 198 3.) n samples to copy;
+#X obj 58 306 tab_copy src dst;
+#X connect 2 0 27 0;
+#X connect 5 0 29 0;
+#X connect 8 0 29 0;
+#X connect 9 0 29 0;
+#X connect 27 0 3 0;
+#X connect 29 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_counter-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_counter-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_counter-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,72 @@
+#N canvas 115 92 868 572 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 0 0 0 0 0 0 0 0 0 0.9 0 0 0 0 0 0 0 0 0 0.9 0 0 0 0 0 0 0 0 0
+0.9 0 0 0 0 0 0 0 0 0 0.9 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0;
+#X coords 0 1 99 0 200 140 1;
+#X restore 527 166 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 10 99 0 200 140 1;
+#X restore 527 325 graph;
+#X obj 53 146 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 55 398 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 199 367 1.arg: <symbol> source-name;
+#X msg 146 317 dst dst;
+#X msg 101 296 src src;
+#X text 199 380 2.arg: <symbol> destination-name;
+#X obj 55 359 tab_gt_scalar src dst;
+#X obj 53 121 tab_counter src dst;
+#X msg 82 93 reset;
+#X obj 53 33 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 55 273 0 0 100;
+#N canvas 0 0 454 304 /SUBPATCH/ 0;
+#X msg 175 59 \; src const 0;
+#X msg 88 57 \; src \$1 0.9;
+#X floatatom 89 30 5 0 0 0 - - -;
+#X msg 88 127 \; dst ylabel -5.15 0 1 2 3 4 5 6 7 8 9 10;
+#X msg 87 93 \; dst yticks 0 1 1;
+#X obj 32 64 loadbang;
+#X connect 2 0 1 0;
+#X connect 5 0 4 0;
+#X connect 5 0 3 0;
+#X restore 450 146 pd;
+#X text 37 222 list of 3 floats:;
+#X text 78 455 IEM KUG;
+#X text 62 443 musil;
+#X text 92 443 @;
+#X text 98 443 iem.at;
+#X text 61 465 Graz \, Austria;
+#X text 13 432 (c) Thomas Musil 2000 - 2006;
+#X text 49 233 1.) src onset;
+#X text 49 243 2.) dst onset;
+#X text 232 354 initial arguments:;
+#X text 64 379 <bang> output;
+#X text 158 296 <src> xxx : change source name;
+#X text 199 318 <dst> xxx : change destination name;
+#X text 135 162 the minimum of both array lengths);
+#X text 12 3 tab_counter;
+#X msg 594 31 \; src 9 0.9 \; src 19 0.9 \; src 29 0.9 \; src 39 0.9
+;
+#X text 77 27 <bang> each element of the source array controls an increment
+counter in the destination array \, a nonzero value lets increment
+the counter value by one \, a zero value resets the counter value to
+zero.;
+#X text 124 93 <reset> resets all counter values to zero;
+#X text 122 148 (the number of samples which control counters are:
+;
+#X text 49 253 3.) n samples to control n counters;
+#X msg 673 32 \; src 9 -0.1 \; src 19 -0.1 \; src 29 0 \; src 39 0.9
+;
+#X connect 5 0 8 0;
+#X connect 6 0 8 0;
+#X connect 8 0 3 0;
+#X connect 9 0 2 0;
+#X connect 10 0 9 0;
+#X connect 11 0 9 0;
+#X connect 12 0 8 0;
Added: trunk/externals/iem/iem_tab/tab_cross_corr-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_cross_corr-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_cross_corr-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,93 @@
+#N canvas 42 76 736 530 10;
+#X obj 55 51 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 55 92 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 466 316 init_tables 0;
+#X obj 45 132 dsp;
+#X obj 45 113 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 45 174 5 0 0 0 - - -;
+#X floatatom 58 156 5 0 0 0 - - -;
+#X obj 229 151 noise~;
+#X obj 114 193 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 134 234 tabwrite~ ref;
+#X obj 228 234 tabwrite~ meas;
+#X obj 149 15 inlet;
+#X obj 149 37 t b;
+#X obj 188 99 del 100;
+#X msg 53 82 1;
+#X msg 188 122 0;
+#X obj 167 64 del 100;
+#X obj 133 182 z~ 60;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 7 0;
+#X connect 4 0 14 0;
+#X connect 5 0 6 0;
+#X connect 5 0 7 0;
+#X connect 8 0 9 0;
+#X connect 9 0 11 0;
+#X connect 9 0 13 0;
+#X connect 10 0 12 0;
+#X connect 11 0 1 0;
+#X connect 12 0 1 0;
+#X connect 13 0 10 0;
+#X connect 13 0 5 0;
+#X connect 14 0 6 0;
+#X restore 584 206 pd init_tables;
+#X obj 584 161 loadbang;
+#N canvas 0 0 450 300 graph1 0;
+#X array ref 200 float 0;
+#X coords 0 1 199 -1 199 100 1;
+#X restore 443 20 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array meas 100 float 0;
+#X coords 0 1 99 -1 99 100 1;
+#X restore 443 134 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array cross_corr 100 float 0;
+#X coords 0 1 99 -1 99 100 1;
+#X restore 443 247 graph;
+#X text 94 459 IEM KUG;
+#X text 78 447 musil;
+#X text 108 447 @;
+#X text 114 447 iem.at;
+#X text 77 469 Graz \, Austria;
+#X text 29 436 (c) Thomas Musil 2000 - 2006;
+#X text 340 351 initial arguments:;
+#X text 12 7 tab_cross_corr;
+#X text 77 37 <bang> correlates the 2nd array "measured" with the 1st
+array "reference" to the destination array "cross_corr";
+#X text 78 92 (the number of samples which were correlated are: the
+positive minimum of the difference (src1-src2) and dst array lengths)
+;
+#X text 318 363 1.arg: <symbol> source1-name;
+#X text 318 375 2.arg: <symbol> source2-name;
+#X text 318 387 3.arg: <symbol> destination-name;
+#X text 318 399 4.arg: <float> norming factor;
+#X text 493 422 calculation in ms;
+#X text 318 411 5.arg: <float> delay time per destination sample;
+#X msg 63 257 bang;
+#X msg 80 278 time 1;
+#X msg 135 361 dst cross_corr;
+#X msg 124 340 src2 meas;
+#X msg 109 319 src1 ref;
+#X obj 584 185 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 55 70 tab_cross_corr ref meas cross_corr 0.02 1;
+#X msg 97 297 factor 0.02;
+#X obj 63 389 tab_cross_corr ref meas cross_corr 0.02 1;
+#X text 62 155 !! array length of src1 > array length of src2 !!;
+#X connect 0 0 29 0;
+#X connect 3 0 28 0;
+#X connect 23 0 31 0;
+#X connect 24 0 31 0;
+#X connect 25 0 31 0;
+#X connect 26 0 31 0;
+#X connect 27 0 31 0;
+#X connect 28 0 2 0;
+#X connect 29 0 1 0;
+#X connect 30 0 31 0;
Added: trunk/externals/iem/iem_tab/tab_div-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_div-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_div-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,83 @@
+#N canvas 116 92 847 552 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.485715 0.442858 0.357144 0.242858 0.185715
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 20 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 368 graph;
+#X obj 61 41 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 116 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 350 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 286 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.428564 0.457135 0.485707 0.499992
+0.514278 0.499992 0.471421 0.44285 0.414279 0.357136 0.285708 0.171423
+0.0999952 0.0142815 -0.100003 -0.214288 -0.314288 -0.385716 -0.457144
+-0.471429 -0.514286 -0.500001 -0.47143 -0.442858 -0.414287 -0.37143
+-0.300002 -0.228574 -0.157146 -0.0714324 0.0571381 0.128566 0.199994
+0.271422 0.34285 0.414278 0.457135 0.485707 0.499992 0.528563 0.542849
+0.499992 0.457135 0.428564 0.371422 0.314279 0.242851 0.0857095 -0.0857178
+-0.271431 -0.400001 -0.514286 -0.542858 -0.557143 -0.585714 -0.585714
+-0.6 -0.6 -0.614286 -0.614286 -0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 171 graph;
+#X msg 136 243 src1 src1;
+#X msg 195 265 src2 src2;
+#X msg 59 221 50 50 20 50;
+#X text 45 149 list of 4 floats:;
+#X text 212 363 3.arg: <symbol> destination-name;
+#X text 78 445 IEM KUG;
+#X text 62 433 musil;
+#X text 92 433 @;
+#X text 98 433 iem.at;
+#X text 61 455 Graz \, Austria;
+#X text 13 422 (c) Thomas Musil 2000 - 2006;
+#X text 234 322 initial arguments:;
+#X text 72 329 <bang> output;
+#X text 306 285 <dst> xxx : change destination name;
+#X text 208 96 the minimum of the 3 array lengths);
+#X text 56 187 3.) dst onset;
+#X text 56 165 1.) src_1 onset;
+#X text 56 176 2.) src_2 onset;
+#X text 199 243 <src1> xxx : change source name 1;
+#X text 257 265 <src2> xxx : change source name 2;
+#X text 211 336 1.arg: <symbol> source-name 1;
+#X text 211 349 2.arg: <symbol> source-name 2;
+#X text 12 13 tab_div;
+#X text 90 39 <bang> divide the 2 src-arrays to dst-array;
+#X text 195 82 (the number of samples which were divided are:;
+#X text 56 197 4.) n samples to divide;
+#X obj 61 88 tab_div src1 src2 dst;
+#X obj 59 311 tab_div src1 src2 dst;
+#X connect 2 0 33 0;
+#X connect 5 0 34 0;
+#X connect 7 0 34 0;
+#X connect 8 0 34 0;
+#X connect 9 0 34 0;
+#X connect 33 0 3 0;
+#X connect 34 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_eq-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_eq-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_eq-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,80 @@
+#N canvas 116 92 859 564 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.485715 0.471429 0.457144 0.442858 0.442858 0.428572 0.414286
+0.385715 0.357143 0.342858 0.314286 0.285715 0.242857 0.185714 0.142857
+0.114286 0.085714;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 358 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 276 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.442849 0.457135 0.471421 0.471421
+0.485706 0.485706 0.485706 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.485714 0.471429 0.457135 0.428564 0.371422
+0.314279 0.242851 0.0857095 -0.0857178 -0.271431 -0.400001 -0.514286
+-0.542858 -0.557143 -0.585714 -0.585714 -0.6 -0.6 -0.614286 -0.614286
+-0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 161 graph;
+#X msg 136 233 src1 src1;
+#X msg 195 255 src2 src2;
+#X msg 59 211 50 50 20 50;
+#X text 45 139 list of 4 floats:;
+#X text 212 353 3.arg: <symbol> destination-name;
+#X text 78 435 IEM KUG;
+#X text 62 423 musil;
+#X text 92 423 @;
+#X text 98 423 iem.at;
+#X text 61 445 Graz \, Austria;
+#X text 13 412 (c) Thomas Musil 2000 - 2006;
+#X text 234 312 initial arguments:;
+#X text 72 319 <bang> output;
+#X text 306 275 <dst> xxx : change destination name;
+#X text 208 86 the minimum of the 3 array lengths);
+#X text 56 177 3.) dst onset;
+#X text 56 155 1.) src_1 onset;
+#X text 56 166 2.) src_2 onset;
+#X text 199 233 <src1> xxx : change source name 1;
+#X text 257 255 <src2> xxx : change source name 2;
+#X text 211 326 1.arg: <symbol> source-name 1;
+#X text 211 339 2.arg: <symbol> source-name 2;
+#X text 12 3 tab_eq;
+#X text 90 29 <bang> compare "equal to" the 2 src-arrays to dst-array
+;
+#X obj 61 78 tab_eq src1 src2 dst;
+#X text 195 72 (the number of samples which were compared are:;
+#X text 56 187 4.) n samples to compare;
+#X obj 59 301 tab_eq src1 src2 dst;
+#X connect 2 0 31 0;
+#X connect 5 0 34 0;
+#X connect 7 0 34 0;
+#X connect 8 0 34 0;
+#X connect 9 0 34 0;
+#X connect 31 0 3 0;
+#X connect 34 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_eq_scalar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_eq_scalar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_eq_scalar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 22 55 880 584 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.485714 -0.457143
+-0.4 -0.285713 -0.0571409 0.157146 0.328575 0.442861 0.557148 0.628577
+0.714292 0.800006 0.85715 0.885721 0.885721 0.871435 0.842864 0.757149
+0.557148 0.41429 0.257146 -0.0142835 -0.314285 -0.528572 -0.714287
+-0.757145 -0.757145 -0.757145 -0.742859 -0.742859 -0.728573 -0.714287
+-0.685715 -0.657144 -0.585715 -0.528572 -0.4 -0.242856 -0.0428551 0.157146
+0.342861 0.51429 0.728577 0.800006 0.828578 0.828578 0.828578 0.828578
+0.800006 0.771435 0.714292 0.571433 0.41429 0.242861 0.0857169 -0.0571409
+-0.242856 -0.385714 -0.542858 -0.685716 -0.757145 -0.800002 -0.828574
+-0.828574 -0.814288 -0.800002 -0.785716 -0.757145 -0.728573 -0.67143
+-0.585715 -0.471429 -0.271428 -0.0857125 0.114288 0.228575 0.314289
+0.385718 0.414285 0.428571 0.457143 0.471428 0.485714 0.485714 0.5
+0.5 0.5 0.5 0.5 0.5 0.5;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 116 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 325 graph;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 370 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 178 272 dst dst;
+#X msg 129 249 src src;
+#X obj 61 78 tab_eq_scalar src dst;
+#X obj 59 331 tab_eq_scalar src dst;
+#X msg 47 36 0.5;
+#X msg 82 37 -0.5;
+#X text 201 332 1.arg: <symbol> source-name;
+#X text 201 345 2.arg: <symbol> destination-name;
+#X text 31 163 list of 4 floats:;
+#X text 78 475 IEM KUG;
+#X text 62 463 musil;
+#X text 92 463 @;
+#X text 98 463 iem.at;
+#X text 61 485 Graz \, Austria;
+#X text 13 452 (c) Thomas Musil 2000 - 2006;
+#X text 224 318 initial arguments:;
+#X text 75 351 <bang> output;
+#X text 229 272 <dst> xxx : change destination name;
+#X text 218 86 the minimum of both array lengths);
+#X text 182 248 <src> xxx : change source name;
+#X text 42 179 1.) src onset;
+#X text 42 190 2.) dst onset;
+#X text 12 3 tab_eq_scalar;
+#X text 42 201 3.) n samples to compare;
+#X text 42 210 4.) compared scalar value;
+#X text 129 29 <float> compare "equal to" the src-array with this scalar
+to dst-array;
+#X text 205 72 (the number of samples which were compared are:;
+#X msg 48 228 0 0 100 0.5;
+#X connect 4 0 7 0;
+#X connect 5 0 7 0;
+#X connect 6 0 2 0;
+#X connect 7 0 3 0;
+#X connect 8 0 6 0;
+#X connect 9 0 6 0;
+#X connect 31 0 7 0;
Added: trunk/externals/iem/iem_tab/tab_fft-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_fft-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_fft-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,303 @@
+#N canvas 29 19 957 536 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src_re 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst_re 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 239 graph;
+#X obj 24 47 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 24 122 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 62 371 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst_im 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 353 graph;
+#X msg 103 276 dst_re dst_re;
+#X msg 118 299 dst_im dst_im;
+#X msg 139 322 fftsize 64;
+#X floatatom 474 22 5 0 63 0 - - -;
+#X msg 546 341 \; dst_re const 0 \; dst_im const 0;
+#X text 10 0 tab_fft;
+#X text 93 -1 complex FTT with arrays;
+#X text 102 464 IEM KUG;
+#X text 86 452 musil;
+#X text 116 452 @;
+#X text 122 452 iem.at;
+#X text 85 474 Graz \, Austria;
+#X text 37 441 (c) Thomas Musil 2000 - 2006;
+#N canvas 0 0 466 316 generate_a_dirac 0;
+#X msg 61 106 \$1 1 1;
+#X obj 61 83 t f b;
+#X obj 61 62 clip 0 63;
+#X obj 61 32 inlet;
+#X obj 86 142 tab_const src_re;
+#X connect 0 0 4 0;
+#X connect 1 0 0 0;
+#X connect 1 1 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X restore 474 41 pd generate_a_dirac;
+#X floatatom 514 22 5 -31 31 0 - - -;
+#N canvas 0 0 479 403 generate_a_cos 0;
+#X obj 120 18 inlet;
+#X obj 219 176 t f f;
+#X obj 219 211 / 32;
+#X obj 219 232 * 3.14159;
+#X obj 219 283 cos;
+#X obj 219 257 * 8;
+#X obj 219 308 / 32;
+#X obj 219 106 clip 0 31;
+#X obj 219 127 t b f;
+#X obj 219 153 for++ 0 63;
+#X obj 219 331 tabwrite src_re;
+#X obj 120 43 moses 0;
+#X obj 39 178 t f f;
+#X obj 39 213 / 32;
+#X obj 39 234 * 3.14159;
+#X obj 39 285 cos;
+#X obj 39 259 * 8;
+#X obj 39 108 clip 0 31;
+#X obj 39 129 t b f;
+#X obj 39 155 for++ 0 63;
+#X obj 39 333 tabwrite src_re;
+#X obj 90 70 * -1;
+#X obj 39 310 / -32;
+#X connect 0 0 11 0;
+#X connect 1 0 2 0;
+#X connect 1 1 10 1;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 6 0 10 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 8 1 5 1;
+#X connect 9 0 1 0;
+#X connect 11 0 21 0;
+#X connect 11 1 7 0;
+#X connect 12 0 13 0;
+#X connect 12 1 20 1;
+#X connect 13 0 14 0;
+#X connect 14 0 16 0;
+#X connect 15 0 22 0;
+#X connect 16 0 15 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 18 1 16 1;
+#X connect 19 0 12 0;
+#X connect 21 0 17 0;
+#X connect 22 0 20 0;
+#X restore 514 61 pd generate_a_cos;
+#X floatatom 555 22 5 -31 31 0 - - -;
+#N canvas 0 0 483 407 generate_a_sin 0;
+#X obj 102 37 inlet;
+#X obj 246 182 t f f;
+#X obj 246 217 / 32;
+#X obj 246 238 * 3.14159;
+#X obj 246 263 * 8;
+#X obj 246 314 / 32;
+#X obj 246 112 clip 0 31;
+#X obj 246 133 t b f;
+#X obj 246 159 for++ 0 63;
+#X obj 246 337 tabwrite src_re;
+#X obj 246 289 sin;
+#X obj 54 180 t f f;
+#X obj 54 215 / 32;
+#X obj 54 236 * 3.14159;
+#X obj 54 261 * 8;
+#X obj 54 110 clip 0 31;
+#X obj 54 131 t b f;
+#X obj 54 157 for++ 0 63;
+#X obj 54 335 tabwrite src_re;
+#X obj 54 287 sin;
+#X obj 54 312 / -32;
+#X obj 102 60 moses 0;
+#X obj 54 88 * -1;
+#X connect 0 0 21 0;
+#X connect 1 0 2 0;
+#X connect 1 1 9 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 10 0;
+#X connect 5 0 9 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 7 1 4 1;
+#X connect 8 0 1 0;
+#X connect 10 0 5 0;
+#X connect 11 0 12 0;
+#X connect 11 1 18 1;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 19 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 14 1;
+#X connect 17 0 11 0;
+#X connect 19 0 20 0;
+#X connect 20 0 18 0;
+#X connect 21 0 22 0;
+#X connect 21 1 6 0;
+#X connect 22 0 15 0;
+#X restore 555 82 pd generate_a_sin;
+#X text 299 355 initial arguments:;
+#X text 45 56 <bang> calculates a complex fourier transformation of
+complex src-arrays to complex dst-arrays;
+#X text 37 147 list of 4 floats:;
+#X text 49 178 3.) dst_re-onset;
+#X text 49 188 4.) dst_im-onset;
+#X text 49 158 1.) src_re-onset;
+#X text 49 168 2.) src_im-onset;
+#X msg 62 207 20 20 30 30;
+#X text 259 402 4.arg: <symbol> imag_destination-name;
+#X text 259 390 3.arg: <symbol> real_destination-name;
+#X text 259 379 2.arg: <symbol> imag_source-name;
+#X text 259 368 1.arg: <symbol> real_source-name;
+#X text 259 414 5.arg: <float> fftsize;
+#N canvas 0 0 450 300 graph1 0;
+#X array src_im 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 124 graph;
+#X obj 24 94 tab_fft src_re src_im dst_re dst_im 64;
+#X msg 76 230 src_re src_re;
+#X msg 90 253 src_im src_im;
+#X obj 62 348 tab_fft src_re src_im dst_re dst_im 64;
+#X msg 546 283 \; src_re const 0 \; src_im const 0;
+#X floatatom 474 132 5 0 63 0 - - -;
+#N canvas 0 0 470 320 generate_a_dirac 0;
+#X msg 61 106 \$1 1 1;
+#X obj 61 83 t f b;
+#X obj 61 62 clip 0 63;
+#X obj 61 32 inlet;
+#X obj 86 142 tab_const src_im;
+#X connect 0 0 4 0;
+#X connect 1 0 0 0;
+#X connect 1 1 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X restore 474 151 pd generate_a_dirac;
+#X floatatom 514 132 5 -31 31 0 - - -;
+#N canvas 0 0 483 407 generate_a_cos 0;
+#X obj 120 18 inlet;
+#X obj 219 176 t f f;
+#X obj 219 211 / 32;
+#X obj 219 232 * 3.14159;
+#X obj 219 283 cos;
+#X obj 219 257 * 8;
+#X obj 219 308 / 32;
+#X obj 219 106 clip 0 31;
+#X obj 219 127 t b f;
+#X obj 219 153 for++ 0 63;
+#X obj 120 43 moses 0;
+#X obj 39 178 t f f;
+#X obj 39 213 / 32;
+#X obj 39 234 * 3.14159;
+#X obj 39 285 cos;
+#X obj 39 259 * 8;
+#X obj 39 108 clip 0 31;
+#X obj 39 129 t b f;
+#X obj 39 155 for++ 0 63;
+#X obj 90 70 * -1;
+#X obj 39 310 / -32;
+#X obj 40 334 tabwrite src_im;
+#X obj 220 331 tabwrite src_im;
+#X connect 0 0 10 0;
+#X connect 1 0 2 0;
+#X connect 1 1 22 1;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 6 0 22 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 8 1 5 1;
+#X connect 9 0 1 0;
+#X connect 10 0 19 0;
+#X connect 10 1 7 0;
+#X connect 11 0 12 0;
+#X connect 11 1 21 1;
+#X connect 12 0 13 0;
+#X connect 13 0 15 0;
+#X connect 14 0 20 0;
+#X connect 15 0 14 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 17 1 15 1;
+#X connect 18 0 11 0;
+#X connect 19 0 16 0;
+#X connect 20 0 21 0;
+#X restore 514 171 pd generate_a_cos;
+#X floatatom 555 132 5 -31 31 0 - - -;
+#N canvas 0 0 487 411 generate_a_sin 0;
+#X obj 102 37 inlet;
+#X obj 246 182 t f f;
+#X obj 246 217 / 32;
+#X obj 246 238 * 3.14159;
+#X obj 246 263 * 8;
+#X obj 246 314 / 32;
+#X obj 246 112 clip 0 31;
+#X obj 246 133 t b f;
+#X obj 246 159 for++ 0 63;
+#X obj 246 289 sin;
+#X obj 54 180 t f f;
+#X obj 54 215 / 32;
+#X obj 54 236 * 3.14159;
+#X obj 54 261 * 8;
+#X obj 54 110 clip 0 31;
+#X obj 54 131 t b f;
+#X obj 54 157 for++ 0 63;
+#X obj 54 287 sin;
+#X obj 54 312 / -32;
+#X obj 102 60 moses 0;
+#X obj 54 88 * -1;
+#X obj 246 337 tabwrite src_im;
+#X obj 54 336 tabwrite src_im;
+#X connect 0 0 19 0;
+#X connect 1 0 2 0;
+#X connect 1 1 21 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 9 0;
+#X connect 5 0 21 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 7 1 4 1;
+#X connect 8 0 1 0;
+#X connect 9 0 5 0;
+#X connect 10 0 11 0;
+#X connect 10 1 22 1;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 17 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 15 1 13 1;
+#X connect 16 0 10 0;
+#X connect 17 0 18 0;
+#X connect 18 0 22 0;
+#X connect 19 0 20 0;
+#X connect 19 1 6 0;
+#X connect 20 0 14 0;
+#X restore 555 192 pd generate_a_sin;
+#X connect 2 0 38 0;
+#X connect 6 0 41 0;
+#X connect 7 0 41 0;
+#X connect 8 0 41 0;
+#X connect 9 0 19 0;
+#X connect 20 0 21 0;
+#X connect 22 0 23 0;
+#X connect 31 0 41 0;
+#X connect 38 0 3 0;
+#X connect 39 0 41 0;
+#X connect 40 0 41 0;
+#X connect 41 0 4 0;
+#X connect 43 0 44 0;
+#X connect 45 0 46 0;
+#X connect 47 0 48 0;
Added: trunk/externals/iem/iem_tab/tab_find_exact_peaks-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_find_exact_peaks-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_find_exact_peaks-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,88 @@
+#N canvas 116 92 824 482 10;
+#X obj 60 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 31 331 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 200 306 1.arg: <symbol> source-name;
+#X floatatom 94 372 5 0 0 0 - - -;
+#X floatatom 143 373 5 0 0 0 - - -;
+#X msg 88 78 src src;
+#X msg 118 102 amp_sort;
+#X msg 120 124 freq_sort;
+#X floatatom 198 371 5 0 0 0 - - -;
+#X obj 263 369 pack 0 0 0;
+#X obj 263 392 print;
+#X msg 233 173 abs_min_height_diff 10;
+#X text 69 385 sort_index;
+#X text 204 382 amp;
+#X text 147 387 index;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 9.99997 9.28569 9.28569 10.7143 7.14284 7.85712 8.5714 39 10 11
+38 8.5714 7.85712 8.5714 9.28569 8.5714 9.99997 39 40 41 38 12.8571
+12.8571 14.2857 12.8571 11.4285 12.1428 11.4285 9.99997 10.7143 11.4285
+9.99997 9.28569 9.28569 9.99997 10.7143 10.7143 45 9.99997 9.99997
+10.7143 11.4285 12.1428 10.7143 11.4285 12.1428 11.4285 46 11.4285
+11.4285 11.4285 12.1428 12.8571 11.4285 11.4285 12.1428 12.8571 12.1428
+12.1428 12.1428 12.1428 12.1428 11.4285 11.4285 11.4285 11.4285 10.7143
+48 49 43 11.4285 12.1428 13.5714 15 13.5714 13.5714 14.2857 14.2857
+15 15 14.2857 14.2857 14.2857 15 15 15.7142 15.7142 51 53 15 15 15
+15 15 14.2857 14.2857 15 15.7142 16.4285 16.4285;
+#X coords 0 100 99 0 200 140 1;
+#X restore 578 93 graph;
+#X msg 171 149 max_peaks 9;
+#X text 20 347 ready;
+#X msg 289 194 width_range 1 4;
+#X msg 289 216 width_range 1 1;
+#N canvas 0 0 466 316 Pd 0;
+#X msg 355 125 \; src const 0;
+#X msg 303 175 \; src 37 45;
+#X msg 310 223 \; src 47 46;
+#X msg 187 177 \; src 67 48 49 43;
+#X msg 180 218 \; src 87 51 53;
+#X msg 44 223 \; src 7 39 10 11 38;
+#X msg 50 181 \; src 17 39 40 41 38;
+#X obj 65 25 loadbang;
+#X msg 33 50 \; src xticks 0 1 5;
+#X msg 34 84 \; src xlabel -5.15 0 10 20 30 40 50 60 70 80 90;
+#X connect 7 0 8 0;
+#X connect 7 0 9 0;
+#X restore 636 289 pd;
+#X obj 297 69 loadbang;
+#X text 89 50 <bang> calculate all peaks (index bin amplitude);
+#X text 218 61 of an array;
+#X text 78 442 IEM KUG;
+#X text 62 430 musil;
+#X text 92 430 @;
+#X text 98 430 iem.at;
+#X text 61 452 Graz \, Austria;
+#X text 13 419 (c) Thomas Musil 2000 - 2006;
+#X text 218 296 initial arguments:;
+#X text 184 112 kind of order;
+#X text 250 148 maximum number of peaks detected;
+#X text 373 168 vertical difference between peak;
+#X text 386 177 and noise;
+#X text 391 202 width range of peak in bins;
+#X text 21 6 tab_exact_find_peaks;
+#X obj 60 302 tab_find_exact_peaks src;
+#X text 184 7 same like tab_find_peaks;
+#X connect 0 0 37 0;
+#X connect 5 0 37 0;
+#X connect 6 0 37 0;
+#X connect 7 0 37 0;
+#X connect 9 0 10 0;
+#X connect 11 0 37 0;
+#X connect 16 0 37 0;
+#X connect 18 0 37 0;
+#X connect 19 0 37 0;
+#X connect 21 0 6 0;
+#X connect 21 0 16 0;
+#X connect 21 0 11 0;
+#X connect 21 0 18 0;
+#X connect 37 0 1 0;
+#X connect 37 1 3 0;
+#X connect 37 1 9 0;
+#X connect 37 2 4 0;
+#X connect 37 2 9 1;
+#X connect 37 3 8 0;
+#X connect 37 3 9 2;
Added: trunk/externals/iem/iem_tab/tab_find_peaks-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_find_peaks-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_find_peaks-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,87 @@
+#N canvas 116 92 820 478 10;
+#X obj 60 52 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 31 331 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 200 306 1.arg: <symbol> source-name;
+#X floatatom 94 372 5 0 0 0 - - -;
+#X floatatom 143 373 5 0 0 0 - - -;
+#X msg 88 78 src src;
+#X msg 118 102 amp_sort;
+#X msg 120 124 freq_sort;
+#X obj 60 302 tab_find_peaks src;
+#X floatatom 198 371 5 0 0 0 - - -;
+#X obj 263 369 pack 0 0 0;
+#X obj 263 392 print;
+#X msg 233 173 abs_min_height_diff 10;
+#X text 69 385 sort_index;
+#X text 204 382 amp;
+#X text 147 387 index;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 9.99997 9.28569 9.28569 10.7143 7.14284 7.85712 8.5714 39 10 11
+38 8.5714 7.85712 8.5714 9.28569 8.5714 9.99997 39 40 41 38 12.8571
+12.8571 14.2857 12.8571 11.4285 12.1428 11.4285 9.99997 10.7143 11.4285
+9.99997 9.28569 9.28569 9.99997 10.7143 10.7143 45 9.99997 9.99997
+10.7143 11.4285 12.1428 10.7143 11.4285 12.1428 11.4285 46 11.4285
+11.4285 11.4285 12.1428 12.8571 11.4285 11.4285 12.1428 12.8571 12.1428
+12.1428 12.1428 12.1428 12.1428 11.4285 11.4285 11.4285 11.4285 10.7143
+48 49 43 11.4285 12.1428 13.5714 15 13.5714 13.5714 14.2857 14.2857
+15 15 14.2857 14.2857 14.2857 15 15 15.7142 15.7142 51 53 15 15 15
+15 15 14.2857 14.2857 15 15.7142 16.4285 16.4285;
+#X coords 0 100 99 0 200 140 1;
+#X restore 578 93 graph;
+#X msg 171 149 max_peaks 9;
+#X text 20 347 ready;
+#X msg 289 194 width_range 1 4;
+#X text 21 6 tab_find_peaks;
+#X msg 289 216 width_range 1 1;
+#N canvas 0 0 466 316 Pd 0;
+#X msg 355 125 \; src const 0;
+#X msg 303 175 \; src 37 45;
+#X msg 310 223 \; src 47 46;
+#X msg 187 177 \; src 67 48 49 43;
+#X msg 180 218 \; src 87 51 53;
+#X msg 44 223 \; src 7 39 10 11 38;
+#X msg 50 181 \; src 17 39 40 41 38;
+#X obj 65 25 loadbang;
+#X msg 33 50 \; src xticks 0 1 5;
+#X msg 34 84 \; src xlabel -5.15 0 10 20 30 40 50 60 70 80 90;
+#X connect 7 0 8 0;
+#X connect 7 0 9 0;
+#X restore 636 289 pd;
+#X obj 297 69 loadbang;
+#X text 89 50 <bang> calculate all peaks (index bin amplitude);
+#X text 218 61 of an array;
+#X text 78 442 IEM KUG;
+#X text 62 430 musil;
+#X text 92 430 @;
+#X text 98 430 iem.at;
+#X text 61 452 Graz \, Austria;
+#X text 13 419 (c) Thomas Musil 2000 - 2006;
+#X text 218 296 initial arguments:;
+#X text 184 112 kind of order;
+#X text 250 148 maximum number of peaks detected;
+#X text 373 168 vertical difference between peak;
+#X text 386 177 and noise;
+#X text 391 202 width range of peak in bins;
+#X connect 0 0 8 0;
+#X connect 5 0 8 0;
+#X connect 6 0 8 0;
+#X connect 7 0 8 0;
+#X connect 8 0 1 0;
+#X connect 8 1 3 0;
+#X connect 8 1 10 0;
+#X connect 8 2 4 0;
+#X connect 8 2 10 1;
+#X connect 8 3 9 0;
+#X connect 8 3 10 2;
+#X connect 10 0 11 0;
+#X connect 12 0 8 0;
+#X connect 17 0 8 0;
+#X connect 19 0 8 0;
+#X connect 21 0 8 0;
+#X connect 23 0 6 0;
+#X connect 23 0 17 0;
+#X connect 23 0 12 0;
+#X connect 23 0 19 0;
Added: trunk/externals/iem/iem_tab/tab_ge-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_ge-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_ge-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,80 @@
+#N canvas 116 92 859 564 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.485715 0.471429 0.457144 0.442858 0.442858 0.428572 0.414286
+0.385715 0.357143 0.342858 0.314286 0.285715 0.242857 0.185714 0.142857
+0.114286 0.085714;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 358 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 276 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.442849 0.457135 0.471421 0.471421
+0.485706 0.485706 0.485706 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.485714 0.471429 0.457135 0.428564 0.371422
+0.314279 0.242851 0.0857095 -0.0857178 -0.271431 -0.400001 -0.514286
+-0.542858 -0.557143 -0.585714 -0.585714 -0.6 -0.6 -0.614286 -0.614286
+-0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 161 graph;
+#X msg 136 233 src1 src1;
+#X msg 195 255 src2 src2;
+#X msg 59 211 50 50 20 50;
+#X text 45 139 list of 4 floats:;
+#X text 212 353 3.arg: <symbol> destination-name;
+#X text 78 435 IEM KUG;
+#X text 62 423 musil;
+#X text 92 423 @;
+#X text 98 423 iem.at;
+#X text 61 445 Graz \, Austria;
+#X text 13 412 (c) Thomas Musil 2000 - 2006;
+#X text 234 312 initial arguments:;
+#X text 72 319 <bang> output;
+#X text 306 275 <dst> xxx : change destination name;
+#X text 208 86 the minimum of the 3 array lengths);
+#X text 56 177 3.) dst onset;
+#X text 56 155 1.) src_1 onset;
+#X text 56 166 2.) src_2 onset;
+#X text 199 233 <src1> xxx : change source name 1;
+#X text 257 255 <src2> xxx : change source name 2;
+#X text 211 326 1.arg: <symbol> source-name 1;
+#X text 211 339 2.arg: <symbol> source-name 2;
+#X text 195 72 (the number of samples which were compared are:;
+#X text 56 187 4.) n samples to compare;
+#X text 12 3 tab_ge;
+#X obj 61 78 tab_ge src1 src2 dst;
+#X obj 59 301 tab_ge src1 src2 dst;
+#X text 90 29 <bang> compare "greater than or equal to" the 2 src-arrays
+to dst-array;
+#X connect 2 0 32 0;
+#X connect 5 0 33 0;
+#X connect 7 0 33 0;
+#X connect 8 0 33 0;
+#X connect 9 0 33 0;
+#X connect 32 0 3 0;
+#X connect 33 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_ge_scalar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_ge_scalar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_ge_scalar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 22 55 888 592 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.485714 -0.457143
+-0.4 -0.285713 -0.0571409 0.157146 0.328575 0.442861 0.557148 0.628577
+0.714292 0.800006 0.85715 0.885721 0.885721 0.871435 0.842864 0.757149
+0.557148 0.41429 0.257146 -0.0142835 -0.314285 -0.528572 -0.714287
+-0.757145 -0.757145 -0.757145 -0.742859 -0.742859 -0.728573 -0.714287
+-0.685715 -0.657144 -0.585715 -0.528572 -0.4 -0.242856 -0.0428551 0.157146
+0.342861 0.51429 0.728577 0.800006 0.828578 0.828578 0.828578 0.828578
+0.800006 0.771435 0.714292 0.571433 0.41429 0.242861 0.0857169 -0.0571409
+-0.242856 -0.385714 -0.542858 -0.685716 -0.757145 -0.800002 -0.828574
+-0.828574 -0.814288 -0.800002 -0.785716 -0.757145 -0.728573 -0.67143
+-0.585715 -0.471429 -0.271428 -0.0857125 0.114288 0.228575 0.314289
+0.385718 0.414285 0.428571 0.457143 0.471428 0.485714 0.485714 0.5
+0.5 0.5 0.5 0.5 0.5 0.5;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 116 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 325 graph;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 370 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 178 272 dst dst;
+#X msg 129 249 src src;
+#X msg 47 36 0.5;
+#X msg 82 37 -0.5;
+#X text 201 332 1.arg: <symbol> source-name;
+#X text 201 345 2.arg: <symbol> destination-name;
+#X text 31 162 list of 4 floats:;
+#X text 78 475 IEM KUG;
+#X text 62 463 musil;
+#X text 92 463 @;
+#X text 98 463 iem.at;
+#X text 61 485 Graz \, Austria;
+#X text 13 452 (c) Thomas Musil 2000 - 2006;
+#X text 224 318 initial arguments:;
+#X text 75 351 <bang> output;
+#X text 229 272 <dst> xxx : change destination name;
+#X text 218 86 the minimum of both array lengths);
+#X text 182 248 <src> xxx : change source name;
+#X text 42 178 1.) src onset;
+#X text 42 189 2.) dst onset;
+#X text 42 200 3.) n samples to compare;
+#X text 42 210 4.) compared scalar value;
+#X text 205 72 (the number of samples which were compared are:;
+#X msg 48 228 0 0 100 0.5;
+#X text 12 3 tab_ge_scalar;
+#X obj 61 78 tab_ge_scalar src dst;
+#X obj 59 331 tab_ge_scalar src dst;
+#X text 129 29 <float> compare "greater than or equal to" the src-array
+with this scalar to dst-array;
+#X connect 4 0 30 0;
+#X connect 5 0 30 0;
+#X connect 6 0 29 0;
+#X connect 7 0 29 0;
+#X connect 27 0 30 0;
+#X connect 29 0 2 0;
+#X connect 30 0 3 0;
Added: trunk/externals/iem/iem_tab/tab_gt-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_gt-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_gt-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,80 @@
+#N canvas 116 92 859 564 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.485715 0.471429 0.457144 0.442858 0.442858 0.428572 0.414286
+0.385715 0.357143 0.342858 0.314286 0.285715 0.242857 0.185714 0.142857
+0.114286 0.085714;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 358 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 276 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.442849 0.457135 0.471421 0.471421
+0.485706 0.485706 0.485706 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.485714 0.471429 0.457135 0.428564 0.371422
+0.314279 0.242851 0.0857095 -0.0857178 -0.271431 -0.400001 -0.514286
+-0.542858 -0.557143 -0.585714 -0.585714 -0.6 -0.6 -0.614286 -0.614286
+-0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 161 graph;
+#X msg 136 233 src1 src1;
+#X msg 195 255 src2 src2;
+#X msg 59 211 50 50 20 50;
+#X text 45 139 list of 4 floats:;
+#X text 212 353 3.arg: <symbol> destination-name;
+#X text 78 435 IEM KUG;
+#X text 62 423 musil;
+#X text 92 423 @;
+#X text 98 423 iem.at;
+#X text 61 445 Graz \, Austria;
+#X text 13 412 (c) Thomas Musil 2000 - 2006;
+#X text 234 312 initial arguments:;
+#X text 72 319 <bang> output;
+#X text 306 275 <dst> xxx : change destination name;
+#X text 208 86 the minimum of the 3 array lengths);
+#X text 56 177 3.) dst onset;
+#X text 56 155 1.) src_1 onset;
+#X text 56 166 2.) src_2 onset;
+#X text 199 233 <src1> xxx : change source name 1;
+#X text 257 255 <src2> xxx : change source name 2;
+#X text 211 326 1.arg: <symbol> source-name 1;
+#X text 211 339 2.arg: <symbol> source-name 2;
+#X text 195 72 (the number of samples which were compared are:;
+#X text 56 187 4.) n samples to compare;
+#X text 12 3 tab_gt;
+#X text 90 29 <bang> compare "greater than" the 2 src-arrays to dst-array
+;
+#X obj 61 78 tab_gt src1 src2 dst;
+#X obj 59 301 tab_gt src1 src2 dst;
+#X connect 2 0 33 0;
+#X connect 5 0 34 0;
+#X connect 7 0 34 0;
+#X connect 8 0 34 0;
+#X connect 9 0 34 0;
+#X connect 33 0 3 0;
+#X connect 34 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_gt_scalar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_gt_scalar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_gt_scalar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 22 55 880 584 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.485714 -0.457143
+-0.4 -0.285713 -0.0571409 0.157146 0.328575 0.442861 0.557148 0.628577
+0.714292 0.800006 0.85715 0.885721 0.885721 0.871435 0.842864 0.757149
+0.557148 0.41429 0.257146 -0.0142835 -0.314285 -0.528572 -0.714287
+-0.757145 -0.757145 -0.757145 -0.742859 -0.742859 -0.728573 -0.714287
+-0.685715 -0.657144 -0.585715 -0.528572 -0.4 -0.242856 -0.0428551 0.157146
+0.342861 0.51429 0.728577 0.800006 0.828578 0.828578 0.828578 0.828578
+0.800006 0.771435 0.714292 0.571433 0.41429 0.242861 0.0857169 -0.0571409
+-0.242856 -0.385714 -0.542858 -0.685716 -0.757145 -0.800002 -0.828574
+-0.828574 -0.814288 -0.800002 -0.785716 -0.757145 -0.728573 -0.67143
+-0.585715 -0.471429 -0.271428 -0.0857125 0.114288 0.228575 0.314289
+0.385718 0.414285 0.428571 0.457143 0.471428 0.485714 0.485714 0.5
+0.5 0.5 0.5 0.5 0.5 0.5;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 116 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 325 graph;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 370 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 178 272 dst dst;
+#X msg 129 249 src src;
+#X msg 48 228 0 0 100 0.3;
+#X msg 47 36 0.5;
+#X msg 82 37 -0.5;
+#X text 201 332 1.arg: <symbol> source-name;
+#X text 201 345 2.arg: <symbol> destination-name;
+#X text 31 163 list of 4 floats:;
+#X text 78 475 IEM KUG;
+#X text 62 463 musil;
+#X text 92 463 @;
+#X text 98 463 iem.at;
+#X text 61 485 Graz \, Austria;
+#X text 13 452 (c) Thomas Musil 2000 - 2006;
+#X text 224 318 initial arguments:;
+#X text 75 351 <bang> output;
+#X text 229 272 <dst> xxx : change destination name;
+#X text 218 86 the minimum of both array lengths);
+#X text 182 248 <src> xxx : change source name;
+#X text 42 179 1.) src onset;
+#X text 42 190 2.) dst onset;
+#X text 42 201 3.) n samples to compare;
+#X text 42 210 4.) compared scalar value;
+#X text 205 72 (the number of samples which were compared are:;
+#X text 12 3 tab_gt_scalar;
+#X obj 61 78 tab_gt_scalar src dst;
+#X obj 59 331 tab_gt_scalar src dst;
+#X text 129 29 <float> compare "greater than" the src-array with this
+scalar to dst-array;
+#X connect 4 0 30 0;
+#X connect 5 0 30 0;
+#X connect 6 0 30 0;
+#X connect 7 0 29 0;
+#X connect 8 0 29 0;
+#X connect 29 0 2 0;
+#X connect 30 0 3 0;
Added: trunk/externals/iem/iem_tab/tab_ifft-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_ifft-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_ifft-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,295 @@
+#N canvas 29 19 957 536 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src_re 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst_re 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 239 graph;
+#X obj 24 47 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 24 122 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 62 371 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst_im 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 353 graph;
+#X msg 103 276 dst_re dst_re;
+#X msg 118 299 dst_im dst_im;
+#X msg 139 322 fftsize 64;
+#X floatatom 474 22 5 0 63 0 - - -;
+#X msg 546 341 \; dst_re const 0 \; dst_im const 0;
+#X text 102 464 IEM KUG;
+#X text 86 452 musil;
+#X text 116 452 @;
+#X text 122 452 iem.at;
+#X text 85 474 Graz \, Austria;
+#X text 37 441 (c) Thomas Musil 2000 - 2006;
+#N canvas 0 0 470 320 generate_a_dirac 0;
+#X msg 61 106 \$1 1 1;
+#X obj 61 83 t f b;
+#X obj 61 62 clip 0 63;
+#X obj 61 32 inlet;
+#X obj 86 142 tab_const src_re;
+#X connect 0 0 4 0;
+#X connect 1 0 0 0;
+#X connect 1 1 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X restore 474 41 pd generate_a_dirac;
+#X floatatom 514 22 5 -31 31 0 - - -;
+#N canvas 0 0 487 411 generate_a_cos 0;
+#X obj 120 18 inlet;
+#X obj 219 176 t f f;
+#X obj 219 211 / 32;
+#X obj 219 232 * 3.14159;
+#X obj 219 283 cos;
+#X obj 219 257 * 8;
+#X obj 219 106 clip 0 31;
+#X obj 219 127 t b f;
+#X obj 219 153 for++ 0 63;
+#X obj 219 331 tabwrite src_re;
+#X obj 120 43 moses 0;
+#X obj 39 178 t f f;
+#X obj 39 213 / 32;
+#X obj 39 234 * 3.14159;
+#X obj 39 285 cos;
+#X obj 39 259 * 8;
+#X obj 39 108 clip 0 31;
+#X obj 39 129 t b f;
+#X obj 39 155 for++ 0 63;
+#X obj 39 333 tabwrite src_re;
+#X obj 90 70 * -1;
+#X obj 39 310 * -1;
+#X connect 0 0 10 0;
+#X connect 1 0 2 0;
+#X connect 1 1 9 1;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 4 0 9 0;
+#X connect 5 0 4 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 7 1 5 1;
+#X connect 8 0 1 0;
+#X connect 10 0 20 0;
+#X connect 10 1 6 0;
+#X connect 11 0 12 0;
+#X connect 11 1 19 1;
+#X connect 12 0 13 0;
+#X connect 13 0 15 0;
+#X connect 14 0 21 0;
+#X connect 15 0 14 0;
+#X connect 16 0 17 0;
+#X connect 17 0 18 0;
+#X connect 17 1 15 1;
+#X connect 18 0 11 0;
+#X connect 20 0 16 0;
+#X connect 21 0 19 0;
+#X restore 514 61 pd generate_a_cos;
+#X floatatom 555 22 5 -31 31 0 - - -;
+#N canvas 0 0 487 411 generate_a_sin 0;
+#X obj 102 37 inlet;
+#X obj 246 182 t f f;
+#X obj 246 217 / 32;
+#X obj 246 238 * 3.14159;
+#X obj 246 263 * 8;
+#X obj 246 112 clip 0 31;
+#X obj 246 133 t b f;
+#X obj 246 159 for++ 0 63;
+#X obj 246 337 tabwrite src_re;
+#X obj 246 289 sin;
+#X obj 54 180 t f f;
+#X obj 54 215 / 32;
+#X obj 54 236 * 3.14159;
+#X obj 54 261 * 8;
+#X obj 54 110 clip 0 31;
+#X obj 54 131 t b f;
+#X obj 54 157 for++ 0 63;
+#X obj 54 335 tabwrite src_re;
+#X obj 54 287 sin;
+#X obj 102 60 moses 0;
+#X obj 54 88 * -1;
+#X obj 54 312 * -1;
+#X connect 0 0 19 0;
+#X connect 1 0 2 0;
+#X connect 1 1 8 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 9 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 6 1 4 1;
+#X connect 7 0 1 0;
+#X connect 9 0 8 0;
+#X connect 10 0 11 0;
+#X connect 10 1 17 1;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 18 0;
+#X connect 14 0 15 0;
+#X connect 15 0 16 0;
+#X connect 15 1 13 1;
+#X connect 16 0 10 0;
+#X connect 18 0 21 0;
+#X connect 19 0 20 0;
+#X connect 19 1 5 0;
+#X connect 20 0 14 0;
+#X connect 21 0 17 0;
+#X restore 555 82 pd generate_a_sin;
+#X text 309 355 initial arguments:;
+#X text 37 147 list of 4 floats:;
+#X text 49 178 3.) dst_re-onset;
+#X text 49 188 4.) dst_im-onset;
+#X text 49 158 1.) src_re-onset;
+#X text 49 168 2.) src_im-onset;
+#X msg 62 207 20 20 30 30;
+#X text 269 402 4.arg: <symbol> imag_destination-name;
+#X text 269 390 3.arg: <symbol> real_destination-name;
+#X text 269 379 2.arg: <symbol> imag_source-name;
+#X text 269 368 1.arg: <symbol> real_source-name;
+#X text 269 414 5.arg: <float> fftsize;
+#N canvas 0 0 450 300 graph1 0;
+#X array src_im 100 float 0;
+#X coords 0 1 99 -1 199 100 1;
+#X restore 674 124 graph;
+#X msg 76 230 src_re src_re;
+#X msg 90 253 src_im src_im;
+#X msg 546 283 \; src_re const 0 \; src_im const 0;
+#X floatatom 474 132 5 0 63 0 - - -;
+#N canvas 0 0 470 320 generate_a_dirac 0;
+#X msg 61 106 \$1 1 1;
+#X obj 61 83 t f b;
+#X obj 61 62 clip 0 63;
+#X obj 61 32 inlet;
+#X obj 86 142 tab_const src_im;
+#X connect 0 0 4 0;
+#X connect 1 0 0 0;
+#X connect 1 1 4 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X restore 474 151 pd generate_a_dirac;
+#X floatatom 514 132 5 -31 31 0 - - -;
+#N canvas 0 0 487 411 generate_a_cos 0;
+#X obj 120 18 inlet;
+#X obj 219 176 t f f;
+#X obj 219 211 / 32;
+#X obj 219 232 * 3.14159;
+#X obj 219 283 cos;
+#X obj 219 257 * 8;
+#X obj 219 106 clip 0 31;
+#X obj 219 127 t b f;
+#X obj 219 153 for++ 0 63;
+#X obj 120 43 moses 0;
+#X obj 39 178 t f f;
+#X obj 39 213 / 32;
+#X obj 39 234 * 3.14159;
+#X obj 39 285 cos;
+#X obj 39 259 * 8;
+#X obj 39 108 clip 0 31;
+#X obj 39 129 t b f;
+#X obj 39 155 for++ 0 63;
+#X obj 90 70 * -1;
+#X obj 40 334 tabwrite src_im;
+#X obj 220 331 tabwrite src_im;
+#X obj 39 310 * -1;
+#X connect 0 0 9 0;
+#X connect 1 0 2 0;
+#X connect 1 1 20 1;
+#X connect 2 0 3 0;
+#X connect 3 0 5 0;
+#X connect 4 0 20 0;
+#X connect 5 0 4 0;
+#X connect 6 0 7 0;
+#X connect 7 0 8 0;
+#X connect 7 1 5 1;
+#X connect 8 0 1 0;
+#X connect 9 0 18 0;
+#X connect 9 1 6 0;
+#X connect 10 0 11 0;
+#X connect 10 1 19 1;
+#X connect 11 0 12 0;
+#X connect 12 0 14 0;
+#X connect 13 0 21 0;
+#X connect 14 0 13 0;
+#X connect 15 0 16 0;
+#X connect 16 0 17 0;
+#X connect 16 1 14 1;
+#X connect 17 0 10 0;
+#X connect 18 0 15 0;
+#X connect 21 0 19 0;
+#X restore 514 171 pd generate_a_cos;
+#X floatatom 555 132 5 -31 31 0 - - -;
+#N canvas 0 0 491 415 generate_a_sin 0;
+#X obj 102 37 inlet;
+#X obj 246 182 t f f;
+#X obj 246 217 / 32;
+#X obj 246 238 * 3.14159;
+#X obj 246 263 * 8;
+#X obj 246 112 clip 0 31;
+#X obj 246 133 t b f;
+#X obj 246 159 for++ 0 63;
+#X obj 246 289 sin;
+#X obj 54 180 t f f;
+#X obj 54 215 / 32;
+#X obj 54 236 * 3.14159;
+#X obj 54 261 * 8;
+#X obj 54 110 clip 0 31;
+#X obj 54 131 t b f;
+#X obj 54 157 for++ 0 63;
+#X obj 54 287 sin;
+#X obj 102 60 moses 0;
+#X obj 54 88 * -1;
+#X obj 246 337 tabwrite src_im;
+#X obj 54 336 tabwrite src_im;
+#X obj 54 312 * -1;
+#X connect 0 0 17 0;
+#X connect 1 0 2 0;
+#X connect 1 1 19 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 8 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 6 1 4 1;
+#X connect 7 0 1 0;
+#X connect 8 0 19 0;
+#X connect 9 0 10 0;
+#X connect 9 1 20 1;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 12 0 16 0;
+#X connect 13 0 14 0;
+#X connect 14 0 15 0;
+#X connect 14 1 12 1;
+#X connect 15 0 9 0;
+#X connect 16 0 21 0;
+#X connect 17 0 18 0;
+#X connect 17 1 5 0;
+#X connect 18 0 13 0;
+#X connect 21 0 20 0;
+#X restore 555 192 pd generate_a_sin;
+#X text 10 0 tab_ifft;
+#X text 93 -1 complex inverse FTT with arrays;
+#X text 45 56 <bang> calculates a complex inverse fourier transformation
+of complex src-arrays to complex dst-arrays;
+#X obj 24 94 tab_ifft src_re src_im dst_re dst_im 64;
+#X obj 62 348 tab_ifft src_re src_im dst_re dst_im 64;
+#X connect 2 0 47 0;
+#X connect 6 0 48 0;
+#X connect 7 0 48 0;
+#X connect 8 0 48 0;
+#X connect 9 0 17 0;
+#X connect 18 0 19 0;
+#X connect 20 0 21 0;
+#X connect 28 0 48 0;
+#X connect 35 0 48 0;
+#X connect 36 0 48 0;
+#X connect 38 0 39 0;
+#X connect 40 0 41 0;
+#X connect 42 0 43 0;
+#X connect 47 0 3 0;
+#X connect 48 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_le-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_le-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_le-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,80 @@
+#N canvas 116 92 863 568 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.485715 0.471429 0.457144 0.442858 0.442858 0.428572 0.414286
+0.385715 0.357143 0.342858 0.314286 0.285715 0.242857 0.185714 0.142857
+0.114286 0.085714;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 358 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 276 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.442849 0.457135 0.471421 0.471421
+0.485706 0.485706 0.485706 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.485714 0.471429 0.457135 0.428564 0.371422
+0.314279 0.242851 0.0857095 -0.0857178 -0.271431 -0.400001 -0.514286
+-0.542858 -0.557143 -0.585714 -0.585714 -0.6 -0.6 -0.614286 -0.614286
+-0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 161 graph;
+#X msg 136 233 src1 src1;
+#X msg 195 255 src2 src2;
+#X msg 59 211 50 50 20 50;
+#X text 45 139 list of 4 floats:;
+#X text 212 353 3.arg: <symbol> destination-name;
+#X text 78 435 IEM KUG;
+#X text 62 423 musil;
+#X text 92 423 @;
+#X text 98 423 iem.at;
+#X text 61 445 Graz \, Austria;
+#X text 13 412 (c) Thomas Musil 2000 - 2006;
+#X text 234 312 initial arguments:;
+#X text 72 319 <bang> output;
+#X text 306 275 <dst> xxx : change destination name;
+#X text 208 86 the minimum of the 3 array lengths);
+#X text 56 177 3.) dst onset;
+#X text 56 155 1.) src_1 onset;
+#X text 56 166 2.) src_2 onset;
+#X text 199 233 <src1> xxx : change source name 1;
+#X text 257 255 <src2> xxx : change source name 2;
+#X text 211 326 1.arg: <symbol> source-name 1;
+#X text 211 339 2.arg: <symbol> source-name 2;
+#X text 195 72 (the number of samples which were compared are:;
+#X text 56 187 4.) n samples to compare;
+#X text 12 3 tab_le;
+#X obj 61 78 tab_le src1 src2 dst;
+#X obj 59 301 tab_le src1 src2 dst;
+#X text 90 29 <bang> compare "less than or equal to" the 2 src-arrays
+to dst-array;
+#X connect 2 0 32 0;
+#X connect 5 0 33 0;
+#X connect 7 0 33 0;
+#X connect 8 0 33 0;
+#X connect 9 0 33 0;
+#X connect 32 0 3 0;
+#X connect 33 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_le_scalar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_le_scalar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_le_scalar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 22 55 884 588 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.485714 -0.457143
+-0.4 -0.285713 -0.0571409 0.157146 0.328575 0.442861 0.557148 0.628577
+0.714292 0.800006 0.85715 0.885721 0.885721 0.871435 0.842864 0.757149
+0.557148 0.41429 0.257146 -0.0142835 -0.314285 -0.528572 -0.714287
+-0.757145 -0.757145 -0.757145 -0.742859 -0.742859 -0.728573 -0.714287
+-0.685715 -0.657144 -0.585715 -0.528572 -0.4 -0.242856 -0.0428551 0.157146
+0.342861 0.51429 0.728577 0.800006 0.828578 0.828578 0.828578 0.828578
+0.800006 0.771435 0.714292 0.571433 0.41429 0.242861 0.0857169 -0.0571409
+-0.242856 -0.385714 -0.542858 -0.685716 -0.757145 -0.800002 -0.828574
+-0.828574 -0.814288 -0.800002 -0.785716 -0.757145 -0.728573 -0.67143
+-0.585715 -0.471429 -0.271428 -0.0857125 0.114288 0.228575 0.314289
+0.385718 0.414285 0.428571 0.457143 0.471428 0.485714 0.485714 0.5
+0.5 0.5 0.5 0.5 0.5 0.5;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 116 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 325 graph;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 370 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 178 272 dst dst;
+#X msg 129 249 src src;
+#X msg 47 36 0.5;
+#X msg 82 37 -0.5;
+#X text 201 332 1.arg: <symbol> source-name;
+#X text 201 345 2.arg: <symbol> destination-name;
+#X text 31 163 list of 4 floats:;
+#X text 78 475 IEM KUG;
+#X text 62 463 musil;
+#X text 92 463 @;
+#X text 98 463 iem.at;
+#X text 61 485 Graz \, Austria;
+#X text 13 452 (c) Thomas Musil 2000 - 2006;
+#X text 224 318 initial arguments:;
+#X text 75 351 <bang> output;
+#X text 229 272 <dst> xxx : change destination name;
+#X text 218 86 the minimum of both array lengths);
+#X text 182 248 <src> xxx : change source name;
+#X text 42 179 1.) src onset;
+#X text 42 190 2.) dst onset;
+#X text 42 201 3.) n samples to compare;
+#X text 42 210 4.) compared scalar value;
+#X text 205 72 (the number of samples which were compared are:;
+#X msg 48 228 0 0 100 0.5;
+#X text 12 3 tab_le_scalar;
+#X text 129 29 <float> compare "less than or equal to" the src-array
+with this scalar to dst-array;
+#X obj 61 78 tab_le_scalar src dst;
+#X obj 59 331 tab_le_scalar src dst;
+#X connect 4 0 31 0;
+#X connect 5 0 31 0;
+#X connect 6 0 30 0;
+#X connect 7 0 30 0;
+#X connect 27 0 31 0;
+#X connect 30 0 2 0;
+#X connect 31 0 3 0;
Added: trunk/externals/iem/iem_tab/tab_lt-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_lt-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_lt-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,80 @@
+#N canvas 116 92 859 564 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src1 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.171429 0.328572 0.400001 0.442858 0.47143 0.485715
+0.485715 0.485715 0.485715 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.485715 0.471429 0.457144 0.442858 0.442858 0.428572 0.414286
+0.385715 0.357143 0.342858 0.314286 0.285715 0.242857 0.185714 0.142857
+0.114286 0.085714;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 10 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 358 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 255 276 dst dst;
+#N canvas 0 0 450 300 graph1 0;
+#X array src2 100 float 1;
+#A 0 0.557135 0.57142 0.557135 0.528564 0.499992 0.428564 0.357136
+0.299994 0.0999951 -0.0571467 -0.157146 -0.228574 -0.300002 -0.328573
+-0.357145 -0.385716 -0.400001 -0.400001 -0.385716 -0.385716 -0.37143
+-0.364287 -0.357145 -0.328573 -0.300002 -0.271431 -0.24286 -0.214288
+-0.14286 -0.085718 -0.0428611 -4.28595e-006 0.0428526 0.099995 0.171423
+0.21428 0.257137 0.328565 0.371422 0.442849 0.457135 0.471421 0.471421
+0.485706 0.485706 0.485706 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5 0.5
+0.5 0.5 0.5 0.5 0.5 0.5 0.485714 0.471429 0.457135 0.428564 0.371422
+0.314279 0.242851 0.0857095 -0.0857178 -0.271431 -0.400001 -0.514286
+-0.542858 -0.557143 -0.585714 -0.585714 -0.6 -0.6 -0.614286 -0.614286
+-0.614286;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 535 161 graph;
+#X msg 136 233 src1 src1;
+#X msg 195 255 src2 src2;
+#X msg 59 211 50 50 20 50;
+#X text 45 139 list of 4 floats:;
+#X text 212 353 3.arg: <symbol> destination-name;
+#X text 78 435 IEM KUG;
+#X text 62 423 musil;
+#X text 92 423 @;
+#X text 98 423 iem.at;
+#X text 61 445 Graz \, Austria;
+#X text 13 412 (c) Thomas Musil 2000 - 2006;
+#X text 234 312 initial arguments:;
+#X text 72 319 <bang> output;
+#X text 306 275 <dst> xxx : change destination name;
+#X text 208 86 the minimum of the 3 array lengths);
+#X text 56 177 3.) dst onset;
+#X text 56 155 1.) src_1 onset;
+#X text 56 166 2.) src_2 onset;
+#X text 199 233 <src1> xxx : change source name 1;
+#X text 257 255 <src2> xxx : change source name 2;
+#X text 211 326 1.arg: <symbol> source-name 1;
+#X text 211 339 2.arg: <symbol> source-name 2;
+#X text 195 72 (the number of samples which were compared are:;
+#X text 56 187 4.) n samples to compare;
+#X text 12 3 tab_lt;
+#X text 90 29 <bang> compare less than" the 2 src-arrays to dst-array
+;
+#X obj 61 78 tab_lt src1 src2 dst;
+#X obj 59 301 tab_lt src1 src2 dst;
+#X connect 2 0 33 0;
+#X connect 5 0 34 0;
+#X connect 7 0 34 0;
+#X connect 8 0 34 0;
+#X connect 9 0 34 0;
+#X connect 33 0 3 0;
+#X connect 34 0 4 0;
Added: trunk/externals/iem/iem_tab/tab_lt_scalar-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_lt_scalar-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_lt_scalar-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 22 55 884 588 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.5 -0.485714 -0.457143
+-0.4 -0.285713 -0.0571409 0.157146 0.328575 0.442861 0.557148 0.628577
+0.714292 0.800006 0.85715 0.885721 0.885721 0.871435 0.842864 0.757149
+0.557148 0.41429 0.257146 -0.0142835 -0.314285 -0.528572 -0.714287
+-0.757145 -0.757145 -0.757145 -0.742859 -0.742859 -0.728573 -0.714287
+-0.685715 -0.657144 -0.585715 -0.528572 -0.4 -0.242856 -0.0428551 0.157146
+0.342861 0.51429 0.728577 0.800006 0.828578 0.828578 0.828578 0.828578
+0.800006 0.771435 0.714292 0.571433 0.41429 0.242861 0.0857169 -0.0571409
+-0.242856 -0.385714 -0.542858 -0.685716 -0.757145 -0.800002 -0.828574
+-0.828574 -0.814288 -0.800002 -0.785716 -0.757145 -0.728573 -0.67143
+-0.585715 -0.471429 -0.271428 -0.0857125 0.114288 0.228575 0.314289
+0.385718 0.414285 0.428571 0.457143 0.471428 0.485714 0.485714 0.5
+0.5 0.5 0.5 0.5 0.5 0.5;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 116 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array dst 100 float 0;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 527 325 graph;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 370 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 178 272 dst dst;
+#X msg 129 249 src src;
+#X msg 47 36 0.5;
+#X msg 82 37 -0.5;
+#X text 201 332 1.arg: <symbol> source-name;
+#X text 201 345 2.arg: <symbol> destination-name;
+#X text 31 163 list of 4 floats:;
+#X text 78 475 IEM KUG;
+#X text 62 463 musil;
+#X text 92 463 @;
+#X text 98 463 iem.at;
+#X text 61 485 Graz \, Austria;
+#X text 13 452 (c) Thomas Musil 2000 - 2006;
+#X text 224 318 initial arguments:;
+#X text 75 351 <bang> output;
+#X text 229 272 <dst> xxx : change destination name;
+#X text 218 86 the minimum of both array lengths);
+#X text 182 248 <src> xxx : change source name;
+#X text 42 179 1.) src onset;
+#X text 42 190 2.) dst onset;
+#X text 42 201 3.) n samples to compare;
+#X text 42 210 4.) compared scalar value;
+#X text 205 72 (the number of samples which were compared are:;
+#X text 12 3 tab_lt_scalar;
+#X text 129 29 <float> compare "less than" the src-array with this
+scalar to dst-array;
+#X obj 59 331 tab_lt_scalar src dst;
+#X msg 48 228 0 0 100 0.5;
+#X obj 61 78 tab_lt_scalar src dst;
+#X connect 4 0 29 0;
+#X connect 5 0 29 0;
+#X connect 6 0 31 0;
+#X connect 7 0 31 0;
+#X connect 29 0 3 0;
+#X connect 30 0 29 0;
+#X connect 31 0 2 0;
Added: trunk/externals/iem/iem_tab/tab_max_index-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_max_index-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_max_index-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 118 94 788 440 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.185715 0.185715 0.200001 0.214286 0.214286 0.214286
+0.228572 0.228572 0.214286 0.200001 0.185715 0.171429 0.142857 0.1
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 529 24 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 294 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 205 270 1.arg: <symbol> source-name;
+#X msg 101 213 src src;
+#X floatatom 109 103 5 0 0 0 - - -;
+#X floatatom 158 104 5 0 0 0 - - -;
+#X text 166 118 max;
+#X floatatom 107 320 5 0 0 0 - - -;
+#X floatatom 156 336 5 0 0 0 - - -;
+#X msg 59 193 35 50;
+#X obj 61 78 tab_max_index src;
+#X text 97 117 max_index;
+#X obj 59 262 tab_max_index src;
+#X text 75 384 IEM KUG;
+#X text 59 372 musil;
+#X text 89 372 @;
+#X text 95 372 iem.at;
+#X text 58 394 Graz \, Austria;
+#X text 10 361 (c) Thomas Musil 2000 - 2006;
+#X text 229 258 initial arguments:;
+#X text 65 280 <bang> output;
+#X text 152 213 <src> xxx : change source name;
+#X text 11 6 tab_max_index;
+#X text 43 150 list of 2 floats:;
+#X text 55 160 1.) src onset;
+#X text 55 171 2.) n samples to calculate maximum;
+#X text 163 319 <float> maximum value output;
+#X text 115 301 <float> maximum index output;
+#X text 85 29 <bang> calculate maximum element and its index of array
+;
+#X connect 1 0 12 0;
+#X connect 5 0 14 0;
+#X connect 11 0 14 0;
+#X connect 12 0 2 0;
+#X connect 12 1 6 0;
+#X connect 12 2 7 0;
+#X connect 14 0 3 0;
+#X connect 14 1 9 0;
+#X connect 14 2 10 0;
Added: trunk/externals/iem/iem_tab/tab_min_index-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_min_index-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_min_index-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 116 92 784 436 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.185715 0.185715 0.200001 0.214286 0.214286 0.214286
+0.228572 0.228572 0.214286 0.200001 0.185715 0.171429 0.142857 0.1
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 529 24 graph;
+#X obj 61 31 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 106 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 294 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 205 270 1.arg: <symbol> source-name;
+#X msg 101 213 src src;
+#X floatatom 109 103 5 0 0 0 - - -;
+#X floatatom 158 104 5 0 0 0 - - -;
+#X floatatom 107 320 5 0 0 0 - - -;
+#X floatatom 156 336 5 0 0 0 - - -;
+#X msg 59 193 35 50;
+#X text 75 384 IEM KUG;
+#X text 59 372 musil;
+#X text 89 372 @;
+#X text 95 372 iem.at;
+#X text 58 394 Graz \, Austria;
+#X text 10 361 (c) Thomas Musil 2000 - 2006;
+#X text 229 258 initial arguments:;
+#X text 65 280 <bang> output;
+#X text 152 213 <src> xxx : change source name;
+#X text 43 150 list of 2 floats:;
+#X text 55 160 1.) src onset;
+#X text 11 6 tab_min_index;
+#X obj 61 78 tab_min_index src;
+#X obj 59 262 tab_min_index src;
+#X text 55 171 2.) n samples to calculate minimum;
+#X text 115 301 <float> minimum index output;
+#X text 163 319 <float> minimum value output;
+#X text 166 118 min;
+#X text 97 117 min_index;
+#X text 85 29 <bang> calculate minimum element and its index of array
+;
+#X connect 1 0 23 0;
+#X connect 5 0 24 0;
+#X connect 10 0 24 0;
+#X connect 23 0 2 0;
+#X connect 23 1 6 0;
+#X connect 23 2 7 0;
+#X connect 24 0 3 0;
+#X connect 24 1 8 0;
+#X connect 24 2 9 0;
Added: trunk/externals/iem/iem_tab/tab_min_max-help.pd
===================================================================
--- trunk/externals/iem/iem_tab/tab_min_max-help.pd (rev 0)
+++ trunk/externals/iem/iem_tab/tab_min_max-help.pd 2008-12-11 19:11:28 UTC (rev 10444)
@@ -0,0 +1,62 @@
+#N canvas 82 83 782 436 10;
+#N canvas 0 0 450 300 graph1 0;
+#X array src 100 float 1;
+#A 0 -0.442858 -0.414287 -0.385715 -0.342858 -0.314287 -0.257144 -0.128572
+-0.0428573 0.128572 0.228572 0.285715 0.328572 0.400001 0.414287 0.457144
+0.457144 0.442858 0.385715 0.314287 0.257144 0.214286 0.1 0.0428572
+-0.0142858 -0.0428573 -0.114286 -0.142858 -0.200001 -0.242858 -0.285715
+-0.328572 -0.342858 -0.37143 -0.385715 -0.414287 -0.414287 -0.414287
+-0.414287 -0.400001 -0.357144 -0.314287 -0.257144 -0.185715 -0.0714288
+0.0142857 0.0571429 0.185715 0.185715 0.200001 0.214286 0.214286 0.214286
+0.228572 0.228572 0.214286 0.200001 0.185715 0.171429 0.142857 0.1
+0.114286 0.0714285 -0.071429 -0.242858 -0.300001 -0.328573 -0.357144
+-0.37143 -0.385715 -0.400001 -0.442858 -0.457144 -0.47143 -0.457144
+-0.428573 -0.400001 -0.378573 -0.328572 -0.271429 -0.242858 -0.200001
+-0.128572 -0.0428574 -0.0285717 0.0142858 0.114286 0.128572 0.185715
+0.214286 0.257144 0.285715 0.314287 0.342858 0.357144 0.357144 0.357144
+0.357144 0.357144 0.342858 0.328572;
+#X coords 0 1 99 -1 200 140 1;
+#X restore 534 20 graph;
+#X obj 61 34 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 61 109 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 59 297 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 205 273 1.arg: <symbol> source-name;
+#X msg 101 216 src src;
+#X floatatom 103 106 5 0 0 0 - - -;
+#X floatatom 146 107 5 0 0 0 - - -;
+#X text 154 121 max;
+#X floatatom 101 323 5 0 0 0 - - -;
+#X floatatom 144 339 5 0 0 0 - - -;
+#X msg 59 196 35 50;
+#X text 75 387 IEM KUG;
+#X text 59 375 musil;
+#X text 89 375 @;
+#X text 95 375 iem.at;
+#X text 58 397 Graz \, Austria;
+#X text 10 364 (c) Thomas Musil 2000 - 2006;
+#X text 229 261 initial arguments:;
+#X text 65 283 <bang> output;
+#X text 152 216 <src> xxx : change source name;
+#X text 43 153 list of 2 floats:;
+#X text 55 163 1.) src onset;
+#X text 151 322 <float> maximum value output;
+#X text 11 9 tab_min_max;
+#X text 85 32 <bang> calculate minimum and maximum element value of
+array;
+#X text 55 174 2.) n samples to calculate minimum and maximum;
+#X text 110 120 min;
+#X obj 61 81 tab_min_max src;
+#X text 108 304 <float> minimum value output;
+#X obj 59 265 tab_min_max src;
+#X connect 1 0 28 0;
+#X connect 5 0 30 0;
+#X connect 11 0 30 0;
+#X connect 28 0 2 0;
+#X connect 28 1 6 0;
+#X connect 28 2 7 0;
+#X connect 30 0 3 0;
+#X connect 30 1 9 0;
+#X connect 30 2 10 0;
Added: trunk/externals/iem/iem_tab/tab_mul-help.pd
===================================================================
@@ Diff output truncated at 100000 characters. @@
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10443] trunk/externals/iem/iem_roomsim
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10443
http://pure-data.svn.sourceforge.net/pure-data/?rev=10443&view=rev
Author: tmusil
Date: 2008-12-11 18:52:08 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iem_roomsim/cart2del_damp_2d-help.pd
trunk/externals/iem/iem_roomsim/cart2del_damp_3d-help.pd
Removed Paths:
-------------
trunk/externals/iem/iem_roomsim/help/
Added: trunk/externals/iem/iem_roomsim/cart2del_damp_2d-help.pd
===================================================================
--- trunk/externals/iem/iem_roomsim/cart2del_damp_2d-help.pd (rev 0)
+++ trunk/externals/iem/iem_roomsim/cart2del_damp_2d-help.pd 2008-12-11 18:52:08 UTC (rev 10443)
@@ -0,0 +1,332 @@
+#N canvas 11 8 974 613 10;
+#X text 11 9 cart2del_damp_2d;
+#X obj 48 288 cart2del_damp_2d;
+#X msg 59 83 sonic_speed 340;
+#X msg 67 104 r_ambi 1.4;
+#X obj 105 154 pack;
+#X obj 139 154 t b f;
+#X floatatom 98 137 5 -20 20 0 - - -;
+#X floatatom 141 137 5 -20 20 0 - - -;
+#X text 183 136 m x m;
+#X obj 151 225 pack;
+#X obj 185 225 t b f;
+#X floatatom 144 208 5 -20 20 0 - - -;
+#X floatatom 187 208 5 -20 20 0 - - -;
+#X text 229 207 m x m;
+#X obj 48 313 print;
+#X msg 105 175 head_xy \$1 \$2;
+#X msg 151 246 src_xy \$1 \$2;
+#X obj 96 314 s xxx;
+#X obj 368 19 r xxx;
+#X obj 368 41 route direct early1 early2;
+#X obj 368 424 route del damp index_phi;
+#X floatatom 368 508 5 0 0 0 - - -;
+#X floatatom 414 485 5 0 0 0 - - -;
+#X floatatom 460 465 5 0 0 0 - - -;
+#X obj 418 241 route del damp index_phi;
+#X floatatom 510 290 5 0 0 0 - - -;
+#X floatatom 551 290 5 0 0 0 - - -;
+#X obj 418 358 unpack 0 0 0 0;
+#X floatatom 418 380 5 0 0 0 - - -;
+#X floatatom 460 380 5 0 0 0 - - -;
+#X floatatom 502 380 5 0 0 0 - - -;
+#X floatatom 545 380 5 0 0 0 - - -;
+#X obj 464 309 unpack 0 0 0 0;
+#X floatatom 464 339 5 0 0 0 - - -;
+#X floatatom 506 339 5 0 0 0 - - -;
+#X floatatom 548 339 5 0 0 0 - - -;
+#X floatatom 591 339 5 0 0 0 - - -;
+#X obj 460 444 route 1;
+#X obj 510 265 route 1 2 3 4;
+#X floatatom 592 290 5 0 0 0 - - -;
+#X floatatom 633 290 5 0 0 0 - - -;
+#X obj 468 62 route del damp index_phi;
+#X floatatom 560 112 5 0 0 0 - - -;
+#X floatatom 601 112 5 0 0 0 - - -;
+#X floatatom 468 204 5 0 0 0 - - -;
+#X floatatom 510 204 5 0 0 0 - - -;
+#X floatatom 552 204 5 0 0 0 - - -;
+#X floatatom 595 204 5 0 0 0 - - -;
+#X floatatom 642 112 5 0 0 0 - - -;
+#X floatatom 683 112 5 0 0 0 - - -;
+#X obj 560 87 route 1 2 3 4 5 6 7 8;
+#X floatatom 724 112 5 0 0 0 - - -;
+#X floatatom 765 112 5 0 0 0 - - -;
+#X floatatom 806 112 5 0 0 0 - - -;
+#X floatatom 847 112 5 0 0 0 - - -;
+#X text 673 290 degree;
+#X text 587 379 ms;
+#X text 499 466 degree;
+#X text 409 508 ms;
+#X text 808 204 ms;
+#X obj 468 181 unpack 0 0 0 0 0 0 0 0;
+#X floatatom 637 204 5 0 0 0 - - -;
+#X floatatom 679 204 5 0 0 0 - - -;
+#X floatatom 721 204 5 0 0 0 - - -;
+#X floatatom 764 204 5 0 0 0 - - -;
+#X floatatom 514 156 5 0 0 0 - - -;
+#X floatatom 556 156 5 0 0 0 - - -;
+#X floatatom 598 156 5 0 0 0 - - -;
+#X floatatom 641 156 5 0 0 0 - - -;
+#X obj 514 133 unpack 0 0 0 0 0 0 0 0;
+#X floatatom 683 156 5 0 0 0 - - -;
+#X floatatom 725 156 5 0 0 0 - - -;
+#X floatatom 767 156 5 0 0 0 - - -;
+#X floatatom 810 156 5 0 0 0 - - -;
+#X text 885 110 degree;
+#X text 78 385 IEM KUG;
+#X text 62 373 musil;
+#X text 92 373 @;
+#X text 98 373 iem.at;
+#X text 61 395 Graz \, Austria;
+#X text 13 362 (c) Thomas Musil 2000 - 2006;
+#X text 163 81 sonic speed in meter per second;
+#X text 148 105 minimum raduis in meter;
+#X text 149 64 room dimensions in meter;
+#X text 237 250 object coordinates;
+#X text 194 174 subject coordinates;
+#X text 847 156 linear rms;
+#X text 629 338 linear rms;
+#X text 452 483 linear rms;
+#X text 684 378 |;
+#X text 684 386 |;
+#X text 684 394 |;
+#X text 684 402 |;
+#X text 720 378 |;
+#X text 720 386 |;
+#X text 720 394 |;
+#X text 720 402 |;
+#X text 756 378 |;
+#X text 756 386 |;
+#X text 756 394 |;
+#X text 756 402 |;
+#X text 792 378 |;
+#X text 792 386 |;
+#X text 792 394 |;
+#X text 792 402 |;
+#X text 828 378 |;
+#X text 828 386 |;
+#X text 828 394 |;
+#X text 828 402 |;
+#X text 768 322 + y;
+#X text 671 371 --+-----+-----+-----+-----+-----+--;
+#X text 864 378 |;
+#X text 864 386 |;
+#X text 864 394 |;
+#X text 864 402 |;
+#X text 684 416 |;
+#X text 684 424 |;
+#X text 684 432 |;
+#X text 684 440 |;
+#X text 720 416 |;
+#X text 720 424 |;
+#X text 720 432 |;
+#X text 720 440 |;
+#X text 756 416 |;
+#X text 756 424 |;
+#X text 756 432 |;
+#X text 756 440 |;
+#X text 792 416 |;
+#X text 792 424 |;
+#X text 792 432 |;
+#X text 792 440 |;
+#X text 828 416 |;
+#X text 828 424 |;
+#X text 828 432 |;
+#X text 828 440 |;
+#X text 671 409 --+-----+-----+-----+-----+-----+--;
+#X text 864 416 |;
+#X text 864 424 |;
+#X text 864 432 |;
+#X text 864 440 |;
+#X text 684 454 |;
+#X text 684 462 |;
+#X text 684 470 |;
+#X text 684 478 |;
+#X text 720 454 |;
+#X text 720 462 |;
+#X text 720 470 |;
+#X text 720 478 |;
+#X text 756 454 |;
+#X text 756 462 |;
+#X text 756 470 |;
+#X text 756 478 |;
+#X text 792 454 |;
+#X text 792 462 |;
+#X text 792 470 |;
+#X text 792 478 |;
+#X text 828 454 |;
+#X text 828 462 |;
+#X text 828 470 |;
+#X text 828 478 |;
+#X text 671 447 --+-----+-----+-----+-----+-----+--;
+#X text 864 454 |;
+#X text 864 462 |;
+#X text 864 470 |;
+#X text 864 478 |;
+#X text 684 492 |;
+#X text 684 500 |;
+#X text 684 508 |;
+#X text 684 516 |;
+#X text 720 492 |;
+#X text 720 500 |;
+#X text 720 508 |;
+#X text 720 516 |;
+#X text 756 492 |;
+#X text 756 500 |;
+#X text 756 508 |;
+#X text 756 516 |;
+#X text 792 492 |;
+#X text 792 500 |;
+#X text 792 508 |;
+#X text 792 516 |;
+#X text 828 492 |;
+#X text 828 500 |;
+#X text 828 508 |;
+#X text 828 516 |;
+#X text 671 485 --+-----+-----+-----+-----+-----+--;
+#X text 864 492 |;
+#X text 864 500 |;
+#X text 864 508 |;
+#X text 864 516 |;
+#X text 684 530 |;
+#X text 684 538 |;
+#X text 684 546 |;
+#X text 684 554 |;
+#X text 720 530 |;
+#X text 720 538 |;
+#X text 720 546 |;
+#X text 720 554 |;
+#X text 756 530 |;
+#X text 756 538 |;
+#X text 756 546 |;
+#X text 756 554 |;
+#X text 792 530 |;
+#X text 792 538 |;
+#X text 792 546 |;
+#X text 792 554 |;
+#X text 828 530 |;
+#X text 828 538 |;
+#X text 828 546 |;
+#X text 828 554 |;
+#X text 671 523 --+-----+-----+-----+-----+-----+--;
+#X text 864 530 |;
+#X text 864 538 |;
+#X text 864 546 |;
+#X text 864 554 |;
+#X text 671 561 --+-----+-----+-----+-----+-----+--;
+#X text 750 461 ___________________________;
+#X text 911 466 > + x;
+#X text 774 338 |;
+#X text 774 345 |;
+#X text 774 352 |;
+#X text 774 359 |;
+#X text 774 366 |;
+#X text 774 373 |;
+#X text 774 380 |;
+#X text 774 387 |;
+#X text 774 394 |;
+#X text 774 401 |;
+#X text 774 408 |;
+#X text 774 415 |;
+#X text 774 414 |;
+#X text 774 421 |;
+#X text 774 428 |;
+#X text 774 435 |;
+#X text 774 441 |;
+#X text 774 448 |;
+#X text 774 455 |;
+#X text 774 462 |;
+#X text 774 469 |;
+#X text 774 476 |;
+#X text 774 483 |;
+#X text 774 490 |;
+#X text 774 334 ^;
+#X text 799 474 e1_1;
+#X text 762 429 e1_2;
+#X text 728 474 e1_3;
+#X text 763 507 e1_4;
+#X text 835 474 e2_1;
+#X text 762 389 e2_2;
+#X text 692 474 e2_3;
+#X text 763 543 e2_4;
+#X text 800 429 e2_5;
+#X text 728 429 e2_8;
+#X text 728 505 e2_6;
+#X text 800 505 e2_7;
+#X text 767 474 d_1;
+#X text 799 246 d .. direct;
+#X text 794 258 e1 .. early 1;
+#X text 794 270 e2 .. early 2;
+#X text 793 345 mirror source rooms;
+#X msg 48 63 room_dim 20 10;
+#X text 564 6 renders the delay time \, the damping and the direction
+of direct \, early_1 and early_2 reflections in a cuboid room model
+(2 dimensional);
+#X connect 1 0 14 0;
+#X connect 1 0 17 0;
+#X connect 2 0 1 0;
+#X connect 3 0 1 0;
+#X connect 4 0 15 0;
+#X connect 5 0 4 0;
+#X connect 5 1 4 1;
+#X connect 6 0 4 0;
+#X connect 7 0 5 0;
+#X connect 9 0 16 0;
+#X connect 10 0 9 0;
+#X connect 10 1 9 1;
+#X connect 11 0 9 0;
+#X connect 12 0 10 0;
+#X connect 15 0 1 0;
+#X connect 16 0 1 0;
+#X connect 18 0 19 0;
+#X connect 19 0 20 0;
+#X connect 19 1 24 0;
+#X connect 19 2 41 0;
+#X connect 20 0 21 0;
+#X connect 20 1 22 0;
+#X connect 20 2 37 0;
+#X connect 24 0 27 0;
+#X connect 24 1 32 0;
+#X connect 24 2 38 0;
+#X connect 27 0 28 0;
+#X connect 27 1 29 0;
+#X connect 27 2 30 0;
+#X connect 27 3 31 0;
+#X connect 32 0 33 0;
+#X connect 32 1 34 0;
+#X connect 32 2 35 0;
+#X connect 32 3 36 0;
+#X connect 37 0 23 0;
+#X connect 38 0 25 0;
+#X connect 38 1 26 0;
+#X connect 38 2 39 0;
+#X connect 38 3 40 0;
+#X connect 41 0 60 0;
+#X connect 41 1 69 0;
+#X connect 41 2 50 0;
+#X connect 50 0 42 0;
+#X connect 50 1 43 0;
+#X connect 50 2 48 0;
+#X connect 50 3 49 0;
+#X connect 50 4 51 0;
+#X connect 50 5 52 0;
+#X connect 50 6 53 0;
+#X connect 50 7 54 0;
+#X connect 60 0 44 0;
+#X connect 60 1 45 0;
+#X connect 60 2 46 0;
+#X connect 60 3 47 0;
+#X connect 60 4 61 0;
+#X connect 60 5 62 0;
+#X connect 60 6 63 0;
+#X connect 60 7 64 0;
+#X connect 69 0 65 0;
+#X connect 69 1 66 0;
+#X connect 69 2 67 0;
+#X connect 69 3 68 0;
+#X connect 69 4 70 0;
+#X connect 69 5 71 0;
+#X connect 69 6 72 0;
+#X connect 69 7 73 0;
+#X connect 260 0 1 0;
Added: trunk/externals/iem/iem_roomsim/cart2del_damp_3d-help.pd
===================================================================
--- trunk/externals/iem/iem_roomsim/cart2del_damp_3d-help.pd (rev 0)
+++ trunk/externals/iem/iem_roomsim/cart2del_damp_3d-help.pd 2008-12-11 18:52:08 UTC (rev 10443)
@@ -0,0 +1,573 @@
+#N canvas 65 59 947 553 10;
+#X msg 28 87 sonic_speed 340;
+#X msg 36 108 r_ambi 1.4;
+#X obj 17 339 print;
+#X obj 65 340 s xxx;
+#X obj 307 27 r xxx;
+#X obj 307 49 route direct early1 early2;
+#X floatatom 307 520 5 0 0 0 - - -;
+#X floatatom 365 504 5 0 0 0 - - -;
+#X floatatom 423 487 5 0 0 0 - - -;
+#X floatatom 535 493 5 0 0 0 - - -;
+#X floatatom 555 512 5 0 0 0 - - -;
+#X floatatom 576 493 5 0 0 0 - - -;
+#X floatatom 596 512 5 0 0 0 - - -;
+#X obj 423 466 route 1;
+#X floatatom 318 270 5 0 0 0 - - -;
+#X floatatom 332 287 5 0 0 0 - - -;
+#X floatatom 347 304 5 0 0 0 - - -;
+#X floatatom 361 270 5 0 0 0 - - -;
+#X text 873 514 degree;
+#X text 659 495 ms;
+#X text 462 488 degree;
+#X text 344 520 ms;
+#X text 603 304 ms;
+#X floatatom 376 287 5 0 0 0 - - -;
+#X floatatom 390 304 5 0 0 0 - - -;
+#X floatatom 405 270 5 0 0 0 - - -;
+#X floatatom 419 287 5 0 0 0 - - -;
+#X text 15 7 cart2del_damp_3d;
+#X obj 17 314 cart2del_damp_3d;
+#X obj 172 261 t b f;
+#X floatatom 81 244 5 -20 20 0 - - -;
+#X floatatom 174 244 5 -20 20 0 - - -;
+#X obj 88 261 pack 0 0 0;
+#X obj 222 261 t b f;
+#X floatatom 224 244 5 0 30 0 - - -;
+#X text 147 224 m x m x m;
+#X obj 143 179 t b f;
+#X floatatom 52 162 5 -20 20 0 - - -;
+#X floatatom 145 162 5 -20 20 0 - - -;
+#X obj 59 179 pack 0 0 0;
+#X obj 193 179 t b f;
+#X floatatom 195 162 5 0 30 0 - - -;
+#X text 108 140 m x m x m;
+#X msg 88 282 src_xyz \$1 \$2 \$3;
+#X msg 59 200 head_xyz \$1 \$2 \$3;
+#X msg 17 66 room_dim 20 10 5;
+#X obj 322 72 route del damp index_theta_phi;
+#X obj 535 351 route del damp index_theta_phi;
+#X obj 307 445 route del damp index_theta_phi;
+#X obj 535 472 unpack 0 0 0 0 0 0;
+#X floatatom 617 493 5 0 0 0 - - -;
+#X floatatom 638 512 5 0 0 0 - - -;
+#X obj 753 398 route 1 2 3 4 5 6;
+#X floatatom 434 304 5 0 0 0 - - -;
+#X floatatom 448 270 5 0 0 0 - - -;
+#X floatatom 463 287 5 0 0 0 - - -;
+#X floatatom 477 304 5 0 0 0 - - -;
+#X floatatom 492 270 5 0 0 0 - - -;
+#X floatatom 506 287 5 0 0 0 - - -;
+#X floatatom 521 304 5 0 0 0 - - -;
+#X floatatom 535 270 5 0 0 0 - - -;
+#X floatatom 550 287 5 0 0 0 - - -;
+#X floatatom 565 304 5 0 0 0 - - -;
+#X obj 318 247 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X obj 378 102 route 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18;
+#X text 90 404 IEM KUG;
+#X text 74 392 musil;
+#X text 104 392 @;
+#X text 110 392 iem.at;
+#X text 73 414 Graz \, Austria;
+#X text 25 381 (c) Thomas Musil 2000 - 2006;
+#X text 127 87 sonic speed in meter per second;
+#X text 111 108 minimum raduis in meter;
+#X text 118 68 room dimensions in meter;
+#X text 194 281 object coordinates;
+#X text 171 199 subject coordinates;
+#X text 594 658 |;
+#X text 594 666 |;
+#X text 594 674 |;
+#X text 594 682 |;
+#X text 630 658 |;
+#X text 630 666 |;
+#X text 630 674 |;
+#X text 630 682 |;
+#X text 666 658 |;
+#X text 666 666 |;
+#X text 666 674 |;
+#X text 666 682 |;
+#X text 702 658 |;
+#X text 702 666 |;
+#X text 702 674 |;
+#X text 702 682 |;
+#X text 738 658 |;
+#X text 738 666 |;
+#X text 738 674 |;
+#X text 738 682 |;
+#X text 678 602 + y;
+#X text 581 651 --+-----+-----+-----+-----+-----+--;
+#X text 774 658 |;
+#X text 774 666 |;
+#X text 774 674 |;
+#X text 774 682 |;
+#X text 594 696 |;
+#X text 594 704 |;
+#X text 594 712 |;
+#X text 594 720 |;
+#X text 630 696 |;
+#X text 630 704 |;
+#X text 630 712 |;
+#X text 630 720 |;
+#X text 666 696 |;
+#X text 666 704 |;
+#X text 666 712 |;
+#X text 666 720 |;
+#X text 702 696 |;
+#X text 702 704 |;
+#X text 702 712 |;
+#X text 702 720 |;
+#X text 738 696 |;
+#X text 738 704 |;
+#X text 738 712 |;
+#X text 738 720 |;
+#X text 581 689 --+-----+-----+-----+-----+-----+--;
+#X text 774 696 |;
+#X text 774 704 |;
+#X text 774 712 |;
+#X text 774 720 |;
+#X text 594 734 |;
+#X text 594 742 |;
+#X text 594 750 |;
+#X text 594 758 |;
+#X text 630 734 |;
+#X text 630 742 |;
+#X text 630 750 |;
+#X text 630 758 |;
+#X text 666 734 |;
+#X text 666 742 |;
+#X text 666 750 |;
+#X text 666 758 |;
+#X text 702 734 |;
+#X text 702 742 |;
+#X text 702 750 |;
+#X text 702 758 |;
+#X text 738 734 |;
+#X text 738 742 |;
+#X text 738 750 |;
+#X text 738 758 |;
+#X text 581 727 --+-----+-----+-----+-----+-----+--;
+#X text 774 734 |;
+#X text 774 742 |;
+#X text 774 750 |;
+#X text 774 758 |;
+#X text 594 772 |;
+#X text 594 780 |;
+#X text 594 788 |;
+#X text 594 796 |;
+#X text 630 772 |;
+#X text 630 780 |;
+#X text 630 788 |;
+#X text 630 796 |;
+#X text 666 772 |;
+#X text 666 780 |;
+#X text 666 788 |;
+#X text 666 796 |;
+#X text 702 772 |;
+#X text 702 780 |;
+#X text 702 788 |;
+#X text 702 796 |;
+#X text 738 772 |;
+#X text 738 780 |;
+#X text 738 788 |;
+#X text 738 796 |;
+#X text 581 765 --+-----+-----+-----+-----+-----+--;
+#X text 774 772 |;
+#X text 774 780 |;
+#X text 774 788 |;
+#X text 774 796 |;
+#X text 594 810 |;
+#X text 594 818 |;
+#X text 594 826 |;
+#X text 594 834 |;
+#X text 630 810 |;
+#X text 630 818 |;
+#X text 630 826 |;
+#X text 630 834 |;
+#X text 666 810 |;
+#X text 666 818 |;
+#X text 666 826 |;
+#X text 666 834 |;
+#X text 702 810 |;
+#X text 702 818 |;
+#X text 702 826 |;
+#X text 702 834 |;
+#X text 738 810 |;
+#X text 738 818 |;
+#X text 738 826 |;
+#X text 738 834 |;
+#X text 581 803 --+-----+-----+-----+-----+-----+--;
+#X text 774 810 |;
+#X text 774 818 |;
+#X text 774 826 |;
+#X text 774 834 |;
+#X text 581 841 --+-----+-----+-----+-----+-----+--;
+#X text 660 741 ___________________________;
+#X text 821 746 > + x;
+#X text 684 618 |;
+#X text 684 625 |;
+#X text 684 632 |;
+#X text 684 639 |;
+#X text 684 646 |;
+#X text 684 653 |;
+#X text 684 660 |;
+#X text 684 667 |;
+#X text 684 674 |;
+#X text 684 681 |;
+#X text 684 688 |;
+#X text 684 695 |;
+#X text 684 694 |;
+#X text 684 701 |;
+#X text 684 708 |;
+#X text 684 715 |;
+#X text 684 721 |;
+#X text 684 728 |;
+#X text 684 735 |;
+#X text 684 742 |;
+#X text 684 749 |;
+#X text 684 756 |;
+#X text 684 763 |;
+#X text 684 770 |;
+#X text 684 614 ^;
+#X text 709 754 e1_1;
+#X text 672 709 e1_2;
+#X text 745 754 e2_1;
+#X text 672 669 e2_2;
+#X text 677 758 d_1;
+#X text 239 738 d .. direct;
+#X text 234 750 e1 .. early 1;
+#X text 234 762 e2 .. early 2;
+#X text 710 630 mirror source rooms;
+#X text 400 504 linear rms;
+#X floatatom 545 397 5 0 0 0 - - -;
+#X floatatom 565 416 5 0 0 0 - - -;
+#X floatatom 586 397 5 0 0 0 - - -;
+#X floatatom 606 416 5 0 0 0 - - -;
+#X obj 545 376 unpack 0 0 0 0 0 0;
+#X floatatom 627 397 5 0 0 0 - - -;
+#X floatatom 648 416 5 0 0 0 - - -;
+#X text 665 396 linear rms;
+#X obj 753 420 unpack;
+#X floatatom 753 457 5 0 0 0 - - -;
+#X floatatom 761 440 5 0 0 0 - - -;
+#X obj 769 477 unpack;
+#X floatatom 769 514 5 0 0 0 - - -;
+#X floatatom 777 497 5 0 0 0 - - -;
+#X obj 785 420 unpack;
+#X floatatom 785 457 5 0 0 0 - - -;
+#X floatatom 793 440 5 0 0 0 - - -;
+#X obj 801 477 unpack;
+#X floatatom 801 514 5 0 0 0 - - -;
+#X floatatom 809 497 5 0 0 0 - - -;
+#X obj 817 420 unpack;
+#X floatatom 817 457 5 0 0 0 - - -;
+#X floatatom 825 440 5 0 0 0 - - -;
+#X obj 833 477 unpack;
+#X floatatom 833 514 5 0 0 0 - - -;
+#X floatatom 841 497 5 0 0 0 - - -;
+#X text 879 497 degree;
+#X text 857 456 degree;
+#X text 863 439 degree;
+#X text 694 456 elevation;
+#X text 706 440 azimuth;
+#X text 709 512 elevation;
+#X text 723 495 azimuth;
+#X floatatom 617 275 5 0 0 0 - - -;
+#X floatatom 631 292 5 0 0 0 - - -;
+#X floatatom 646 309 5 0 0 0 - - -;
+#X floatatom 660 275 5 0 0 0 - - -;
+#X floatatom 675 292 5 0 0 0 - - -;
+#X floatatom 689 309 5 0 0 0 - - -;
+#X floatatom 704 275 5 0 0 0 - - -;
+#X floatatom 718 292 5 0 0 0 - - -;
+#X floatatom 733 309 5 0 0 0 - - -;
+#X floatatom 747 275 5 0 0 0 - - -;
+#X floatatom 762 292 5 0 0 0 - - -;
+#X floatatom 776 309 5 0 0 0 - - -;
+#X floatatom 791 275 5 0 0 0 - - -;
+#X floatatom 805 292 5 0 0 0 - - -;
+#X floatatom 820 309 5 0 0 0 - - -;
+#X floatatom 834 275 5 0 0 0 - - -;
+#X floatatom 849 292 5 0 0 0 - - -;
+#X floatatom 864 309 5 0 0 0 - - -;
+#X obj 617 252 unpack 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X text 872 273 linear rms;
+#X obj 378 124 unpack;
+#X floatatom 378 161 5 0 0 0 - - -;
+#X floatatom 386 144 5 0 0 0 - - -;
+#X obj 410 124 unpack;
+#X floatatom 410 161 5 0 0 0 - - -;
+#X floatatom 418 144 5 0 0 0 - - -;
+#X obj 443 124 unpack;
+#X floatatom 443 161 5 0 0 0 - - -;
+#X floatatom 451 144 5 0 0 0 - - -;
+#X obj 394 181 unpack;
+#X floatatom 394 218 5 0 0 0 - - -;
+#X floatatom 402 201 5 0 0 0 - - -;
+#X obj 427 181 unpack;
+#X floatatom 427 218 5 0 0 0 - - -;
+#X floatatom 435 201 5 0 0 0 - - -;
+#X obj 459 181 unpack;
+#X floatatom 459 218 5 0 0 0 - - -;
+#X floatatom 467 201 5 0 0 0 - - -;
+#X obj 477 124 unpack;
+#X floatatom 477 161 5 0 0 0 - - -;
+#X floatatom 485 144 5 0 0 0 - - -;
+#X obj 509 124 unpack;
+#X floatatom 509 161 5 0 0 0 - - -;
+#X floatatom 517 144 5 0 0 0 - - -;
+#X obj 542 124 unpack;
+#X floatatom 542 161 5 0 0 0 - - -;
+#X floatatom 550 144 5 0 0 0 - - -;
+#X obj 493 181 unpack;
+#X floatatom 493 218 5 0 0 0 - - -;
+#X floatatom 501 201 5 0 0 0 - - -;
+#X obj 526 181 unpack;
+#X floatatom 526 218 5 0 0 0 - - -;
+#X floatatom 534 201 5 0 0 0 - - -;
+#X obj 558 181 unpack;
+#X floatatom 558 218 5 0 0 0 - - -;
+#X floatatom 566 201 5 0 0 0 - - -;
+#X obj 577 124 unpack;
+#X floatatom 577 161 5 0 0 0 - - -;
+#X floatatom 585 144 5 0 0 0 - - -;
+#X obj 609 124 unpack;
+#X floatatom 609 161 5 0 0 0 - - -;
+#X floatatom 617 144 5 0 0 0 - - -;
+#X obj 642 124 unpack;
+#X floatatom 642 161 5 0 0 0 - - -;
+#X floatatom 650 144 5 0 0 0 - - -;
+#X obj 593 181 unpack;
+#X floatatom 593 218 5 0 0 0 - - -;
+#X floatatom 601 201 5 0 0 0 - - -;
+#X obj 626 181 unpack;
+#X floatatom 626 218 5 0 0 0 - - -;
+#X floatatom 634 201 5 0 0 0 - - -;
+#X obj 658 181 unpack;
+#X floatatom 658 218 5 0 0 0 - - -;
+#X floatatom 666 201 5 0 0 0 - - -;
+#X text 694 218 degree;
+#X text 700 201 degree;
+#X text 678 160 degree;
+#X text 684 143 degree;
+#X text 319 160 elevation;
+#X text 331 144 azimuth;
+#X text 334 216 elevation;
+#X text 348 199 azimuth;
+#X text 564 6 renders the delay time \, the damping and the direction
+of direct \, early_1 and early_2 reflections in a cuboid room model
+(3 dimensional);
+#X text 679 746 (;
+#X text 689 746 );
+#X text 684 741 -;
+#X text 684 751 -;
+#X text 687 740 .;
+#X text 682 740 .;
+#X text 682 748 .;
+#X text 687 748 .;
+#X text 685 744 .;
+#X text 684 744 .;
+#X text 684 745 .;
+#X text 685 745 .;
+#X text 685 743 .;
+#X text 684 743 .;
+#X text 689 737 +z;
+#X text 683 743 .;
+#X text 683 744 .;
+#X text 683 745 .;
+#X text 72 500 e2_3;
+#X text 74 560 e1_3;
+#X text 107 560 e2_8;
+#X text 74 543 e2_9;
+#X text 36 562 e2_17;
+#X text 74 579 e2_18;
+#X text 77 651 d_1;
+#X text 110 651 e1_1;
+#X text 77 634 e1_2;
+#X text 77 670 e1_5;
+#X text 39 653 e1_4;
+#X text 143 650 e2_1;
+#X text 75 619 e2_2;
+#X text 8 653 e2_4;
+#X text 78 685 e2_5;
+#X text 110 633 e2_7;
+#X text 36 670 e2_10;
+#X text 108 669 e2_13;
+#X text 37 636 e2_16;
+#X text 494 638 z-axe shows out of the display;
+#X text 78 745 e1_6;
+#X text 40 747 e2_11;
+#X text 78 764 e2_12;
+#X text 111 745 e2_14;
+#X text 78 728 e2_15;
+#X text 82 808 e2_6;
+#X text 635 708 e2_16;
+#X text 710 709 e2_7;
+#X text 638 754 e1_4;
+#X text 601 754 e2_4;
+#X text 635 786 e2_10;
+#X text 673 787 e1_5;
+#X text 708 786 e2_13;
+#X text 673 823 e2_5;
+#X text 70 851 bottom (-z);
+#X text 69 463 top (+z);
+#X text 489 656 shows only;
+#X text 487 676 the x/y-plane;
+#X text 52 449 mirror source rooms (3D);
+#X connect 0 0 28 0;
+#X connect 1 0 28 0;
+#X connect 4 0 5 0;
+#X connect 5 0 48 0;
+#X connect 5 1 47 0;
+#X connect 5 2 46 0;
+#X connect 13 0 8 0;
+#X connect 28 0 2 0;
+#X connect 28 0 3 0;
+#X connect 29 0 32 0;
+#X connect 29 1 32 1;
+#X connect 30 0 32 0;
+#X connect 31 0 29 0;
+#X connect 32 0 43 0;
+#X connect 33 0 32 0;
+#X connect 33 1 32 2;
+#X connect 34 0 33 0;
+#X connect 36 0 39 0;
+#X connect 36 1 39 1;
+#X connect 37 0 39 0;
+#X connect 38 0 36 0;
+#X connect 39 0 44 0;
+#X connect 40 0 39 0;
+#X connect 40 1 39 2;
+#X connect 41 0 40 0;
+#X connect 43 0 28 0;
+#X connect 44 0 28 0;
+#X connect 45 0 28 0;
+#X connect 46 0 63 0;
+#X connect 46 1 291 0;
+#X connect 46 2 64 0;
+#X connect 47 0 49 0;
+#X connect 47 1 244 0;
+#X connect 47 2 52 0;
+#X connect 48 0 6 0;
+#X connect 48 1 7 0;
+#X connect 48 2 13 0;
+#X connect 49 0 9 0;
+#X connect 49 1 10 0;
+#X connect 49 2 11 0;
+#X connect 49 3 12 0;
+#X connect 49 4 50 0;
+#X connect 49 5 51 0;
+#X connect 52 0 248 0;
+#X connect 52 1 251 0;
+#X connect 52 2 254 0;
+#X connect 52 3 257 0;
+#X connect 52 4 260 0;
+#X connect 52 5 263 0;
+#X connect 63 0 14 0;
+#X connect 63 1 15 0;
+#X connect 63 2 16 0;
+#X connect 63 3 17 0;
+#X connect 63 4 23 0;
+#X connect 63 5 24 0;
+#X connect 63 6 25 0;
+#X connect 63 7 26 0;
+#X connect 63 8 53 0;
+#X connect 63 9 54 0;
+#X connect 63 10 55 0;
+#X connect 63 11 56 0;
+#X connect 63 12 57 0;
+#X connect 63 13 58 0;
+#X connect 63 14 59 0;
+#X connect 63 15 60 0;
+#X connect 63 16 61 0;
+#X connect 63 17 62 0;
+#X connect 64 0 293 0;
+#X connect 64 1 302 0;
+#X connect 64 2 296 0;
+#X connect 64 3 305 0;
+#X connect 64 4 299 0;
+#X connect 64 5 308 0;
+#X connect 64 6 311 0;
+#X connect 64 7 320 0;
+#X connect 64 8 314 0;
+#X connect 64 9 323 0;
+#X connect 64 10 317 0;
+#X connect 64 11 326 0;
+#X connect 64 12 329 0;
+#X connect 64 13 338 0;
+#X connect 64 14 332 0;
+#X connect 64 15 341 0;
+#X connect 64 16 335 0;
+#X connect 64 17 344 0;
+#X connect 244 0 240 0;
+#X connect 244 1 241 0;
+#X connect 244 2 242 0;
+#X connect 244 3 243 0;
+#X connect 244 4 245 0;
+#X connect 244 5 246 0;
+#X connect 248 0 249 0;
+#X connect 248 1 250 0;
+#X connect 251 0 252 0;
+#X connect 251 1 253 0;
+#X connect 254 0 255 0;
+#X connect 254 1 256 0;
+#X connect 257 0 258 0;
+#X connect 257 1 259 0;
+#X connect 260 0 261 0;
+#X connect 260 1 262 0;
+#X connect 263 0 264 0;
+#X connect 263 1 265 0;
+#X connect 291 0 273 0;
+#X connect 291 1 274 0;
+#X connect 291 2 275 0;
+#X connect 291 3 276 0;
+#X connect 291 4 277 0;
+#X connect 291 5 278 0;
+#X connect 291 6 279 0;
+#X connect 291 7 280 0;
+#X connect 291 8 281 0;
+#X connect 291 9 282 0;
+#X connect 291 10 283 0;
+#X connect 291 11 284 0;
+#X connect 291 12 285 0;
+#X connect 291 13 286 0;
+#X connect 291 14 287 0;
+#X connect 291 15 288 0;
+#X connect 291 16 289 0;
+#X connect 291 17 290 0;
+#X connect 293 0 294 0;
+#X connect 293 1 295 0;
+#X connect 296 0 297 0;
+#X connect 296 1 298 0;
+#X connect 299 0 300 0;
+#X connect 299 1 301 0;
+#X connect 302 0 303 0;
+#X connect 302 1 304 0;
+#X connect 305 0 306 0;
+#X connect 305 1 307 0;
+#X connect 308 0 309 0;
+#X connect 308 1 310 0;
+#X connect 311 0 312 0;
+#X connect 311 1 313 0;
+#X connect 314 0 315 0;
+#X connect 314 1 316 0;
+#X connect 317 0 318 0;
+#X connect 317 1 319 0;
+#X connect 320 0 321 0;
+#X connect 320 1 322 0;
+#X connect 323 0 324 0;
+#X connect 323 1 325 0;
+#X connect 326 0 327 0;
+#X connect 326 1 328 0;
+#X connect 329 0 330 0;
+#X connect 329 1 331 0;
+#X connect 332 0 333 0;
+#X connect 332 1 334 0;
+#X connect 335 0 336 0;
+#X connect 335 1 337 0;
+#X connect 338 0 339 0;
+#X connect 338 1 340 0;
+#X connect 341 0 342 0;
+#X connect 341 1 343 0;
+#X connect 344 0 345 0;
+#X connect 344 1 346 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10442] trunk/externals/iem/iem_matrix
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10442
http://pure-data.svn.sourceforge.net/pure-data/?rev=10442&view=rev
Author: tmusil
Date: 2008-12-11 18:44:31 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iem_matrix/matrix_bundle_stat~-help.pd
trunk/externals/iem/iem_matrix/matrix_diag_mul_line8~-help.pd
trunk/externals/iem/iem_matrix/matrix_diag_mul_line~-help.pd
trunk/externals/iem/iem_matrix/matrix_diag_mul_stat~-help.pd
trunk/externals/iem/iem_matrix/matrix_mul_line8~-help.pd
trunk/externals/iem/iem_matrix/matrix_mul_line~-help.pd
trunk/externals/iem/iem_matrix/matrix_mul_stat~-help.pd
Removed Paths:
-------------
trunk/externals/iem/iem_matrix/help/
Added: trunk/externals/iem/iem_matrix/matrix_bundle_stat~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_bundle_stat~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_bundle_stat~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,100 @@
+#N canvas 54 38 886 656 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 47 459 matrix_bundle_stat~ 5 2;
+#X obj 46 347 sig~ 1;
+#X obj 80 369 sig~ 2;
+#X obj 114 391 sig~ 4;
+#X obj 146 413 sig~ 8;
+#X obj 180 436 sig~ 16;
+#X obj 47 488 unsig~;
+#X floatatom 47 512 5 0 0 0 - - -;
+#X obj 180 487 unsig~;
+#X floatatom 180 511 5 0 0 0 - - -;
+#X obj 239 442 any;
+#X msg 239 94 bundle 0 0 0 0 0;
+#X msg 239 120 bundle 1 1 1 1 1;
+#X msg 239 141 bundle 2 2 2 2 2;
+#X msg 239 167 bundle 1 0 0 0 0;
+#X msg 239 187 bundle 0 1 0 0 0;
+#X msg 239 207 bundle 0 0 1 0 0;
+#X msg 239 227 bundle 0 0 0 1 0;
+#X msg 239 247 bundle 0 0 0 0 1;
+#X msg 239 273 bundle 2 0 0 0 0;
+#X msg 239 293 bundle 0 2 0 0 0;
+#X msg 239 313 bundle 0 0 2 0 0;
+#X msg 239 333 bundle 0 0 0 2 0;
+#X msg 239 353 bundle 0 0 0 0 2;
+#X obj 392 442 pp element;
+#X obj 392 419 pack 0 0;
+#X obj 392 397 f;
+#X floatatom 435 368 4 1 5 0 - - -;
+#X floatatom 405 368 4 0 2 0 - - -;
+#X obj 382 375 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 671 16 SIG_OUT = A * SIG_IN;
+#X text 690 34 A is quadratic;
+#X text 627 51 dim(SIG_OUT) = dim(SIG_IN) = n;
+#X text 88 15 matrix_bundle_stat~;
+#X text 234 51 each matrix-column has only one one \, the other elements
+are zero;
+#X text 261 475 2.arg <float> Nr. of outlets = rows;
+#X text 261 464 1.arg <float> Nr. of inlets = columns;
+#X text 477 336 message "element";
+#X text 491 365 2.) item <float> column_index (1 .. nr_columns);
+#X text 491 353 1.) item <float> row_index (0 .. nr_rows);
+#X text 446 111 message "bundle";
+#X text 516 381 where the single one of the column will be placed;
+#X text 517 393 if (row-index == 0) -> the column has only zeros;
+#X text 449 126 (nr_inlets = nr_columns) <float> row-indices (0 ..
+nr_row);
+#X text 454 162 if (row-index == 0) -> the column has only zeros;
+#X text 453 150 where the single one of each column will be placed
+;
+#X msg 239 383 bundle 1 1 2 1 2;
+#X msg 239 403 bundle 2 2 1 2 1;
+#X text 78 585 IEM KUG;
+#X text 62 573 musil;
+#X text 92 573 @;
+#X text 98 573 iem.at;
+#X text 61 595 Graz \, Austria;
+#X text 13 562 (c) Thomas Musil 2000 - 2006;
+#X text 234 14 multiplies a n-dimensional signal-in-vector with a static
+(like sig~) signal-matrix to a n-dimensional signal-out-vector;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 10 0;
+#X connect 4 1 12 0;
+#X connect 5 0 4 0;
+#X connect 6 0 4 1;
+#X connect 7 0 4 2;
+#X connect 8 0 4 3;
+#X connect 9 0 4 4;
+#X connect 10 0 11 0;
+#X connect 12 0 13 0;
+#X connect 14 0 4 0;
+#X connect 15 0 14 0;
+#X connect 16 0 14 0;
+#X connect 17 0 14 0;
+#X connect 18 0 14 0;
+#X connect 19 0 14 0;
+#X connect 20 0 14 0;
+#X connect 21 0 14 0;
+#X connect 22 0 14 0;
+#X connect 23 0 14 0;
+#X connect 24 0 14 0;
+#X connect 25 0 14 0;
+#X connect 26 0 14 0;
+#X connect 27 0 14 0;
+#X connect 28 0 4 0;
+#X connect 29 0 28 0;
+#X connect 30 0 29 0;
+#X connect 31 0 29 1;
+#X connect 32 0 30 1;
+#X connect 33 0 30 0;
+#X connect 50 0 14 0;
+#X connect 51 0 14 0;
Added: trunk/externals/iem/iem_matrix/matrix_diag_mul_line8~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_diag_mul_line8~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_diag_mul_line8~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,91 @@
+#N canvas 113 27 826 499 10;
+#X obj 18 45 dsp;
+#X obj 18 15 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 18 101 5 0 0 0 - - -;
+#X floatatom 33 75 5 0 0 0 - - -;
+#X obj 33 294 sig~ 1;
+#X obj 117 297 sig~ 2;
+#X obj 202 298 sig~ 4;
+#X obj 34 367 unsig~;
+#X floatatom 34 391 5 0 0 0 - - -;
+#X obj 118 365 unsig~;
+#X floatatom 118 389 5 0 0 0 - - -;
+#X obj 256 321 any;
+#X obj 409 321 pp element;
+#X obj 409 276 f;
+#X floatatom 422 253 4 1 3 0 - - -;
+#X obj 399 254 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 203 367 unsig~;
+#X floatatom 203 391 5 0 0 0 - - -;
+#X floatatom 452 254 5 0 0 0 - - -;
+#X msg 256 102 diag 0 0 0;
+#X msg 256 126 diag 1 1 1;
+#X msg 256 147 diag 1 0 0;
+#X msg 256 168 diag 0 0 2;
+#X msg 256 189 diag 0 -10 0;
+#X obj 409 298 pack 0 0;
+#X text 653 17 SIG_OUT = A * SIG_IN;
+#X text 672 35 A is quadratic;
+#X text 356 96 message "diag";
+#X text 367 117 (nr_rows = nr_columns = n) items <float> elements of
+main-diagonal of matrix;
+#X text 609 52 dim(SIG_OUT) = dim(SIG_IN) = n;
+#X text 215 54 the elements of matrix are all zero except the main-diagonal
+;
+#X text 479 275 message "element";
+#X text 493 292 1.) item <float> row_index = column-index (1 .. n)
+;
+#X text 493 305 2.) item <float> matrix-element at index \, index;
+#X text 256 342 1.arg <float> Nr. of inlets = columns = outlets = rows
+;
+#X text 276 365 from previous state to next state of matrix;
+#X text 256 353 2.arg <float> interpolation-time in ms;
+#X text 70 16 matrix_diag_mul_line8~;
+#X obj 34 338 matrix_diag_mul_line8~ 3 3000;
+#X text 218 67 interpolation of matrix-elements will be done only every
+8 samples;
+#X msg 12 153 time 100;
+#X msg 12 179 time 3000;
+#X msg 14 250 stop;
+#X text 29 197 message "time";
+#X text 36 210 1.) item <float> interpolation-time in ms;
+#X text 53 249 message "stop";
+#X text 53 261 interrupts the interpolation;
+#X text 78 446 IEM KUG;
+#X text 62 434 musil;
+#X text 92 434 @;
+#X text 98 434 iem.at;
+#X text 61 456 Graz \, Austria;
+#X text 13 423 (c) Thomas Musil 2000 - 2006;
+#X text 216 15 multiplies a n-dimensional signal-in-vector with a dynamic
+changeable (like line~) signal-matrix to a n-dimensional signal-out-vector
+;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 38 0;
+#X connect 5 0 38 1;
+#X connect 6 0 38 2;
+#X connect 7 0 8 0;
+#X connect 9 0 10 0;
+#X connect 11 0 38 0;
+#X connect 12 0 38 0;
+#X connect 13 0 24 0;
+#X connect 14 0 13 1;
+#X connect 15 0 13 0;
+#X connect 16 0 17 0;
+#X connect 18 0 24 1;
+#X connect 19 0 11 0;
+#X connect 20 0 11 0;
+#X connect 21 0 11 0;
+#X connect 22 0 11 0;
+#X connect 23 0 11 0;
+#X connect 24 0 12 0;
+#X connect 38 0 7 0;
+#X connect 38 1 9 0;
+#X connect 38 2 16 0;
+#X connect 40 0 38 0;
+#X connect 41 0 38 0;
+#X connect 42 0 38 0;
Added: trunk/externals/iem/iem_matrix/matrix_diag_mul_line~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_diag_mul_line~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_diag_mul_line~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,89 @@
+#N canvas 113 27 828 501 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 33 293 sig~ 1;
+#X obj 115 296 sig~ 2;
+#X obj 197 297 sig~ 4;
+#X obj 34 366 unsig~;
+#X floatatom 34 390 5 0 0 0 - - -;
+#X obj 115 364 unsig~;
+#X floatatom 115 388 5 0 0 0 - - -;
+#X obj 256 320 any;
+#X obj 409 320 pp element;
+#X obj 409 275 f;
+#X floatatom 422 252 4 1 3 0 - - -;
+#X obj 399 253 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 197 366 unsig~;
+#X floatatom 197 390 5 0 0 0 - - -;
+#X floatatom 452 253 5 0 0 0 - - -;
+#X msg 256 101 diag 0 0 0;
+#X msg 256 125 diag 1 1 1;
+#X msg 256 146 diag 1 0 0;
+#X msg 256 167 diag 0 0 2;
+#X msg 256 188 diag 0 -10 0;
+#X obj 409 297 pack 0 0;
+#X text 653 16 SIG_OUT = A * SIG_IN;
+#X text 672 34 A is quadratic;
+#X text 356 95 message "diag";
+#X text 367 116 (nr_rows = nr_columns = n) items <float> elements of
+main-diagonal of matrix;
+#X text 609 51 dim(SIG_OUT) = dim(SIG_IN) = n;
+#X text 215 53 the elements of matrix are all zero except the main-diagonal
+;
+#X text 479 274 message "element";
+#X text 493 291 1.) item <float> row_index = column-index (1 .. n)
+;
+#X text 493 304 2.) item <float> matrix-element at index \, index;
+#X text 70 15 matrix_diag_mul_line~;
+#X obj 34 337 matrix_diag_mul_line~ 3 3000;
+#X text 256 341 1.arg <float> Nr. of inlets = columns = outlets = rows
+;
+#X text 276 364 from previous state to next state of matrix;
+#X text 256 352 2.arg <float> interpolation-time in ms;
+#X msg 12 152 time 100;
+#X msg 12 178 time 3000;
+#X msg 14 249 stop;
+#X text 29 196 message "time";
+#X text 36 209 1.) item <float> interpolation-time in ms;
+#X text 53 248 message "stop";
+#X text 53 260 interrupts the interpolation;
+#X text 78 446 IEM KUG;
+#X text 62 434 musil;
+#X text 92 434 @;
+#X text 98 434 iem.at;
+#X text 61 456 Graz \, Austria;
+#X text 13 423 (c) Thomas Musil 2000 - 2006;
+#X text 216 14 multiplies a n-dimensional signal-in-vector with a dynamic
+changeable (like line~) signal-matrix to a n-dimensional signal-out-vector
+;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 35 0;
+#X connect 5 0 35 1;
+#X connect 6 0 35 2;
+#X connect 7 0 8 0;
+#X connect 9 0 10 0;
+#X connect 11 0 35 0;
+#X connect 12 0 35 0;
+#X connect 13 0 24 0;
+#X connect 14 0 13 1;
+#X connect 15 0 13 0;
+#X connect 16 0 17 0;
+#X connect 18 0 24 1;
+#X connect 19 0 11 0;
+#X connect 20 0 11 0;
+#X connect 21 0 11 0;
+#X connect 22 0 11 0;
+#X connect 23 0 11 0;
+#X connect 24 0 12 0;
+#X connect 35 0 7 0;
+#X connect 35 1 9 0;
+#X connect 35 2 16 0;
+#X connect 39 0 35 0;
+#X connect 40 0 35 0;
+#X connect 41 0 35 0;
Added: trunk/externals/iem/iem_matrix/matrix_diag_mul_stat~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_diag_mul_stat~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_diag_mul_stat~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,77 @@
+#N canvas 99 75 824 496 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 33 293 sig~ 1;
+#X obj 100 296 sig~ 2;
+#X obj 167 297 sig~ 4;
+#X obj 34 366 unsig~;
+#X floatatom 34 390 5 0 0 0 - - -;
+#X obj 99 364 unsig~;
+#X floatatom 99 388 5 0 0 0 - - -;
+#X obj 226 320 any;
+#X obj 379 320 pp element;
+#X obj 379 275 f;
+#X floatatom 392 252 4 1 3 0 - - -;
+#X obj 369 253 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 167 366 unsig~;
+#X floatatom 167 390 5 0 0 0 - - -;
+#X floatatom 422 253 5 0 0 0 - - -;
+#X obj 34 337 matrix_diag_mul_stat~ 3;
+#X msg 226 101 diag 0 0 0;
+#X msg 226 125 diag 1 1 1;
+#X msg 226 146 diag 1 0 0;
+#X msg 226 167 diag 0 0 2;
+#X msg 226 188 diag 0 -10 0;
+#X obj 379 297 pack 0 0;
+#X text 653 16 SIG_OUT = A * SIG_IN;
+#X text 70 15 matrix_diag_mul_stat~;
+#X text 216 14 multiplies a n-dimensional signal-in-vector with a dynamic
+static (like sig~) signal-matrix to a n-dimensional signal-out-vector
+;
+#X text 672 34 A is quadratic;
+#X text 326 95 message "diag";
+#X text 337 116 (nr_rows = nr_columns = n) items <float> elements of
+main-diagonal of matrix;
+#X text 609 51 dim(SIG_OUT) = dim(SIG_IN) = n;
+#X text 215 53 the elements of matrix are all zero except the main-diagonal
+;
+#X text 449 274 message "element";
+#X text 463 291 1.) item <float> row_index = column-index (1 .. n)
+;
+#X text 463 304 2.) item <float> matrix-element at index \, index;
+#X text 189 341 1.arg <float> Nr. of inlets = columns = outlets = rows
+;
+#X text 78 446 IEM KUG;
+#X text 62 434 musil;
+#X text 92 434 @;
+#X text 98 434 iem.at;
+#X text 61 456 Graz \, Austria;
+#X text 13 423 (c) Thomas Musil 2000 - 2006;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 19 0;
+#X connect 5 0 19 1;
+#X connect 6 0 19 2;
+#X connect 7 0 8 0;
+#X connect 9 0 10 0;
+#X connect 11 0 19 0;
+#X connect 12 0 19 0;
+#X connect 13 0 25 0;
+#X connect 14 0 13 1;
+#X connect 15 0 13 0;
+#X connect 16 0 17 0;
+#X connect 18 0 25 1;
+#X connect 19 0 7 0;
+#X connect 19 1 9 0;
+#X connect 19 2 16 0;
+#X connect 20 0 11 0;
+#X connect 21 0 11 0;
+#X connect 22 0 11 0;
+#X connect 23 0 11 0;
+#X connect 24 0 11 0;
+#X connect 25 0 12 0;
Added: trunk/externals/iem/iem_matrix/matrix_mul_line8~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_mul_line8~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_mul_line8~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,113 @@
+#N canvas 44 20 890 532 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 36 347 sig~ 1;
+#X obj 112 348 sig~ 2;
+#X obj 188 349 sig~ 4;
+#X obj 37 420 unsig~;
+#X floatatom 37 444 5 0 0 0 - - -;
+#X obj 87 420 unsig~;
+#X floatatom 87 444 5 0 0 0 - - -;
+#X obj 229 374 any;
+#X obj 382 374 pp element;
+#X obj 382 329 f;
+#X floatatom 423 300 4 1 3 0 - - -;
+#X floatatom 395 300 4 1 4 0 - - -;
+#X obj 372 307 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 137 420 unsig~;
+#X floatatom 137 444 5 0 0 0 - - -;
+#X obj 188 420 unsig~;
+#X floatatom 188 444 5 0 0 0 - - -;
+#X msg 229 86 matrix 4 3 0 0 0 0 0 0 0 0 0 0 0 0;
+#X msg 229 110 matrix 4 3 1 1 1 1 1 1 1 1 1 1 1 1;
+#X obj 382 351 pack 0 0 0;
+#X floatatom 452 300 5 0 0 0 - - -;
+#X msg 229 182 col 1 10 10 10 10;
+#X msg 229 202 col 2 20 20 20 20;
+#X msg 229 222 col 3 30 30 30 30;
+#X msg 229 253 row 1 100 100 100;
+#X msg 229 273 row 2 200 200 200;
+#X msg 229 293 row 3 300 300 300;
+#X msg 229 313 row 4 400 400 400;
+#X msg 229 131 matrix 4 3 1 0 0 0 1 0 0 0 1 0.1 0.1 0.1;
+#X msg 229 152 matrix 4 3 -0.5 -0.5 -0.5 0 0 -1 0 -1 0 -1 0 0;
+#X text 549 81 message "matrix";
+#X text 555 98 1.) item <float> Nr. of outlets = rows;
+#X text 555 111 2.) item <float> Nr. of inlets = columns;
+#X text 578 127 + (nr_rows * nr_columns) elements;
+#X text 555 187 message "col";
+#X text 561 204 1.) item <float> column_index (1 .. nr_columns);
+#X text 592 218 + nr_rows elements;
+#X text 559 249 message "row";
+#X text 562 265 1.) item <float> row_index (1 .. nr_rows);
+#X text 593 279 + nr_columns elements;
+#X text 477 336 message "element";
+#X text 491 353 1.) item <float> row_index (1 .. nr_rows);
+#X text 491 365 2.) item <float> column_index (1 .. nr_columns);
+#X text 491 379 3.) item <float> matrix-element at row_index \, column_index
+;
+#X text 237 411 2.arg <float> Nr. of outlets = rows;
+#X text 237 400 1.arg <float> Nr. of inlets = columns;
+#X text 630 24 SIG_OUT = A * SIG_IN;
+#X text 257 434 from previous state to next state of matrix;
+#X msg 10 179 time 100;
+#X msg 10 205 time 3000;
+#X msg 12 276 stop;
+#X text 216 14 multiplies a nr_columns-dimensional signal-in-vector
+with a dynamic changeable (like line~) signal-matrix to a nr_rows-dimensional
+signal-out-vector;
+#X text 27 223 message "time";
+#X text 34 236 1.) item <float> interpolation-time in ms;
+#X text 51 275 message "stop";
+#X text 51 287 interrupts the interpolation;
+#X text 82 12 matrix_mul_line8~;
+#X obj 37 391 matrix_mul_line8~ 3 4 3000;
+#X text 237 422 3.arg <float> interpolation-time in ms;
+#X text 208 52 interpolation of matrix-elements will be done only every
+8 samples;
+#X text 78 496 IEM KUG;
+#X text 62 484 musil;
+#X text 92 484 @;
+#X text 98 484 iem.at;
+#X text 61 506 Graz \, Austria;
+#X text 13 473 (c) Thomas Musil 2000 - 2006;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 61 0;
+#X connect 5 0 61 1;
+#X connect 6 0 61 2;
+#X connect 7 0 8 0;
+#X connect 9 0 10 0;
+#X connect 11 0 61 0;
+#X connect 12 0 61 0;
+#X connect 13 0 23 0;
+#X connect 14 0 23 1;
+#X connect 15 0 13 1;
+#X connect 16 0 13 0;
+#X connect 17 0 18 0;
+#X connect 19 0 20 0;
+#X connect 21 0 11 0;
+#X connect 22 0 11 0;
+#X connect 23 0 12 0;
+#X connect 24 0 23 2;
+#X connect 25 0 11 0;
+#X connect 26 0 11 0;
+#X connect 27 0 11 0;
+#X connect 28 0 11 0;
+#X connect 29 0 11 0;
+#X connect 30 0 11 0;
+#X connect 31 0 11 0;
+#X connect 32 0 11 0;
+#X connect 33 0 11 0;
+#X connect 52 0 61 0;
+#X connect 53 0 61 0;
+#X connect 54 0 61 0;
+#X connect 61 0 7 0;
+#X connect 61 1 9 0;
+#X connect 61 2 17 0;
+#X connect 61 3 19 0;
Added: trunk/externals/iem/iem_matrix/matrix_mul_line~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_mul_line~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_mul_line~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,111 @@
+#N canvas 44 20 892 534 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 36 347 sig~ 1;
+#X obj 109 348 sig~ 2;
+#X obj 182 349 sig~ 4;
+#X obj 37 420 unsig~;
+#X floatatom 37 444 5 0 0 0 - - -;
+#X obj 86 420 unsig~;
+#X floatatom 86 444 5 0 0 0 - - -;
+#X obj 229 374 any;
+#X obj 382 374 pp element;
+#X obj 382 329 f;
+#X floatatom 425 300 4 1 3 0 - - -;
+#X floatatom 395 300 4 1 4 0 - - -;
+#X obj 372 307 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 134 420 unsig~;
+#X floatatom 134 444 5 0 0 0 - - -;
+#X obj 183 420 unsig~;
+#X floatatom 183 444 5 0 0 0 - - -;
+#X msg 229 86 matrix 4 3 0 0 0 0 0 0 0 0 0 0 0 0;
+#X msg 229 110 matrix 4 3 1 1 1 1 1 1 1 1 1 1 1 1;
+#X obj 382 351 pack 0 0 0;
+#X floatatom 463 293 5 0 0 0 - - -;
+#X msg 229 182 col 1 10 10 10 10;
+#X msg 229 202 col 2 20 20 20 20;
+#X msg 229 222 col 3 30 30 30 30;
+#X msg 229 253 row 1 100 100 100;
+#X msg 229 273 row 2 200 200 200;
+#X msg 229 293 row 3 300 300 300;
+#X msg 229 313 row 4 400 400 400;
+#X msg 229 131 matrix 4 3 1 0 0 0 1 0 0 0 1 0.1 0.1 0.1;
+#X msg 229 152 matrix 4 3 -0.5 -0.5 -0.5 0 0 -1 0 -1 0 -1 0 0;
+#X text 549 81 message "matrix";
+#X text 555 98 1.) item <float> Nr. of outlets = rows;
+#X text 555 111 2.) item <float> Nr. of inlets = columns;
+#X text 578 127 + (nr_rows * nr_columns) elements;
+#X text 555 187 message "col";
+#X text 561 204 1.) item <float> column_index (1 .. nr_columns);
+#X text 592 218 + nr_rows elements;
+#X text 559 249 message "row";
+#X text 562 265 1.) item <float> row_index (1 .. nr_rows);
+#X text 593 279 + nr_columns elements;
+#X text 477 336 message "element";
+#X text 491 353 1.) item <float> row_index (1 .. nr_rows);
+#X text 491 365 2.) item <float> column_index (1 .. nr_columns);
+#X text 491 379 3.) item <float> matrix-element at row_index \, column_index
+;
+#X text 237 411 2.arg <float> Nr. of outlets = rows;
+#X text 237 400 1.arg <float> Nr. of inlets = columns;
+#X text 630 24 SIG_OUT = A * SIG_IN;
+#X obj 37 391 matrix_mul_line~ 3 4 3000;
+#X text 257 434 from previous state to next state of matrix;
+#X msg 10 179 time 100;
+#X msg 10 205 time 3000;
+#X msg 12 276 stop;
+#X text 82 12 matrix_mul_line~;
+#X text 216 14 multiplies a nr_columns-dimensional signal-in-vector
+with a dynamic changeable (like line~) signal-matrix to a nr_rows-dimensional
+signal-out-vector;
+#X text 27 223 message "time";
+#X text 34 236 1.) item <float> interpolation-time in ms;
+#X text 51 275 message "stop";
+#X text 51 287 interrupts the interpolation;
+#X text 237 422 3.arg <float> interpolation-time in ms;
+#X text 78 496 IEM KUG;
+#X text 62 484 musil;
+#X text 92 484 @;
+#X text 98 484 iem.at;
+#X text 61 506 Graz \, Austria;
+#X text 13 473 (c) Thomas Musil 2000 - 2006;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 51 0;
+#X connect 5 0 51 1;
+#X connect 6 0 51 2;
+#X connect 7 0 8 0;
+#X connect 9 0 10 0;
+#X connect 11 0 51 0;
+#X connect 12 0 51 0;
+#X connect 13 0 23 0;
+#X connect 14 0 23 1;
+#X connect 15 0 13 1;
+#X connect 16 0 13 0;
+#X connect 17 0 18 0;
+#X connect 19 0 20 0;
+#X connect 21 0 11 0;
+#X connect 22 0 11 0;
+#X connect 23 0 12 0;
+#X connect 24 0 23 2;
+#X connect 25 0 11 0;
+#X connect 26 0 11 0;
+#X connect 27 0 11 0;
+#X connect 28 0 11 0;
+#X connect 29 0 11 0;
+#X connect 30 0 11 0;
+#X connect 31 0 11 0;
+#X connect 32 0 11 0;
+#X connect 33 0 11 0;
+#X connect 51 0 7 0;
+#X connect 51 1 9 0;
+#X connect 51 2 17 0;
+#X connect 51 3 19 0;
+#X connect 53 0 51 0;
+#X connect 54 0 51 0;
+#X connect 55 0 51 0;
Added: trunk/externals/iem/iem_matrix/matrix_mul_stat~-help.pd
===================================================================
--- trunk/externals/iem/iem_matrix/matrix_mul_stat~-help.pd (rev 0)
+++ trunk/externals/iem/iem_matrix/matrix_mul_stat~-help.pd 2008-12-11 18:44:31 UTC (rev 10442)
@@ -0,0 +1,99 @@
+#N canvas 56 27 890 532 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 36 347 sig~ 1;
+#X obj 95 348 sig~ 2;
+#X obj 152 349 sig~ 4;
+#X obj 37 420 unsig~;
+#X floatatom 37 444 5 0 0 0 - - -;
+#X obj 76 420 unsig~;
+#X floatatom 76 444 5 0 0 0 - - -;
+#X obj 229 374 any;
+#X obj 382 374 pp element;
+#X obj 382 329 f;
+#X floatatom 425 300 4 1 3 0 - - -;
+#X floatatom 395 300 4 1 4 0 - - -;
+#X obj 372 307 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 37 391 matrix_mul_stat~ 3 4;
+#X obj 114 420 unsig~;
+#X floatatom 114 444 5 0 0 0 - - -;
+#X obj 153 420 unsig~;
+#X floatatom 153 444 5 0 0 0 - - -;
+#X msg 229 86 matrix 4 3 0 0 0 0 0 0 0 0 0 0 0 0;
+#X msg 229 110 matrix 4 3 1 1 1 1 1 1 1 1 1 1 1 1;
+#X obj 382 351 pack 0 0 0;
+#X floatatom 463 293 5 0 0 0 - - -;
+#X msg 229 182 col 1 10 10 10 10;
+#X msg 229 202 col 2 20 20 20 20;
+#X msg 229 222 col 3 30 30 30 30;
+#X msg 229 253 row 1 100 100 100;
+#X msg 229 273 row 2 200 200 200;
+#X msg 229 293 row 3 300 300 300;
+#X msg 229 313 row 4 400 400 400;
+#X msg 229 131 matrix 4 3 1 0 0 0 1 0 0 0 1 0.1 0.1 0.1;
+#X msg 229 152 matrix 4 3 -0.5 -0.5 -0.5 0 0 -1 0 -1 0 -1 0 0;
+#X text 549 81 message "matrix";
+#X text 555 98 1.) item <float> Nr. of outlets = rows;
+#X text 555 111 2.) item <float> Nr. of inlets = columns;
+#X text 578 127 + (nr_rows * nr_columns) elements;
+#X text 555 187 message "col";
+#X text 561 204 1.) item <float> column_index (1 .. nr_columns);
+#X text 592 218 + nr_rows elements;
+#X text 556 248 message "row";
+#X text 562 265 1.) item <float> row_index (1 .. nr_rows);
+#X text 593 279 + nr_columns elements;
+#X text 477 336 message "element";
+#X text 491 353 1.) item <float> row_index (1 .. nr_rows);
+#X text 491 365 2.) item <float> column_index (1 .. nr_columns);
+#X text 491 379 3.) item <float> matrix-element at row_index \, column_index
+;
+#X text 205 409 2.arg <float> Nr. of outlets = rows;
+#X text 205 398 1.arg <float> Nr. of inlets = columns;
+#X text 82 12 matrix_mul_stat~;
+#X text 216 13 multiplies a nr_columns-dimensional signal-in-vector
+with a static (like sig~) signal-matrix to a nr_rows-dimensional signal-out-vector
+;
+#X text 630 24 SIG_OUT = A * SIG_IN;
+#X text 78 496 IEM KUG;
+#X text 62 484 musil;
+#X text 92 484 @;
+#X text 98 484 iem.at;
+#X text 61 506 Graz \, Austria;
+#X text 13 473 (c) Thomas Musil 2000 - 2006;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 17 0;
+#X connect 5 0 17 1;
+#X connect 6 0 17 2;
+#X connect 7 0 8 0;
+#X connect 9 0 10 0;
+#X connect 11 0 17 0;
+#X connect 12 0 17 0;
+#X connect 13 0 24 0;
+#X connect 14 0 24 1;
+#X connect 15 0 13 1;
+#X connect 16 0 13 0;
+#X connect 17 0 7 0;
+#X connect 17 1 9 0;
+#X connect 17 2 18 0;
+#X connect 17 3 20 0;
+#X connect 18 0 19 0;
+#X connect 20 0 21 0;
+#X connect 22 0 11 0;
+#X connect 23 0 11 0;
+#X connect 24 0 12 0;
+#X connect 25 0 24 2;
+#X connect 26 0 11 0;
+#X connect 27 0 11 0;
+#X connect 28 0 11 0;
+#X connect 29 0 11 0;
+#X connect 30 0 11 0;
+#X connect 31 0 11 0;
+#X connect 32 0 11 0;
+#X connect 33 0 11 0;
+#X connect 34 0 11 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10441] trunk/externals/iem/iem_delay
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10441
http://pure-data.svn.sourceforge.net/pure-data/?rev=10441&view=rev
Author: tmusil
Date: 2008-12-11 18:39:17 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iem_delay/block_delay~-help.pd
trunk/externals/iem/iem_delay/n_delay1p_line~-help.pd
trunk/externals/iem/iem_delay/n_delay2p_line~-help.pd
Removed Paths:
-------------
trunk/externals/iem/iem_delay/help/
Added: trunk/externals/iem/iem_delay/block_delay~-help.pd
===================================================================
--- trunk/externals/iem/iem_delay/block_delay~-help.pd (rev 0)
+++ trunk/externals/iem/iem_delay/block_delay~-help.pd 2008-12-11 18:39:17 UTC (rev 10441)
@@ -0,0 +1,42 @@
+#N canvas 22 12 568 471 10;
+#X text 117 399 IEM KUG;
+#X text 101 387 musil;
+#X text 131 387 @;
+#X text 137 387 iem.at;
+#X text 100 409 Graz \, Austria;
+#X text 52 376 (c) Thomas Musil 2000 - 2006;
+#X obj 21 66 dsp;
+#X obj 21 43 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 21 107 5 0 0 0 - - -;
+#X floatatom 34 90 5 0 0 0 - - -;
+#X obj 161 139 dirac~;
+#N canvas 0 0 450 300 graph1 0;
+#X array array101 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 404 223 graph;
+#X obj 187 258 tabwrite~ array101;
+#N canvas 0 0 450 300 graph1 0;
+#X array array100 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 404 153 graph;
+#X obj 226 192 tabwrite~ array100;
+#X text 250 220 no initial arguments;
+#X obj 162 220 block_delay~;
+#X obj 160 97 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 405 274 hsl 100 15 0 99 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 6400 1;
+#X floatatom 402 295 5 0 0 0 - - -;
+#X text 21 11 block_delay~;
+#X text 130 11 delay signal with blocksize samples;
+#X connect 6 0 8 0;
+#X connect 6 1 9 0;
+#X connect 7 0 6 0;
+#X connect 10 0 14 0;
+#X connect 10 0 16 0;
+#X connect 16 0 12 0;
+#X connect 17 0 10 0;
+#X connect 17 0 14 0;
+#X connect 17 0 12 0;
+#X connect 18 0 19 0;
Added: trunk/externals/iem/iem_delay/n_delay1p_line~-help.pd
===================================================================
--- trunk/externals/iem/iem_delay/n_delay1p_line~-help.pd (rev 0)
+++ trunk/externals/iem/iem_delay/n_delay1p_line~-help.pd 2008-12-11 18:39:17 UTC (rev 10441)
@@ -0,0 +1,93 @@
+#N canvas 22 12 973 526 10;
+#X text 117 399 IEM KUG;
+#X text 101 387 musil;
+#X text 131 387 @;
+#X text 137 387 iem.at;
+#X text 100 409 Graz \, Austria;
+#X text 52 376 (c) Thomas Musil 2000 - 2006;
+#X obj 21 66 dsp;
+#X obj 21 43 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 21 107 5 0 0 0 - - -;
+#X floatatom 34 90 5 0 0 0 - - -;
+#X obj 252 178 pack 0 0;
+#X obj 308 145 t b f;
+#X floatatom 233 93 5 0 0 0 - - -;
+#X floatatom 313 94 5 0 0 0 - - -;
+#X obj 133 109 osc~ 700;
+#X obj 152 180 dbtorms;
+#X floatatom 152 161 5 0 100 0 - - -;
+#X obj 133 204 *~ 0;
+#X obj 221 262 dac~;
+#X msg 399 176 time \$1;
+#X floatatom 399 150 5 0 0 0 - - -;
+#X msg 425 118 100;
+#X msg 460 121 1000;
+#X msg 391 119 0;
+#X msg 503 121 3000;
+#X text 327 263 1.arg: <float> number of outlets;
+#X obj 618 235 dirac~;
+#X obj 680 190 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array array101 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 186 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array array102 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 256 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array array103 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 326 graph;
+#X obj 619 309 tabwrite~ array101;
+#X obj 666 355 tabwrite~ array103;
+#X obj 641 332 tabwrite~ array102;
+#N canvas 0 0 450 300 graph1 0;
+#X array array100 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 116 graph;
+#X obj 691 248 tabwrite~ array100;
+#X text 327 283 3.arg: <float> interpolation time in ms;
+#X text 327 273 2.arg: <float> maximum delay time ms;
+#X msg 582 159 0.3 0.6 0.9;
+#X msg 603 123 0.5 1 1.5;
+#X text 185 10 delay with 1 inlet and n outlets;
+#X text 168 25 no (one point-) interpolation = round to nearest sample
+;
+#X obj 618 283 n_delay1p_line~ 3 5 100;
+#X obj 220 227 n_delay1p_line~ 2 100 100;
+#X text 21 13 n_delay1p_line~;
+#X connect 6 0 8 0;
+#X connect 6 1 9 0;
+#X connect 7 0 6 0;
+#X connect 10 0 43 0;
+#X connect 11 0 10 0;
+#X connect 11 1 10 1;
+#X connect 12 0 10 0;
+#X connect 13 0 11 0;
+#X connect 14 0 17 0;
+#X connect 15 0 17 1;
+#X connect 16 0 15 0;
+#X connect 17 0 43 0;
+#X connect 19 0 43 0;
+#X connect 20 0 19 0;
+#X connect 21 0 20 0;
+#X connect 22 0 20 0;
+#X connect 23 0 20 0;
+#X connect 24 0 20 0;
+#X connect 26 0 35 0;
+#X connect 26 0 42 0;
+#X connect 27 0 31 0;
+#X connect 27 0 33 0;
+#X connect 27 0 32 0;
+#X connect 27 0 26 0;
+#X connect 27 0 35 0;
+#X connect 38 0 42 0;
+#X connect 39 0 42 0;
+#X connect 42 0 31 0;
+#X connect 42 1 33 0;
+#X connect 42 2 32 0;
+#X connect 43 0 18 0;
+#X connect 43 1 18 1;
Added: trunk/externals/iem/iem_delay/n_delay2p_line~-help.pd
===================================================================
--- trunk/externals/iem/iem_delay/n_delay2p_line~-help.pd (rev 0)
+++ trunk/externals/iem/iem_delay/n_delay2p_line~-help.pd 2008-12-11 18:39:17 UTC (rev 10441)
@@ -0,0 +1,92 @@
+#N canvas 69 53 980 526 10;
+#X text 117 399 IEM KUG;
+#X text 101 387 musil;
+#X text 131 387 @;
+#X text 137 387 iem.at;
+#X text 100 409 Graz \, Austria;
+#X text 52 376 (c) Thomas Musil 2000 - 2006;
+#X obj 21 66 dsp;
+#X obj 21 43 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 21 107 5 0 0 0 - - -;
+#X floatatom 34 90 5 0 0 0 - - -;
+#X obj 252 178 pack 0 0;
+#X obj 308 145 t b f;
+#X floatatom 233 93 5 0 0 0 - - -;
+#X floatatom 313 94 5 0 0 0 - - -;
+#X obj 133 109 osc~ 700;
+#X obj 152 180 dbtorms;
+#X floatatom 152 161 5 0 100 0 - - -;
+#X obj 133 204 *~ 0;
+#X obj 221 262 dac~;
+#X msg 399 176 time \$1;
+#X floatatom 399 150 5 0 0 0 - - -;
+#X msg 425 118 100;
+#X msg 460 121 1000;
+#X msg 391 119 0;
+#X msg 503 121 3000;
+#X text 327 263 1.arg: <float> number of outlets;
+#X text 21 13 n_delay2p_line~;
+#X text 171 24 2 point interpolation between 2 samples;
+#X obj 618 235 dirac~;
+#X obj 680 190 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph1 0;
+#X array array101 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 186 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array array102 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 256 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array array103 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 326 graph;
+#X obj 619 309 tabwrite~ array101;
+#X obj 666 355 tabwrite~ array103;
+#X obj 641 332 tabwrite~ array102;
+#N canvas 0 0 450 300 graph1 0;
+#X array array100 100 float 0;
+#X coords 0 1.1 99 -0.1 100 50 1;
+#X restore 815 116 graph;
+#X obj 691 248 tabwrite~ array100;
+#X obj 618 283 n_delay2p_line~ 3 5 100;
+#X obj 220 227 n_delay2p_line~ 2 100 100;
+#X text 327 283 3.arg: <float> interpolation time in ms;
+#X text 327 273 2.arg: <float> maximum delay time ms;
+#X msg 582 159 0.3 0.6 0.9;
+#X msg 603 123 0.5 1 1.5;
+#X text 185 10 delay with 1 inlet and n outlets;
+#X connect 6 0 8 0;
+#X connect 6 1 9 0;
+#X connect 7 0 6 0;
+#X connect 10 0 39 0;
+#X connect 11 0 10 0;
+#X connect 11 1 10 1;
+#X connect 12 0 10 0;
+#X connect 13 0 11 0;
+#X connect 14 0 17 0;
+#X connect 15 0 17 1;
+#X connect 16 0 15 0;
+#X connect 17 0 39 0;
+#X connect 19 0 39 0;
+#X connect 20 0 19 0;
+#X connect 21 0 20 0;
+#X connect 22 0 20 0;
+#X connect 23 0 20 0;
+#X connect 24 0 20 0;
+#X connect 28 0 37 0;
+#X connect 28 0 38 0;
+#X connect 29 0 33 0;
+#X connect 29 0 35 0;
+#X connect 29 0 34 0;
+#X connect 29 0 28 0;
+#X connect 29 0 37 0;
+#X connect 38 0 33 0;
+#X connect 38 1 35 0;
+#X connect 38 2 34 0;
+#X connect 39 0 18 0;
+#X connect 39 1 18 1;
+#X connect 42 0 38 0;
+#X connect 43 0 38 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10440] trunk/externals/iem/iemgui
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10440
http://pure-data.svn.sourceforge.net/pure-data/?rev=10440&view=rev
Author: tmusil
Date: 2008-12-11 17:52:20 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iemgui/cube_sphere-help.pd
trunk/externals/iem/iemgui/go_stop.gif
trunk/externals/iem/iemgui/hfadl_scale-help.pd
trunk/externals/iem/iemgui/hfadr_scale-help.pd
trunk/externals/iem/iemgui/iem_event-help.pd
trunk/externals/iem/iemgui/iem_image-help.pd
trunk/externals/iem/iemgui/iem_vu-help.pd
trunk/externals/iem/iemgui/mp3_play.gif
trunk/externals/iem/iemgui/nbxm-help.pd
trunk/externals/iem/iemgui/numberbox_matrix-help.pd
trunk/externals/iem/iemgui/pair.gif
trunk/externals/iem/iemgui/pd.gif
trunk/externals/iem/iemgui/room_sim_2d-help.pd
trunk/externals/iem/iemgui/room_sim_3d-help.pd
trunk/externals/iem/iemgui/vfad_scale-help.pd
Removed Paths:
-------------
trunk/externals/iem/iemgui/help/
Added: trunk/externals/iem/iemgui/cube_sphere-help.pd
===================================================================
--- trunk/externals/iem/iemgui/cube_sphere-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/cube_sphere-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,635 @@
+#N canvas 33 0 928 718 10;
+#X obj 42 118 r to_GUI;
+#X floatatom 493 53 5 20 500 0 - - -;
+#X floatatom 493 152 5 5 150 0 - - -;
+#X msg 493 170 \; to_GUI src_font \$1;
+#X text 529 149 pix;
+#X obj 42 617 s from_GUI;
+#X obj 735 14 r from_GUI;
+#X floatatom 655 107 5 0 0 0 - - -;
+#X floatatom 695 107 5 0 0 0 - - -;
+#X obj 655 85 unpack;
+#X obj 493 280 pack;
+#X obj 527 280 t b f;
+#X floatatom 486 263 5 0 90 0 - - -;
+#X floatatom 529 263 5 -720 720 0 - - -;
+#X text 696 84 source 1;
+#X text 730 109 degree;
+#N canvas 230 75 343 545 colors 0;
+#N canvas 16 80 189 98 sphere_color 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 47 17 pd sphere_color;
+#X msg 47 125 \; to_GUI sphere_col \$1;
+#N canvas 16 80 189 98 frame_color 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 46 161 pd frame_color;
+#X msg 46 263 \; to_GUI frame_col \$1;
+#X msg 57 476 \; to_GUI src_col \$1 \$2;
+#X obj 57 453 pack 1 15;
+#X obj 81 410 t b f;
+#X obj 57 433 f 1;
+#N canvas 16 80 189 98 source_color 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 81 306 pd source_color;
+#X floatatom 39 364 5 1 100 0 - - -;
+#X text 42 337 src;
+#X text 35 348 number;
+#X connect 0 0 1 0;
+#X connect 2 0 3 0;
+#X connect 5 0 4 0;
+#X connect 6 0 7 0;
+#X connect 6 1 5 1;
+#X connect 7 0 5 0;
+#X connect 8 0 6 0;
+#X connect 9 0 7 1;
+#X restore 811 397 pd colors;
+#X text 9 11 cube_sphere;
+#X obj 42 139 cube_sphere 5 222 50 354 0 250684 347 194 195567 229
+98 225270 84 205 241290 191 332 24197 314 314;
+#X msg 494 16 \; to_GUI size 400;
+#X msg 493 73 \; to_GUI size \$1;
+#X msg 493 114 \; to_GUI src_font 40;
+#X msg 494 210 \; to_GUI bang;
+#X msg 493 301 \; to_GUI src_dp 1 \$1 \$2;
+#X obj 492 359 pack;
+#X obj 526 359 t b f;
+#X floatatom 485 342 5 0 90 0 - - -;
+#X floatatom 528 342 5 -720 720 0 - - -;
+#X obj 493 439 pack;
+#X obj 527 439 t b f;
+#X floatatom 486 422 5 0 90 0 - - -;
+#X floatatom 529 422 5 -720 720 0 - - -;
+#X obj 494 521 pack;
+#X obj 528 521 t b f;
+#X floatatom 487 504 5 0 90 0 - - -;
+#X floatatom 530 504 5 -720 720 0 - - -;
+#X obj 496 603 pack;
+#X obj 530 603 t b f;
+#X floatatom 489 586 5 0 90 0 - - -;
+#X floatatom 532 586 5 -720 720 0 - - -;
+#X msg 492 380 \; to_GUI src_dp 2 \$1 \$2;
+#X msg 493 460 \; to_GUI src_dp 3 \$1 \$2;
+#X msg 496 624 \; to_GUI src_dp 5 \$1 \$2;
+#X msg 494 542 \; to_GUI src_dp 4 \$1 \$2;
+#X obj 735 43 route 1 2 3 4 5;
+#X floatatom 665 162 5 0 0 0 - - -;
+#X floatatom 705 162 5 0 0 0 - - -;
+#X obj 665 140 unpack;
+#X text 740 164 degree;
+#X floatatom 686 211 5 0 0 0 - - -;
+#X floatatom 726 211 5 0 0 0 - - -;
+#X obj 686 189 unpack;
+#X text 761 213 degree;
+#X floatatom 706 261 5 0 0 0 - - -;
+#X floatatom 746 261 5 0 0 0 - - -;
+#X obj 706 239 unpack;
+#X text 781 263 degree;
+#X floatatom 722 312 5 0 0 0 - - -;
+#X floatatom 762 312 5 0 0 0 - - -;
+#X obj 722 290 unpack;
+#X text 797 314 degree;
+#X text 706 139 source 2;
+#X text 727 188 source 3;
+#X text 747 238 source 4;
+#X text 763 289 source 5;
+#X text 760 336 azimuth;
+#X text 696 329 elevation;
+#X floatatom 372 58 5 0 100 0 - - -;
+#X msg 372 78 \; to_GUI nr_src \$1;
+#X text 530 50 pix;
+#X text 150 99 |;
+#X text 150 110 |;
+#X text 150 105 |cube_sphere 5|;
+#X text 153 91 ______________;
+#X text 153 108 ______________;
+#X text 234 99 |;
+#X text 234 110 |;
+#X text 97 669 IEM KUG;
+#X text 81 657 musil;
+#X text 111 657 @;
+#X text 117 657 iem.at;
+#X text 80 679 Graz \, Austria;
+#X text 32 646 (c) Thomas Musil 2000 - 2006;
+#X text 102 12 is a graphical object for a 2D projection of a hemisphere
+;
+#X text 100 24 the azimuth angle is mathematical positiv orientated
+;
+#X text 100 36 the elevation is geodatical: northpole is +90 degree
+;
+#X text 120 47 equator is 0 degree;
+#X obj 642 369 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X msg 642 440 \; to_GUI vis 2 \$1;
+#X obj 642 423 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X obj 642 477 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 642 531 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 642 585 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X msg 642 386 \; to_GUI vis 1 \$1;
+#X msg 642 494 \; to_GUI vis 3 \$1;
+#X msg 642 548 \; to_GUI vis 4 \$1;
+#X msg 642 602 \; to_GUI vis 5 \$1;
+#X connect 0 0 18 0;
+#X connect 1 0 20 0;
+#X connect 2 0 3 0;
+#X connect 6 0 44 0;
+#X connect 9 0 7 0;
+#X connect 9 1 8 0;
+#X connect 10 0 23 0;
+#X connect 11 0 10 0;
+#X connect 11 1 10 1;
+#X connect 12 0 10 0;
+#X connect 13 0 11 0;
+#X connect 18 0 5 0;
+#X connect 24 0 40 0;
+#X connect 25 0 24 0;
+#X connect 25 1 24 1;
+#X connect 26 0 24 0;
+#X connect 27 0 25 0;
+#X connect 28 0 41 0;
+#X connect 29 0 28 0;
+#X connect 29 1 28 1;
+#X connect 30 0 28 0;
+#X connect 31 0 29 0;
+#X connect 32 0 43 0;
+#X connect 33 0 32 0;
+#X connect 33 1 32 1;
+#X connect 34 0 32 0;
+#X connect 35 0 33 0;
+#X connect 36 0 42 0;
+#X connect 37 0 36 0;
+#X connect 37 1 36 1;
+#X connect 38 0 36 0;
+#X connect 39 0 37 0;
+#X connect 44 0 9 0;
+#X connect 44 1 47 0;
+#X connect 44 2 51 0;
+#X connect 44 3 55 0;
+#X connect 44 4 59 0;
+#X connect 47 0 45 0;
+#X connect 47 1 46 0;
+#X connect 51 0 49 0;
+#X connect 51 1 50 0;
+#X connect 55 0 53 0;
+#X connect 55 1 54 0;
+#X connect 59 0 57 0;
+#X connect 59 1 58 0;
+#X connect 67 0 68 0;
+#X connect 87 0 93 0;
+#X connect 89 0 88 0;
+#X connect 90 0 94 0;
+#X connect 91 0 95 0;
+#X connect 92 0 96 0;
Added: trunk/externals/iem/iemgui/go_stop.gif
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iemgui/go_stop.gif
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iemgui/hfadl_scale-help.pd
===================================================================
--- trunk/externals/iem/iemgui/hfadl_scale-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/hfadl_scale-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,28 @@
+#N canvas 4 20 454 304 10;
+#X obj 90 135 fadtodb;
+#X obj 90 157 - 100;
+#X floatatom 90 178 5 0 0 0 - - -;
+#X text 130 180 dB;
+#X obj 94 94 hfadl_scale -1;
+#X text 10 10 hfadl_scale;
+#X text 121 9 horizontal fader scale with left max;
+#X text 101 32 for horizontal slider with width of 121 pixels;
+#X obj 93 115 hsl 121 15 120 0 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X text 127 49 and a value-range from 120 to 0;
+#X text 96 242 IEM KUG;
+#X text 80 230 musil;
+#X text 110 230 @;
+#X text 116 230 iem.at;
+#X text 79 252 Graz \, Austria;
+#X text 31 219 (c) Thomas Musil 2000 - 2006;
+#X text 253 107 |;
+#X text 253 118 |;
+#X text 325 107 |;
+#X text 325 118 |;
+#X text 253 113 |hfadl_scale|;
+#X text 256 99 ____________;
+#X text 256 116 ____________;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 8 0 0 0;
Added: trunk/externals/iem/iemgui/hfadr_scale-help.pd
===================================================================
--- trunk/externals/iem/iemgui/hfadr_scale-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/hfadr_scale-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,28 @@
+#N canvas 4 20 454 304 10;
+#X obj 90 134 fadtodb;
+#X obj 90 156 - 100;
+#X floatatom 90 177 5 0 0 0 - - -;
+#X text 130 179 dB;
+#X text 101 31 for horizontal slider with width of 121 pixels;
+#X obj 93 114 hsl 121 15 0 120 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X text 10 9 hfadr_scale;
+#X text 121 8 horizontal fader scale with right max;
+#X text 127 48 and a value-range from 0 to 120;
+#X obj 89 93 hfadr_scale -1;
+#X text 96 242 IEM KUG;
+#X text 80 230 musil;
+#X text 110 230 @;
+#X text 116 230 iem.at;
+#X text 79 252 Graz \, Austria;
+#X text 31 219 (c) Thomas Musil 2000 - 2006;
+#X text 253 107 |;
+#X text 253 118 |;
+#X text 325 107 |;
+#X text 325 118 |;
+#X text 256 99 ____________;
+#X text 256 116 ____________;
+#X text 253 113 |hfadr_scale|;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 5 0 0 0;
Added: trunk/externals/iem/iemgui/iem_event-help.pd
===================================================================
--- trunk/externals/iem/iemgui/iem_event-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/iem_event-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,50 @@
+#N canvas 387 61 565 382 10;
+#X obj 67 112 ivnt 100 100 0 0 empty empty;
+#X obj 67 112 cnv 15 100 100 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 67 248 unpack;
+#X floatatom 67 271 5 0 0 0 - - -;
+#X floatatom 104 273 5 0 0 0 - - -;
+#X obj 75 320 print;
+#X obj 149 250 unpack;
+#X floatatom 149 273 5 0 0 0 - - -;
+#X floatatom 186 275 5 0 0 0 - - -;
+#X obj 230 249 unpack 0 0 0;
+#X obj 230 276 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 263 276 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 297 277 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 67 218 route move_x_y dragg_x_y mouse_shft_alt key;
+#X obj 370 249 sel 0 127;
+#X obj 336 352 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 375 329 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 419 274 makefilename %c;
+#X symbolatom 419 297 2 0 0 0 - - -;
+#X text 356 352 return and end;
+#X text 395 327 backspace = correct;
+#X msg 67 46 size 100 100;
+#X msg 80 67 send from_ivnt;
+#X msg 93 88 receive to_ivnt;
+#X connect 0 0 13 0;
+#X connect 2 0 3 0;
+#X connect 2 1 4 0;
+#X connect 6 0 7 0;
+#X connect 6 1 8 0;
+#X connect 9 0 10 0;
+#X connect 9 1 11 0;
+#X connect 9 2 12 0;
+#X connect 13 0 2 0;
+#X connect 13 1 6 0;
+#X connect 13 2 9 0;
+#X connect 13 3 14 0;
+#X connect 14 0 15 0;
+#X connect 14 1 16 0;
+#X connect 14 2 17 0;
+#X connect 17 0 18 0;
+#X connect 21 0 0 0;
+#X connect 22 0 0 0;
+#X connect 23 0 0 0;
Added: trunk/externals/iem/iemgui/iem_image-help.pd
===================================================================
--- trunk/externals/iem/iemgui/iem_image-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/iem_image-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,57 @@
+#N canvas 40 2 852 657 10;
+#X obj 200 261 iem_image pd.gif 0 0 empty empty;
+#X msg 280 54 open \$1;
+#X obj 280 31 openpanel;
+#X obj 261 32 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 289 73 open gates.gif;
+#X msg 337 130 open go_stop.gif;
+#X msg 304 92 open pair.gif;
+#X msg 319 111 open super_gau.gif;
+#X msg 353 149 open pd.gif;
+#X msg 372 168 open xxx.gif;
+#X obj 200 580 unpack;
+#X floatatom 200 606 5 0 0 0 - - -;
+#X floatatom 239 605 5 0 0 0 - - -;
+#X msg 87 61 pos 200 260;
+#X msg 168 61 pos 180 280;
+#X msg 89 92 delta 1 1;
+#X msg 168 95 delta -1 -1;
+#X msg 76 162 receive to_image;
+#X text 82 598 IEM KUG;
+#X text 66 586 musil;
+#X text 96 586 @;
+#X text 102 586 iem.at;
+#X text 65 608 Graz \, Austria;
+#X text 17 575 (c) Thomas Musil 2000 - 2006;
+#X text 326 233 |;
+#X text 326 244 |;
+#X text 386 233 |;
+#X text 386 244 |;
+#X text 326 239 |iem_image|;
+#X text 329 242 __________;
+#X text 329 225 __________;
+#X text 18 12 iem_image;
+#X text 112 15 gif only \, sorry;
+#X msg 77 139 send from_image;
+#X msg 224 160 clear;
+#X text 282 603 size in pixel after opening a gif;
+#X connect 0 0 10 0;
+#X connect 1 0 0 0;
+#X connect 2 0 1 0;
+#X connect 3 0 2 0;
+#X connect 4 0 0 0;
+#X connect 5 0 0 0;
+#X connect 6 0 0 0;
+#X connect 7 0 0 0;
+#X connect 8 0 0 0;
+#X connect 9 0 0 0;
+#X connect 10 0 11 0;
+#X connect 10 1 12 0;
+#X connect 13 0 0 0;
+#X connect 14 0 0 0;
+#X connect 15 0 0 0;
+#X connect 16 0 0 0;
+#X connect 17 0 0 0;
+#X connect 33 0 0 0;
+#X connect 34 0 0 0;
Added: trunk/externals/iem/iemgui/iem_vu-help.pd
===================================================================
--- trunk/externals/iem/iemgui/iem_vu-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/iem_vu-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,42 @@
+#N canvas 255 247 485 455 10;
+#X obj 78 162 iem_vu 16 120 empty empty -1 -8 0 8 -66577 -1 1 0;
+#X text 13 17 iem_vu;
+#X text 86 17 a new vu-GUI \, with same inputs and outputs as "vu"
+;
+#X floatatom 54 85 5 -100 12 0 - - -;
+#X floatatom 102 85 5 -100 12 0 - - -;
+#X text 43 68 rms_db;
+#X text 103 68 peak_db;
+#X floatatom 181 82 5 -100 12 0 - - -;
+#X floatatom 229 82 5 -100 12 0 - - -;
+#X text 170 65 rms_db;
+#X text 230 65 peak_db;
+#X obj 229 100 t b f;
+#X obj 227 124 pack;
+#X floatatom 45 303 5 -100 12 0 - - -;
+#X floatatom 109 303 5 -100 12 0 - - -;
+#X text 34 286 rms_db;
+#X text 110 286 peak_db;
+#X text 93 37 (you cannot change height via properties);
+#X text 83 366 IEM KUG;
+#X text 67 354 musil;
+#X text 97 354 @;
+#X text 103 354 iem.at;
+#X text 66 376 Graz \, Austria;
+#X text 18 343 (c) Thomas Musil 2000 - 2006;
+#X text 217 157 |;
+#X text 217 168 |;
+#X text 259 157 |;
+#X text 259 168 |;
+#X text 217 163 |iem_vu|;
+#X text 220 149 _______;
+#X text 220 166 _______;
+#X connect 0 0 13 0;
+#X connect 0 1 14 0;
+#X connect 3 0 0 0;
+#X connect 4 0 0 1;
+#X connect 7 0 12 0;
+#X connect 8 0 11 0;
+#X connect 11 0 12 0;
+#X connect 11 1 12 1;
+#X connect 12 0 0 0;
Added: trunk/externals/iem/iemgui/mp3_play.gif
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iemgui/mp3_play.gif
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iemgui/nbxm-help.pd
===================================================================
--- trunk/externals/iem/iemgui/nbxm-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/nbxm-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,502 @@
+#N canvas 7 5 966 718 10;
+#X obj 54 257 cnv 15 382 570 empty empty empty 20 12 0 14 -195568 -66577
+0;
+#X msg 48 45 matrix 5 3 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15;
+#X msg 71 67 row 2 -2 -3 -4;
+#X msg 86 89 col 2 -2 -3 -4 -5 -6;
+#X msg 99 109 element 2 2 99;
+#X obj 103 137 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 450 15 dim 6 4;
+#X msg 503 12 dim 5 3;
+#X msg 450 38 size 5 18;
+#X msg 520 37 size 3 12;
+#X msg 541 62 color #000000;
+#X msg 452 62 color #00bb00;
+#X msg 524 95 font 0 10;
+#X msg 451 96 font 0 14;
+#X msg 453 134 font 1 10;
+#X msg 524 134 font 2 10;
+#X msg 591 134 font 0 10;
+#X msg 575 160 range -100 27;
+#X msg 395 160 range -10 2;
+#X msg 459 194 send from_matrix;
+#X msg 570 194 send empty;
+#X obj 808 511 r from_matrix;
+#X msg 460 216 receive to_matrix;
+#X msg 571 216 receive empty;
+#X obj 809 537 print cc;
+#X obj 53 888 print aa;
+#X msg 469 160 range -1000 1000;
+#N canvas 55 60 289 208 PROPERTIES 0;
+#X obj 443 17 inlet;
+#X obj 57 494 outlet;
+#X obj 98 584 pp dim;
+#X obj 120 528 t b f;
+#X obj 69 36 nbx 3 14 1 999 0 0 empty empty n_columns 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 10 36 nbx 3 14 1 999 0 0 empty empty n_rows 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 78 575 t b f;
+#X obj 70 74 nbx 3 14 1 999 0 0 empty empty heigth 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 10 74 nbx 3 14 1 999 0 0 empty empty width 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 56 631 pp size;
+#X obj 97 556 pack 5 3;
+#X obj 55 603 pack 3 12;
+#X symbolatom 37 104 6 0 0 0 - - -;
+#X obj 180 513 pp #;
+#X obj 180 533 mergefilename;
+#X obj 178 467 init 0 0 0 0 0 0;
+#X obj 178 488 mergefilename;
+#X obj 180 554 pp color;
+#X obj 38 98 cnv 1 1 1 empty empty color 0 0 0 10 -262144 -1 0;
+#X obj 298 472 t b f;
+#X obj 160 74 nbx 3 14 1 999 0 0 empty empty fontsize 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 273 525 pack 3 12;
+#X obj 274 553 pp font;
+#X obj 160 25 vradio 10 1 0 3 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X obj 173 29 cnv 1 1 1 empty empty courier 0 0 0 10 -262144 -1 0;
+#X obj 173 40 cnv 1 1 1 empty empty helvetica 0 0 0 10 -262144 -1 0
+;
+#X obj 173 51 cnv 1 1 1 empty empty times 0 0 0 10 -262144 -1 0;
+#X obj 38 124 cnv 1 1 1 empty empty R_G_B 0 0 0 8 -262144 -1 0;
+#X obj 390 530 t b f;
+#X obj 17 145 nbx 4 14 -1e+037 1e+037 0 0 empty empty min 0 -6 0 10
+-262144 -1 -1 -100 256;
+#X obj 367 558 pack 3 12;
+#X obj 72 145 nbx 3 14 -1e+037 1e+037 0 0 empty empty max 0 -6 0 10
+-262144 -1 -1 27 256;
+#X obj 368 586 pp range;
+#X symbolatom 158 108 10 0 0 0 - - -;
+#X obj 159 102 cnv 1 1 1 empty empty send_name 0 0 0 10 -262144 -1
+0;
+#X obj 423 448 pp send;
+#X obj 425 426 init symbol empty;
+#X symbolatom 158 145 10 0 0 0 - - -;
+#X obj 159 139 cnv 1 1 1 empty empty receive_name 0 0 0 10 -262144
+-1 0;
+#X obj 553 452 init symbol empty;
+#X obj 519 506 pp receive;
+#X obj 109 202 init -100 27;
+#X obj 111 226 unpack;
+#X connect 2 0 1 0;
+#X connect 3 0 10 0;
+#X connect 3 1 10 1;
+#X connect 4 0 3 0;
+#X connect 5 0 10 0;
+#X connect 6 0 11 0;
+#X connect 6 1 11 1;
+#X connect 7 0 6 0;
+#X connect 8 0 11 0;
+#X connect 9 0 1 0;
+#X connect 10 0 2 0;
+#X connect 11 0 9 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 17 0;
+#X connect 15 0 16 0;
+#X connect 16 0 12 0;
+#X connect 17 0 1 0;
+#X connect 19 0 21 0;
+#X connect 19 1 21 1;
+#X connect 20 0 19 0;
+#X connect 21 0 22 0;
+#X connect 22 0 1 0;
+#X connect 23 0 21 0;
+#X connect 28 0 30 0;
+#X connect 28 1 30 1;
+#X connect 29 0 30 0;
+#X connect 30 0 32 0;
+#X connect 31 0 28 0;
+#X connect 32 0 1 0;
+#X connect 33 0 35 0;
+#X connect 35 0 1 0;
+#X connect 36 0 33 0;
+#X connect 37 0 40 0;
+#X connect 39 0 37 0;
+#X connect 40 0 1 0;
+#X connect 41 0 42 0;
+#X connect 42 0 29 0;
+#X connect 42 1 31 0;
+#X coords 0 0 1 1 250 180 1;
+#X restore 668 76 pd PROPERTIES of numberbox_matrix;
+#X obj 829 590 nbxm 1 3 3 11 -100 27 0 empty empty #000000 0 8;
+#X obj 922 610 nbxm 3 1 3 11 -100 27 0 empty empty #000000 0 8;
+#X obj 787 610 nbxm 1 1 3 11 -100 27 0 empty empty #000000 0 8;
+#X obj 796 654 print;
+#X obj 825 425 for++ 1 16;
+#X obj 823 402 t b;
+#X obj 816 353 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 826 452 add2 -30;
+#X obj 817 377 for++ 1 52 10;
+#X msg 14 109 -100;
+#X obj 16 261 cnv 3 1 1 empty empty DAC01 0 0 0 8 -262144 -1 0;
+#X obj 16 272 cnv 3 1 1 empty empty DAC02 0 0 0 8 -262144 -1 0;
+#X obj 16 283 cnv 3 1 1 empty empty DAC03 0 0 0 8 -262144 -1 0;
+#X obj 16 294 cnv 3 1 1 empty empty DAC04 0 0 0 8 -262144 -1 0;
+#X obj 16 305 cnv 3 1 1 empty empty DAC05 0 0 0 8 -262144 -1 0;
+#X obj 16 316 cnv 3 1 1 empty empty DAC06 0 0 0 8 -262144 -1 0;
+#X obj 16 327 cnv 3 1 1 empty empty DAC07 0 0 0 8 -262144 -1 0;
+#X obj 16 338 cnv 3 1 1 empty empty DAC08 0 0 0 8 -262144 -1 0;
+#X obj 16 349 cnv 3 1 1 empty empty DAC09 0 0 0 8 -262144 -1 0;
+#X obj 16 360 cnv 3 1 1 empty empty DAC10 0 0 0 8 -262144 -1 0;
+#X obj 16 371 cnv 3 1 1 empty empty DAC11 0 0 0 8 -262144 -1 0;
+#X obj 16 382 cnv 3 1 1 empty empty DAC12 0 0 0 8 -262144 -1 0;
+#X obj 16 393 cnv 3 1 1 empty empty DAC13 0 0 0 8 -262144 -1 0;
+#X obj 16 404 cnv 3 1 1 empty empty DAC14 0 0 0 8 -262144 -1 0;
+#X obj 16 415 cnv 3 1 1 empty empty DAC15 0 0 0 8 -262144 -1 0;
+#X obj 16 426 cnv 3 1 1 empty empty DAC16 0 0 0 8 -262144 -1 0;
+#X obj 16 437 cnv 3 1 1 empty empty DAC17 0 0 0 8 -262144 -1 0;
+#X obj 16 448 cnv 3 1 1 empty empty DAC18 0 0 0 8 -262144 -1 0;
+#X obj 16 459 cnv 3 1 1 empty empty DAC19 0 0 0 8 -262144 -1 0;
+#X obj 16 470 cnv 3 1 1 empty empty DAC20 0 0 0 8 -262144 -1 0;
+#X obj 16 481 cnv 3 1 1 empty empty DAC21 0 0 0 8 -262144 -1 0;
+#X obj 16 492 cnv 3 1 1 empty empty DAC22 0 0 0 8 -262144 -1 0;
+#X obj 16 503 cnv 3 1 1 empty empty DAC23 0 0 0 8 -262144 -1 0;
+#X obj 16 514 cnv 3 1 1 empty empty DAC24 0 0 0 8 -262144 -1 0;
+#X obj 16 525 cnv 3 1 1 empty empty DAC25 0 0 0 8 -262144 -1 0;
+#X obj 16 536 cnv 3 1 1 empty empty DAC26 0 0 0 8 -262144 -1 0;
+#X obj 16 547 cnv 3 1 1 empty empty DAC27 0 0 0 8 -262144 -1 0;
+#X obj 16 558 cnv 3 1 1 empty empty DAC28 0 0 0 8 -262144 -1 0;
+#X obj 16 569 cnv 3 1 1 empty empty DAC29 0 0 0 8 -262144 -1 0;
+#X obj 16 580 cnv 3 1 1 empty empty DAC30 0 0 0 8 -262144 -1 0;
+#X obj 16 591 cnv 3 1 1 empty empty DAC31 0 0 0 8 -262144 -1 0;
+#X obj 16 602 cnv 3 1 1 empty empty DAC32 0 0 0 8 -262144 -1 0;
+#X obj 16 613 cnv 3 1 1 empty empty DAC33 0 0 0 8 -262144 -1 0;
+#X obj 16 624 cnv 3 1 1 empty empty DAC34 0 0 0 8 -262144 -1 0;
+#X obj 16 635 cnv 3 1 1 empty empty DAC35 0 0 0 8 -262144 -1 0;
+#X obj 16 646 cnv 3 1 1 empty empty DAC36 0 0 0 8 -262144 -1 0;
+#X obj 16 657 cnv 3 1 1 empty empty DAC37 0 0 0 8 -262144 -1 0;
+#X obj 16 668 cnv 3 1 1 empty empty DAC38 0 0 0 8 -262144 -1 0;
+#X obj 16 679 cnv 3 1 1 empty empty DAC39 0 0 0 8 -262144 -1 0;
+#X obj 16 690 cnv 3 1 1 empty empty DAC40 0 0 0 8 -262144 -1 0;
+#X obj 16 701 cnv 3 1 1 empty empty DAC41 0 0 0 8 -262144 -1 0;
+#X obj 16 712 cnv 3 1 1 empty empty DAC42 0 0 0 8 -262144 -1 0;
+#X obj 16 723 cnv 3 1 1 empty empty DAC43 0 0 0 8 -262144 -1 0;
+#X obj 16 734 cnv 3 1 1 empty empty DAC44 0 0 0 8 -262144 -1 0;
+#X obj 16 745 cnv 3 1 1 empty empty DAC45 0 0 0 8 -262144 -1 0;
+#X obj 16 756 cnv 3 1 1 empty empty DAC46 0 0 0 8 -262144 -1 0;
+#X obj 16 767 cnv 3 1 1 empty empty DAC47 0 0 0 8 -262144 -1 0;
+#X obj 16 778 cnv 3 1 1 empty empty DAC48 0 0 0 8 -262144 -1 0;
+#X obj 16 789 cnv 3 1 1 empty empty DAC49 0 0 0 8 -262144 -1 0;
+#X obj 16 800 cnv 3 1 1 empty empty DAC50 0 0 0 8 -262144 -1 0;
+#X obj 16 811 cnv 3 1 1 empty empty DAC51 0 0 0 8 -262144 -1 0;
+#X obj 16 822 cnv 3 1 1 empty empty DAC52 0 0 0 8 -262144 -1 0;
+#X obj 62 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 62 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 62 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 62 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 62 866 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 86 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 86 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 86 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 86 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 86 866 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 110 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 110 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 110 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 110 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 110 866 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 134 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 134 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 134 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 134 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 134 866 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 158 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 158 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 158 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 158 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 158 866 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 182 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 182 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 182 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 182 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 182 866 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X obj 206 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 206 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 206 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 206 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 206 866 cnv 3 1 1 empty empty 7 0 0 0 8 -262144 -1 0;
+#X obj 230 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 230 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 230 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 230 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 230 866 cnv 3 1 1 empty empty 8 0 0 0 8 -262144 -1 0;
+#X obj 255 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 255 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 255 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 255 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 255 866 cnv 3 1 1 empty empty 9 0 0 0 8 -262144 -1 0;
+#X obj 279 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 279 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 279 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 279 866 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 279 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 303 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 303 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 303 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 327 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 327 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 327 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 351 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 351 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 351 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 351 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 375 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 375 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 375 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 375 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 399 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 399 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 399 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 399 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 423 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 423 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 423 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 423 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 866 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 866 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 351 866 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 375 866 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 399 866 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 423 866 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X msg 129 129 2 2 99;
+#N canvas 0 0 454 304 /SUBPATCH/ 0;
+#X obj 95 42 inlet;
+#X obj 95 155 outlet;
+#X connect 0 0 1 0;
+#X restore 53 160 pd;
+#N canvas 0 0 454 304 /SUBPATCH/ 0;
+#X obj 95 42 inlet;
+#X obj 95 155 outlet;
+#X connect 0 0 1 0;
+#X restore 171 150 pd;
+#X obj 62 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 62 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 62 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 62 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 62 250 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 86 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 86 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 86 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 86 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 86 250 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 110 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 110 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 110 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 110 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 110 250 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 134 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 134 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 134 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 134 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 134 250 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 158 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 158 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 158 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 158 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 158 250 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 182 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 182 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 182 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 182 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 182 250 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X obj 206 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 206 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 206 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 206 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 206 250 cnv 3 1 1 empty empty 7 0 0 0 8 -262144 -1 0;
+#X obj 230 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 230 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 230 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 230 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 230 250 cnv 3 1 1 empty empty 8 0 0 0 8 -262144 -1 0;
+#X obj 255 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 255 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 255 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 255 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 255 250 cnv 3 1 1 empty empty 9 0 0 0 8 -262144 -1 0;
+#X obj 279 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 279 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 279 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 279 250 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 279 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 303 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 303 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 303 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 327 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 327 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 327 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 351 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 351 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 351 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 351 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 375 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 375 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 375 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 375 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 399 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 399 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 399 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 399 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 423 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 423 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 423 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 423 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 250 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 250 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 351 250 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 375 250 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 399 250 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 423 250 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X obj 440 261 cnv 3 1 1 empty empty DAC01 0 0 0 8 -262144 -1 0;
+#X obj 440 272 cnv 3 1 1 empty empty DAC02 0 0 0 8 -262144 -1 0;
+#X obj 440 283 cnv 3 1 1 empty empty DAC03 0 0 0 8 -262144 -1 0;
+#X obj 440 294 cnv 3 1 1 empty empty DAC04 0 0 0 8 -262144 -1 0;
+#X obj 440 305 cnv 3 1 1 empty empty DAC05 0 0 0 8 -262144 -1 0;
+#X obj 440 316 cnv 3 1 1 empty empty DAC06 0 0 0 8 -262144 -1 0;
+#X obj 440 327 cnv 3 1 1 empty empty DAC07 0 0 0 8 -262144 -1 0;
+#X obj 440 338 cnv 3 1 1 empty empty DAC08 0 0 0 8 -262144 -1 0;
+#X obj 440 349 cnv 3 1 1 empty empty DAC09 0 0 0 8 -262144 -1 0;
+#X obj 440 360 cnv 3 1 1 empty empty DAC10 0 0 0 8 -262144 -1 0;
+#X obj 440 371 cnv 3 1 1 empty empty DAC11 0 0 0 8 -262144 -1 0;
+#X obj 440 382 cnv 3 1 1 empty empty DAC12 0 0 0 8 -262144 -1 0;
+#X obj 440 393 cnv 3 1 1 empty empty DAC13 0 0 0 8 -262144 -1 0;
+#X obj 440 404 cnv 3 1 1 empty empty DAC14 0 0 0 8 -262144 -1 0;
+#X obj 440 415 cnv 3 1 1 empty empty DAC15 0 0 0 8 -262144 -1 0;
+#X obj 440 426 cnv 3 1 1 empty empty DAC16 0 0 0 8 -262144 -1 0;
+#X obj 440 437 cnv 3 1 1 empty empty DAC17 0 0 0 8 -262144 -1 0;
+#X obj 440 448 cnv 3 1 1 empty empty DAC18 0 0 0 8 -262144 -1 0;
+#X obj 440 459 cnv 3 1 1 empty empty DAC19 0 0 0 8 -262144 -1 0;
+#X obj 440 470 cnv 3 1 1 empty empty DAC20 0 0 0 8 -262144 -1 0;
+#X obj 440 481 cnv 3 1 1 empty empty DAC21 0 0 0 8 -262144 -1 0;
+#X obj 440 492 cnv 3 1 1 empty empty DAC22 0 0 0 8 -262144 -1 0;
+#X obj 440 503 cnv 3 1 1 empty empty DAC23 0 0 0 8 -262144 -1 0;
+#X obj 440 514 cnv 3 1 1 empty empty DAC24 0 0 0 8 -262144 -1 0;
+#X obj 440 525 cnv 3 1 1 empty empty DAC25 0 0 0 8 -262144 -1 0;
+#X obj 440 536 cnv 3 1 1 empty empty DAC26 0 0 0 8 -262144 -1 0;
+#X obj 440 547 cnv 3 1 1 empty empty DAC27 0 0 0 8 -262144 -1 0;
+#X obj 440 558 cnv 3 1 1 empty empty DAC28 0 0 0 8 -262144 -1 0;
+#X obj 440 569 cnv 3 1 1 empty empty DAC29 0 0 0 8 -262144 -1 0;
+#X obj 440 580 cnv 3 1 1 empty empty DAC30 0 0 0 8 -262144 -1 0;
+#X obj 440 591 cnv 3 1 1 empty empty DAC31 0 0 0 8 -262144 -1 0;
+#X obj 440 602 cnv 3 1 1 empty empty DAC32 0 0 0 8 -262144 -1 0;
+#X obj 440 613 cnv 3 1 1 empty empty DAC33 0 0 0 8 -262144 -1 0;
+#X obj 440 624 cnv 3 1 1 empty empty DAC34 0 0 0 8 -262144 -1 0;
+#X obj 440 635 cnv 3 1 1 empty empty DAC35 0 0 0 8 -262144 -1 0;
+#X obj 440 646 cnv 3 1 1 empty empty DAC36 0 0 0 8 -262144 -1 0;
+#X obj 440 657 cnv 3 1 1 empty empty DAC37 0 0 0 8 -262144 -1 0;
+#X obj 440 668 cnv 3 1 1 empty empty DAC38 0 0 0 8 -262144 -1 0;
+#X obj 440 679 cnv 3 1 1 empty empty DAC39 0 0 0 8 -262144 -1 0;
+#X obj 440 690 cnv 3 1 1 empty empty DAC40 0 0 0 8 -262144 -1 0;
+#X obj 440 701 cnv 3 1 1 empty empty DAC41 0 0 0 8 -262144 -1 0;
+#X obj 440 712 cnv 3 1 1 empty empty DAC42 0 0 0 8 -262144 -1 0;
+#X obj 440 723 cnv 3 1 1 empty empty DAC43 0 0 0 8 -262144 -1 0;
+#X obj 440 734 cnv 3 1 1 empty empty DAC44 0 0 0 8 -262144 -1 0;
+#X obj 440 745 cnv 3 1 1 empty empty DAC45 0 0 0 8 -262144 -1 0;
+#X obj 440 756 cnv 3 1 1 empty empty DAC46 0 0 0 8 -262144 -1 0;
+#X obj 440 767 cnv 3 1 1 empty empty DAC47 0 0 0 8 -262144 -1 0;
+#X obj 440 778 cnv 3 1 1 empty empty DAC48 0 0 0 8 -262144 -1 0;
+#X obj 440 789 cnv 3 1 1 empty empty DAC49 0 0 0 8 -262144 -1 0;
+#X obj 440 800 cnv 3 1 1 empty empty DAC50 0 0 0 8 -262144 -1 0;
+#X obj 440 811 cnv 3 1 1 empty empty DAC51 0 0 0 8 -262144 -1 0;
+#X obj 440 822 cnv 3 1 1 empty empty DAC52 0 0 0 8 -262144 -1 0;
+#X obj 147 257 cnv 4 4 570 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 243 257 cnv 4 4 570 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 339 257 cnv 4 4 570 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 342 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 430 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 518 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 606 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 694 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 782 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 738 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 650 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 562 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 474 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 386 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 298 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 53 256 nbxm 52 16 3 11 -100 27 0 empty empty #000000 0 8;
+#X msg 835 322 -100;
+#X text 560 384 IEM KUG;
+#X text 544 372 musil;
+#X text 574 372 @;
+#X text 580 372 iem.at;
+#X text 543 394 Graz \, Austria;
+#X text 495 361 (c) Thomas Musil 2000 - 2006;
+#X text 492 267 |;
+#X text 492 278 |;
+#X text 594 267 |;
+#X text 594 278 |;
+#X text 492 293 |;
+#X text 492 304 |;
+#X text 522 293 |;
+#X text 522 304 |;
+#X text 492 273 |numberbox_matrix|;
+#X text 495 259 _________________;
+#X text 495 276 _________________;
+#X text 492 299 |nbxm|;
+#X text 495 302 _____;
+#X text 495 284 _____;
+#X text 9 6 numberbox_matrix;
+#X connect 1 0 171 0;
+#X connect 2 0 171 0;
+#X connect 3 0 171 0;
+#X connect 4 0 171 0;
+#X connect 5 0 171 0;
+#X connect 6 0 172 0;
+#X connect 7 0 172 0;
+#X connect 8 0 172 0;
+#X connect 9 0 172 0;
+#X connect 10 0 172 0;
+#X connect 11 0 172 0;
+#X connect 12 0 172 0;
+#X connect 13 0 172 0;
+#X connect 14 0 172 0;
+#X connect 15 0 172 0;
+#X connect 16 0 172 0;
+#X connect 17 0 172 0;
+#X connect 18 0 172 0;
+#X connect 19 0 172 0;
+#X connect 20 0 172 0;
+#X connect 21 0 24 0;
+#X connect 22 0 172 0;
+#X connect 23 0 172 0;
+#X connect 26 0 172 0;
+#X connect 27 0 320 0;
+#X connect 28 0 31 0;
+#X connect 29 0 31 0;
+#X connect 30 0 31 0;
+#X connect 32 0 35 0;
+#X connect 33 0 32 0;
+#X connect 34 0 36 0;
+#X connect 36 0 33 0;
+#X connect 37 0 171 0;
+#X connect 170 0 171 0;
+#X connect 171 0 320 0;
+#X connect 172 0 320 0;
+#X connect 320 0 25 0;
Added: trunk/externals/iem/iemgui/numberbox_matrix-help.pd
===================================================================
--- trunk/externals/iem/iemgui/numberbox_matrix-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/numberbox_matrix-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,502 @@
+#N canvas 7 5 966 718 10;
+#X obj 54 257 cnv 15 382 570 empty empty empty 20 12 0 14 -195568 -66577
+0;
+#X msg 48 45 matrix 5 3 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15;
+#X msg 71 67 row 2 -2 -3 -4;
+#X msg 86 89 col 2 -2 -3 -4 -5 -6;
+#X msg 99 109 element 2 2 99;
+#X obj 103 137 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 450 15 dim 6 4;
+#X msg 503 12 dim 5 3;
+#X msg 450 38 size 5 18;
+#X msg 520 37 size 3 12;
+#X msg 541 62 color #000000;
+#X msg 452 62 color #00bb00;
+#X msg 524 95 font 0 10;
+#X msg 451 96 font 0 14;
+#X msg 453 134 font 1 10;
+#X msg 524 134 font 2 10;
+#X msg 591 134 font 0 10;
+#X msg 575 160 range -100 27;
+#X msg 395 160 range -10 2;
+#X msg 459 194 send from_matrix;
+#X msg 570 194 send empty;
+#X obj 808 511 r from_matrix;
+#X msg 460 216 receive to_matrix;
+#X msg 571 216 receive empty;
+#X obj 809 537 print cc;
+#X obj 53 888 print aa;
+#X msg 469 160 range -1000 1000;
+#N canvas 55 60 289 208 PROPERTIES 0;
+#X obj 443 17 inlet;
+#X obj 57 494 outlet;
+#X obj 98 584 pp dim;
+#X obj 120 528 t b f;
+#X obj 69 36 nbx 3 14 1 999 0 0 empty empty n_columns 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 10 36 nbx 3 14 1 999 0 0 empty empty n_rows 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 78 575 t b f;
+#X obj 70 74 nbx 3 14 1 999 0 0 empty empty heigth 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 10 74 nbx 3 14 1 999 0 0 empty empty width 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 56 631 pp size;
+#X obj 97 556 pack 5 3;
+#X obj 55 603 pack 3 12;
+#X symbolatom 37 104 6 0 0 0 - - -;
+#X obj 180 513 pp #;
+#X obj 180 533 mergefilename;
+#X obj 178 467 init 0 0 0 0 0 0;
+#X obj 178 488 mergefilename;
+#X obj 180 554 pp color;
+#X obj 38 98 cnv 1 1 1 empty empty color 0 0 0 10 -262144 -1 0;
+#X obj 298 472 t b f;
+#X obj 160 74 nbx 3 14 1 999 0 0 empty empty fontsize 0 -6 0 10 -262144
+-1 -1 1 256;
+#X obj 273 525 pack 3 12;
+#X obj 274 553 pp font;
+#X obj 160 25 vradio 10 1 0 3 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X obj 173 29 cnv 1 1 1 empty empty courier 0 0 0 10 -262144 -1 0;
+#X obj 173 40 cnv 1 1 1 empty empty helvetica 0 0 0 10 -262144 -1 0
+;
+#X obj 173 51 cnv 1 1 1 empty empty times 0 0 0 10 -262144 -1 0;
+#X obj 38 124 cnv 1 1 1 empty empty R_G_B 0 0 0 8 -262144 -1 0;
+#X obj 390 530 t b f;
+#X obj 17 145 nbx 4 14 -1e+037 1e+037 0 0 empty empty min 0 -6 0 10
+-262144 -1 -1 -100 256;
+#X obj 367 558 pack 3 12;
+#X obj 72 145 nbx 3 14 -1e+037 1e+037 0 0 empty empty max 0 -6 0 10
+-262144 -1 -1 27 256;
+#X obj 368 586 pp range;
+#X symbolatom 158 108 10 0 0 0 - - -;
+#X obj 159 102 cnv 1 1 1 empty empty send_name 0 0 0 10 -262144 -1
+0;
+#X obj 423 448 pp send;
+#X obj 425 426 init symbol empty;
+#X symbolatom 158 145 10 0 0 0 - - -;
+#X obj 159 139 cnv 1 1 1 empty empty receive_name 0 0 0 10 -262144
+-1 0;
+#X obj 553 452 init symbol empty;
+#X obj 519 506 pp receive;
+#X obj 109 202 init -100 27;
+#X obj 111 226 unpack;
+#X connect 2 0 1 0;
+#X connect 3 0 10 0;
+#X connect 3 1 10 1;
+#X connect 4 0 3 0;
+#X connect 5 0 10 0;
+#X connect 6 0 11 0;
+#X connect 6 1 11 1;
+#X connect 7 0 6 0;
+#X connect 8 0 11 0;
+#X connect 9 0 1 0;
+#X connect 10 0 2 0;
+#X connect 11 0 9 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 14 0 17 0;
+#X connect 15 0 16 0;
+#X connect 16 0 12 0;
+#X connect 17 0 1 0;
+#X connect 19 0 21 0;
+#X connect 19 1 21 1;
+#X connect 20 0 19 0;
+#X connect 21 0 22 0;
+#X connect 22 0 1 0;
+#X connect 23 0 21 0;
+#X connect 28 0 30 0;
+#X connect 28 1 30 1;
+#X connect 29 0 30 0;
+#X connect 30 0 32 0;
+#X connect 31 0 28 0;
+#X connect 32 0 1 0;
+#X connect 33 0 35 0;
+#X connect 35 0 1 0;
+#X connect 36 0 33 0;
+#X connect 37 0 40 0;
+#X connect 39 0 37 0;
+#X connect 40 0 1 0;
+#X connect 41 0 42 0;
+#X connect 42 0 29 0;
+#X connect 42 1 31 0;
+#X coords 0 0 1 1 250 180 1;
+#X restore 668 76 pd PROPERTIES of numberbox_matrix;
+#X obj 829 590 nbxm 1 3 3 11 -100 27 0 empty empty #000000 0 8;
+#X obj 922 610 nbxm 3 1 3 11 -100 27 0 empty empty #000000 0 8;
+#X obj 787 610 nbxm 1 1 3 11 -100 27 0 empty empty #000000 0 8;
+#X obj 796 654 print;
+#X obj 825 425 for++ 1 16;
+#X obj 823 402 t b;
+#X obj 816 353 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 826 452 add2 -30;
+#X obj 817 377 for++ 1 52 10;
+#X msg 14 109 -100;
+#X obj 16 261 cnv 3 1 1 empty empty DAC01 0 0 0 8 -262144 -1 0;
+#X obj 16 272 cnv 3 1 1 empty empty DAC02 0 0 0 8 -262144 -1 0;
+#X obj 16 283 cnv 3 1 1 empty empty DAC03 0 0 0 8 -262144 -1 0;
+#X obj 16 294 cnv 3 1 1 empty empty DAC04 0 0 0 8 -262144 -1 0;
+#X obj 16 305 cnv 3 1 1 empty empty DAC05 0 0 0 8 -262144 -1 0;
+#X obj 16 316 cnv 3 1 1 empty empty DAC06 0 0 0 8 -262144 -1 0;
+#X obj 16 327 cnv 3 1 1 empty empty DAC07 0 0 0 8 -262144 -1 0;
+#X obj 16 338 cnv 3 1 1 empty empty DAC08 0 0 0 8 -262144 -1 0;
+#X obj 16 349 cnv 3 1 1 empty empty DAC09 0 0 0 8 -262144 -1 0;
+#X obj 16 360 cnv 3 1 1 empty empty DAC10 0 0 0 8 -262144 -1 0;
+#X obj 16 371 cnv 3 1 1 empty empty DAC11 0 0 0 8 -262144 -1 0;
+#X obj 16 382 cnv 3 1 1 empty empty DAC12 0 0 0 8 -262144 -1 0;
+#X obj 16 393 cnv 3 1 1 empty empty DAC13 0 0 0 8 -262144 -1 0;
+#X obj 16 404 cnv 3 1 1 empty empty DAC14 0 0 0 8 -262144 -1 0;
+#X obj 16 415 cnv 3 1 1 empty empty DAC15 0 0 0 8 -262144 -1 0;
+#X obj 16 426 cnv 3 1 1 empty empty DAC16 0 0 0 8 -262144 -1 0;
+#X obj 16 437 cnv 3 1 1 empty empty DAC17 0 0 0 8 -262144 -1 0;
+#X obj 16 448 cnv 3 1 1 empty empty DAC18 0 0 0 8 -262144 -1 0;
+#X obj 16 459 cnv 3 1 1 empty empty DAC19 0 0 0 8 -262144 -1 0;
+#X obj 16 470 cnv 3 1 1 empty empty DAC20 0 0 0 8 -262144 -1 0;
+#X obj 16 481 cnv 3 1 1 empty empty DAC21 0 0 0 8 -262144 -1 0;
+#X obj 16 492 cnv 3 1 1 empty empty DAC22 0 0 0 8 -262144 -1 0;
+#X obj 16 503 cnv 3 1 1 empty empty DAC23 0 0 0 8 -262144 -1 0;
+#X obj 16 514 cnv 3 1 1 empty empty DAC24 0 0 0 8 -262144 -1 0;
+#X obj 16 525 cnv 3 1 1 empty empty DAC25 0 0 0 8 -262144 -1 0;
+#X obj 16 536 cnv 3 1 1 empty empty DAC26 0 0 0 8 -262144 -1 0;
+#X obj 16 547 cnv 3 1 1 empty empty DAC27 0 0 0 8 -262144 -1 0;
+#X obj 16 558 cnv 3 1 1 empty empty DAC28 0 0 0 8 -262144 -1 0;
+#X obj 16 569 cnv 3 1 1 empty empty DAC29 0 0 0 8 -262144 -1 0;
+#X obj 16 580 cnv 3 1 1 empty empty DAC30 0 0 0 8 -262144 -1 0;
+#X obj 16 591 cnv 3 1 1 empty empty DAC31 0 0 0 8 -262144 -1 0;
+#X obj 16 602 cnv 3 1 1 empty empty DAC32 0 0 0 8 -262144 -1 0;
+#X obj 16 613 cnv 3 1 1 empty empty DAC33 0 0 0 8 -262144 -1 0;
+#X obj 16 624 cnv 3 1 1 empty empty DAC34 0 0 0 8 -262144 -1 0;
+#X obj 16 635 cnv 3 1 1 empty empty DAC35 0 0 0 8 -262144 -1 0;
+#X obj 16 646 cnv 3 1 1 empty empty DAC36 0 0 0 8 -262144 -1 0;
+#X obj 16 657 cnv 3 1 1 empty empty DAC37 0 0 0 8 -262144 -1 0;
+#X obj 16 668 cnv 3 1 1 empty empty DAC38 0 0 0 8 -262144 -1 0;
+#X obj 16 679 cnv 3 1 1 empty empty DAC39 0 0 0 8 -262144 -1 0;
+#X obj 16 690 cnv 3 1 1 empty empty DAC40 0 0 0 8 -262144 -1 0;
+#X obj 16 701 cnv 3 1 1 empty empty DAC41 0 0 0 8 -262144 -1 0;
+#X obj 16 712 cnv 3 1 1 empty empty DAC42 0 0 0 8 -262144 -1 0;
+#X obj 16 723 cnv 3 1 1 empty empty DAC43 0 0 0 8 -262144 -1 0;
+#X obj 16 734 cnv 3 1 1 empty empty DAC44 0 0 0 8 -262144 -1 0;
+#X obj 16 745 cnv 3 1 1 empty empty DAC45 0 0 0 8 -262144 -1 0;
+#X obj 16 756 cnv 3 1 1 empty empty DAC46 0 0 0 8 -262144 -1 0;
+#X obj 16 767 cnv 3 1 1 empty empty DAC47 0 0 0 8 -262144 -1 0;
+#X obj 16 778 cnv 3 1 1 empty empty DAC48 0 0 0 8 -262144 -1 0;
+#X obj 16 789 cnv 3 1 1 empty empty DAC49 0 0 0 8 -262144 -1 0;
+#X obj 16 800 cnv 3 1 1 empty empty DAC50 0 0 0 8 -262144 -1 0;
+#X obj 16 811 cnv 3 1 1 empty empty DAC51 0 0 0 8 -262144 -1 0;
+#X obj 16 822 cnv 3 1 1 empty empty DAC52 0 0 0 8 -262144 -1 0;
+#X obj 62 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 62 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 62 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 62 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 62 866 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 86 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 86 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 86 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 86 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 86 866 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 110 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 110 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 110 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 110 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 110 866 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 134 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 134 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 134 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 134 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 134 866 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 158 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 158 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 158 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 158 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 158 866 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 182 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 182 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 182 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 182 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 182 866 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X obj 206 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 206 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 206 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 206 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 206 866 cnv 3 1 1 empty empty 7 0 0 0 8 -262144 -1 0;
+#X obj 230 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 230 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 230 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 230 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 230 866 cnv 3 1 1 empty empty 8 0 0 0 8 -262144 -1 0;
+#X obj 255 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 255 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 255 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 255 858 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 255 866 cnv 3 1 1 empty empty 9 0 0 0 8 -262144 -1 0;
+#X obj 279 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 279 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 279 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 279 866 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 279 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 303 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 303 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 303 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 327 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 327 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 327 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 351 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 351 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 351 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 351 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 375 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 375 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 375 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 375 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 399 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 399 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 399 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 399 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 423 834 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 423 842 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 423 850 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 423 858 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 866 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 866 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 351 866 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 375 866 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 399 866 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 423 866 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X msg 129 129 2 2 99;
+#N canvas 0 0 454 304 /SUBPATCH/ 0;
+#X obj 95 42 inlet;
+#X obj 95 155 outlet;
+#X connect 0 0 1 0;
+#X restore 53 160 pd;
+#N canvas 0 0 454 304 /SUBPATCH/ 0;
+#X obj 95 42 inlet;
+#X obj 95 155 outlet;
+#X connect 0 0 1 0;
+#X restore 171 150 pd;
+#X obj 62 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 62 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 62 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 62 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 62 250 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 86 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 86 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 86 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 86 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 86 250 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 110 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 110 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 110 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 110 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 110 250 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 134 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 134 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 134 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 134 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 134 250 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 158 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 158 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 158 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 158 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 158 250 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 182 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 182 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 182 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 182 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 182 250 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X obj 206 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 206 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 206 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 206 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 206 250 cnv 3 1 1 empty empty 7 0 0 0 8 -262144 -1 0;
+#X obj 230 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 230 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 230 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 230 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 230 250 cnv 3 1 1 empty empty 8 0 0 0 8 -262144 -1 0;
+#X obj 255 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 255 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 255 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 255 242 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 255 250 cnv 3 1 1 empty empty 9 0 0 0 8 -262144 -1 0;
+#X obj 279 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 279 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 279 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 279 250 cnv 3 1 1 empty empty 0 0 0 0 8 -262144 -1 0;
+#X obj 279 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 303 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 303 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 303 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 327 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 327 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 327 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 351 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 351 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 351 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 351 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 375 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 375 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 375 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 375 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 399 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 399 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 399 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 399 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 423 218 cnv 3 1 1 empty empty B 0 0 0 8 -262144 -1 0;
+#X obj 423 226 cnv 3 1 1 empty empty U 0 0 0 8 -262144 -1 0;
+#X obj 423 234 cnv 3 1 1 empty empty S 0 0 0 8 -262144 -1 0;
+#X obj 423 242 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 303 250 cnv 3 1 1 empty empty 1 0 0 0 8 -262144 -1 0;
+#X obj 327 250 cnv 3 1 1 empty empty 2 0 0 0 8 -262144 -1 0;
+#X obj 351 250 cnv 3 1 1 empty empty 3 0 0 0 8 -262144 -1 0;
+#X obj 375 250 cnv 3 1 1 empty empty 4 0 0 0 8 -262144 -1 0;
+#X obj 399 250 cnv 3 1 1 empty empty 5 0 0 0 8 -262144 -1 0;
+#X obj 423 250 cnv 3 1 1 empty empty 6 0 0 0 8 -262144 -1 0;
+#X obj 440 261 cnv 3 1 1 empty empty DAC01 0 0 0 8 -262144 -1 0;
+#X obj 440 272 cnv 3 1 1 empty empty DAC02 0 0 0 8 -262144 -1 0;
+#X obj 440 283 cnv 3 1 1 empty empty DAC03 0 0 0 8 -262144 -1 0;
+#X obj 440 294 cnv 3 1 1 empty empty DAC04 0 0 0 8 -262144 -1 0;
+#X obj 440 305 cnv 3 1 1 empty empty DAC05 0 0 0 8 -262144 -1 0;
+#X obj 440 316 cnv 3 1 1 empty empty DAC06 0 0 0 8 -262144 -1 0;
+#X obj 440 327 cnv 3 1 1 empty empty DAC07 0 0 0 8 -262144 -1 0;
+#X obj 440 338 cnv 3 1 1 empty empty DAC08 0 0 0 8 -262144 -1 0;
+#X obj 440 349 cnv 3 1 1 empty empty DAC09 0 0 0 8 -262144 -1 0;
+#X obj 440 360 cnv 3 1 1 empty empty DAC10 0 0 0 8 -262144 -1 0;
+#X obj 440 371 cnv 3 1 1 empty empty DAC11 0 0 0 8 -262144 -1 0;
+#X obj 440 382 cnv 3 1 1 empty empty DAC12 0 0 0 8 -262144 -1 0;
+#X obj 440 393 cnv 3 1 1 empty empty DAC13 0 0 0 8 -262144 -1 0;
+#X obj 440 404 cnv 3 1 1 empty empty DAC14 0 0 0 8 -262144 -1 0;
+#X obj 440 415 cnv 3 1 1 empty empty DAC15 0 0 0 8 -262144 -1 0;
+#X obj 440 426 cnv 3 1 1 empty empty DAC16 0 0 0 8 -262144 -1 0;
+#X obj 440 437 cnv 3 1 1 empty empty DAC17 0 0 0 8 -262144 -1 0;
+#X obj 440 448 cnv 3 1 1 empty empty DAC18 0 0 0 8 -262144 -1 0;
+#X obj 440 459 cnv 3 1 1 empty empty DAC19 0 0 0 8 -262144 -1 0;
+#X obj 440 470 cnv 3 1 1 empty empty DAC20 0 0 0 8 -262144 -1 0;
+#X obj 440 481 cnv 3 1 1 empty empty DAC21 0 0 0 8 -262144 -1 0;
+#X obj 440 492 cnv 3 1 1 empty empty DAC22 0 0 0 8 -262144 -1 0;
+#X obj 440 503 cnv 3 1 1 empty empty DAC23 0 0 0 8 -262144 -1 0;
+#X obj 440 514 cnv 3 1 1 empty empty DAC24 0 0 0 8 -262144 -1 0;
+#X obj 440 525 cnv 3 1 1 empty empty DAC25 0 0 0 8 -262144 -1 0;
+#X obj 440 536 cnv 3 1 1 empty empty DAC26 0 0 0 8 -262144 -1 0;
+#X obj 440 547 cnv 3 1 1 empty empty DAC27 0 0 0 8 -262144 -1 0;
+#X obj 440 558 cnv 3 1 1 empty empty DAC28 0 0 0 8 -262144 -1 0;
+#X obj 440 569 cnv 3 1 1 empty empty DAC29 0 0 0 8 -262144 -1 0;
+#X obj 440 580 cnv 3 1 1 empty empty DAC30 0 0 0 8 -262144 -1 0;
+#X obj 440 591 cnv 3 1 1 empty empty DAC31 0 0 0 8 -262144 -1 0;
+#X obj 440 602 cnv 3 1 1 empty empty DAC32 0 0 0 8 -262144 -1 0;
+#X obj 440 613 cnv 3 1 1 empty empty DAC33 0 0 0 8 -262144 -1 0;
+#X obj 440 624 cnv 3 1 1 empty empty DAC34 0 0 0 8 -262144 -1 0;
+#X obj 440 635 cnv 3 1 1 empty empty DAC35 0 0 0 8 -262144 -1 0;
+#X obj 440 646 cnv 3 1 1 empty empty DAC36 0 0 0 8 -262144 -1 0;
+#X obj 440 657 cnv 3 1 1 empty empty DAC37 0 0 0 8 -262144 -1 0;
+#X obj 440 668 cnv 3 1 1 empty empty DAC38 0 0 0 8 -262144 -1 0;
+#X obj 440 679 cnv 3 1 1 empty empty DAC39 0 0 0 8 -262144 -1 0;
+#X obj 440 690 cnv 3 1 1 empty empty DAC40 0 0 0 8 -262144 -1 0;
+#X obj 440 701 cnv 3 1 1 empty empty DAC41 0 0 0 8 -262144 -1 0;
+#X obj 440 712 cnv 3 1 1 empty empty DAC42 0 0 0 8 -262144 -1 0;
+#X obj 440 723 cnv 3 1 1 empty empty DAC43 0 0 0 8 -262144 -1 0;
+#X obj 440 734 cnv 3 1 1 empty empty DAC44 0 0 0 8 -262144 -1 0;
+#X obj 440 745 cnv 3 1 1 empty empty DAC45 0 0 0 8 -262144 -1 0;
+#X obj 440 756 cnv 3 1 1 empty empty DAC46 0 0 0 8 -262144 -1 0;
+#X obj 440 767 cnv 3 1 1 empty empty DAC47 0 0 0 8 -262144 -1 0;
+#X obj 440 778 cnv 3 1 1 empty empty DAC48 0 0 0 8 -262144 -1 0;
+#X obj 440 789 cnv 3 1 1 empty empty DAC49 0 0 0 8 -262144 -1 0;
+#X obj 440 800 cnv 3 1 1 empty empty DAC50 0 0 0 8 -262144 -1 0;
+#X obj 440 811 cnv 3 1 1 empty empty DAC51 0 0 0 8 -262144 -1 0;
+#X obj 440 822 cnv 3 1 1 empty empty DAC52 0 0 0 8 -262144 -1 0;
+#X obj 147 257 cnv 4 4 570 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 243 257 cnv 4 4 570 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 339 257 cnv 4 4 570 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 342 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 430 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 518 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 606 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 694 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 782 cnv 4 382 4 empty empty empty 20 12 0 14 -233017 -66577
+0;
+#X obj 54 738 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 650 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 562 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 474 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 386 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 54 298 cnv 4 382 4 empty empty empty 20 12 0 14 -166441 -66577
+0;
+#X obj 53 256 nbxm 52 16 3 11 -100 27 0 empty empty #000000 0 8;
+#X msg 835 322 -100;
+#X text 560 384 IEM KUG;
+#X text 544 372 musil;
+#X text 574 372 @;
+#X text 580 372 iem.at;
+#X text 543 394 Graz \, Austria;
+#X text 495 361 (c) Thomas Musil 2000 - 2006;
+#X text 492 267 |;
+#X text 492 278 |;
+#X text 594 267 |;
+#X text 594 278 |;
+#X text 492 293 |;
+#X text 492 304 |;
+#X text 522 293 |;
+#X text 522 304 |;
+#X text 492 273 |numberbox_matrix|;
+#X text 495 259 _________________;
+#X text 495 276 _________________;
+#X text 492 299 |nbxm|;
+#X text 495 302 _____;
+#X text 495 284 _____;
+#X text 9 6 numberbox_matrix;
+#X connect 1 0 171 0;
+#X connect 2 0 171 0;
+#X connect 3 0 171 0;
+#X connect 4 0 171 0;
+#X connect 5 0 171 0;
+#X connect 6 0 172 0;
+#X connect 7 0 172 0;
+#X connect 8 0 172 0;
+#X connect 9 0 172 0;
+#X connect 10 0 172 0;
+#X connect 11 0 172 0;
+#X connect 12 0 172 0;
+#X connect 13 0 172 0;
+#X connect 14 0 172 0;
+#X connect 15 0 172 0;
+#X connect 16 0 172 0;
+#X connect 17 0 172 0;
+#X connect 18 0 172 0;
+#X connect 19 0 172 0;
+#X connect 20 0 172 0;
+#X connect 21 0 24 0;
+#X connect 22 0 172 0;
+#X connect 23 0 172 0;
+#X connect 26 0 172 0;
+#X connect 27 0 320 0;
+#X connect 28 0 31 0;
+#X connect 29 0 31 0;
+#X connect 30 0 31 0;
+#X connect 32 0 35 0;
+#X connect 33 0 32 0;
+#X connect 34 0 36 0;
+#X connect 36 0 33 0;
+#X connect 37 0 171 0;
+#X connect 170 0 171 0;
+#X connect 171 0 320 0;
+#X connect 172 0 320 0;
+#X connect 320 0 25 0;
Added: trunk/externals/iem/iemgui/pair.gif
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iemgui/pair.gif
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iemgui/pd.gif
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iemgui/pd.gif
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iemgui/room_sim_2d-help.pd
===================================================================
--- trunk/externals/iem/iemgui/room_sim_2d-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/room_sim_2d-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,764 @@
+#N canvas 0 0 1012 718 10;
+#X obj 42 172 room_sim_2d 4 30 0 1.4 30 24197 12 10 123525 150 180
+250684 61 90 62783 240 90 250684 233 100 250684 21 100;
+#X text 9 11 room_sim_2d;
+#X obj 42 148 r to_GUI;
+#X msg 494 16 \; to_GUI room_dim 12 10;
+#X msg 498 149 \; to_GUI r_ambi 1.4;
+#X msg 494 91 \; to_GUI room_dim \$1 \$2;
+#X obj 494 70 pack;
+#X obj 528 70 t b f;
+#X floatatom 487 53 5 2 30 0 - - -;
+#X floatatom 530 53 5 2 30 0 - - -;
+#X text 572 52 m x m;
+#X msg 498 202 \; to_GUI r_ambi \$1;
+#X floatatom 498 184 5 0.1 10 0 - - -;
+#X text 539 183 m;
+#X msg 496 306 \; to_GUI pix_per_m_ratio \$1;
+#X floatatom 496 288 5 5 50 0 - - -;
+#X text 539 286 pix/m;
+#X floatatom 501 412 5 5 150 0 - - -;
+#X msg 501 430 \; to_GUI src_font \$1;
+#X text 544 410 pix;
+#X msg 501 374 \; to_GUI src_font 30;
+#X obj 42 607 s from_GUI;
+#X obj 735 14 r from_GUI;
+#X obj 735 43 route 0 1 2;
+#X floatatom 735 260 5 0 0 0 - - -;
+#X floatatom 775 260 5 0 0 0 - - -;
+#X obj 735 238 unpack;
+#X floatatom 759 189 5 0 0 0 - - -;
+#X floatatom 799 189 5 0 0 0 - - -;
+#X obj 759 167 unpack;
+#X obj 759 144 route src_xy;
+#X floatatom 783 115 5 0 0 0 - - -;
+#X floatatom 823 115 5 0 0 0 - - -;
+#X obj 783 93 unpack;
+#X obj 783 70 route src_xy;
+#X obj 495 560 pack;
+#X obj 529 560 t b f;
+#X floatatom 488 543 5 -20 20 0 - - -;
+#X floatatom 531 543 5 -20 20 0 - - -;
+#X text 573 542 m x m;
+#X msg 495 506 \; to_GUI set_head_xy 0 0;
+#X msg 495 581 \; to_GUI set_head_xy \$1 \$2;
+#X text 865 114 m x m;
+#X text 841 187 m x m;
+#X text 817 260 m x m;
+#X text 850 145 source 1;
+#X text 877 70 source 2;
+#X obj 335 584 pp 0 rho_z;
+#X obj 735 215 route head_xy rho_z;
+#X floatatom 890 258 5 0 0 0 - - -;
+#X text 928 258 degree;
+#X obj 496 693 pack;
+#X obj 530 693 t b f;
+#X floatatom 489 676 5 -20 20 0 - - -;
+#X floatatom 532 676 5 -20 20 0 - - -;
+#X text 574 675 m x m;
+#X msg 496 639 \; to_GUI set_src_xy 1 3 -3;
+#X msg 496 714 \; to_GUI set_src_xy 1 \$1 \$2;
+#N canvas 706 69 322 703 colors 1;
+#X msg 47 153 \; to_GUI room_col \$1;
+#X msg 46 291 \; to_GUI head_col \$1;
+#X msg 45 434 \; to_GUI src_col 1 \$1;
+#X msg 45 584 \; to_GUI src_col 2 \$1;
+#N canvas 16 80 189 98 source_color_2 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 45 482 pd source_color_2;
+#N canvas 16 80 189 98 source_color_1 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 45 332 pd source_color_1;
+#N canvas 16 80 189 98 head_color 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 46 189 pd head_color;
+#N canvas 16 80 189 98 room_color 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
+#X connect 59 0 2 0;
+#X connect 60 0 2 0;
+#X coords 0 0 1 1 200 100 1;
+#X restore 47 45 pd room_color;
+#X connect 4 0 3 0;
+#X connect 5 0 2 0;
+#X connect 6 0 1 0;
+#X connect 7 0 0 0;
+#X restore 736 555 pd colors;
+#X floatatom 721 415 5 0 0 0 - - -;
+#X msg 721 377 \; to_GUI set_rho 0;
+#X msg 721 433 \; to_GUI set_rho \$1;
+#X text 764 413 degree;
+#X text 184 150 |;
+#X text 184 146 ^;
+#X text 185 133 x;
+#X text 29 326 _;
+#X text 10 331 y <;
+#X msg 497 253 \; to_GUI pix_per_m_ratio 30;
+#X obj 710 696 pack;
+#X obj 744 696 t b f;
+#X floatatom 703 679 5 -20 20 0 - - -;
+#X floatatom 746 679 5 -20 20 0 - - -;
+#X text 788 678 m x m;
+#X msg 710 642 \; to_GUI set_src_xy 2 3 3;
+#X msg 710 717 \; to_GUI set_src_xy 2 \$1 \$2;
+#X floatatom 316 50 5 0.1 10 0 - - -;
+#X msg 316 68 \; to_GUI nr_src \$1;
+#X obj 316 29 + 1;
+#X obj 316 10 hradio 15 1 0 8 empty empty empty 0 -6 0 8 -262144 -1
+-1 0;
+#X text 97 665 IEM KUG;
+#X text 81 653 musil;
+#X text 111 653 @;
+#X text 117 653 iem.at;
+#X text 80 675 Graz \, Austria;
+#X text 32 642 (c) Thomas Musil 2000 - 2006;
+#X text 262 133 |;
+#X text 262 144 |;
+#X text 265 125 ______________;
+#X text 265 142 ______________;
+#X text 346 133 |;
+#X text 346 144 |;
+#X text 262 139 |room_sim_3d 2|;
+#X text 53 59 of the circle-listener object;
+#X text 15 49 shift-mouse-dragging changes the rotation-angle;
+#X connect 0 0 21 0;
+#X connect 0 1 47 0;
+#X connect 2 0 0 0;
+#X connect 6 0 5 0;
+#X connect 7 0 6 0;
+#X connect 7 1 6 1;
+#X connect 8 0 6 0;
+#X connect 9 0 7 0;
+#X connect 12 0 11 0;
+#X connect 15 0 14 0;
+#X connect 17 0 18 0;
+#X connect 22 0 23 0;
+#X connect 23 0 48 0;
+#X connect 23 1 30 0;
+#X connect 23 2 34 0;
+#X connect 26 0 24 0;
+#X connect 26 1 25 0;
+#X connect 29 0 27 0;
+#X connect 29 1 28 0;
+#X connect 30 0 29 0;
+#X connect 33 0 31 0;
+#X connect 33 1 32 0;
+#X connect 34 0 33 0;
+#X connect 35 0 41 0;
+#X connect 36 0 35 0;
+#X connect 36 1 35 1;
+#X connect 37 0 35 0;
+#X connect 38 0 36 0;
+#X connect 47 0 21 0;
+#X connect 48 0 26 0;
+#X connect 48 1 49 0;
+#X connect 51 0 57 0;
+#X connect 52 0 51 0;
+#X connect 52 1 51 1;
+#X connect 53 0 51 0;
+#X connect 54 0 52 0;
+#X connect 59 0 61 0;
+#X connect 69 0 75 0;
+#X connect 70 0 69 0;
+#X connect 70 1 69 1;
+#X connect 71 0 69 0;
+#X connect 72 0 70 0;
+#X connect 76 0 77 0;
+#X connect 78 0 76 0;
+#X connect 79 0 78 0;
Added: trunk/externals/iem/iemgui/room_sim_3d-help.pd
===================================================================
--- trunk/externals/iem/iemgui/room_sim_3d-help.pd (rev 0)
+++ trunk/externals/iem/iemgui/room_sim_3d-help.pd 2008-12-11 17:52:20 UTC (rev 10440)
@@ -0,0 +1,801 @@
+#N canvas 6 5 960 708 10;
+#X obj 44 182 room_sim_3d 2 30 0 1.3 30 24197 12 10 5 123525 140 116
+1 250684 224 186 45 250684 64 158 42;
+#X obj 44 157 r to_GUI;
+#X msg 432 146 \; to_GUI r_ambi 1.4;
+#X obj 508 86 t b f;
+#X floatatom 433 69 5 2 30 0 - - -;
+#X floatatom 510 69 5 2 30 0 - - -;
+#X msg 432 199 \; to_GUI r_ambi \$1;
+#X floatatom 432 181 5 0.1 10 0 - - -;
+#X text 468 180 m;
+#X msg 430 289 \; to_GUI pix_per_m_ratio \$1;
+#X floatatom 430 271 5 5 50 0 - - -;
+#X text 473 269 pix/m;
+#X floatatom 429 362 5 5 150 0 - - -;
+#X msg 429 380 \; to_GUI src_font \$1;
+#X text 472 360 pix;
+#X msg 429 324 \; to_GUI src_font 30;
+#X obj 44 616 s from_GUI;
+#X obj 687 34 r from_GUI;
+#X obj 687 63 route 0 1 2;
+#X floatatom 687 280 5 0 0 0 - - -;
+#X floatatom 727 280 5 0 0 0 - - -;
+#X floatatom 711 209 5 0 0 0 - - -;
+#X floatatom 751 209 5 0 0 0 - - -;
+#X floatatom 735 135 5 0 0 0 - - -;
+#X floatatom 775 135 5 0 0 0 - - -;
+#X obj 514 473 t b f;
+#X floatatom 423 456 5 -20 20 0 - - -;
+#X floatatom 516 456 5 -20 20 0 - - -;
+#X text 802 165 source 1;
+#X text 829 90 source 2;
+#X obj 337 593 pp 0 rho_z;
+#X floatatom 840 263 5 0 0 0 - - -;
+#X text 878 263 degree;
+#X text 186 159 |;
+#X text 186 155 ^;
+#X text 187 142 x;
+#X text 31 335 _;
+#N canvas 698 61 330 711 colors 0;
+#X msg 47 153 \; to_GUI room_col \$1;
+#X msg 46 291 \; to_GUI head_col \$1;
+#X msg 45 434 \; to_GUI src_col 1 \$1;
+#X msg 45 584 \; to_GUI src_col 2 \$1;
+#N canvas 16 80 189 98 source_color_2 0;
+#X obj 12 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 12 139 0;
+#X obj 12 226 outlet;
+#X obj 12 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -166441 -1
+-1;
+#X msg 12 160 1;
+#X obj 12 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -66577 -1 -1
+;
+#X obj 60 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261689 -1
+-1;
+#X msg 12 181 2;
+#X msg 60 139 3;
+#X obj 76 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -261681 -1
+-1;
+#X obj 92 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1
+-1;
+#X obj 108 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225271 -1
+-1;
+#X obj 124 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1
+-1;
+#X msg 76 139 4;
+#X msg 92 139 5;
+#X msg 108 139 6;
+#X msg 124 139 7;
+#X obj 140 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
+-1;
+#X obj 156 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -257472 -1
+-1;
+#X msg 140 139 8;
+#X msg 156 139 9;
+#X obj 28 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -233017 -1
+-1;
+#X obj 28 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -128992 -1
+-1;
+#X obj 28 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -33289 -1 -1
+;
+#X obj 60 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -258699 -1
+-1;
+#X obj 76 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -260818 -1
+-1;
+#X obj 92 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -241291 -1
+-1;
+#X obj 108 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -24198 -1
+-1;
+#X obj 124 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -44926 -1
+-1;
+#X obj 140 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -62784 -1
+-1;
+#X obj 156 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -250685 -1
+-1;
+#X msg 60 160 13;
+#X msg 76 160 14;
+#X msg 92 160 15;
+#X msg 108 160 16;
+#X msg 124 160 17;
+#X msg 140 160 18;
+#X msg 156 160 19;
+#X msg 28 139 10;
+#X msg 28 160 11;
+#X msg 28 181 12;
+#X obj 44 27 bng 15 250 50 0 empty empty empty 0 -6 0 8 -195568 -1
+-1;
+#X obj 44 43 bng 15 250 50 0 empty empty empty 0 -6 0 8 -99865 -1 -1
+;
+#X obj 44 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1 -1 -1;
+#X obj 60 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -143491 -1
+-1;
+#X obj 76 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90881 -1 -1
+;
+#X obj 92 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -123526 -1
+-1;
+#X obj 108 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -42246 -1
+-1;
+#X obj 124 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -1109 -1 -1
+;
+#X obj 140 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -355 -1 -1
+;
+#X obj 156 59 bng 15 250 50 0 empty empty empty 0 -6 0 8 -90133 -1
+-1;
+#X msg 60 181 23;
+#X msg 76 181 24;
+#X msg 92 181 25;
+#X msg 108 181 26;
+#X msg 124 181 27;
+#X msg 140 181 28;
+#X msg 156 181 29;
+#X msg 44 139 20;
+#X msg 44 160 21;
+#X msg 44 181 22;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 4 0;
+#X connect 4 0 2 0;
+#X connect 5 0 7 0;
+#X connect 6 0 8 0;
+#X connect 7 0 2 0;
+#X connect 8 0 2 0;
+#X connect 9 0 13 0;
+#X connect 10 0 14 0;
+#X connect 11 0 15 0;
+#X connect 12 0 16 0;
+#X connect 13 0 2 0;
+#X connect 14 0 2 0;
+#X connect 15 0 2 0;
+#X connect 16 0 2 0;
+#X connect 17 0 19 0;
+#X connect 18 0 20 0;
+#X connect 19 0 2 0;
+#X connect 20 0 2 0;
+#X connect 21 0 38 0;
+#X connect 22 0 39 0;
+#X connect 23 0 40 0;
+#X connect 24 0 31 0;
+#X connect 25 0 32 0;
+#X connect 26 0 33 0;
+#X connect 27 0 34 0;
+#X connect 28 0 35 0;
+#X connect 29 0 36 0;
+#X connect 30 0 37 0;
+#X connect 31 0 2 0;
+#X connect 32 0 2 0;
+#X connect 33 0 2 0;
+#X connect 34 0 2 0;
+#X connect 35 0 2 0;
+#X connect 36 0 2 0;
+#X connect 37 0 2 0;
+#X connect 38 0 2 0;
+#X connect 39 0 2 0;
+#X connect 40 0 2 0;
+#X connect 41 0 58 0;
+#X connect 42 0 59 0;
+#X connect 43 0 60 0;
+#X connect 44 0 51 0;
+#X connect 45 0 52 0;
+#X connect 46 0 53 0;
+#X connect 47 0 54 0;
+#X connect 48 0 55 0;
+#X connect 49 0 56 0;
+#X connect 50 0 57 0;
+#X connect 51 0 2 0;
+#X connect 52 0 2 0;
+#X connect 53 0 2 0;
+#X connect 54 0 2 0;
+#X connect 55 0 2 0;
+#X connect 56 0 2 0;
+#X connect 57 0 2 0;
+#X connect 58 0 2 0;
@@ Diff output truncated at 100000 characters. @@
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10439] trunk/externals/iem/iem_spec2
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10439
http://pure-data.svn.sourceforge.net/pure-data/?rev=10439&view=rev
Author: tmusil
Date: 2008-12-11 17:50:02 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iem_spec2/spec2_1p1z_freq~-help.pd
trunk/externals/iem/iem_spec2/spec2_1p1z_time~-help.pd
trunk/externals/iem/iem_spec2/spec2_abs~-help.pd
trunk/externals/iem/iem_spec2/spec2_add_scalar~-help.pd
trunk/externals/iem/iem_spec2/spec2_add~-help.pd
trunk/externals/iem/iem_spec2/spec2_block_delay~-help.pd
trunk/externals/iem/iem_spec2/spec2_clip_max~-help.pd
trunk/externals/iem/iem_spec2/spec2_clip_min~-help.pd
trunk/externals/iem/iem_spec2/spec2_dbtopow~-help.pd
trunk/externals/iem/iem_spec2/spec2_dbtorms~-help.pd
trunk/externals/iem/iem_spec2/spec2_matrix_bundle_stat~-help.pd
trunk/externals/iem/iem_spec2/spec2_mul_scalar~-help.pd
trunk/externals/iem/iem_spec2/spec2_mul~-help.pd
trunk/externals/iem/iem_spec2/spec2_powtodb~-help.pd
trunk/externals/iem/iem_spec2/spec2_rmstodb~-help.pd
trunk/externals/iem/iem_spec2/spec2_shift~-help.pd
trunk/externals/iem/iem_spec2/spec2_sqrt~-help.pd
trunk/externals/iem/iem_spec2/spec2_stretch~-help.pd
trunk/externals/iem/iem_spec2/spec2_sub~-help.pd
trunk/externals/iem/iem_spec2/spec2_sum~-help.pd
trunk/externals/iem/iem_spec2/spec2_tab_conv~-help.pd
trunk/externals/iem/iem_spec2/spec2_tabreceive_enable~-help.pd
trunk/externals/iem/iem_spec2/spec2_tabreceive~-help.pd
Removed Paths:
-------------
trunk/externals/iem/iem_spec2/help/
Added: trunk/externals/iem/iem_spec2/spec2_1p1z_freq~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_1p1z_freq~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_1p1z_freq~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,92 @@
+#N canvas 20 32 724 388 10;
+#X obj 42 70 dsp;
+#X obj 42 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 42 111 5 0 0 0 - - -;
+#X floatatom 55 94 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array scope 256 float 0;
+#X coords 0 100 255 0 300 200 1;
+#X restore 346 82 graph;
+#X text 130 39 iem_spec2 calculates only blocksize/2 + 1 samples of
+block;
+#N canvas 0 0 633 408 tables 0;
+#N canvas 0 0 450 300 graph1 0;
+#X array hann 259 float 0;
+#X coords 0 1 258 -1 200 140 1;
+#X restore 30 31 graph;
+#X obj 246 34 loadbang;
+#X msg 246 55 \; hann cosinesum 256 0.5 -0.5;
+#X connect 1 0 2 0;
+#X restore 149 82 pd tables;
+#X obj 42 145 noise~;
+#X obj 237 93 osc~ 11025;
+#X msg 292 58 0;
+#X obj 42 169 bpq2~ 7000 6 100;
+#X msg 206 187 1 0 0;
+#X msg 205 121 0.1 0 0.9;
+#X text 90 302 IEM KUG;
+#X text 74 290 musil;
+#X text 104 290 @;
+#X text 110 290 iem.at;
+#X text 73 312 Graz \, Austria;
+#X text 25 279 (c) Thomas Musil 2000 - 2006;
+#X text 18 5 spec2_1p1z_freq~;
+#N canvas 190 113 569 461 spec_analyse_by_1p1z_freq 0;
+#X obj 100 51 inlet~;
+#X obj 352 46 block~ 256 2;
+#X obj 102 156 rfft~;
+#X obj 101 108 *~;
+#X obj 298 46 inlet;
+#X obj 114 86 spec2_tabreceive~ hann;
+#X obj 97 186 *~;
+#X obj 124 186 *~;
+#X obj 104 211 +~;
+#X obj 104 266 powtodb~;
+#X obj 104 291 tabsend~ scope;
+#X obj 180 174 /;
+#X obj 101 131 *~ 0.032;
+#X msg 189 149 1 32;
+#X obj 188 127 loadbang;
+#X obj 300 225 spec2_1p1z_freq~ 0.5 0 0.5;
+#X connect 0 0 3 0;
+#X connect 2 0 6 0;
+#X connect 2 0 6 1;
+#X connect 2 1 7 0;
+#X connect 2 1 7 1;
+#X connect 3 0 12 0;
+#X connect 4 0 15 0;
+#X connect 5 0 3 1;
+#X connect 6 0 8 0;
+#X connect 7 0 8 1;
+#X connect 8 0 15 0;
+#X connect 9 0 10 0;
+#X connect 11 0 12 1;
+#X connect 12 0 2 0;
+#X connect 13 0 11 0;
+#X connect 14 0 13 0;
+#X connect 15 0 9 0;
+#X restore 42 214 pd spec_analyse_by_1p1z_freq;
+#X msg 205 143 0.3 0 0.7;
+#X msg 205 165 0.5 0 0.5;
+#X msg 105 123 6;
+#X msg 107 143 3;
+#X msg 134 122 16;
+#X msg 164 121 66;
+#X text 168 3 filter the spectrum with a 1p1z-IIR filter;
+#X text 169 14 first time from the left to right;
+#X text 169 26 second time from the right to left;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 7 0 10 0;
+#X connect 9 0 8 1;
+#X connect 10 0 20 0;
+#X connect 11 0 20 1;
+#X connect 12 0 20 1;
+#X connect 21 0 20 1;
+#X connect 22 0 20 1;
+#X connect 23 0 10 2;
+#X connect 24 0 10 2;
+#X connect 25 0 10 2;
+#X connect 26 0 10 2;
Added: trunk/externals/iem/iem_spec2/spec2_1p1z_time~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_1p1z_time~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_1p1z_time~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,80 @@
+#N canvas 20 32 712 376 10;
+#X obj 42 70 dsp;
+#X obj 42 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 42 111 5 0 0 0 - - -;
+#X floatatom 55 94 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array scope 256 float 0;
+#X coords 0 100 255 0 300 200 1;
+#X restore 346 82 graph;
+#X text 18 5 spec2_1p1z_time~;
+#X text 132 20 iem_spec2 calculates only blocksize/2 + 1 samples of
+block;
+#N canvas 0 0 629 404 tables 0;
+#N canvas 0 0 450 300 graph1 0;
+#X array hann 259 float 0;
+#X coords 0 1 258 -1 200 140 1;
+#X restore 30 31 graph;
+#X obj 246 34 loadbang;
+#X msg 246 55 \; hann cosinesum 256 0.5 -0.5;
+#X connect 1 0 2 0;
+#X restore 149 82 pd tables;
+#X obj 42 145 noise~;
+#X obj 237 93 osc~ 11025;
+#X msg 292 58 0;
+#X obj 42 169 bpq2~ 7000 6 100;
+#X msg 201 187 1 0 0;
+#X msg 200 165 0.1 0 0.9;
+#X msg 200 143 0.01 0 0.99;
+#N canvas 190 113 557 449 spec_analyse_by_1p1z_time 0;
+#X obj 100 51 inlet~;
+#X obj 352 46 block~ 256 2;
+#X obj 102 156 rfft~;
+#X obj 101 108 *~;
+#X obj 300 225 spec2_1p1z_time~ 0.5 0 0.5;
+#X obj 298 46 inlet;
+#X obj 114 86 spec2_tabreceive~ hann;
+#X obj 97 186 *~;
+#X obj 124 186 *~;
+#X obj 104 211 +~;
+#X obj 104 266 powtodb~;
+#X obj 104 291 tabsend~ scope;
+#X obj 180 174 /;
+#X obj 101 131 *~ 0.032;
+#X msg 189 149 1 32;
+#X obj 188 127 loadbang;
+#X connect 0 0 3 0;
+#X connect 2 0 7 0;
+#X connect 2 0 7 1;
+#X connect 2 1 8 0;
+#X connect 2 1 8 1;
+#X connect 3 0 13 0;
+#X connect 4 0 10 0;
+#X connect 5 0 4 0;
+#X connect 6 0 3 1;
+#X connect 7 0 9 0;
+#X connect 8 0 9 1;
+#X connect 9 0 4 0;
+#X connect 10 0 11 0;
+#X connect 12 0 13 1;
+#X connect 13 0 2 0;
+#X connect 14 0 12 0;
+#X connect 15 0 14 0;
+#X restore 42 214 pd spec_analyse_by_1p1z_time;
+#X text 90 302 IEM KUG;
+#X text 74 290 musil;
+#X text 104 290 @;
+#X text 110 290 iem.at;
+#X text 73 312 Graz \, Austria;
+#X text 25 279 (c) Thomas Musil 2000 - 2006;
+#X text 168 3 makes a feedback of the spectrum;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 8 0 11 0;
+#X connect 10 0 9 1;
+#X connect 11 0 15 0;
+#X connect 12 0 15 1;
+#X connect 13 0 15 1;
+#X connect 14 0 15 1;
Added: trunk/externals/iem/iem_spec2/spec2_abs~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_abs~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_abs~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 28 470 264 10;
+#X text 102 53 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 183 49 like;
+#X obj 29 52 spec2_abs~;
+#X text 30 16 spec2_abs~;
+#X obj 226 52 abs~;
+#X text 109 25 with (blocksize/2 + 1) bins;
+#X text 106 14 take absolute value of a signal spectrum;
Added: trunk/externals/iem/iem_spec2/spec2_add_scalar~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_add_scalar~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_add_scalar~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 28 575 275 10;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 361 51 like;
+#X obj 412 52 +~ 0;
+#X text 134 53 1.arg: <float> value to add;
+#X text 106 14 add a value to a signal spectrum with (blocksize/2 +
+1) bins;
+#X obj 30 52 spec2+s~ 0;
+#X text 30 14 spec2+s~;
Added: trunk/externals/iem/iem_spec2/spec2_add~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_add~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_add~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,13 @@
+#N canvas 52 28 474 268 10;
+#X obj 30 52 spec2+~;
+#X text 86 51 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 30 15 spec2+~;
+#X text 183 49 like;
+#X obj 234 50 +~;
+#X text 106 14 add 2 signal spectras with (blocksize/2 + 1) bins;
Added: trunk/externals/iem/iem_spec2/spec2_block_delay~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_block_delay~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_block_delay~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,69 @@
+#N canvas 90 35 769 482 10;
+#X obj 42 70 dsp;
+#X obj 42 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 42 111 5 0 0 0 - - -;
+#X floatatom 55 94 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array array101 192 float 0;
+#X coords 0 1 191 -1 382 128 1;
+#X restore 319 224 graph;
+#X obj 46 156 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 19 4 spec2_block_delay~;
+#X text 202 216 no arguments;
+#X text 90 402 IEM KUG;
+#X text 74 390 musil;
+#X text 104 390 @;
+#X text 110 390 iem.at;
+#X text 73 412 Graz \, Austria;
+#X text 25 379 (c) Thomas Musil 2000 - 2006;
+#X obj 84 217 spec2_block_delay~;
+#X text 146 21 but copy only (blocksize/2 + 1) samples;
+#N canvas 0 0 470 320 init 0;
+#X obj 52 43 t f f;
+#X obj 50 -10 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 43 77 + 0.5;
+#X obj 52 -36 loadbang;
+#X obj 50 11 for++ -64 63;
+#X obj 56 107 / 64;
+#X obj 101 105 + 64;
+#X obj 57 147 tabwrite array100;
+#X msg 161 -9 \; array100 xticks 0 32 2;
+#X msg 174 75 \; array101 xticks 0 32 2;
+#X msg 177 125 \; array101 xlabel -1.1 0 32 64 96 128 160 192;
+#X msg 165 30 \; array100 xlabel -1.1 0 32 64 96 128;
+#X connect 0 0 2 0;
+#X connect 0 1 6 0;
+#X connect 1 0 4 0;
+#X connect 2 0 5 0;
+#X connect 3 0 1 0;
+#X connect 3 0 8 0;
+#X connect 3 0 11 0;
+#X connect 3 0 9 0;
+#X connect 3 0 10 0;
+#X connect 4 0 0 0;
+#X connect 5 0 7 0;
+#X connect 6 0 7 1;
+#X restore 323 394 pd init;
+#N canvas 0 0 450 300 graph1 0;
+#X array array100 128 float 0;
+#X coords 0 1 127 -1 256 128 1;
+#X restore 319 62 graph;
+#X obj 84 192 tabplay~ array100;
+#X obj 46 252 tabwrite~ array101;
+#X text 161 4 delay spectrum around blocksize samples;
+#X text 484 372 0 .. 32: preceding signal (== 0);
+#X text 480 385 33 .. 63: ignored input ramp;
+#X text 481 399 64 .. 96: delayed ramp signal;
+#X text 477 412 97 .. 127: ignored input ramp;
+#X text 473 425 128 .. 160: delayed ramp signal;
+#X text 471 438 161 .. 191: ignored input signal (== 0);
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 5 0 18 0;
+#X connect 5 0 19 0;
+#X connect 14 0 19 0;
+#X connect 18 0 14 0;
Added: trunk/externals/iem/iem_spec2/spec2_clip_max~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_clip_max~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_clip_max~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,36 @@
+#N canvas 52 28 606 339 10;
+#X text 230 141 no arg;
+#X text 81 272 IEM KUG;
+#X text 65 260 musil;
+#X text 95 260 @;
+#X text 101 260 iem.at;
+#X text 64 282 Graz \, Austria;
+#X text 16 249 (c) Thomas Musil 2000 - 2006;
+#X text 351 143 like;
+#X obj 128 141 spec2_clip_max~;
+#X obj 128 118 sig~;
+#X floatatom 128 98 5 0 0 0 - - -;
+#X obj 212 118 sig~;
+#X floatatom 212 98 5 0 0 0 - - -;
+#X obj 401 144 min~;
+#X text 9 6 spec2_clip_max~;
+#X obj 21 61 dsp;
+#X obj 21 38 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 21 107 5 0 0 0 - - -;
+#X floatatom 34 86 5 0 0 0 - - -;
+#X text 120 28 iem_spec2 calculates only blocksize/2 + 1 samples of
+block;
+#X text 139 9 restrict a signal to lie lower than max limit;
+#X obj 84 179 print~;
+#X obj 85 159 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X connect 8 0 21 0;
+#X connect 9 0 8 0;
+#X connect 10 0 9 0;
+#X connect 11 0 8 1;
+#X connect 12 0 11 0;
+#X connect 15 0 17 0;
+#X connect 15 1 18 0;
+#X connect 16 0 15 0;
+#X connect 22 0 21 0;
Added: trunk/externals/iem/iem_spec2/spec2_clip_min~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_clip_min~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_clip_min~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,36 @@
+#N canvas 52 28 546 330 10;
+#X text 230 141 no arg;
+#X text 81 272 IEM KUG;
+#X text 65 260 musil;
+#X text 95 260 @;
+#X text 101 260 iem.at;
+#X text 64 282 Graz \, Austria;
+#X text 16 249 (c) Thomas Musil 2000 - 2006;
+#X text 351 143 like;
+#X obj 128 118 sig~;
+#X floatatom 128 98 5 0 0 0 - - -;
+#X obj 212 118 sig~;
+#X floatatom 212 98 5 0 0 0 - - -;
+#X obj 21 61 dsp;
+#X obj 21 38 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 21 107 5 0 0 0 - - -;
+#X floatatom 34 86 5 0 0 0 - - -;
+#X text 120 28 iem_spec2 calculates only blocksize/2 + 1 samples of
+block;
+#X text 9 6 spec2_clip_min~;
+#X text 139 9 restrict a signal to lie higher than min limit;
+#X obj 401 144 max~;
+#X obj 128 141 spec2_clip_min~;
+#X obj 84 179 print~;
+#X obj 85 159 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X connect 8 0 20 0;
+#X connect 9 0 8 0;
+#X connect 10 0 20 1;
+#X connect 11 0 10 0;
+#X connect 12 0 14 0;
+#X connect 12 1 15 0;
+#X connect 13 0 12 0;
+#X connect 20 0 21 0;
+#X connect 22 0 21 0;
Added: trunk/externals/iem/iem_spec2/spec2_dbtopow~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_dbtopow~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_dbtopow~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 29 470 263 10;
+#X text 120 53 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 211 52 like;
+#X text 135 24 with (blocksize/2 + 1) bins;
+#X obj 243 54 dbtopow~;
+#X obj 26 53 spec2_dbtopow~;
+#X text 29 15 spec2_dbtopow~;
+#X text 132 13 convert dB to power of a signal spectrum;
Added: trunk/externals/iem/iem_spec2/spec2_dbtorms~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_dbtorms~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_dbtorms~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 29 470 263 10;
+#X text 120 53 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 211 52 like;
+#X text 135 24 with (blocksize/2 + 1) bins;
+#X text 29 15 spec2_dbtorms~;
+#X obj 243 54 dbtorms~;
+#X obj 26 53 spec2_dbtorms~;
+#X text 132 13 convert dB to rms value of a signal spectrum;
Added: trunk/externals/iem/iem_spec2/spec2_matrix_bundle_stat~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_matrix_bundle_stat~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_matrix_bundle_stat~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,153 @@
+#N canvas 106 40 882 682 10;
+#X obj 18 44 dsp;
+#X obj 18 14 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 18 100 5 0 0 0 - - -;
+#X floatatom 33 74 5 0 0 0 - - -;
+#X obj 46 322 sig~ 1;
+#X obj 96 353 sig~ 2;
+#X obj 145 377 sig~ 4;
+#X obj 195 402 sig~ 8;
+#X obj 234 431 sig~ 16;
+#X obj 47 488 unsig~;
+#X floatatom 47 512 5 0 0 0 - - -;
+#X obj 245 491 unsig~;
+#X floatatom 245 515 5 0 0 0 - - -;
+#X obj 298 442 any;
+#X msg 298 154 bundle 0 0 0 0 0;
+#X msg 298 180 bundle 1 1 1 1 1;
+#X msg 298 201 bundle 2 2 2 2 2;
+#X msg 298 227 bundle 1 0 0 0 0;
+#X msg 298 247 bundle 0 1 0 0 0;
+#X msg 298 267 bundle 0 0 1 0 0;
+#X msg 298 287 bundle 0 0 0 1 0;
+#X msg 298 307 bundle 0 0 0 0 1;
+#X msg 298 333 bundle 2 0 0 0 0;
+#X msg 298 353 bundle 0 2 0 0 0;
+#X msg 298 373 bundle 0 0 2 0 0;
+#X msg 298 393 bundle 0 0 0 2 0;
+#X msg 298 413 bundle 0 0 0 0 2;
+#X obj 432 442 pp element;
+#X obj 432 419 pack 0 0;
+#X obj 432 397 f;
+#X floatatom 475 368 4 1 5 0 - - -;
+#X floatatom 445 368 4 0 2 0 - - -;
+#X obj 422 375 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 706 15 SIG_OUT = A * SIG_IN;
+#X text 234 14 multiplies a n-dimensional signal-in-vector with a dynamic
+static (like sig~) signal-matrix to a n-dimensional signal-out-vector
+;
+#X text 725 33 A is quadratic;
+#X text 662 50 dim(SIG_OUT) = dim(SIG_IN) = n;
+#X text 234 51 each matrix-column has only one one \, the other elements
+are zero;
+#X text 301 475 2.arg <float> Nr. of outlets = rows;
+#X text 301 464 1.arg <float> Nr. of inlets = columns;
+#X text 517 336 message "element";
+#X text 531 365 2.) item <float> column_index (1 .. nr_columns);
+#X text 531 353 1.) item <float> row_index (0 .. nr_rows);
+#X text 446 111 message "bundle";
+#X text 556 381 where the single one of the column will be placed;
+#X text 557 393 if (row-index == 0) -> the column has only zeros;
+#X text 449 126 (nr_inlets = nr_columns) <float> row-indices (0 ..
+nr_row);
+#X text 454 162 if (row-index == 0) -> the column has only zeros;
+#X text 453 150 where the single one of each column will be placed
+;
+#N canvas 176 206 818 475 block_______________________ 0;
+#X obj 564 88 block~ 128 2;
+#X obj 48 29 inlet~;
+#X obj 51 260 outlet~;
+#X obj 103 30 inlet~;
+#X obj 159 29 inlet~;
+#X obj 214 30 inlet~;
+#X obj 272 30 inlet~;
+#X obj 246 257 outlet~;
+#X obj 51 209 spec2_matrix_bundle_stat~ 5 2;
+#X obj 350 30 inlet;
+#X obj 586 308 for++ 0 127 0.1;
+#X obj 586 332 moses 64;
+#X msg 586 359 1 \$1;
+#X msg 637 358 0 \$1;
+#X obj 586 287 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 586 267 loadbang;
+#X obj 540 240 table \$0_rect 128;
+#X obj 586 385 tabwrite \$0_rect;
+#X obj 64 57 tabreceive~ \$0_rect;
+#X obj 48 79 *~;
+#X obj 116 81 tabreceive~ \$0_rect;
+#X obj 100 103 *~;
+#X obj 170 103 tabreceive~ \$0_rect;
+#X obj 154 125 *~;
+#X obj 220 124 tabreceive~ \$0_rect;
+#X obj 204 146 *~;
+#X obj 270 146 tabreceive~ \$0_rect;
+#X obj 254 168 *~;
+#X connect 1 0 19 0;
+#X connect 3 0 21 0;
+#X connect 4 0 23 0;
+#X connect 5 0 25 0;
+#X connect 6 0 27 0;
+#X connect 8 0 2 0;
+#X connect 8 1 7 0;
+#X connect 9 0 8 0;
+#X connect 10 0 11 0;
+#X connect 11 0 12 0;
+#X connect 11 1 13 0;
+#X connect 12 0 17 0;
+#X connect 13 0 17 0;
+#X connect 14 0 10 0;
+#X connect 15 0 14 0;
+#X connect 18 0 19 1;
+#X connect 19 0 8 0;
+#X connect 20 0 21 1;
+#X connect 21 0 8 1;
+#X connect 22 0 23 1;
+#X connect 23 0 8 2;
+#X connect 24 0 25 1;
+#X connect 25 0 8 3;
+#X connect 26 0 27 1;
+#X connect 27 0 8 4;
+#X restore 48 463 pd block_______________________;
+#X text 50 13 spec2_matrix_bundle_stat~;
+#X text 90 575 IEM KUG;
+#X text 74 563 musil;
+#X text 104 563 @;
+#X text 110 563 iem.at;
+#X text 73 585 Graz \, Austria;
+#X text 25 552 (c) Thomas Musil 2000 - 2006;
+#X text 234 83 it calculates matrix only with (blocksize/2 + 1) samples
+per signalvector;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 4 0 49 0;
+#X connect 5 0 49 1;
+#X connect 6 0 49 2;
+#X connect 7 0 49 3;
+#X connect 8 0 49 4;
+#X connect 9 0 10 0;
+#X connect 11 0 12 0;
+#X connect 13 0 49 5;
+#X connect 14 0 13 0;
+#X connect 15 0 13 0;
+#X connect 16 0 13 0;
+#X connect 17 0 13 0;
+#X connect 18 0 13 0;
+#X connect 19 0 13 0;
+#X connect 20 0 13 0;
+#X connect 21 0 13 0;
+#X connect 22 0 13 0;
+#X connect 23 0 13 0;
+#X connect 24 0 13 0;
+#X connect 25 0 13 0;
+#X connect 26 0 13 0;
+#X connect 28 0 27 0;
+#X connect 29 0 28 0;
+#X connect 30 0 28 1;
+#X connect 31 0 29 1;
+#X connect 32 0 29 0;
+#X connect 49 0 9 0;
+#X connect 49 1 11 0;
Added: trunk/externals/iem/iem_spec2/spec2_mul_scalar~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_mul_scalar~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_mul_scalar~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 28 591 268 10;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 361 51 like;
+#X text 30 14 spec2*s~;
+#X text 107 26 with (blocksize/2 + 1) bins;
+#X text 106 14 multiply a value with a signal spectrum;
+#X text 134 53 1.arg: <float> value to multiply;
+#X obj 30 52 spec2*s~ 0;
+#X obj 412 52 *~ 0;
Added: trunk/externals/iem/iem_spec2/spec2_mul~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_mul~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_mul~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 28 474 268 10;
+#X text 86 51 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 183 49 like;
+#X text 30 15 spec2*~;
+#X obj 30 52 spec2*~;
+#X obj 234 50 *~;
+#X text 106 14 multiply 2 signal spectras with (blocksize/2 + 1) bins
+;
Added: trunk/externals/iem/iem_spec2/spec2_powtodb~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_powtodb~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_powtodb~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 29 470 263 10;
+#X text 120 53 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 211 52 like;
+#X text 135 24 with (blocksize/2 + 1) bins;
+#X obj 26 53 spec2_powtodb~;
+#X text 29 15 spec2_powtodb~;
+#X obj 243 54 powtodb~;
+#X text 133 13 convert power to db of a signal spectrum;
Added: trunk/externals/iem/iem_spec2/spec2_rmstodb~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_rmstodb~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_rmstodb~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 29 470 263 10;
+#X text 120 53 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 211 52 like;
+#X text 135 24 with (blocksize/2 + 1) bins;
+#X text 29 15 spec2_rmstodb~;
+#X text 132 13 convert rms value to db of a signal spectrum;
+#X obj 26 53 spec2_rmstodb~;
+#X obj 243 54 rmstodb~;
Added: trunk/externals/iem/iem_spec2/spec2_shift~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_shift~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_shift~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,40 @@
+#N canvas 10 8 548 293 10;
+#X obj 15 90 dsp;
+#X obj 15 67 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 15 131 5 0 0 0 - - -;
+#X floatatom 28 114 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph2 0;
+#X array array100 64 float 1;
+#A 0 -0.550001 -0.750001 -0.700001 -0.600001 -0.500001 -0.400001 -0.400001
+-0.350001 -0.25 -0.2 -0.15 -0.1 -0.0500001 -0.0500001 3.72529e-008
+0.0500001 0.0500001 0.1 0.1 0.15 0.2 0.2 0.250001 0.250001 0.300001
+0.350001 0.350001 0.400001 0.500001 0.500001 0.516668 0.533334 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1 63 -1 64 40 1;
+#X restore 436 66 graph;
+#X text 83 210 IEM KUG;
+#X text 67 198 musil;
+#X text 97 198 @;
+#X text 103 198 iem.at;
+#X text 66 220 Graz \, Austria;
+#X text 18 187 (c) Thomas Musil 2000 - 2006;
+#N canvas 0 0 450 300 graph2 0;
+#X array array101 64 float 0;
+#X coords 0 1 63 -1 64 40 1;
+#X restore 436 126 graph;
+#X obj 143 102 spec2_shift~ 10;
+#X obj 144 131 tabsend~ array101;
+#X obj 142 71 tabreceive~ array100;
+#X floatatom 105 51 5 -32 32 0 - - -;
+#X text 15 10 spec2_shift~;
+#X text 248 101 1.arg: <float> shift width;
+#X text 136 6 shift a spectrum of (blocksize/2 + 1) to the left or
+right about n bins (+- blocksize/2);
+#X text 80 37 shift width;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 12 0 13 0;
+#X connect 14 0 12 0;
+#X connect 15 0 12 0;
Added: trunk/externals/iem/iem_spec2/spec2_sqrt~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_sqrt~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_sqrt~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,31 @@
+#N canvas 52 28 437 304 10;
+#X text 218 120 no arg;
+#X text 89 234 IEM KUG;
+#X text 73 222 musil;
+#X text 103 222 @;
+#X text 109 222 iem.at;
+#X text 72 244 Graz \, Austria;
+#X text 24 211 (c) Thomas Musil 2000 - 2006;
+#X text 327 115 like;
+#X text 109 25 with (blocksize/2 + 1) bins;
+#X text 17 13 spec2_sqrt~;
+#X obj 144 120 spec2_sqrt~;
+#X obj 359 116 sqrt~;
+#X obj 143 98 sig~ 16;
+#X obj 143 148 print~;
+#X obj 111 119 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 29 97 dsp;
+#X obj 29 71 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 143 79 5 0 0 0 - - -;
+#X floatatom 29 142 5 0 0 0 - - -;
+#X floatatom 42 122 5 0 0 0 - - -;
+#X text 106 14 take square root value of a signal spectrum;
+#X connect 10 0 13 0;
+#X connect 12 0 10 0;
+#X connect 14 0 13 0;
+#X connect 15 0 18 0;
+#X connect 15 1 19 0;
+#X connect 16 0 15 0;
+#X connect 17 0 12 0;
Added: trunk/externals/iem/iem_spec2/spec2_stretch~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_stretch~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_stretch~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,42 @@
+#N canvas 10 8 548 293 10;
+#X obj 15 90 dsp;
+#X obj 15 67 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 15 131 5 0 0 0 - - -;
+#X floatatom 28 114 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph2 0;
+#X array array100 64 float 1;
+#A 0 -0.550001 -0.750001 -0.700001 -0.600001 -0.500001 -0.400001 -0.400001
+-0.350001 -0.25 -0.2 -0.15 -0.1 -0.0500001 -0.0500001 3.72529e-008
+0.0500001 0.0500001 0.1 0.1 0.15 0.2 0.2 0.250001 0.250001 0.300001
+0.350001 0.350001 0.400001 0.500001 0.500001 0.516668 0.533334 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1 63 -1 64 40 1;
+#X restore 436 66 graph;
+#X text 83 210 IEM KUG;
+#X text 67 198 musil;
+#X text 97 198 @;
+#X text 103 198 iem.at;
+#X text 66 220 Graz \, Austria;
+#X text 18 187 (c) Thomas Musil 2000 - 2006;
+#N canvas 0 0 450 300 graph2 0;
+#X array array101 64 float 0;
+#X coords 0 1 63 -1 64 40 1;
+#X restore 436 126 graph;
+#X obj 144 131 tabsend~ array101;
+#X obj 142 71 tabreceive~ array100;
+#X floatatom 93 41 5 20 500 0 - - -;
+#X obj 143 102 spec2_stretch~ 1;
+#X obj 93 58 / 100;
+#X floatatom 93 78 5 0 0 0 - - -;
+#X text 16 10 spec2_stretch~;
+#X text 137 6 stretch a spectrum of (blocksize/2 + 1) by a factor;
+#X text 256 102 1.arg: <float> stretch factor;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 13 0 15 0;
+#X connect 14 0 16 0;
+#X connect 15 0 12 0;
+#X connect 16 0 17 0;
+#X connect 17 0 15 0;
Added: trunk/externals/iem/iem_spec2/spec2_sub~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_sub~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_sub~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,14 @@
+#N canvas 52 28 466 260 10;
+#X text 86 51 no arg;
+#X text 83 169 IEM KUG;
+#X text 67 157 musil;
+#X text 97 157 @;
+#X text 103 157 iem.at;
+#X text 66 179 Graz \, Austria;
+#X text 18 146 (c) Thomas Musil 2000 - 2006;
+#X text 183 49 like;
+#X obj 30 52 spec2-~;
+#X text 30 15 spec2-~;
+#X obj 234 50 -~;
+#X text 106 14 subtract 2 signal spectras with (blocksize/2 + 1) bins
+;
Added: trunk/externals/iem/iem_spec2/spec2_sum~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_sum~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_sum~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,67 @@
+#N canvas 90 35 781 494 10;
+#X obj 42 70 dsp;
+#X obj 42 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
+;
+#X floatatom 42 111 5 0 0 0 - - -;
+#X floatatom 55 94 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array array101 192 float 0;
+#X coords 0 50 191 -50 382 128 1;
+#X restore 319 224 graph;
+#X obj 46 156 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 202 216 no arguments;
+#X text 90 402 IEM KUG;
+#X text 74 390 musil;
+#X text 104 390 @;
+#X text 110 390 iem.at;
+#X text 73 412 Graz \, Austria;
+#X text 25 379 (c) Thomas Musil 2000 - 2006;
+#N canvas 0 0 754 332 init 0;
+#X obj 52 43 t f f;
+#X obj 50 -10 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 52 -36 loadbang;
+#X obj 57 147 tabwrite array100;
+#X msg 161 -9 \; array100 xticks 0 32 2;
+#X msg 174 75 \; array101 xticks 0 32 2;
+#X msg 165 30 \; array100 xlabel -1.1 0 32 64 96 128;
+#X obj 50 11 for++ 0 127;
+#X obj 56 107 / 128;
+#X msg 431 -9 \; array100 yticks 0 0.5 2;
+#X msg 435 30 \; array100 ylabel -6 -1 -0.5 0 0.5 1;
+#X msg 177 125 \; array101 xlabel -55 0 32 64 96 128 160 192;
+#X msg 444 75 \; array101 yticks 0 25 2;
+#X msg 447 125 \; array101 ylabel -6 -50 -25 0 25 50;
+#X connect 0 0 8 0;
+#X connect 0 1 3 1;
+#X connect 1 0 7 0;
+#X connect 2 0 1 0;
+#X connect 2 0 4 0;
+#X connect 2 0 6 0;
+#X connect 2 0 5 0;
+#X connect 2 0 11 0;
+#X connect 2 0 9 0;
+#X connect 2 0 10 0;
+#X connect 2 0 12 0;
+#X connect 2 0 13 0;
+#X connect 7 0 0 0;
+#X connect 8 0 3 0;
+#X restore 323 394 pd init;
+#N canvas 0 0 450 300 graph1 0;
+#X array array100 128 float 0;
+#X coords 0 1 127 -1 256 128 1;
+#X restore 319 62 graph;
+#X obj 84 192 tabplay~ array100;
+#X obj 46 252 tabwrite~ array101;
+#X obj 84 218 spec2_sum~;
+#X text 19 4 spec2_sum~;
+#X text 400 5 (blocksize/2 + 1) bins;
+#X text 161 4 accumulate the sum of the spectrum with;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 5 0 15 0;
+#X connect 5 0 16 0;
+#X connect 15 0 17 0;
+#X connect 17 0 16 0;
Added: trunk/externals/iem/iem_spec2/spec2_tab_conv~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_tab_conv~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_tab_conv~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,185 @@
+#N canvas 9 18 777 596 10;
+#X obj 44 49 dsp;
+#X obj 44 26 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 44 90 5 0 0 0 - - -;
+#X floatatom 57 73 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array win 50 float 0;
+#X coords 0 1 49 -1 200 140 1;
+#X restore 267 333 graph;
+#X floatatom 64 144 7 0 0 0 - - -;
+#X obj 189 188 noise~;
+#X floatatom 316 170 5 2 40 0 - - -;
+#X msg 316 147 8;
+#X text 22 -1 spec2_tab_conv~;
+#X obj 64 166 osc~ 5000;
+#N canvas 148 208 734 434 gen_win 0;
+#X obj 92 43 inlet;
+#X obj 92 121 - 1;
+#X obj 92 142 t f f;
+#X obj 92 167 / 20;
+#X obj 92 188 * 3.14159;
+#X obj 92 211 sin;
+#X msg 92 232 \$1 \$1;
+#X obj 92 254 *;
+#X obj 92 65 t b f b;
+#X msg 253 218 1 \$1;
+#X obj 253 240 /;
+#X obj 224 367 outlet;
+#X obj 225 315 f;
+#X msg 224 337 set win \$1;
+#X obj 527 33 table hwin 50;
+#X obj 242 124 tab_const hwin;
+#X obj 92 274 tabwrite hwin;
+#X obj 191 146 tab_sum hwin;
+#X obj 253 264 tab_mul_scalar hwin hwin;
+#X obj 191 192 tab_copy hwin win;
+#X obj 93 95 for++ 1 20;
+#X connect 0 0 8 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 1 16 1;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 16 0;
+#X connect 8 0 20 0;
+#X connect 8 1 3 1;
+#X connect 8 1 12 1;
+#X connect 8 1 20 1;
+#X connect 8 2 15 0;
+#X connect 9 0 10 0;
+#X connect 10 0 18 0;
+#X connect 12 0 13 0;
+#X connect 13 0 11 0;
+#X connect 17 0 19 0;
+#X connect 17 1 9 0;
+#X connect 19 0 12 0;
+#X connect 20 0 1 0;
+#X connect 20 1 17 0;
+#X restore 316 189 pd gen_win;
+#X obj 316 124 loadbang;
+#N canvas 6 92 777 603 spec2_blockfilter~ 0;
+#X obj 59 29 inlet~;
+#X obj 72 488 outlet~;
+#X obj 61 101 rfft~;
+#X obj 71 392 rifft~;
+#X obj 407 22 inlet;
+#X text 199 240 1.arg: <symbol> table-name;
+#X obj 474 23 block~ 256 2;
+#N canvas 0 0 450 300 graph1 0;
+#X array hsin 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 423 296 graph;
+#X obj 458 140 for++ 0 255 0.1;
+#X obj 458 119 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 458 160 t f f;
+#X obj 457 190 / 256;
+#X obj 457 210 * 3.14159;
+#X obj 457 229 sin;
+#X obj 457 251 tabwrite hsin;
+#X obj 72 51 tabreceive~ hsin;
+#X obj 60 73 *~;
+#X obj 458 95 loadbang;
+#X obj 241 100 rfft~;
+#X obj 252 50 tabreceive~ hsin;
+#X obj 240 72 *~;
+#X obj 241 26 inlet~;
+#X obj 84 417 tabreceive~ hsin;
+#X obj 72 439 *~;
+#X text 199 251 2.arg: <float> table-size;
+#X obj 72 463 /~ 32768;
+#X obj 59 290 spec2_dbtorms~;
+#X obj 65 363 spec2*~;
+#X obj 122 366 spec2*~;
+#X obj 58 178 spec2+~;
+#X obj 47 151 spec2*~;
+#X obj 94 151 spec2*~;
+#X obj 58 201 spec2_powtodb~;
+#X obj 59 247 spec2_tab_conv~ win 8;
+#X connect 0 0 16 0;
+#X connect 2 0 30 0;
+#X connect 2 0 30 1;
+#X connect 2 1 31 0;
+#X connect 2 1 31 1;
+#X connect 3 0 23 0;
+#X connect 4 0 33 0;
+#X connect 8 0 10 0;
+#X connect 9 0 8 0;
+#X connect 10 0 11 0;
+#X connect 10 1 14 1;
+#X connect 11 0 12 0;
+#X connect 12 0 13 0;
+#X connect 13 0 14 0;
+#X connect 15 0 16 1;
+#X connect 16 0 2 0;
+#X connect 17 0 9 0;
+#X connect 18 0 27 1;
+#X connect 18 1 28 1;
+#X connect 19 0 20 1;
+#X connect 20 0 18 0;
+#X connect 21 0 20 0;
+#X connect 22 0 23 1;
+#X connect 23 0 25 0;
+#X connect 25 0 1 0;
+#X connect 26 0 27 0;
+#X connect 26 0 28 0;
+#X connect 27 0 3 0;
+#X connect 28 0 3 1;
+#X connect 29 0 32 0;
+#X connect 30 0 29 0;
+#X connect 31 0 29 1;
+#X connect 32 0 33 0;
+#X connect 33 0 26 0;
+#X restore 64 211 pd spec2_blockfilter~ using spec2_tab_conv~;
+#X text 550 227 1.arg: <symbol> table-name;
+#X text 551 240 2.arg: <float> table-size;
+#X msg 429 209 set win 8;
+#X obj 408 234 spec2_tab_conv~ win 8;
+#X obj 68 298 dac~;
+#X obj 144 311 prvu~;
+#X obj 145 339 vu 15 120 empty empty -1 -8 0 8 -66577 -1 1 0;
+#X floatatom 143 505 5 0 0 0 - - -;
+#X floatatom 154 479 5 0 0 0 - - -;
+#X msg 156 288 reset;
+#X text 146 4 convolute a spectrum of size (blocksize/2 + 1) with a
+table of size n;
+#X obj 69 266 *~ 0.003;
+#X obj 133 255 dbtorms;
+#X obj 201 252 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X obj 161 131 mtof;
+#X obj 165 111 hsl 137 15 0 136 0 0 empty empty empty -2 -6 0 8 -262144
+-1 -1 0 1;
+#X text 98 553 IEM KUG;
+#X text 82 541 musil;
+#X text 112 541 @;
+#X text 118 541 iem.at;
+#X text 81 563 Graz \, Austria;
+#X text 33 530 (c) Thomas Musil 2000 - 2006;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 5 0 10 0;
+#X connect 6 0 13 1;
+#X connect 7 0 11 0;
+#X connect 8 0 7 0;
+#X connect 10 0 13 0;
+#X connect 11 0 13 2;
+#X connect 12 0 8 0;
+#X connect 13 0 25 0;
+#X connect 16 0 17 0;
+#X connect 19 0 20 0;
+#X connect 20 0 21 0;
+#X connect 20 1 22 0;
+#X connect 23 0 19 0;
+#X connect 25 0 19 0;
+#X connect 25 0 18 0;
+#X connect 25 0 18 1;
+#X connect 26 0 25 1;
+#X connect 27 0 26 0;
+#X connect 28 0 5 0;
+#X connect 29 0 28 0;
Added: trunk/externals/iem/iem_spec2/spec2_tabreceive_enable~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_tabreceive_enable~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_tabreceive_enable~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,139 @@
+#N canvas 22 17 939 438 10;
+#X obj 44 49 dsp;
+#X obj 44 26 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 44 90 5 0 0 0 - - -;
+#X floatatom 57 73 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array scope 512 float 0;
+#X coords 0 1 511 -1 512 100 1;
+#X restore 371 240 graph;
+#X obj 121 178 tabwrite~ scope;
+#X obj 211 47 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#N canvas 0 0 450 300 graph2 0;
+#X array filter 256 float 1;
+#A 0 0 0 0 0 0 0 0 0.04 0.04 0.08 0.14 0.18 0.2 0.24 0.26 0.28 0.32
+0.34 0.36 0.38 0.4 0.42 0.44 0.44 0.46 0.5 0.54 0.58 0.6 0.62 0.646667
+0.673334 0.7 0.74 0.76 0.78 0 0 0 0 0 0 -0.06 -0.0866667 -0.113333
+-0.14 -0.175 -0.21 -0.245 -0.28 -0.31 -0.34 -0.366667 -0.393333 -0.42
+-0.45 -0.48 -0.52 -0.56 -0.58 -0.62 -0.62 -0.66 -0.67 -0.68 -0.7 -0.74
+-0.76 -0.78 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.8 0.78 0.76 0.68 0.62 0.58
+0.5 0.473334 0.446667 0.42 0.38 0.34 0.3 0.266667 0.233333 0.2 0.17
+0.14 0.11 0.08 0.05 0.02 0 0 0 0 0 0 -0.68 -0.68 -0.62 -0.56 -0.52
+-0.48 -0.45 -0.42 -0.37 -0.32 -0.28 -0.24 -0.19 -0.14 -0.12 -0.1 -0.08
+-0.02 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1 255 -1 256 100 1;
+#X restore 502 -33 graph;
+#X obj 136 91 del 100;
+#X msg 781 2 \; filter const 0;
+#X text 14 -28 spec2_tabreceive_enable~;
+#X obj 278 47 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X text 295 47 enable;
+#X text 209 -15 and enables/disables reading the table;
+#N canvas 63 41 965 587 spec2_blockfilter~ 0;
+#X obj 100 51 inlet~;
+#X obj 102 381 outlet~;
+#X obj 271 120 block~ 256 2;
+#N canvas 0 0 450 300 graph1 0;
+#X array rect 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 460 21 graph;
+#X obj 276 459 tab_const rect;
+#X obj 279 396 t b b;
+#X msg 304 421 0 128 1;
+#X msg 224 419 128 128 0;
+#X obj 279 374 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 279 350 loadbang;
+#X obj 101 309 /~ 256;
+#X obj 101 108 *~;
+#X obj 114 85 spec2_tabreceive~ rect;
+#N canvas 0 0 450 300 graph1 0;
+#X array real 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 691 177 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array imag 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 691 326 graph;
+#X obj 697 56 inlet;
+#X obj 697 80 t b;
+#X text 351 190 1.arg: <symbol> table-name;
+#X obj 291 54 inlet;
+#X obj 101 131 rfft~;
+#X obj 102 280 rifft~;
+#X obj 158 260 spec2+~;
+#X obj 40 257 spec2-~;
+#X obj 32 212 spec2*~;
+#X obj 85 215 spec2*~;
+#X obj 146 214 spec2*~;
+#X obj 205 214 spec2*~;
+#X obj 247 149 spec2_tabreceive_enable~ real 0;
+#X obj 263 174 spec2_tabreceive_enable~ imag 0;
+#X text 352 205 2.arg: <float> enable-state;
+#X obj 697 102 tab_rfft filter real imag 256;
+#X connect 0 0 11 0;
+#X connect 5 0 7 0;
+#X connect 5 1 6 0;
+#X connect 6 0 4 0;
+#X connect 7 0 4 0;
+#X connect 8 0 5 0;
+#X connect 9 0 8 0;
+#X connect 10 0 1 0;
+#X connect 11 0 19 0;
+#X connect 12 0 11 1;
+#X connect 15 0 16 0;
+#X connect 16 0 30 0;
+#X connect 18 0 27 0;
+#X connect 18 0 28 0;
+#X connect 19 0 23 0;
+#X connect 19 0 25 0;
+#X connect 19 1 24 0;
+#X connect 19 1 26 0;
+#X connect 20 0 10 0;
+#X connect 21 0 20 1;
+#X connect 22 0 20 0;
+#X connect 23 0 22 0;
+#X connect 24 0 22 1;
+#X connect 25 0 21 0;
+#X connect 26 0 21 1;
+#X connect 27 0 23 1;
+#X connect 27 0 26 1;
+#X connect 28 0 24 1;
+#X connect 28 0 25 1;
+#X restore 158 141 pd spec2_blockfilter~ using spec2_tabreceive_enable~
+;
+#X text 749 122 1.arg: <symbol> table-name;
+#X msg 561 99 symbol filter;
+#X text 749 134 2.arg: <float> enable-state;
+#X obj 536 129 spec2_tabreceive_enable~ filter 1;
+#X msg 496 89 1;
+#X msg 524 89 0;
+#X obj 159 117 dirac~;
+#X text 150 2 iem_spec2 calculates only (blocksize/2 + 1) samples;
+#X text 180 -27 receives spectrum from table with (blocksize/2 + 1)
+;
+#X text 90 302 IEM KUG;
+#X text 74 290 musil;
+#X text 104 290 @;
+#X text 110 290 iem.at;
+#X text 73 312 Graz \, Austria;
+#X text 25 279 (c) Thomas Musil 2000 - 2006;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 6 0 14 2;
+#X connect 6 0 8 0;
+#X connect 8 0 5 0;
+#X connect 8 0 21 0;
+#X connect 11 0 14 1;
+#X connect 14 0 5 0;
+#X connect 16 0 18 0;
+#X connect 19 0 18 0;
+#X connect 20 0 18 0;
+#X connect 21 0 14 0;
Added: trunk/externals/iem/iem_spec2/spec2_tabreceive~-help.pd
===================================================================
--- trunk/externals/iem/iem_spec2/spec2_tabreceive~-help.pd (rev 0)
+++ trunk/externals/iem/iem_spec2/spec2_tabreceive~-help.pd 2008-12-11 17:50:02 UTC (rev 10439)
@@ -0,0 +1,125 @@
+#N canvas 9 28 944 451 10;
+#X obj 44 49 dsp;
+#X obj 44 26 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
+;
+#X floatatom 44 90 5 0 0 0 - - -;
+#X floatatom 57 73 5 0 0 0 - - -;
+#N canvas 0 0 450 300 graph1 0;
+#X array scope 512 float 0;
+#X coords 0 1 511 -1 512 100 1;
+#X restore 350 236 graph;
+#X obj 211 175 tabwrite~ scope;
+#X obj 269 55 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 17 -25 spec2_tabreceive~;
+#N canvas 0 0 450 300 graph2 0;
+#X array filter 256 float 1;
+#A 0 0 0 0 0 0 0 0 0.04 0.04 0.08 0.14 0.18 0.2 0.24 0.26 0.28 0.32
+0.34 0.36 0.38 0.4 0.42 0.44 0.44 0.46 0.5 0.54 0.58 0.6 0.62 0.646667
+0.673334 0.7 0.74 0.76 0.78 0 0 0 0 0 0 -0.06 -0.0866667 -0.113333
+-0.14 -0.175 -0.21 -0.245 -0.28 -0.31 -0.34 -0.366667 -0.393333 -0.42
+-0.45 -0.48 -0.52 -0.56 -0.58 -0.62 -0.62 -0.66 -0.67 -0.68 -0.7 -0.74
+-0.76 -0.78 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0.8 0.78 0.76 0.68 0.62 0.58
+0.5 0.473334 0.446667 0.42 0.38 0.34 0.3 0.266667 0.233333 0.2 0.17
+0.14 0.11 0.08 0.05 0.02 0 0 0 0 0 0 -0.68 -0.68 -0.62 -0.56 -0.52
+-0.48 -0.45 -0.42 -0.37 -0.32 -0.28 -0.24 -0.19 -0.14 -0.12 -0.1 -0.08
+-0.02 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
+0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0;
+#X coords 0 1 255 -1 256 100 1;
+#X restore 488 -33 graph;
+#X obj 226 88 del 100;
+#X msg 767 2 \; filter const 0;
+#N canvas 70 41 953 575 spec2_blockfilter~ 0;
+#X obj 100 51 inlet~;
+#X obj 102 381 outlet~;
+#X obj 271 120 block~ 256 2;
+#N canvas 0 0 450 300 graph1 0;
+#X array rect 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 460 21 graph;
+#X obj 276 459 tab_const rect;
+#X obj 279 396 t b b;
+#X msg 304 421 0 128 1;
+#X msg 224 419 128 128 0;
+#X obj 279 374 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 279 350 loadbang;
+#X obj 100 135 rfft~;
+#X obj 101 284 rifft~;
+#X obj 101 309 /~ 256;
+#X obj 101 108 *~;
+#X obj 114 85 spec2_tabreceive~ rect;
+#N canvas 0 0 450 300 graph1 0;
+#X array real 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 691 177 graph;
+#N canvas 0 0 450 300 graph1 0;
+#X array imag 256 float 0;
+#X coords 0 1 255 -1 200 140 1;
+#X restore 691 326 graph;
+#X obj 697 56 inlet;
+#X obj 697 80 t b;
+#X obj 246 153 spec2_tabreceive~ real;
+#X obj 262 178 spec2_tabreceive~ imag;
+#X text 407 178 1.arg: <symbol> table-name;
+#X obj 157 264 spec2+~;
+#X obj 39 261 spec2-~;
+#X obj 31 216 spec2*~;
+#X obj 84 219 spec2*~;
+#X obj 145 218 spec2*~;
+#X obj 204 218 spec2*~;
+#X obj 697 102 tab_rfft filter real imag 256;
+#X connect 0 0 13 0;
+#X connect 5 0 7 0;
+#X connect 5 1 6 0;
+#X connect 6 0 4 0;
+#X connect 7 0 4 0;
+#X connect 8 0 5 0;
+#X connect 9 0 8 0;
+#X connect 10 0 24 0;
+#X connect 10 0 26 0;
+#X connect 10 1 25 0;
+#X connect 10 1 27 0;
+#X connect 11 0 12 0;
+#X connect 12 0 1 0;
+#X connect 13 0 10 0;
+#X connect 14 0 13 1;
+#X connect 17 0 18 0;
+#X connect 18 0 28 0;
+#X connect 19 0 24 1;
+#X connect 19 0 27 1;
+#X connect 20 0 25 1;
+#X connect 20 0 26 1;
+#X connect 22 0 11 1;
+#X connect 23 0 11 0;
+#X connect 24 0 23 0;
+#X connect 25 0 23 1;
+#X connect 26 0 22 0;
+#X connect 27 0 22 1;
+#X restore 248 137 pd spec2_blockfilter~ using spec2_tabreceive~;
+#X obj 582 122 spec2_tabreceive~ filter;
+#X text 735 121 1.arg: <symbol> table-name;
+#X msg 607 92 symbol filter;
+#X text 90 302 IEM KUG;
+#X text 74 290 musil;
+#X text 104 290 @;
+#X text 110 290 iem.at;
+#X text 73 312 Graz \, Austria;
+#X text 25 279 (c) Thomas Musil 2000 - 2006;
+#X obj 249 114 dirac~;
+#X text 143 -11 iem_spec2 calculates only (blocksize/2 + 1) samples
+;
+#X text 140 -27 receives spectrum from table with (blocksize/2 + 1)
+;
+#X connect 0 0 2 0;
+#X connect 0 1 3 0;
+#X connect 1 0 0 0;
+#X connect 6 0 11 1;
+#X connect 6 0 9 0;
+#X connect 9 0 5 0;
+#X connect 9 0 21 0;
+#X connect 11 0 5 0;
+#X connect 14 0 12 0;
+#X connect 21 0 11 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0
SF.net SVN: pure-data:[10438] trunk/externals/iem/iem_bin_ambi
by tmusilīŧ users.sourceforge.net 11 Dec '08
by tmusilīŧ users.sourceforge.net 11 Dec '08
11 Dec '08
Revision: 10438
http://pure-data.svn.sourceforge.net/pure-data/?rev=10438&view=rev
Author: tmusil
Date: 2008-12-11 17:47:57 +0000 (Thu, 11 Dec 2008)
Log Message:
-----------
moved help-files from help to ../
Added Paths:
-----------
trunk/externals/iem/iem_bin_ambi/L0e045a.wav
trunk/externals/iem/iem_bin_ambi/L0e135a.wav
trunk/externals/iem/iem_bin_ambi/L0e225a.wav
trunk/externals/iem/iem_bin_ambi/L0e315a.wav
trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fft2-help.pd
trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fir2-help.pd
Removed Paths:
-------------
trunk/externals/iem/iem_bin_ambi/help/
Added: trunk/externals/iem/iem_bin_ambi/L0e045a.wav
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iem_bin_ambi/L0e045a.wav
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iem_bin_ambi/L0e135a.wav
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iem_bin_ambi/L0e135a.wav
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iem_bin_ambi/L0e225a.wav
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iem_bin_ambi/L0e225a.wav
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iem_bin_ambi/L0e315a.wav
===================================================================
(Binary files differ)
Property changes on: trunk/externals/iem/iem_bin_ambi/L0e315a.wav
___________________________________________________________________
Added: svn:mime-type
+ application/octet-stream
Added: trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fft2-help.pd
===================================================================
--- trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fft2-help.pd (rev 0)
+++ trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fft2-help.pd 2008-12-11 17:47:57 UTC (rev 10438)
@@ -0,0 +1,275 @@
+#N canvas 87 6 761 654 10;
+#X obj 29 365 soundfiler;
+#X obj 38 203 unpack s s;
+#X msg 29 344 read -skip \$1 \$2 \$3;
+#X obj 345 335 pp element;
+#X obj 56 299 mergefilename /;
+#X text 344 373 multiplexer control indices;
+#X text 340 384 for spec2_matrix_bundle_stat~;
+#X text 367 133 1.arg: <float> unique-number used as table-name-prefix
+;
+#X obj 29 323 pack f s s;
+#X text 367 183 6.arg: <float> ambisonic order;
+#X text 367 193 7.arg: <float> ambisonic dimension;
+#X text 367 203 8.arg: <float> number of real loudspeakers;
+#X text 367 213 9.arg: <float> number of phantom loudspeakers;
+#X text 361 223 10.arg: <float> FFT-size = 2 x effective HRIR-length
+;
+#X obj 38 165 bin_ambi_reduced_decode_fft2 \$0 HRIR HRTF_re HRTF_im
+fadeout 1 2 4 0 256;
+#X obj 30 509 table \$0_fadeout 256;
+#X obj 56 251 symbol .;
+#X obj 38 226 t b b s;
+#X obj 56 273 pack s s;
+#X obj 29 260 f 0;
+#X obj 38 60 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 345 356 print;
+#X obj 29 423 table \$0_1_HRIR 256;
+#X obj 265 418 table \$0_1_HRTF_re 256;
+#X obj 405 418 table \$0_1_HRTF_im 256;
+#X obj 29 483 table \$0_4_HRIR 256;
+#X obj 29 463 table \$0_3_HRIR 256;
+#X obj 29 443 table \$0_2_HRIR 256;
+#X obj 265 438 table \$0_2_HRTF_re 256;
+#X obj 265 458 table \$0_3_HRTF_re 256;
+#X obj 405 458 table \$0_3_HRTF_im 256;
+#X obj 405 438 table \$0_2_HRTF_im 256;
+#X text 21 12 ambi_reduced_decode_fft2;
+#X text 367 143 2.arg: <symbol> last part of left HRIR table name;
+#X text 367 173 5.arg: <symbol> last part of HRIR fadeout window table
+name;
+#N canvas 0 0 465 384 init_fadeout 0;
+#X obj 124 23 loadbang;
+#X obj 124 45 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 124 73 for++ 0 127;
+#X obj 124 144 t b;
+#X msg 124 164 1;
+#X obj 124 123 moses 95;
+#X obj 167 144 - 95;
+#X obj 167 166 / 32;
+#X obj 167 220 * 3.14159;
+#X obj 167 264 t f f;
+#X obj 172 286 *;
+#X obj 172 317 tabwrite \$0_fadeout;
+#X obj 270 162 + 128;
+#X msg 270 185 0 \$1;
+#X obj 153 97 t f f f;
+#X obj 167 241 cos;
+#X obj 167 199 / 2;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 14 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 5 0 3 0;
+#X connect 5 1 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 16 0;
+#X connect 8 0 15 0;
+#X connect 9 0 10 0;
+#X connect 9 1 10 1;
+#X connect 10 0 11 0;
+#X connect 12 0 13 0;
+#X connect 13 0 11 0;
+#X connect 14 0 5 0;
+#X connect 14 1 11 1;
+#X connect 14 2 12 0;
+#X connect 15 0 9 0;
+#X connect 16 0 8 0;
+#X restore 157 510 pd init_fadeout;
+#X text 87 585 IEM KUG;
+#X text 71 573 musil;
+#X text 101 573 @;
+#X text 107 573 iem.at;
+#X text 70 595 Graz \, Austria;
+#X text 22 562 (c) Thomas Musil 2000 - 2006;
+#X text 211 40 up to 12.Order 2-dimensional;
+#X text 208 28 up to 5.Order 3-dimensional or;
+#X text 367 153 3.arg: <symbol> last part of real reduced HRTF table
+name;
+#X text 367 163 4.arg: <symbol> last part of imag reduced HRTF table
+name;
+#X text 220 14 AMBISONIC BINAURAL DECODING;
+#X text 446 33 of HRTF-spectra;
+#X text 429 20 calculates a reduced set;
+#X obj 39 112 cnv 15 102 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#N canvas 0 5 1012 718 input_messages 0;
+#X obj 147 645 outlet;
+#X msg 80 324 calc_pinv;
+#X msg 14 621 calc_sym;
+#X obj 93 277 pp pht_ls;
+#X obj 107 222 pp real_ls;
+#X obj 120 178 pp load_HRIR;
+#X msg 120 158 1 L0e045a.wav \, 2 L0e135a.wav \, 3 L0e225a.wav \, 4
+L0e315a.wav;
+#X obj 67 396 pp ipht_ireal_muladd;
+#X obj 133 130 pp ambi_weight;
+#X obj 147 86 pp sing_range;
+#X msg 93 257 1 -90 0;
+#X msg 147 66 1e-010;
+#X msg 67 375 1 4 0.707;
+#X obj 14 26 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 133 110 1 1;
+#X obj 14 5 inlet;
+#X msg 107 202 1 45 \, 2 135 \, 3 225 \, 4 315;
+#X text 670 112 -180 <= phi <= +180;
+#X text 231 115 input: <ambi_weight> one mul-factor for each;
+#X text 655 12 n_ao = ambisonic-order;
+#X text 667 49 all angles in degree;
+#X text 276 126 ambisonic order group to suppress the side-lobe-phenomena
+;
+#X text 273 317 of all (real + phantom) loudspeaker positions \,;
+#X text 274 341 and calculates the pseudo inverse.;
+#X text 277 329 multiplicates the ambi order weight;
+#X text 536 366 mirror_weight;
+#X text 275 392 phantom speaker with the factor "mirror_weight" and
+adds;
+#X text 231 38 input: <sing_range> singularity range;
+#X text 274 49 when calculating the inverse of the matrix by gauss
+;
+#X text 274 59 algorithm \, you have to divide a row by a certain number
+\,;
+#X text 274 79 outside of this range (> sing_range \, or < -sing_range).
+;
+#X text 274 91 Otherwise we say \, this matrix is singular.;
+#X text 274 69 to achieve the identity matrix. This number has to be
+;
+#X text 640 23 n_re_ls = number of real loudspeakers;
+#X text 640 35 n_vi_ls = number of virtual phantom loudspeakers;
+#X text 298 201 input: <real_ls> re_ls_index + phi .. 2-dimensional
+;
+#X text 298 212 input: <real_ls> re_ls_index + theta + phi .. 3-dimensional
+;
+#X text 230 247 input: <pht_ls> vi_ls_index + phi .. 2-dimensional
+;
+#X text 230 258 input: <pht_ls> vi_ls_index + theta + phi .. 3-dimensional
+;
+#X text 670 100 -90 <= theta <= +90;
+#X text 662 76 1 <= re_ls_index <= n_re_ls;
+#X text 662 87 1 <= vi_ls_index <= n_vi_ls;
+#X text 340 223 encodes the re_ls_index row of a matrix;
+#X text 273 270 encodes the (re_ls_index + vi_ls_index) row of a matrix
+;
+#X text 274 281 we need them to achieve a nonsingular matrix;
+#X obj 14 45 t b b b b b b b b b b b;
+#X obj 27 586 pp calc_reduced;
+#X msg 27 564 1 \, 2 \, 3;
+#X obj 40 532 pp check_HRTF_arrays;
+#X msg 40 511 1 \, 2 \, 3;
+#X msg 53 437 1 \, 2 \, 3 \, 4;
+#X obj 53 458 pp check_HRIR_arrays;
+#X text 491 157 input: <load_HRIR> : re_ls_index + left_ear_HRIR_wav_file
+;
+#X text 230 306 input: <calc_pinv> starts the encoding;
+#X text 230 366 input: <ipht_ireal_muladd> vi_ls_index re_ls_index
+;
+#X text 276 379 multiplies the column "vi_ls_index + re_ls_index" of
+;
+#X text 274 405 this column to the column "re_ls_index" of real speaker
+;
+#X text 227 435 input: <check_HRIR_arrays> re_ls_index;
+#X text 271 448 checks the existence of the table with the "re_ls_index"-th
+;
+#X text 271 511 checks the existence of the reduced decoder table;
+#X text 227 498 input: <check_HRTF_arrays> ambi_ch_index;
+#X text 272 524 with the "ambi_ch_index"-th index.;
+#X text 270 536 [1 .. (2*n_ao+1)] 2d;
+#X text 418 536 [1 .. (n_ao+1)*(n_ao+1)] 3d;
+#X text 230 561 input: <calc_reduced> ambi_ch_index;
+#X text 275 574 multiplies the matrix of HRIR with the "ambi_ch_index"-th
+;
+#X text 273 587 column of the decoder matrix and does a real FFT;
+#X text 26 663 to bin_ambi_reduced_decode_fft2;
+#X text 534 169 and outputs on the left 2 symbols (table + wav);
+#X text 230 611 input: <calc_sym> outputs a list of 2 floats;
+#X text 273 633 one means symmetric \, two means asymmetric column
+of;
+#X text 273 644 reduced decoder matrix. (message is especially for
+;
+#X text 280 227 ____________________________________________________________
+;
+#X text 252 285 ____________________________________________________________
+;
+#X text 253 409 ____________________________________________________________
+;
+#X text 253 345 ____________________________________________________________
+;
+#X text 250 480 ____________________________________________________________
+;
+#X text 250 541 ____________________________________________________________
+;
+#X text 253 592 ____________________________________________________________
+;
+#X text 253 662 ____________________________________________________________
+;
+#X text 255 95 ____________________________________________________________
+;
+#X text 506 178 ____________________________________________________________
+;
+#X text 636 58 _________________________________________________;
+#X text 636 121 _________________________________________________;
+#X text 66 24 in this order;
+#X text 275 655 matrix object "spec2_matrix_bundle_stat~";
+#X text 250 133 ____________________________________________________________
+;
+#X text 276 178 ____________________________________________________________
+;
+#X text 272 461 index of the HRIR from loudspeaker to the left ear
+;
+#X text 271 473 and multiplies this HRIR with the fadeout table;
+#X text 273 622 second float is the index \, first float is one or
+two \,;
+#X connect 1 0 0 0;
+#X connect 2 0 0 0;
+#X connect 3 0 0 0;
+#X connect 4 0 0 0;
+#X connect 5 0 0 0;
+#X connect 6 0 5 0;
+#X connect 7 0 0 0;
+#X connect 8 0 0 0;
+#X connect 9 0 0 0;
+#X connect 10 0 3 0;
+#X connect 11 0 9 0;
+#X connect 12 0 7 0;
+#X connect 13 0 45 0;
+#X connect 14 0 8 0;
+#X connect 15 0 13 0;
+#X connect 16 0 4 0;
+#X connect 45 0 2 0;
+#X connect 45 1 47 0;
+#X connect 45 2 49 0;
+#X connect 45 3 50 0;
+#X connect 45 5 1 0;
+#X connect 45 7 16 0;
+#X connect 45 8 6 0;
+#X connect 45 9 14 0;
+#X connect 45 10 11 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 0;
+#X connect 48 0 0 0;
+#X connect 49 0 48 0;
+#X connect 50 0 51 0;
+#X connect 51 0 0 0;
+#X restore 38 111 pd input_messages;
+#X text 108 203 load control of Head Related;
+#X text 108 215 Impulse Responses;
+#X connect 1 0 17 0;
+#X connect 1 1 8 2;
+#X connect 2 0 0 0;
+#X connect 3 0 21 0;
+#X connect 4 0 8 1;
+#X connect 8 0 2 0;
+#X connect 14 0 1 0;
+#X connect 14 1 3 0;
+#X connect 16 0 18 0;
+#X connect 17 0 19 0;
+#X connect 17 1 16 0;
+#X connect 17 2 18 1;
+#X connect 18 0 4 0;
+#X connect 19 0 8 0;
+#X connect 20 0 50 0;
+#X connect 50 0 14 0;
Added: trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fir2-help.pd
===================================================================
--- trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fir2-help.pd (rev 0)
+++ trunk/externals/iem/iem_bin_ambi/ambi_reduced_decode_fir2-help.pd 2008-12-11 17:47:57 UTC (rev 10438)
@@ -0,0 +1,265 @@
+#N canvas 87 6 818 654 10;
+#X obj 29 365 soundfiler;
+#X obj 38 203 unpack s s;
+#X msg 29 344 read -skip \$1 \$2 \$3;
+#X obj 387 335 pp element;
+#X obj 56 299 mergefilename /;
+#X text 386 373 multiplexer control indices;
+#X text 382 384 for spec2_matrix_bundle_stat~;
+#X text 407 133 1.arg: <float> unique-number used as table-name-prefix
+;
+#X obj 29 323 pack f s s;
+#X obj 56 251 symbol .;
+#X obj 38 226 t b b s;
+#X obj 56 273 pack s s;
+#X obj 29 260 f 0;
+#X obj 38 60 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 387 356 print;
+#X text 407 143 2.arg: <symbol> last part of left HRIR table name;
+#N canvas 0 0 469 388 init_fadeout 0;
+#X obj 124 23 loadbang;
+#X obj 124 45 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 124 73 for++ 0 127;
+#X obj 124 144 t b;
+#X msg 124 164 1;
+#X obj 124 123 moses 95;
+#X obj 167 144 - 95;
+#X obj 167 166 / 32;
+#X obj 167 220 * 3.14159;
+#X obj 167 264 t f f;
+#X obj 172 286 *;
+#X obj 172 317 tabwrite \$0_fadeout;
+#X obj 270 162 + 128;
+#X msg 270 185 0 \$1;
+#X obj 153 97 t f f f;
+#X obj 167 241 cos;
+#X obj 167 199 / 2;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 14 0;
+#X connect 3 0 4 0;
+#X connect 4 0 11 0;
+#X connect 5 0 3 0;
+#X connect 5 1 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 16 0;
+#X connect 8 0 15 0;
+#X connect 9 0 10 0;
+#X connect 9 1 10 1;
+#X connect 10 0 11 0;
+#X connect 12 0 13 0;
+#X connect 13 0 11 0;
+#X connect 14 0 5 0;
+#X connect 14 1 11 1;
+#X connect 14 2 12 0;
+#X connect 15 0 9 0;
+#X connect 16 0 8 0;
+#X restore 157 510 pd init_fadeout;
+#X text 87 585 IEM KUG;
+#X text 71 573 musil;
+#X text 101 573 @;
+#X text 107 573 iem.at;
+#X text 70 595 Graz \, Austria;
+#X text 22 562 (c) Thomas Musil 2000 - 2006;
+#X text 211 40 up to 12.Order 2-dimensional;
+#X text 208 28 up to 5.Order 3-dimensional or;
+#X text 220 14 AMBISONIC BINAURAL DECODING;
+#X text 429 20 calculates a reduced set;
+#X obj 39 112 cnv 15 102 15 empty empty empty 20 12 0 14 -260818 -66577
+0;
+#N canvas 0 5 1006 718 input_messages 0;
+#X obj 197 645 outlet;
+#X msg 67 383 calc_pinv;
+#X msg 14 615 calc_sym;
+#X obj 93 273 pp pht_ls;
+#X obj 107 218 pp real_ls;
+#X obj 120 174 pp load_HRIR;
+#X msg 120 154 1 L0e045a.wav \, 2 L0e135a.wav \, 3 L0e225a.wav \, 4
+L0e315a.wav;
+#X obj 80 329 pp ipht_ireal_muladd;
+#X obj 133 130 pp ambi_weight;
+#X obj 147 86 pp sing_range;
+#X msg 93 253 1 -90 0;
+#X msg 147 66 1e-010;
+#X msg 80 308 1 4 0.707;
+#X obj 14 26 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X msg 133 110 1 1;
+#X obj 14 5 inlet;
+#X msg 107 198 1 45 \, 2 135 \, 3 225 \, 4 315;
+#X text 670 112 -180 <= phi <= +180;
+#X text 231 115 input: <ambi_weight> one mul-factor for each;
+#X text 655 12 n_ao = ambisonic-order;
+#X text 667 49 all angles in degree;
+#X text 276 126 ambisonic order group to suppress the side-lobe-phenomena
+;
+#X text 273 370 of all (real + phantom) loudspeaker positions \,;
+#X text 274 394 and calculates the pseudo inverse.;
+#X text 277 382 multiplicates the ambi order weight;
+#X text 536 297 mirror_weight;
+#X text 275 323 phantom speaker with the factor "mirror_weight" and
+adds;
+#X text 231 38 input: <sing_range> singularity range;
+#X text 274 49 when calculating the inverse of the matrix by gauss
+;
+#X text 274 59 algorithm \, you have to divide a row by a certain number
+\,;
+#X text 274 79 outside of this range (> sing_range \, or < -sing_range).
+;
+#X text 274 91 Otherwise we say \, this matrix is singular.;
+#X text 274 69 to achieve the identity matrix. This number has to be
+;
+#X text 640 23 n_re_ls = number of real loudspeakers;
+#X text 640 35 n_vi_ls = number of virtual phantom loudspeakers;
+#X text 271 197 input: <real_ls> re_ls_index + phi .. 2-dimensional
+;
+#X text 271 208 input: <real_ls> re_ls_index + theta + phi .. 3-dimensional
+;
+#X text 231 241 input: <pht_ls> vi_ls_index + phi .. 2-dimensional
+;
+#X text 231 252 input: <pht_ls> vi_ls_index + theta + phi .. 3-dimensional
+;
+#X text 670 100 -90 <= theta <= +90;
+#X text 662 76 1 <= re_ls_index <= n_re_ls;
+#X text 662 87 1 <= vi_ls_index <= n_vi_ls;
+#X text 313 219 encodes the re_ls_index row of a matrix;
+#X text 274 264 encodes the (re_ls_index + vi_ls_index) row of a matrix
+;
+#X text 275 275 we need them to achieve a nonsingular matrix;
+#X obj 14 45 t b b b b b b b b b b b;
+#X obj 27 584 pp calc_reduced;
+#X msg 27 562 1 \, 2 \, 3;
+#X msg 40 506 1 \, 2 \, 3;
+#X msg 53 439 1 \, 2 \, 3 \, 4;
+#X obj 53 460 pp check_HRIR_arrays;
+#X text 481 150 input: <load_HRIR> : re_ls_index + left_ear_HRIR_wav_file
+;
+#X text 230 359 input: <calc_pinv> starts the encoding;
+#X text 230 297 input: <ipht_ireal_muladd> vi_ls_index re_ls_index
+;
+#X text 276 310 multiplies the column "vi_ls_index + re_ls_index" of
+;
+#X text 274 336 this column to the column "re_ls_index" of real speaker
+;
+#X text 230 424 input: <check_HRIR_arrays> re_ls_index;
+#X text 274 437 checks the existence of the table with the "re_ls_index"-th
+;
+#X text 274 509 checks the existence of the reduced decoder table;
+#X text 275 522 with the "ambi_ch_index"-th index.;
+#X text 273 534 [1 .. (2*n_ao+1)] 2d;
+#X text 421 534 [1 .. (n_ao+1)*(n_ao+1)] 3d;
+#X text 230 561 input: <calc_reduced> ambi_ch_index;
+#X text 275 574 multiplies the matrix of HRIR with the "ambi_ch_index"-th
+;
+#X text 26 663 to bin_ambi_reduced_decode_fft2;
+#X text 524 162 and outputs on the left 2 symbols (table + wav);
+#X text 230 611 input: <calc_sym> outputs a list of 2 floats;
+#X text 273 633 one means symmetric \, two means asymmetric column
+of;
+#X text 273 644 reduced decoder matrix. (message is especially for
+;
+#X text 253 223 ____________________________________________________________
+;
+#X text 253 279 ____________________________________________________________
+;
+#X text 253 340 ____________________________________________________________
+;
+#X text 253 398 ____________________________________________________________
+;
+#X text 253 476 ____________________________________________________________
+;
+#X text 253 539 ____________________________________________________________
+;
+#X text 253 592 ____________________________________________________________
+;
+#X text 253 662 ____________________________________________________________
+;
+#X text 255 95 ____________________________________________________________
+;
+#X text 496 168 ____________________________________________________________
+;
+#X text 636 58 _________________________________________________;
+#X text 636 121 _________________________________________________;
+#X text 66 24 in this order;
+#X text 275 655 matrix object "spec2_matrix_bundle_stat~";
+#X obj 40 527 pp check_HRIR_RED_arrays;
+#X text 230 496 input: <check_HRIR_RED_arrays> ambi_ch_index;
+#X text 273 587 column of the decoder matrix;
+#X text 274 462 and multiplies this HRIR with the fadeout table;
+#X text 275 450 index of the HRIR from loudspeaker to the left ear
+;
+#X text 273 622 second float is the index \, first float is one or
+two \,;
+#X connect 1 0 0 0;
+#X connect 2 0 0 0;
+#X connect 3 0 0 0;
+#X connect 4 0 0 0;
+#X connect 5 0 0 0;
+#X connect 6 0 5 0;
+#X connect 7 0 0 0;
+#X connect 8 0 0 0;
+#X connect 9 0 0 0;
+#X connect 10 0 3 0;
+#X connect 11 0 9 0;
+#X connect 12 0 7 0;
+#X connect 13 0 45 0;
+#X connect 14 0 8 0;
+#X connect 15 0 13 0;
+#X connect 16 0 4 0;
+#X connect 45 0 2 0;
+#X connect 45 1 47 0;
+#X connect 45 2 48 0;
+#X connect 45 3 49 0;
+#X connect 45 4 1 0;
+#X connect 45 7 16 0;
+#X connect 45 8 6 0;
+#X connect 45 9 14 0;
+#X connect 45 10 11 0;
+#X connect 46 0 0 0;
+#X connect 47 0 46 0;
+#X connect 48 0 83 0;
+#X connect 49 0 50 0;
+#X connect 50 0 0 0;
+#X connect 83 0 0 0;
+#X restore 38 111 pd input_messages;
+#X text 108 203 load control of Head Related;
+#X text 108 215 Impulse Responses;
+#X text 21 12 ambi_reduced_decode_fir2;
+#X text 446 33 of HRIRs;
+#X obj 29 423 table \$0_1_HRIR 128;
+#X obj 29 443 table \$0_2_HRIR 128;
+#X obj 29 463 table \$0_3_HRIR 128;
+#X obj 29 483 table \$0_4_HRIR 128;
+#X obj 30 509 table \$0_fadeout 128;
+#X obj 265 418 table \$0_1_HRIR_RED 128;
+#X obj 265 438 table \$0_2_HRIR_RED 128;
+#X obj 265 458 table \$0_3_HRIR_RED 128;
+#X text 407 203 8.arg: <float> number of phantom loudspeakers;
+#X text 407 193 7.arg: <float> number of real loudspeakers;
+#X text 407 183 6.arg: <float> ambisonic dimension;
+#X text 407 173 5.arg: <float> ambisonic order;
+#X text 407 163 4.arg: <symbol> last part of HRIR fadeout window table
+name;
+#X text 407 153 3.arg: <symbol> last part of reduced HRIR table name
+;
+#X text 407 213 9.arg: <float> FIR-size = effective HRIR-length;
+#X obj 38 165 bin_ambi_reduced_decode_fir2 \$0 HRIR HRIR_RED fadeout
+1 2 4 0 128;
+#X connect 1 0 10 0;
+#X connect 1 1 8 2;
+#X connect 2 0 0 0;
+#X connect 3 0 14 0;
+#X connect 4 0 8 1;
+#X connect 8 0 2 0;
+#X connect 9 0 11 0;
+#X connect 10 0 12 0;
+#X connect 10 1 9 0;
+#X connect 10 2 11 1;
+#X connect 11 0 4 0;
+#X connect 12 0 8 0;
+#X connect 13 0 28 0;
+#X connect 28 0 48 0;
+#X connect 48 0 1 0;
+#X connect 48 1 3 0;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
1
0