#N canvas 243 71 893 632 10; #X obj 345 85 define_loudspeakers 3 -45 0 45 0 0 45 180 45; #X msg 34 63 bang; #X obj 34 83 define_loudspeakers 2 -45 45 135 -135; #X msg 345 60 bang; #X floatatom 196 497 5 0 100 1 dB_after_1sec - -; #X obj 34 591 dac~ 1 2 3 4; #N canvas 0 0 699 527 sig 0; #X obj 58 72 line~; #X msg 58 49 0 \, 10000 5; #X obj 58 118 cos~; #X msg 146 70 1; #X obj 146 47 loadbang; #X obj 58 95 clip~ 0 0.25; #X obj 251 134 line~; #X obj 251 157 cos~; #X msg 324 54 -0.25 \, 0.25 100; #X obj 251 8 loadbang; #X msg 251 31 -0.25; #X obj 251 203 *~; #X obj 58 140 hip~ 5; #X msg 324 77 -0.25 \, 0.25 400; #X floatatom 151 126 0 0 0 0 freq - -; #X obj 324 191 osc~ 440; #X obj 324 168 mtof; #X msg 324 31 -0.25 \, 0.25 20; #X obj 251 180 *~ 0.1; #X msg 324 100 -0.25 \, 0.25 1000; #X msg 324 122 -0.25 \, 0.25 2000; #X obj 324 226 *~; #X obj 342 252 *~; #X msg 324 8 0; #X obj 308 257 *~; #X obj 58 26 metro 2000; #X floatatom 58 4 0 0 0 0 - - -; #X text 1 51 impulse; #X text 362 7 tone; #X obj 59 184 outlet~; #X obj 170 6 inlet; #X obj 442 18 metro 500; #X obj 91 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 ; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 12 0; #X connect 3 0 0 0; #X connect 4 0 3 0; #X connect 5 0 2 0; #X connect 6 0 7 0; #X connect 7 0 18 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 6 0; #X connect 11 0 12 0; #X connect 12 0 29 0; #X connect 13 0 6 0; #X connect 14 0 16 0; #X connect 15 0 11 1; #X connect 15 0 21 0; #X connect 15 0 21 1; #X connect 15 0 22 0; #X connect 16 0 15 0; #X connect 17 0 6 0; #X connect 18 0 11 0; #X connect 19 0 6 0; #X connect 20 0 6 0; #X connect 21 0 22 1; #X connect 21 0 11 1; #X connect 21 0 24 0; #X connect 21 0 24 1; #X connect 22 0 11 1; #X connect 23 0 6 0; #X connect 24 0 11 1; #X connect 25 0 1 0; #X connect 26 0 25 0; #X connect 30 0 31 0; #X connect 31 0 8 0; #X connect 32 0 25 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 63 415 pd sig; #X obj 63 387 tgl 24 0 empty empty test-sigs 26 7 1 10 -262144 -1 -1 0 1; #X msg 216 522 clear; #N canvas 0 0 766 594 four-reverbs 0; #X obj 67 179 rev1~; #X obj 114 179 rev1~; #X obj 160 179 rev1~; #X obj 210 179 rev1~; #X obj 282 55 inlet; #X obj 67 54 inlet~; #X obj 113 54 inlet~; #X obj 160 53 inlet~; #X obj 211 53 inlet~; #X obj 67 286 outlet~; #X obj 114 268 outlet~; #X obj 159 246 outlet~; #X obj 209 226 outlet~; #X obj 339 55 inlet; #X obj 339 76 b; #X connect 0 0 9 0; #X connect 1 0 10 0; #X connect 2 0 11 0; #X connect 3 0 12 0; #X connect 4 0 3 1; #X connect 4 0 2 1; #X connect 4 0 1 1; #X connect 4 0 0 1; #X connect 5 0 0 0; #X connect 6 0 1 0; #X connect 7 0 2 0; #X connect 8 0 3 0; #X connect 13 0 14 0; #X connect 14 0 3 2; #X connect 14 0 2 2; #X connect 14 0 1 2; #X connect 14 0 0 2; #X restore 116 544 pd four-reverbs; #N canvas 0 0 699 527 sig 0; #X obj 58 72 line~; #X msg 58 49 0 \, 10000 5; #X obj 58 118 cos~; #X msg 146 70 1; #X obj 146 47 loadbang; #X obj 58 95 clip~ 0 0.25; #X obj 251 134 line~; #X obj 251 157 cos~; #X msg 324 54 -0.25 \, 0.25 100; #X obj 251 8 loadbang; #X msg 251 31 -0.25; #X obj 251 203 *~; #X obj 58 140 hip~ 5; #X msg 324 77 -0.25 \, 0.25 400; #X floatatom 134 122 0 0 0 0 freq - -; #X obj 324 191 osc~ 440; #X obj 324 168 mtof; #X msg 324 31 -0.25 \, 0.25 20; #X obj 251 180 *~ 0.1; #X msg 324 100 -0.25 \, 0.25 1000; #X msg 324 122 -0.25 \, 0.25 2000; #X obj 324 226 *~; #X obj 342 252 *~; #X msg 324 8 0; #X obj 308 257 *~; #X obj 58 26 metro 2000; #X floatatom 58 4 0 0 0 0 - - -; #X text 1 51 impulse; #X text 362 7 tone; #X obj 59 184 outlet~; #X obj 170 6 inlet; #X obj 442 18 metro 500; #X obj 91 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 ; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 12 0; #X connect 3 0 0 0; #X connect 4 0 3 0; #X connect 5 0 2 0; #X connect 6 0 7 0; #X connect 7 0 18 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 6 0; #X connect 11 0 12 0; #X connect 12 0 29 0; #X connect 13 0 6 0; #X connect 14 0 16 0; #X connect 15 0 11 1; #X connect 15 0 21 0; #X connect 15 0 21 1; #X connect 15 0 22 0; #X connect 16 0 15 0; #X connect 17 0 6 0; #X connect 18 0 11 0; #X connect 19 0 6 0; #X connect 20 0 6 0; #X connect 21 0 22 1; #X connect 21 0 11 1; #X connect 21 0 24 0; #X connect 21 0 24 1; #X connect 22 0 11 1; #X connect 23 0 6 0; #X connect 24 0 11 1; #X connect 25 0 1 0; #X connect 26 0 25 0; #X connect 30 0 31 0; #X connect 31 0 8 0; #X connect 32 0 25 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 156 414 pd sig; #X obj 156 386 tgl 24 0 empty empty test-sigs 26 7 1 10 -262144 -1 -1 0 1; #X obj 34 364 mtx 8 3; #X obj 35 498 mtx_*~ 8 3 20; #N canvas 0 0 699 527 sig 0; #X obj 58 72 line~; #X msg 58 49 0 \, 10000 5; #X obj 58 118 cos~; #X msg 146 70 1; #X obj 146 47 loadbang; #X obj 58 95 clip~ 0 0.25; #X obj 251 134 line~; #X obj 251 157 cos~; #X msg 324 54 -0.25 \, 0.25 100; #X obj 251 8 loadbang; #X msg 251 31 -0.25; #X obj 251 203 *~; #X obj 58 140 hip~ 5; #X msg 324 77 -0.25 \, 0.25 400; #X floatatom 134 122 0 0 0 0 freq - -; #X obj 324 191 osc~ 440; #X obj 324 168 mtof; #X msg 324 31 -0.25 \, 0.25 20; #X obj 251 180 *~ 0.1; #X msg 324 100 -0.25 \, 0.25 1000; #X msg 324 122 -0.25 \, 0.25 2000; #X obj 324 226 *~; #X obj 342 252 *~; #X msg 324 8 0; #X obj 308 257 *~; #X obj 58 26 metro 2000; #X floatatom 58 4 0 0 0 0 - - -; #X text 1 51 impulse; #X text 362 7 tone; #X obj 59 184 outlet~; #X obj 170 6 inlet; #X obj 442 18 metro 500; #X obj 91 8 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1 ; #X connect 0 0 5 0; #X connect 1 0 0 0; #X connect 2 0 12 0; #X connect 3 0 0 0; #X connect 4 0 3 0; #X connect 5 0 2 0; #X connect 6 0 7 0; #X connect 7 0 18 0; #X connect 8 0 6 0; #X connect 9 0 10 0; #X connect 10 0 6 0; #X connect 11 0 12 0; #X connect 12 0 29 0; #X connect 13 0 6 0; #X connect 14 0 16 0; #X connect 15 0 11 1; #X connect 15 0 21 0; #X connect 15 0 21 1; #X connect 15 0 22 0; #X connect 16 0 15 0; #X connect 17 0 6 0; #X connect 18 0 11 0; #X connect 19 0 6 0; #X connect 20 0 6 0; #X connect 21 0 22 1; #X connect 21 0 11 1; #X connect 21 0 24 0; #X connect 21 0 24 1; #X connect 22 0 11 1; #X connect 23 0 6 0; #X connect 24 0 11 1; #X connect 25 0 1 0; #X connect 26 0 25 0; #X connect 30 0 31 0; #X connect 31 0 8 0; #X connect 32 0 25 0; #X coords 0 -1 1 1 85 60 1 100 100; #X restore 250 416 pd sig; #X obj 250 388 tgl 24 0 empty empty test-sigs 26 7 1 10 -262144 -1 -1 0 1; #X obj 196 353 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1; #N canvas 0 0 818 424 rvbap-module0 0; #X floatatom 104 128 5 0 0 2 azi - -; #X floatatom 148 128 5 0 0 2 ele - -; #X floatatom 192 128 5 0 100 2 spread - -; #X text 199 262 actual location; #X obj 83 202 rvbap 0 0; #X floatatom 245 129 5 1 20 2 dist - -; #X floatatom 127 233 5 0 0 3 azi - -; #X floatatom 171 233 5 0 0 3 ele - -; #X floatatom 215 233 5 0 0 3 spread - -; #X floatatom 268 234 5 0 0 3 dist - -; #N canvas 352 196 547 360 set-element 0; #X obj 70 81 unpack 0 0; #X obj 70 104 + 1; #X obj 70 137 pack 0 1 0; #X obj 70 179 list trim; #X obj 70 158 list prepend element; #X obj 70 59 inlet; #X obj 70 261 outlet; #X obj 70 221 t b a; #X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix ; #X obj 168 80 inlet; #X connect 0 0 1 0; #X connect 0 1 2 2; #X connect 1 0 2 0; #X connect 2 0 4 0; #X connect 3 0 7 0; #X connect 4 0 3 0; #X connect 5 0 0 0; #X connect 7 0 6 0; #X connect 7 1 6 0; #X connect 9 0 2 1; #X restore 83 316 pd set-element; #N canvas 203 642 802 273 peek 0; #X floatatom 55 198 10 0 0 0 - - -; #X floatatom 134 198 10 0 0 0 - - -; #X floatatom 213 198 10 0 0 0 - - -; #X floatatom 292 198 10 0 0 0 - - -; #X obj 55 74 route 0 1 2 3 4 5 6 7; #X floatatom 366 197 10 0 0 0 - - -; #X floatatom 445 197 10 0 0 0 - - -; #X floatatom 524 197 10 0 0 0 - - -; #X floatatom 603 197 10 0 0 0 - - -; #X obj 55 49 inlet; #X connect 4 0 0 0; #X connect 4 1 1 0; #X connect 4 2 2 0; #X connect 4 3 3 0; #X connect 4 4 5 0; #X connect 4 5 6 0; #X connect 4 6 7 0; #X connect 4 7 8 0; #X connect 9 0 4 0; #X restore 97 290 pd peek; #N canvas 0 0 450 300 tba 0; #X obj 143 51 inlet; #X obj 96 49 inlet; #X obj 191 51 inlet; #X obj 238 51 inlet; #X obj 173 180 outlet; #X obj 61 178 outlet; #X obj 221 180 outlet; #X obj 268 180 outlet; #X obj 126 180 outlet; #X obj 96 73 t b a; #X obj 143 72 t b a; #X obj 191 72 t b a; #X obj 238 72 t b a; #X connect 0 0 10 0; #X connect 1 0 9 0; #X connect 2 0 11 0; #X connect 3 0 12 0; #X connect 9 0 5 0; #X connect 9 1 8 0; #X connect 10 0 5 0; #X connect 10 1 4 0; #X connect 11 0 5 0; #X connect 11 1 6 0; #X connect 12 0 5 0; #X connect 12 1 7 0; #X restore 104 168 pd tba; #X obj 281 114 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X obj 386 102 loadbang; #X obj 83 345 outlet; #X obj 83 39 inlet; #X obj 304 140 hradio 15 1 0 3 empty empty id: -20 8 1 10 -262144 -1 -1 0; #X obj 386 123 0; #X obj 539 151 f \$1; #X text 378 152 in an abstraction \, use; #X text 575 154 topass id as argument.; #X obj 338 272 + 1; #X connect 0 0 12 0; #X connect 1 0 12 1; #X connect 2 0 12 2; #X connect 4 0 10 0; #X connect 4 0 11 0; #X connect 4 1 6 0; #X connect 4 2 7 0; #X connect 4 3 8 0; #X connect 4 4 9 0; #X connect 5 0 12 3; #X connect 10 0 15 0; #X connect 12 0 4 0; #X connect 12 1 4 1; #X connect 12 2 4 2; #X connect 12 3 4 3; #X connect 12 4 4 4; #X connect 13 0 5 0; #X connect 14 0 18 0; #X connect 16 0 4 0; #X connect 17 0 22 0; #X connect 18 0 17 0; #X connect 22 0 10 1; #X coords 0 -1 1 1 260 60 1 100 100; #X restore 34 229 pd rvbap-module0; #N canvas 0 0 858 488 rvbap-module1 0; #X floatatom 104 128 5 0 0 2 azi - -; #X floatatom 148 128 5 0 0 2 ele - -; #X floatatom 192 128 5 0 100 2 spread - -; #X text 199 262 actual location; #X obj 83 202 rvbap 0 0; #X floatatom 245 129 5 1 20 2 dist - -; #X floatatom 127 233 5 0 0 3 azi - -; #X floatatom 171 233 5 0 0 3 ele - -; #X floatatom 215 233 5 0 0 3 spread - -; #X floatatom 268 234 5 0 0 3 dist - -; #N canvas 352 196 547 360 set-element 0; #X obj 70 81 unpack 0 0; #X obj 70 104 + 1; #X obj 70 137 pack 0 1 0; #X obj 70 179 list trim; #X obj 70 158 list prepend element; #X obj 70 59 inlet; #X obj 70 261 outlet; #X obj 70 221 t b a; #X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix ; #X obj 168 80 inlet; #X connect 0 0 1 0; #X connect 0 1 2 2; #X connect 1 0 2 0; #X connect 2 0 4 0; #X connect 3 0 7 0; #X connect 4 0 3 0; #X connect 5 0 0 0; #X connect 7 0 6 0; #X connect 7 1 6 0; #X connect 9 0 2 1; #X restore 83 316 pd set-element; #N canvas 203 642 802 273 peek 0; #X floatatom 55 198 10 0 0 0 - - -; #X floatatom 134 198 10 0 0 0 - - -; #X floatatom 213 198 10 0 0 0 - - -; #X floatatom 292 198 10 0 0 0 - - -; #X obj 55 74 route 0 1 2 3 4 5 6 7; #X floatatom 366 197 10 0 0 0 - - -; #X floatatom 445 197 10 0 0 0 - - -; #X floatatom 524 197 10 0 0 0 - - -; #X floatatom 603 197 10 0 0 0 - - -; #X obj 55 49 inlet; #X connect 4 0 0 0; #X connect 4 1 1 0; #X connect 4 2 2 0; #X connect 4 3 3 0; #X connect 4 4 5 0; #X connect 4 5 6 0; #X connect 4 6 7 0; #X connect 4 7 8 0; #X connect 9 0 4 0; #X restore 97 290 pd peek; #N canvas 0 0 450 300 tba 0; #X obj 143 51 inlet; #X obj 96 49 inlet; #X obj 191 51 inlet; #X obj 238 51 inlet; #X obj 173 180 outlet; #X obj 61 178 outlet; #X obj 221 180 outlet; #X obj 268 180 outlet; #X obj 126 180 outlet; #X obj 96 73 t b a; #X obj 143 72 t b a; #X obj 191 72 t b a; #X obj 238 72 t b a; #X connect 0 0 10 0; #X connect 1 0 9 0; #X connect 2 0 11 0; #X connect 3 0 12 0; #X connect 9 0 5 0; #X connect 9 1 8 0; #X connect 10 0 5 0; #X connect 10 1 4 0; #X connect 11 0 5 0; #X connect 11 1 6 0; #X connect 12 0 5 0; #X connect 12 1 7 0; #X restore 104 168 pd tba; #X obj 281 114 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X obj 386 102 loadbang; #X obj 83 345 outlet; #X obj 83 39 inlet; #X obj 304 140 hradio 15 1 0 3 empty empty id: -20 8 1 10 -262144 -1 -1 1; #X obj 386 123 1; #X obj 544 152 f \$1; #X text 383 153 in an abstraction \, use; #X text 580 155 topass id as argument.; #X obj 338 272 + 1; #X connect 0 0 12 0; #X connect 1 0 12 1; #X connect 2 0 12 2; #X connect 4 0 10 0; #X connect 4 0 11 0; #X connect 4 1 6 0; #X connect 4 2 7 0; #X connect 4 3 8 0; #X connect 4 4 9 0; #X connect 5 0 12 3; #X connect 10 0 15 0; #X connect 12 0 4 0; #X connect 12 1 4 1; #X connect 12 2 4 2; #X connect 12 3 4 3; #X connect 12 4 4 4; #X connect 13 0 5 0; #X connect 14 0 18 0; #X connect 16 0 4 0; #X connect 17 0 22 0; #X connect 18 0 17 0; #X connect 22 0 10 1; #X coords 0 -1 1 1 260 60 1 100 100; #X restore 303 229 pd rvbap-module1; #N canvas 0 0 798 493 rvbap-module3 0; #X floatatom 104 128 5 0 0 2 azi - -; #X floatatom 148 128 5 0 0 2 ele - -; #X floatatom 192 128 5 0 100 2 spread - -; #X text 199 262 actual location; #X obj 83 202 rvbap 0 0; #X floatatom 245 129 5 1 20 2 dist - -; #X floatatom 127 233 5 0 0 3 azi - -; #X floatatom 171 233 5 0 0 3 ele - -; #X floatatom 215 233 5 0 0 3 spread - -; #X floatatom 268 234 5 0 0 3 dist - -; #N canvas 352 196 547 360 set-element 0; #X obj 70 81 unpack 0 0; #X obj 70 104 + 1; #X obj 70 137 pack 0 1 0; #X obj 70 179 list trim; #X obj 70 158 list prepend element; #X obj 70 59 inlet; #X obj 70 261 outlet; #X obj 70 221 t b a; #X text 48 33 transforms rvbap-output to be used with [mtx] from iemmatrix ; #X obj 168 80 inlet; #X connect 0 0 1 0; #X connect 0 1 2 2; #X connect 1 0 2 0; #X connect 2 0 4 0; #X connect 3 0 7 0; #X connect 4 0 3 0; #X connect 5 0 0 0; #X connect 7 0 6 0; #X connect 7 1 6 0; #X connect 9 0 2 1; #X restore 83 316 pd set-element; #N canvas 203 642 802 273 peek 0; #X floatatom 55 198 10 0 0 0 - - -; #X floatatom 134 198 10 0 0 0 - - -; #X floatatom 213 198 10 0 0 0 - - -; #X floatatom 292 198 10 0 0 0 - - -; #X obj 55 74 route 0 1 2 3 4 5 6 7; #X floatatom 366 197 10 0 0 0 - - -; #X floatatom 445 197 10 0 0 0 - - -; #X floatatom 524 197 10 0 0 0 - - -; #X floatatom 603 197 10 0 0 0 - - -; #X obj 55 49 inlet; #X connect 4 0 0 0; #X connect 4 1 1 0; #X connect 4 2 2 0; #X connect 4 3 3 0; #X connect 4 4 5 0; #X connect 4 5 6 0; #X connect 4 6 7 0; #X connect 4 7 8 0; #X connect 9 0 4 0; #X restore 97 290 pd peek; #N canvas 0 0 450 300 tba 0; #X obj 143 51 inlet; #X obj 96 49 inlet; #X obj 191 51 inlet; #X obj 238 51 inlet; #X obj 173 180 outlet; #X obj 61 178 outlet; #X obj 221 180 outlet; #X obj 268 180 outlet; #X obj 126 180 outlet; #X obj 96 73 t b a; #X obj 143 72 t b a; #X obj 191 72 t b a; #X obj 238 72 t b a; #X connect 0 0 10 0; #X connect 1 0 9 0; #X connect 2 0 11 0; #X connect 3 0 12 0; #X connect 9 0 5 0; #X connect 9 1 8 0; #X connect 10 0 5 0; #X connect 10 1 4 0; #X connect 11 0 5 0; #X connect 11 1 6 0; #X connect 12 0 5 0; #X connect 12 1 7 0; #X restore 104 168 pd tba; #X obj 281 114 hsl 64 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X obj 546 102 loadbang; #X obj 83 345 outlet; #X obj 83 39 inlet; #X obj 304 140 hradio 15 1 0 3 empty empty id: -20 8 1 10 -262144 -1 -1 2; #X obj 546 123 2; #X obj 547 186 f \$1; #X text 386 187 in an abstraction \, use; #X text 583 189 topass id as argument.; #X obj 338 272 + 1; #X connect 0 0 12 0; #X connect 1 0 12 1; #X connect 2 0 12 2; #X connect 4 0 10 0; #X connect 4 0 11 0; #X connect 4 1 6 0; #X connect 4 2 7 0; #X connect 4 3 8 0; #X connect 4 4 9 0; #X connect 5 0 12 3; #X connect 10 0 15 0; #X connect 12 0 4 0; #X connect 12 1 4 1; #X connect 12 2 4 2; #X connect 12 3 4 3; #X connect 12 4 4 4; #X connect 13 0 5 0; #X connect 14 0 18 0; #X connect 16 0 4 0; #X connect 17 0 22 0; #X connect 18 0 17 0; #X connect 22 0 10 1; #X coords 0 -1 1 1 260 60 1 100 100; #X restore 566 230 pd rvbap-module3; #X text 594 203 put this into an abstraction:; #X text 63 21 RVBAP - Demo how to use [mtx_*~]; #X connect 0 0 19 0; #X connect 0 0 18 0; #X connect 0 0 17 0; #X connect 1 0 2 0; #X connect 2 0 17 0; #X connect 2 0 18 0; #X connect 2 0 19 0; #X connect 3 0 0 0; #X connect 4 0 9 4; #X connect 6 0 13 1; #X connect 7 0 6 0; #X connect 8 0 9 5; #X connect 9 0 5 0; #X connect 9 1 5 1; #X connect 9 2 5 2; #X connect 9 3 5 3; #X connect 10 0 13 2; #X connect 11 0 10 0; #X connect 12 0 13 0; #X connect 13 0 5 0; #X connect 13 1 5 1; #X connect 13 2 5 2; #X connect 13 3 5 3; #X connect 13 4 9 0; #X connect 13 5 9 1; #X connect 13 6 9 2; #X connect 13 7 9 3; #X connect 14 0 13 3; #X connect 15 0 14 0; #X connect 16 0 11 0; #X connect 16 0 15 0; #X connect 16 0 7 0; #X connect 17 0 12 0; #X connect 18 0 12 0; #X connect 19 0 12 0;