view scene demo/Draft2Aeolian/testBedD5.pd @ 303:8b51c20529a6

Edgetone development models
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 11 Nov 2017 17:43:39 +0000
parents 451337700704
children
line wrap: on
line source
#N canvas 248 74 1148 792 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 3584 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 text 434 29 Diameter;
#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 -274 -89 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 2005 1;
#X floatatom 331 103 8 0 0 0 - - -;
#X msg 215 67 4;
#X text -8 353 No Of Sources;
#X text 441 68 Length;
#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 text 461 128 Obs Distance;
#X obj 378 360 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 415 389 5 0 0 0 - - -;
#X obj 460 334 r SET_UP;
#X obj 391 420 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 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 113 343 0;
#X msg 93 397 0;
#X msg 74 450 0;
#X text 541 415 Source Rotation Y;
#X text 557 468 Source Rotation Z;
#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 61 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 text 489 240 Obs Elevation;
#X text 476 184 Obs Azimuth;
#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 -345 -23 snapshot~;
#X floatatom -345 4 10 0 0 0 - - -;
#X text -348 22 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 text 519 351 Source Rotation X;
#X msg 199 110 4;
#X obj -264 -23 snapshot~;
#X floatatom -264 4 10 0 0 0 - - -;
#X text -267 22 Wind Direction;
#X obj -163 -32 WindGenD1;
#X msg -2 -69 20;
#X obj -145 -135 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X obj -145 -160 loadbang;
#X obj -145 -89 s myMet;
#X obj -264 -46 r myMet;
#X obj -345 -46 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 -145 -113 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 411 -27 0.001;
#X msg 348 -16 0.006;
#X obj -150 263 sig~;
#X msg -114 247 16.6;
#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 2 -15 1e+07;
#X msg -372 215 28 0.04 7 6 35 1e+07;
#X obj 293 577 freqCalcCyl3No_D3Mach;
#X msg 199 497 200;
#X obj 199 531 vd~ varwind;
#X connect 0 0 30 0;
#X connect 2 0 58 0;
#X connect 2 0 102 0;
#X connect 2 0 103 0;
#X connect 3 0 4 0;
#X connect 4 0 77 0;
#X connect 5 0 6 0;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 7 0 128 1;
#X connect 9 0 10 0;
#X connect 9 0 128 6;
#X connect 12 0 13 0;
#X connect 12 0 128 4;
#X connect 14 0 15 0;
#X connect 14 0 76 0;
#X connect 14 0 128 5;
#X connect 16 0 17 0;
#X connect 16 0 128 3;
#X connect 22 0 24 0;
#X connect 23 0 19 0;
#X connect 23 1 20 0;
#X connect 24 0 25 0;
#X connect 25 0 23 0;
#X connect 25 0 71 0;
#X connect 27 0 36 0;
#X connect 28 0 12 0;
#X connect 29 0 9 0;
#X connect 30 0 59 0;
#X connect 30 0 95 0;
#X connect 30 0 83 0;
#X connect 30 0 28 0;
#X connect 30 0 94 0;
#X connect 30 0 29 0;
#X connect 30 0 33 0;
#X connect 30 0 53 0;
#X connect 30 0 54 0;
#X connect 30 0 55 0;
#X connect 30 0 129 0;
#X connect 31 0 32 0;
#X connect 31 0 128 2;
#X connect 33 0 31 0;
#X connect 37 0 7 0;
#X connect 38 0 31 0;
#X connect 39 0 16 0;
#X connect 40 0 12 0;
#X connect 41 0 14 0;
#X connect 42 0 9 0;
#X connect 44 0 45 0;
#X connect 44 0 128 7;
#X connect 46 0 44 0;
#X connect 47 0 48 0;
#X connect 47 0 128 8;
#X connect 49 0 47 0;
#X connect 50 0 51 0;
#X connect 50 0 128 9;
#X connect 52 0 50 0;
#X connect 53 0 44 0;
#X connect 54 0 47 0;
#X connect 55 0 50 0;
#X connect 60 0 109 0;
#X connect 60 1 108 0;
#X connect 60 2 107 0;
#X connect 60 3 106 0;
#X connect 60 4 105 0;
#X connect 60 5 104 0;
#X connect 62 0 25 0;
#X connect 64 0 16 0;
#X connect 66 0 31 0;
#X connect 68 0 7 0;
#X connect 70 0 2 0;
#X connect 72 0 14 0;
#X connect 75 0 14 0;
#X connect 77 0 97 0;
#X connect 77 0 78 0;
#X connect 77 0 1 0;
#X connect 77 1 84 0;
#X connect 78 0 79 0;
#X connect 81 0 77 1;
#X connect 83 0 16 0;
#X connect 84 0 85 0;
#X connect 87 0 3 0;
#X connect 88 0 2 0;
#X connect 89 0 110 0;
#X connect 90 0 89 0;
#X connect 92 0 84 0;
#X connect 93 0 78 0;
#X connect 94 0 14 0;
#X connect 95 0 7 0;
#X connect 97 0 112 0;
#X connect 97 0 114 0;
#X connect 98 0 14 0;
#X connect 99 0 7 0;
#X connect 100 0 7 0;
#X connect 101 0 7 0;
#X connect 102 0 3 1;
#X connect 103 0 4 1;
#X connect 104 0 61 0;
#X connect 105 0 96 0;
#X connect 106 0 63 0;
#X connect 107 0 65 0;
#X connect 108 0 67 0;
#X connect 109 0 69 0;
#X connect 110 0 91 0;
#X connect 111 0 14 0;
#X connect 113 0 115 0;
#X connect 115 0 116 0;
#X connect 115 0 128 10;
#X connect 119 0 16 0;
#X connect 120 0 7 0;
#X connect 121 0 7 0;
#X connect 123 0 122 0;
#X connect 124 0 60 0;
#X connect 125 0 60 0;
#X connect 126 0 60 0;
#X connect 127 0 60 0;
#X connect 129 0 130 0;
#X connect 130 0 128 0;