view scene demo/testTone/testBed1.pd @ 303:8b51c20529a6

Edgetone development models
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 11 Nov 2017 17:43:39 +0000
parents b4dab96df4eb
children
line wrap: on
line source
#N canvas 169 34 1176 838 10;
#X obj 167 -82 loadbang;
#X obj -268 138 delwrite~ varwind 3000;
#X obj -159 -139 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 423 1;
#X obj -225 -24 snapshot~;
#X floatatom -225 3 10 0 0 0 - - -;
#X obj -268 -95 *~ 1;
#X obj -268 -69 +~ 1;
#X text -228 21 Wind Speed;
#X obj -106 -190 loadbang;
#X msg -106 -162 5;
#X obj 215 10 hsl 128 15 0.001 0.3 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 7202 1;
#X floatatom 223 34 8 0 0 0 - - -;
#X obj 273 284 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6999 1;
#X floatatom 300 313 5 0 0 0 - - -;
#X text 350 11 Diameter;
#X obj 249 166 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6350 1;
#X floatatom 270 195 5 0 0 0 - - -;
#X obj 261 221 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 285 250 5 0 0 0 - - -;
#X obj 236 109 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
-1 -1 8877 1;
#X floatatom 247 138 5 0 0 0 - - -;
#X text 414 285 Pan Value;
#X obj -271 425 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj -208 425 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text -211 334 Gain;
#X obj -256 277 loadbang;
#N canvas 865 368 416 344 opLevels 0;
#X obj 74 188 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 obj 74 143 /~ 15;
#X obj 95 165 /~ 15;
#X obj 196 132 inlet;
#X obj 215 208 /~ 2;
#X obj 227 184 +~;
#X obj 215 254 outlet~;
#X obj 93 68 / 100;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 11 0;
#X connect 4 0 5 0;
#X connect 4 0 10 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 16 0;
#X connect 10 0 0 0;
#X connect 10 0 14 0;
#X connect 11 0 0 1;
#X connect 11 0 14 1;
#X connect 12 0 10 1;
#X connect 12 0 11 1;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 16 0 3 1;
#X connect 16 0 4 1;
#X restore -272 382 pd opLevels;
#X msg -256 300 5;
#X obj -269 353 hsl 100 25 0.1 10000 0 0 empty empty empty -2 -8 0
10 -262144 -1 -1 5 1;
#X obj -7 -21 snapshot~;
#X obj 522 -100 metro 100;
#X floatatom -7 6 10 0 0 0 - - -;
#X obj 522 -147 loadbang;
#X obj 522 -124 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X text -10 24 Mach No;
#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.21;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X restore 64 -121 pd machCalc;
#X obj 340 -139 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X floatatom 197 573 8 0 0 0 - - -;
#X msg 96 149 0;
#X msg 53 267 0.5;
#X obj 167 -58 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 224 66 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 4233 1;
#X floatatom 245 85 8 0 0 0 - - -;
#X msg 133 49 4;
#X obj -152 356 hsl 100 25 1 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -155 310 loadbang;
#X text -90 335 No Of Sources;
#X text 356 50 Length;
#X obj -146 2 s WSPEED;
#X obj -92 -60 r~ MY_MACH;
#X obj -74 8 s SIG_MACH;
#X obj 340 -98 s SET_UP;
#X obj 214 -11 r SET_UP;
#X obj 283 44 r SET_UP;
#X obj 350 83 r SET_UP;
#X obj 337 135 r SET_UP;
#X obj 343 195 r SET_UP;
#X obj 350 253 r SET_UP;
#X text 374 110 Obs Distance;
#X obj 286 342 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 320 371 5 0 0 0 - - -;
#X obj 368 316 r SET_UP;
#X obj 298 396 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 313 423 5 0 0 0 - - -;
#X obj 380 370 r SET_UP;
#X obj 310 449 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
-262144 -1 -1 6350 1;
#X floatatom 321 471 5 0 0 0 - - -;
#X obj 392 423 r SET_UP;
#X msg 31 325 0;
#X msg 11 379 0;
#X msg -8 432 0;
#X text 437 397 Source Rotation Y;
#X text 449 450 Source Rotation Z;
#X msg 171 165 -45;
#X msg 134 232 5;
#X msg 294 -20 0.01;
#X floatatom -109 -110 5 0 0 0 - - -;
#X msg 199 -39 0;
#X obj -263 258 r GAIN;
#X obj 416 83 r DIST;
#X obj 397 43 r LEN;
#X obj 394 -22 r DIA;
#X obj -162 -163 r SPEED;
#X msg -272 239 0;
#X msg -155 333 1;
#X floatatom -309 384 5 0 0 0 - - -;
#X msg 154 -7 0.0254;
#X floatatom 326 571 12 0 0 0 - - -;
#X text 166 595 Fundamental Freq;
#X text 320 595 Reynolds No.;
#X msg 125 188 90;
#X obj 337 499 hsl 128 15 0 0.5 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 405 470 r SET_UP;
#X text 476 500 Turbulence Intensity;
#X floatatom 345 546 5 0 0 0 - - -;
#X msg -28 485 0;
#X msg 254 -34 1;
#X text 400 222 Obs Elevation;
#X text 388 166 Obs Azimuth;
#X obj 407 191 r ELEV;
#X obj 440 243 s elev;
#N canvas 634 290 564 444 windDirection 0;
#X text 123 343 Patch that adds in the effect of changing wind direction
;
#X obj 203 20 inlet~;
#X obj 300 72 inlet;
#X obj 300 106 sig~;
#X obj 371 73 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 354 117 5 0 0 0 - - -;
#X obj 205 271 *~;
#X obj 205 322 outlet~;
#X obj 266 274 outlet~;
#X obj 220 215 cos~;
#X obj 220 155 +~;
#X obj 220 91 lop~ 1;
#X obj 266 214 *~ 360;
#X obj 220 111 lop~ 1;
#X obj 220 50 noise~;
#X obj 220 71 lop~ 1;
#X obj 220 177 /~ 360;
#X obj 220 133 *~ 800;
#X obj 220 241 abs~;
#X obj 205 298 max~ 0;
#X connect 1 0 6 0;
#X connect 2 0 3 0;
#X connect 3 0 10 1;
#X connect 4 0 5 0;
#X connect 6 0 19 0;
#X connect 9 0 18 0;
#X connect 10 0 16 0;
#X connect 11 0 13 0;
#X connect 12 0 8 0;
#X connect 13 0 17 0;
#X connect 14 0 15 0;
#X connect 15 0 11 0;
#X connect 16 0 9 0;
#X connect 16 0 12 0;
#X connect 17 0 10 0;
#X connect 18 0 6 1;
#X connect 19 0 7 0;
#X restore -268 72 pd windDirection;
#X obj -115 117 snapshot~;
#X floatatom -115 144 10 0 0 0 - - -;
#X text -118 162 Wind Speed;
#X obj -253 45 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6350 1;
#X msg -257 25 0;
#X text 425 343 Source Rotation X;
#X msg 117 92 4;
#X msg 76 204 0;
#X obj -282 -2 loadbang;
#X obj -337 -96 s \$0-blust;
#X obj 319 519 +;
#X obj 402 519 r \$0-blust;
#X obj 392 547 hsl 128 15 0 0.5 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -162 -116 * 0.75;
#X obj -34 117 snapshot~;
#X floatatom -34 144 10 0 0 0 - - -;
#X text -37 162 Wind Direction;
#X msg 341 -20 0.0039;
#X obj 197 548 freqCalcCyl31No_D1Mach;
#X obj -319 -126 WindGenD11;
#X obj 522 -75 s myMet;
#X obj -7 -45 r myMet;
#X obj -34 90 r myMet;
#X obj -116 92 r myMet;
#X obj -224 -50 r myMet;
#X connect 0 0 40 0;
#X connect 2 0 5 1;
#X connect 2 0 76 0;
#X connect 2 0 115 0;
#X connect 3 0 4 0;
#X connect 3 0 48 0;
#X connect 5 0 6 0;
#X connect 6 0 3 0;
#X connect 6 0 101 0;
#X connect 8 0 9 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 10 0 120 1;
#X connect 12 0 13 0;
#X connect 12 0 120 6;
#X connect 15 0 16 0;
#X connect 15 0 120 4;
#X connect 17 0 18 0;
#X connect 17 0 100 0;
#X connect 17 0 120 5;
#X connect 19 0 20 0;
#X connect 19 0 120 3;
#X connect 25 0 27 0;
#X connect 26 0 22 0;
#X connect 26 1 23 0;
#X connect 27 0 28 0;
#X connect 28 0 26 0;
#X connect 28 0 85 0;
#X connect 29 0 31 0;
#X connect 29 0 50 0;
#X connect 30 0 122 0;
#X connect 32 0 33 0;
#X connect 33 0 30 0;
#X connect 36 0 51 0;
#X connect 38 0 15 0;
#X connect 39 0 12 0;
#X connect 40 0 77 0;
#X connect 40 0 86 0;
#X connect 40 0 108 0;
#X connect 40 0 38 0;
#X connect 40 0 109 0;
#X connect 40 0 39 0;
#X connect 40 0 43 0;
#X connect 40 0 68 0;
#X connect 40 0 69 0;
#X connect 40 0 70 0;
#X connect 40 0 95 0;
#X connect 41 0 42 0;
#X connect 41 0 120 2;
#X connect 43 0 41 0;
#X connect 44 0 26 1;
#X connect 45 0 84 0;
#X connect 49 0 29 0;
#X connect 52 0 10 0;
#X connect 53 0 41 0;
#X connect 54 0 19 0;
#X connect 55 0 15 0;
#X connect 56 0 17 0;
#X connect 57 0 12 0;
#X connect 59 0 60 0;
#X connect 59 0 120 7;
#X connect 61 0 59 0;
#X connect 62 0 63 0;
#X connect 62 0 120 8;
#X connect 64 0 62 0;
#X connect 65 0 66 0;
#X connect 65 0 120 9;
#X connect 67 0 65 0;
#X connect 68 0 59 0;
#X connect 69 0 62 0;
#X connect 70 0 65 0;
#X connect 73 0 17 0;
#X connect 74 0 17 0;
#X connect 75 0 10 0;
#X connect 77 0 120 0;
#X connect 78 0 28 0;
#X connect 79 0 19 0;
#X connect 80 0 41 0;
#X connect 81 0 10 0;
#X connect 82 0 2 0;
#X connect 83 0 28 0;
#X connect 84 0 44 0;
#X connect 86 0 10 0;
#X connect 90 0 17 0;
#X connect 91 0 112 1;
#X connect 92 0 91 0;
#X connect 95 0 91 0;
#X connect 96 0 120 1;
#X connect 99 0 17 0;
#X connect 101 0 1 0;
#X connect 101 0 102 0;
#X connect 101 1 116 0;
#X connect 102 0 103 0;
#X connect 105 0 101 1;
#X connect 106 0 105 0;
#X connect 108 0 19 0;
#X connect 109 0 17 0;
#X connect 110 0 106 0;
#X connect 112 0 94 0;
#X connect 112 0 114 0;
#X connect 112 0 120 10;
#X connect 113 0 112 0;
#X connect 115 0 6 1;
#X connect 116 0 117 0;
#X connect 119 0 10 0;
#X connect 120 0 37 0;
#X connect 120 1 87 0;
#X connect 121 0 111 0;
#X connect 121 1 5 0;
#X connect 123 0 29 0;
#X connect 124 0 116 0;
#X connect 125 0 102 0;
#X connect 126 0 3 0;