Mercurial > hg > weather-synthesis-prototyping

view MechAeolian/MA_Test.pd @ 199:2ded41e29e57

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Projection matrix now calculated using control signals rather than audio. This makes sense as it was eating too much processing power for something that doesn't chage during the sound effect.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 11 Mar 2016 20:51:21 +0000
parents 20fab2c4fca4
children 04808797b49e
line wrap: on
line source
#N canvas 56 82 1333 826 10;
#X obj 249 -64 loadbang;
#X obj -164 205 delwrite~ varwind 3000;
#X obj -54 -46 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 423 1;
#X obj -163 -2 *~ 1;
#X obj -163 24 +~ 1;
#X obj 35 -90 loadbang;
#X msg 35 -70 5;
#X obj 296 26 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 7979 1;
#X floatatom 303 52 8 0 0 0 - - -;
#X obj 364 302 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 394 331 5 0 0 0 - - -;
#X obj 337 184 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6350 1;
#X floatatom 365 213 5 0 0 0 - - -;
#X obj 350 239 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 7937 1;
#X floatatom 380 268 5 0 0 0 - - -;
#X obj 323 127 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
-1 -1 8877 1;
#X floatatom 339 156 5 0 0 0 - - -;
#X text 512 303 Pan Value;
#X obj -189 443 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj -126 443 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text -129 352 Gain;
#X obj -181 323 loadbang;
#N canvas 555 179 313 396 opLevels 0;
#X obj 79 184 dac~;
#X obj 30 70 catch~ l;
#X obj 128 70 catch~ r;
#X obj 129 104 *~ 0.45;
#X obj 30 104 *~ 0.45;
#X obj 30 210 prvu~;
#X obj 129 211 prvu~;
#X obj 93 33 inlet;
#X obj 30 239 outlet;
#X obj 129 239 outlet;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 4 1;
#X connect 7 0 3 1;
#X restore -190 400 pd opLevels;
#X msg -181 346 5;
#X obj -187 371 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0
10 -262144 -1 -1 1682 1;
#N canvas 20 383 344 123 machCalc 0;
#X text 107 15 Speed of Sound (dry air 20 Degs C);
#X obj 26 -14 vd~ varwind;
#X obj 26 33 s~ MY_MACH;
#X obj 26 9 /~ 343.56;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X restore 93 -33 pd machCalc;
#X obj 422 -121 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X msg 178 167 0;
#X msg 135 285 0.5;
#X obj 249 -40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 309 84 hsl 128 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 331 103 8 0 0 0 - - -;
#X text -8 353 No Of Sources;
#X obj 422 -80 s SET_UP;
#X obj 294 7 r SET_UP;
#X obj 364 62 r SET_UP;
#X obj 434 101 r SET_UP;
#X obj 422 153 r SET_UP;
#X obj 432 213 r SET_UP;
#X obj 438 271 r SET_UP;
#X obj 378 360 hsl 128 15 0 10000 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 9969 1;
#X floatatom 415 389 5 0 0 0 - - -;
#X obj 460 334 r SET_UP;
#X obj 391 420 hsl 128 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 257 1;
#X floatatom 410 447 5 0 0 0 - - -;
#X obj 484 388 r SET_UP;
#X obj 405 472 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 416 494 5 0 0 0 - - -;
#X obj 500 441 r SET_UP;
#X msg 74 450 0;
#X floatatom -16 -23 5 0 0 0 - - -;
#X msg 281 -21 0;
#X obj -400 248 unpack f f f f f f;
#X obj -295 294 s GAIN;
#X obj -190 300 r GAIN;
#X obj -337 380 s DIST;
#X obj 500 101 r DIST;
#X obj -358 422 s LEN;
#X obj 478 49 r LEN;
#X obj -379 461 s DIA;
#X obj 476 -4 r DIA;
#X obj -400 499 s SPEED;
#X obj -57 -70 r SPEED;
#X floatatom -247 401 8 0 0 0 - - -;
#X msg 207 206 90;
#X obj 496 209 r ELEV;
#X obj 529 261 s elev;
#N canvas 634 290 596 443 windDirection 0;
#X obj 183 0 inlet~;
#X obj 280 52 inlet;
#X obj 280 86 sig~;
#X obj 185 251 *~;
#X obj 185 279 outlet~;
#X obj 246 254 outlet~;
#X obj 200 195 cos~;
#X obj 200 135 +~;
#X obj 200 71 lop~ 1;
#X obj 246 194 *~ 360;
#X obj 200 91 lop~ 1;
#X obj 200 30 noise~;
#X obj 200 51 lop~ 1;
#X obj 200 157 /~ 360;
#X obj 200 113 *~ 800;
#X obj 200 221 abs~;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 7 1;
#X connect 3 0 4 0;
#X connect 6 0 15 0;
#X connect 7 0 13 0;
#X connect 8 0 10 0;
#X connect 9 0 5 0;
#X connect 10 0 14 0;
#X connect 11 0 12 0;
#X connect 12 0 8 0;
#X connect 13 0 6 0;
#X connect 13 0 9 0;
#X connect 14 0 7 0;
#X connect 15 0 3 1;
#X restore -164 103 pd windDirection;
#X obj -11 148 snapshot~;
#X floatatom -11 175 10 0 0 0 - - -;
#X text -14 193 Wind Speed;
#X obj -68 78 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X msg 199 110 4;
#X obj 70 148 snapshot~;
#X floatatom 70 175 10 0 0 0 - - -;
#X text 67 193 Wind Direction;
#X obj -163 -32 WindGenD1;
#X msg -2 -69 20;
#X obj 618 -69 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 618 -94 loadbang;
#X obj 618 -23 s myMet;
#X obj 70 125 r myMet;
#X obj -11 125 r myMet;
#X msg 158 222 45;
#X msg 236 11 0.005;
#X obj -316 338 s ELEV;
#X obj -150 134 TUCalc2;
#X msg 216 250 18.435;
#X msg 348 -33 0.019;
#X msg 349 -52 0.0254;
#X msg 349 -72 0.0127;
#X obj -94 -23 * 0.5;
#X obj -57 -23 * 0.88;
#X obj -295 275 line \$1 50;
#X obj -316 316 line \$1 50;
#X obj -337 358 line \$1 50;
#X obj -358 401 line \$1 50;
#X obj -379 442 line \$1 50;
#X obj -400 480 line \$1 50;
#X obj 618 -47 metro 100;
#X msg 253 183 0;
#X obj -150 158 s blust;
#X obj 416 526 r blust;
#X floatatom -99 156 0 0 0 0 - - -;
#X obj 416 549 * 100;
#X floatatom 434 578 0 0 0 0 - - -;
#X text 464 548 Free Stream Turbulence Intensity (%);
#X obj 474 506 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X msg 251 101 12;
#X msg -400 130 23 0.006 5 4 85 1e+07;
#X msg -391 154 24 0.01 15 6 77 1e+07;
#X msg -379 182 17 0.0015 10 3 -100 1e+07;
#X msg -372 215 28 0.04 7 6 35 1e+07;
#X msg 348 -16 0.006;
#X obj -75 284 sig~;
#X msg -39 268 16.6;
#X obj 293 577 MechAeolianD1;
#X msg 113 343 7850;
#X msg 93 397 200;
#X msg 215 67 2;
#X text 434 29 Diameter (m);
#X text 441 68 Length (m);
#X text 461 128 Obs Distance (m);
#X text 476 184 Obs Azimuth (degs);
#X text 489 240 Obs Elevation (degs);
#X text 526 361 Mass Desnity (kg / m^3);
#X text 541 415 Tension (N);
#X msg 552 385 20.2;
#X msg 411 -27 0.036;
#X msg 416 52 0.48;
#X connect 0 0 29 0;
#X connect 2 0 50 0;
#X connect 2 0 91 0;
#X connect 2 0 92 0;
#X connect 3 0 4 0;
#X connect 4 0 67 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 7 0 116 0;
#X connect 9 0 10 0;
#X connect 9 0 116 5;
#X connect 11 0 12 0;
#X connect 11 0 116 3;
#X connect 13 0 14 0;
#X connect 13 0 66 0;
#X connect 13 0 116 4;
#X connect 15 0 16 0;
#X connect 15 0 116 2;
#X connect 21 0 23 0;
#X connect 22 0 18 0;
#X connect 22 1 19 0;
#X connect 23 0 24 0;
#X connect 24 0 22 0;
#X connect 24 0 63 0;
#X connect 26 0 33 0;
#X connect 27 0 11 0;
#X connect 28 0 9 0;
#X connect 29 0 51 0;
#X connect 29 0 84 0;
#X connect 29 0 72 0;
#X connect 29 0 27 0;
#X connect 29 0 83 0;
#X connect 29 0 28 0;
#X connect 29 0 119 0;
#X connect 29 0 117 0;
#X connect 29 0 118 0;
#X connect 29 0 49 0;
#X connect 30 0 31 0;
#X connect 30 0 116 1;
#X connect 34 0 7 0;
#X connect 35 0 30 0;
#X connect 36 0 15 0;
#X connect 37 0 11 0;
#X connect 38 0 13 0;
#X connect 39 0 9 0;
#X connect 40 0 41 0;
#X connect 40 0 116 6;
#X connect 42 0 40 0;
#X connect 43 0 44 0;
#X connect 43 0 116 7;
#X connect 45 0 43 0;
#X connect 46 0 47 0;
#X connect 48 0 46 0;
#X connect 49 0 46 0;
#X connect 52 0 98 0;
#X connect 52 1 97 0;
#X connect 52 2 96 0;
#X connect 52 3 95 0;
#X connect 52 4 94 0;
#X connect 52 5 93 0;
#X connect 54 0 24 0;
#X connect 56 0 15 0;
#X connect 58 0 30 0;
#X connect 60 0 7 0;
#X connect 62 0 2 0;
#X connect 64 0 13 0;
#X connect 65 0 13 0;
#X connect 67 0 86 0;
#X connect 67 0 68 0;
#X connect 67 0 1 0;
#X connect 67 1 73 0;
#X connect 68 0 69 0;
#X connect 71 0 67 1;
#X connect 72 0 15 0;
#X connect 73 0 74 0;
#X connect 76 0 3 0;
#X connect 77 0 2 0;
#X connect 78 0 99 0;
#X connect 79 0 78 0;
#X connect 81 0 73 0;
#X connect 82 0 68 0;
#X connect 83 0 13 0;
#X connect 84 0 7 0;
#X connect 86 0 101 0;
#X connect 86 0 103 0;
#X connect 87 0 13 0;
#X connect 88 0 7 0;
#X connect 89 0 7 0;
#X connect 90 0 7 0;
#X connect 91 0 3 1;
#X connect 92 0 4 1;
#X connect 93 0 53 0;
#X connect 94 0 85 0;
#X connect 95 0 55 0;
#X connect 96 0 57 0;
#X connect 97 0 59 0;
#X connect 98 0 61 0;
#X connect 99 0 80 0;
#X connect 100 0 13 0;
#X connect 102 0 104 0;
#X connect 104 0 105 0;
#X connect 108 0 15 0;
#X connect 109 0 52 0;
#X connect 110 0 52 0;
#X connect 111 0 52 0;
#X connect 112 0 52 0;
#X connect 113 0 7 0;
#X connect 115 0 114 0;
#X connect 117 0 40 0;
#X connect 118 0 43 0;
#X connect 119 0 30 0;
#X connect 127 0 43 0;
#X connect 128 0 7 0;
#X connect 129 0 30 0;