view scene demo/Draft2Aeolian/testBedD6.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 169 58 1119 756 10;
#X obj -154 215 delwrite~ varwind 3000;
#X obj -44 -36 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1693 1;
#X obj -153 8 *~ 1;
#X obj -153 34 +~ 1;
#X obj 45 -80 loadbang;
#X msg 45 -60 5;
#X obj -179 453 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj -116 453 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text -119 362 Gain;
#X obj -171 333 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 -180 410 pd opLevels;
#X msg -171 356 5;
#X obj -177 381 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0
10 -262144 -1 -1 7900 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 -264 -79 pd machCalc;
#X obj 140 -114 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X obj 140 -47 s SET_UP;
#X floatatom -6 -13 5 0 0 0 - - -;
#X obj -390 258 unpack f f f f f f;
#X obj -285 304 s GAIN;
#X obj -180 310 r GAIN;
#X obj -327 390 s DIST;
#X obj -348 432 s LEN;
#X obj -369 471 s DIA;
#X obj -390 509 s SPEED;
#X obj -47 -60 r SPEED;
#X floatatom -237 411 8 0 0 0 - - -;
#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 -154 113 pd windDirection;
#X obj -335 -13 snapshot~;
#X floatatom -335 14 10 0 0 0 - - -;
#X text -338 32 Wind Speed;
#X obj -58 88 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -254 -13 snapshot~;
#X floatatom -254 14 10 0 0 0 - - -;
#X text -257 32 Wind Direction;
#X obj -153 -22 WindGenD1;
#X msg 8 -59 20;
#X obj -135 -125 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X obj -135 -150 loadbang;
#X obj -135 -79 s myMet;
#X obj -254 -36 r myMet;
#X obj -335 -36 r myMet;
#X obj -306 348 s ELEV;
#X obj -140 144 TUCalc2;
#X obj -84 -13 * 0.5;
#X obj -47 -13 * 0.88;
#X obj -285 285 line \$1 50;
#X obj -306 326 line \$1 50;
#X obj -327 368 line \$1 50;
#X obj -348 411 line \$1 50;
#X obj -369 452 line \$1 50;
#X obj -390 490 line \$1 50;
#X obj -135 -103 metro 100;
#X obj -140 168 s blust;
#X floatatom -89 166 0 0 0 0 - - -;
#X obj -140 273 sig~;
#X msg -104 257 16.6;
#X msg -390 140 23 0.006 5 4 85 1e+07;
#X msg -381 164 24 0.01 15 6 77 1e+07;
#X msg -369 192 17 0.0015 10 2 -15 1e+07;
#X msg -362 225 28 0.04 7 6 35 1e+07;
#X obj 60 291 unpack f f f f f f;
#X obj 165 337 s GAIN;
#X obj 59 545 s SPEED;
#X obj 165 318 line \$1 50;
#X obj 144 359 line \$1 50;
#X obj 122 404 line \$1 50;
#X obj 101 447 line \$1 50;
#X obj 80 488 line \$1 50;
#X obj 59 526 line \$1 50;
#X msg 60 173 23 0.006 5 4 85 1e+07;
#X msg 69 197 24 0.01 15 6 77 1e+07;
#X msg 81 225 17 0.0015 10 2 -15 1e+07;
#X msg 88 258 28 0.04 7 6 35 1e+07;
#X obj 144 381 s ELEV2;
#X obj 122 426 s DIST2;
#X obj 101 468 s LEN2;
#X obj 80 507 s DIA2;
#X obj 140 -72 uzi 20;
#X msg 250 -110 0.009 2 4 45 0 0.2 200;
#N canvas 437 135 988 799 oneTone 0;
#X obj 266 -14 loadbang;
#X obj 313 76 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 8214 1;
#X floatatom 320 102 8 0 0 0 - - -;
#X obj 381 352 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 10238 1;
#X floatatom 411 381 5 0 0 0 - - -;
#X text 451 79 Diameter;
#X obj 354 234 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 7408 1;
#X floatatom 382 263 5 0 0 0 - - -;
#X obj 367 289 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 7937 1;
#X floatatom 397 318 5 0 0 0 - - -;
#X obj 340 177 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
-1 -1 7759 1;
#X floatatom 356 206 5 0 0 0 - - -;
#X text 529 353 Pan Value;
#X msg 195 217 0;
#X msg 152 335 0.5;
#X obj 266 10 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 326 134 hsl 128 15 1 20 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4011 1;
#X floatatom 348 153 8 0 0 0 - - -;
#X msg 232 117 4;
#X text 458 118 Length;
#X obj 311 57 r SET_UP;
#X obj 381 112 r SET_UP;
#X obj 415 154 r SET_UP;
#X obj 439 203 r SET_UP;
#X obj 449 263 r SET_UP;
#X obj 455 321 r SET_UP;
#X text 478 178 Obs Distance;
#X obj 395 410 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 432 439 5 0 0 0 - - -;
#X obj 477 384 r SET_UP;
#X obj 408 470 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 427 497 5 0 0 0 - - -;
#X obj 501 438 r SET_UP;
#X obj 422 522 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 433 544 5 0 0 0 - - -;
#X obj 517 491 r SET_UP;
#X msg 130 393 0;
#X msg 110 447 0;
#X msg 91 500 0;
#X text 558 465 Source Rotation Y;
#X text 574 518 Source Rotation Z;
#X msg 298 29 0;
#X text 506 290 Obs Elevation;
#X text 493 234 Obs Azimuth;
#X text 536 401 Source Rotation X;
#X msg 216 160 4;
#X msg 175 272 45;
#X msg 253 61 0.005;
#X obj 433 576 r blust;
#X obj 433 599 * 100;
#X floatatom 451 628 0 0 0 0 - - -;
#X text 481 598 Free Stream Turbulence Intensity (%);
#X obj 491 556 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 310 627 freqCalcCyl3No_D3Mach;
#X msg 216 547 200;
#X obj 216 581 vd~ varwind;
#X obj 742 -5 inlet;
#X obj 407 42 r \$0-sourceDia;
#X obj 742 169 s \$0-sourceDia;
#X obj 761 146 s \$0-sourceLen;
#X obj 453 99 r \$0-sourceLen;
#X obj 513 259 r \$0-sourecElev;
#X obj 527 323 r \$0-sourecPan;
#X obj 470 154 r \$0-sourceDis;
#X obj 781 124 s \$0-sourceDis;
#X obj 800 103 s \$0-sourceElev;
#X obj 839 62 s \$0-sourecPan;
#X obj 506 210 r \$0-sourecAzim;
#X obj 820 82 s \$0-sourecAzim;
#X obj 119 547 r \$0-soureceDel;
#X obj 742 17 unpack f f f f f f f;
#X obj 859 40 s \$0-soureceDel;
#X floatatom 119 581 0 0 0 0 - - -;
#X connect 0 0 15 0;
#X connect 1 0 2 0;
#X connect 1 0 53 1;
#X connect 3 0 4 0;
#X connect 3 0 53 6;
#X connect 6 0 7 0;
#X connect 6 0 53 4;
#X connect 8 0 9 0;
#X connect 8 0 53 5;
#X connect 10 0 11 0;
#X connect 10 0 53 3;
#X connect 13 0 6 0;
#X connect 14 0 3 0;
#X connect 15 0 41 0;
#X connect 15 0 47 0;
#X connect 15 0 45 0;
#X connect 15 0 13 0;
#X connect 15 0 46 0;
#X connect 15 0 14 0;
#X connect 15 0 18 0;
#X connect 15 0 36 0;
#X connect 15 0 37 0;
#X connect 15 0 38 0;
#X connect 15 0 54 0;
#X connect 16 0 17 0;
#X connect 16 0 53 2;
#X connect 18 0 16 0;
#X connect 20 0 1 0;
#X connect 21 0 16 0;
#X connect 22 0 10 0;
#X connect 23 0 6 0;
#X connect 24 0 8 0;
#X connect 25 0 3 0;
#X connect 27 0 28 0;
#X connect 27 0 53 7;
#X connect 29 0 27 0;
#X connect 30 0 31 0;
#X connect 30 0 53 8;
#X connect 32 0 30 0;
#X connect 33 0 34 0;
#X connect 33 0 53 9;
#X connect 35 0 33 0;
#X connect 36 0 27 0;
#X connect 37 0 30 0;
#X connect 38 0 33 0;
#X connect 45 0 10 0;
#X connect 46 0 8 0;
#X connect 47 0 1 0;
#X connect 48 0 49 0;
#X connect 49 0 50 0;
#X connect 49 0 53 10;
#X connect 54 0 55 0;
#X connect 55 0 53 0;
#X connect 56 0 70 0;
#X connect 57 0 1 0;
#X connect 60 0 16 0;
#X connect 61 0 8 0;
#X connect 62 0 3 0;
#X connect 63 0 10 0;
#X connect 67 0 6 0;
#X connect 69 0 55 0;
#X connect 69 0 72 0;
#X connect 70 0 58 0;
#X connect 70 1 59 0;
#X connect 70 2 64 0;
#X connect 70 3 65 0;
#X connect 70 4 68 0;
#X connect 70 5 66 0;
#X connect 70 6 71 0;
#X restore 423 -50 pd oneTone;
#X msg 423 -75 0.04 7 6 35 15 0.8 1000;
#X obj 250 -85 oneTone;
#X connect 1 0 16 0;
#X connect 1 0 43 0;
#X connect 1 0 44 0;
#X connect 2 0 3 0;
#X connect 3 0 26 0;
#X connect 4 0 5 0;
#X connect 5 0 1 0;
#X connect 9 0 11 0;
#X connect 10 0 6 0;
#X connect 10 1 7 0;
#X connect 11 0 12 0;
#X connect 12 0 10 0;
#X connect 12 0 25 0;
#X connect 14 0 77 0;
#X connect 17 0 50 0;
#X connect 17 1 49 0;
#X connect 17 2 48 0;
#X connect 17 3 47 0;
#X connect 17 4 46 0;
#X connect 17 5 45 0;
#X connect 19 0 12 0;
#X connect 24 0 1 0;
#X connect 26 0 42 0;
#X connect 26 0 27 0;
#X connect 26 0 0 0;
#X connect 26 1 31 0;
#X connect 27 0 28 0;
#X connect 30 0 26 1;
#X connect 31 0 32 0;
#X connect 34 0 2 0;
#X connect 35 0 1 0;
#X connect 36 0 51 0;
#X connect 37 0 36 0;
#X connect 39 0 31 0;
#X connect 40 0 27 0;
#X connect 42 0 52 0;
#X connect 42 0 53 0;
#X connect 43 0 2 1;
#X connect 44 0 3 1;
#X connect 45 0 18 0;
#X connect 46 0 41 0;
#X connect 47 0 20 0;
#X connect 48 0 21 0;
#X connect 49 0 22 0;
#X connect 50 0 23 0;
#X connect 51 0 38 0;
#X connect 55 0 54 0;
#X connect 56 0 17 0;
#X connect 57 0 17 0;
#X connect 58 0 17 0;
#X connect 59 0 17 0;
#X connect 60 0 68 0;
#X connect 60 1 67 0;
#X connect 60 2 66 0;
#X connect 60 3 65 0;
#X connect 60 4 64 0;
#X connect 60 5 63 0;
#X connect 63 0 61 0;
#X connect 64 0 73 0;
#X connect 65 0 74 0;
#X connect 66 0 75 0;
#X connect 67 0 76 0;
#X connect 68 0 62 0;
#X connect 69 0 60 0;
#X connect 70 0 60 0;
#X connect 71 0 60 0;
#X connect 72 0 60 0;
#X connect 77 0 15 0;
#X connect 78 0 81 0;
#X connect 80 0 79 0;