view June/woosh_D1.pd @ 303:8b51c20529a6

Edgetone development models
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 11 Nov 2017 17:43:39 +0000
parents 71522416a1ed
children
line wrap: on
line source
#N canvas -22 23 1105 841 10;
#X obj 494 -127 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 557 -127 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj 648 -127 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 1200 1;
#X text 677 -108 Gain;
#X obj 648 -191 loadbang;
#N canvas 865 368 284 318 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 186 75 / 127;
#X obj 186 40 inlet;
#X obj 30 239 outlet;
#X obj 129 239 outlet;
#X obj 95 37 r NoOfSources;
#X obj 74 143 /~ 15;
#X obj 95 165 /~ 15;
#X msg 94 111 15;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 13 0;
#X connect 4 0 5 0;
#X connect 4 0 12 0;
#X connect 5 0 9 0;
#X connect 6 0 10 0;
#X connect 7 0 3 1;
#X connect 7 0 4 1;
#X connect 8 0 7 0;
#X connect 12 0 0 0;
#X connect 13 0 0 1;
#X connect 14 0 12 1;
#X connect 14 0 13 1;
#X restore 493 -170 pd opLevels;
#X msg 648 -163 5;
#N canvas 739 151 718 592 source1 0;
#X floatatom 63 122 8 0 0 0 - - -;
#X obj 121 86 * 40;
#X obj 130 122 s windSpeed;
#X obj 390 16 s panVal;
#X obj 390 -5 line;
#X floatatom 353 16 5 0 0 0 - - -;
#X msg 363 -54 1;
#X obj 173 -298 r swipSpeed;
#X obj 173 -271 swap 80;
#X obj 173 -243 /;
#X obj 172 -217 * 150;
#X floatatom 124 -271 5 0 0 0 - - -;
#X obj 142 55 r swipSpeed;
#X obj 121 -28 line;
#X msg 121 -56 1 \$1;
#X obj 124 5 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 157 31 5 0 0 0 - - -;
#X obj 235 -128 * 0.67;
#X obj 170 -132 delay \$1;
#X obj 121 -194 i;
#X obj 170 -103 i;
#X msg 170 -54 0 \$1;
#X floatatom 83 -165 5 0 0 0 - - -;
#X floatatom 215 -55 5 0 0 0 - - -;
#X obj 41 36 s outputS;
#X obj 121 -242 r start;
#X obj 460 -232 +;
#X obj 460 -207 * 0.5;
#X obj 438 -175 i;
#X msg 390 -107 0.5 \$1;
#X msg 492 -41 0 \$1;
#X obj 336 -245 r start;
#X floatatom 464 -176 5 0 0 0 - - -;
#X obj 465 -89 delay;
#X obj 492 -65 i;
#X obj 438 -146 t f b;
#X obj 166 -165 t f b;
#X obj 475 -256 r d2;
#X obj 264 -54 s d2;
#X obj 35 -164 s d1;
#X obj 461 -279 r d1;
#X obj 438 -107 s d3;
#X obj 507 -96 r d3;
#X obj 336 -218 t b b;
#X text 57 145 Effective Windspeed;
#X text 368 40 Pan value;
#X obj 421 -199 s d4;
#X obj 52 -237 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 263 -286 70;
#X connect 1 0 0 0;
#X connect 1 0 2 0;
#X connect 4 0 3 0;
#X connect 4 0 5 0;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 7 0 11 0;
#X connect 8 0 9 0;
#X connect 8 1 9 1;
#X connect 9 0 10 0;
#X connect 10 0 17 0;
#X connect 10 0 19 1;
#X connect 12 0 1 1;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 15 0 1 0;
#X connect 15 0 24 0;
#X connect 17 0 20 1;
#X connect 18 0 20 0;
#X connect 19 0 14 0;
#X connect 19 0 22 0;
#X connect 19 0 36 0;
#X connect 19 0 39 0;
#X connect 20 0 23 0;
#X connect 20 0 21 0;
#X connect 20 0 38 0;
#X connect 21 0 13 0;
#X connect 25 0 19 0;
#X connect 26 0 27 0;
#X connect 26 0 46 0;
#X connect 27 0 28 1;
#X connect 27 0 32 0;
#X connect 28 0 35 0;
#X connect 29 0 4 0;
#X connect 30 0 4 0;
#X connect 31 0 43 0;
#X connect 33 0 34 0;
#X connect 34 0 30 0;
#X connect 35 0 29 0;
#X connect 35 0 33 1;
#X connect 35 0 41 0;
#X connect 35 1 33 0;
#X connect 36 0 18 1;
#X connect 36 1 18 0;
#X connect 37 0 26 1;
#X connect 40 0 26 0;
#X connect 42 0 34 1;
#X connect 43 0 28 0;
#X connect 43 1 6 0;
#X connect 47 0 19 0;
#X connect 48 0 8 0;
#X restore 874 -151 pd source1;
#N canvas 12 52 684 554 speedCalc 0;
#X obj 69 26 inlet;
#X obj 145 27 inlet;
#X obj 227 25 inlet;
#X obj 341 23 inlet;
#X obj 69 49 s \$0_swLen;
#X obj 145 49 s \$0_armLen;
#X obj 341 45 s \$0_tipSpeed;
#X obj 141 301 r \$0_tipSpeed;
#X obj 211 437 outlet;
#X obj 211 414 r \$0_minSpeed;
#X obj 126 349 s \$0_minSpeed;
#X obj 310 414 r \$0_deltaSpeed;
#X obj 388 261 s \$0_deltaSpeed;
#X obj 310 437 outlet;
#X obj 84 100 r \$0_swLen;
#X obj 126 280 /;
#X msg 307 20 80;
#X floatatom 80 307 5 0 0 0 - - -;
#X obj 173 -35 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 99 123 r \$0_armLen;
#X obj 84 205 +;
#X obj 99 152 t f b;
#X floatatom 40 240 5 0 0 0 - - -;
#X obj 126 207 r \$0_armLen;
#X obj 126 231 t f b;
#X obj 126 177 delay 6;
#X obj 153 256 delay 9;
#X msg 21 27 1;
#X obj 227 48 s \$0_sourceTot;
#X obj 421 202 r \$0_sourceTot;
#X obj 126 325 *;
#X floatatom 84 349 5 0 0 0 - - -;
#X obj 512 119 r \$0_minSpeed;
#X obj 388 202 -;
#X obj 388 158 r \$0_tipSpeed;
#X obj 388 232 /;
#X obj 512 145 t f b;
#X floatatom 343 261 5 0 0 0 - - -;
#X obj 539 170 delay 14;
#X msg 199 23 100;
#X msg 111 23 0.5;
#X connect 0 0 4 0;
#X connect 1 0 5 0;
#X connect 2 0 28 0;
#X connect 3 0 6 0;
#X connect 7 0 30 1;
#X connect 9 0 8 0;
#X connect 11 0 13 0;
#X connect 14 0 20 0;
#X connect 15 0 17 0;
#X connect 15 0 30 0;
#X connect 16 0 6 0;
#X connect 18 0 27 0;
#X connect 18 0 40 0;
#X connect 18 0 39 0;
#X connect 18 0 16 0;
#X connect 19 0 21 0;
#X connect 20 0 22 0;
#X connect 20 0 15 1;
#X connect 21 0 20 1;
#X connect 21 1 25 0;
#X connect 23 0 24 0;
#X connect 24 0 15 0;
#X connect 24 1 26 0;
#X connect 25 0 20 0;
#X connect 26 0 15 0;
#X connect 27 0 4 0;
#X connect 29 0 35 1;
#X connect 30 0 10 0;
#X connect 30 0 31 0;
#X connect 32 0 36 0;
#X connect 33 0 35 0;
#X connect 34 0 33 0;
#X connect 35 0 37 0;
#X connect 35 0 12 0;
#X connect 36 0 33 1;
#X connect 36 1 38 0;
#X connect 38 0 33 0;
#X connect 39 0 28 0;
#X connect 40 0 5 0;
#X restore 242 41 pd speedCalc;
#X floatatom 151 65 8 0 0 0 - - -;
#X floatatom 407 64 8 0 0 0 - - -;
#X msg 29 -88 1;
#X msg 24 105 100;
#X msg 26 12 0.59;
#X obj 242 -54 r bladeLen;
#X obj 265 -31 r armLength;
#X obj 288 -7 r NoOfSources;
#X obj 311 18 r topSpeed;
#X obj 29 -41 s bladeLen;
#X obj 27 57 s armLength;
#X obj 21 150 s NoOfSources;
#X obj 75 219 s topSpeed;
#X msg 60 -88 1.2;
#X msg 91 -88 1.5;
#X msg 56 105 50;
#X msg 89 105 120;
#X obj 23 193 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 5300 1;
#X floatatom 20 219 8 0 0 0 - - -;
#X obj -7 -112 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 14 -64 f;
#X obj 11 33 f;
#X obj 9 126 f;
#X floatatom -16 152 5 0 0 0 - - -;
#X floatatom -14 58 5 0 0 0 - - -;
#X floatatom -14 -41 5 0 0 0 - - -;
#X obj -7 -158 r topSpeed;
#X obj -7 -135 t b;
#X text 26 -111 Blade Length;
#X text 25 -5 Arm Length;
#X text 22 86 Number of Sources;
#X text 19 173 Top Speed;
#X obj 22 269 hsl 100 20 0 270 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 9100 1;
#X floatatom 19 301 8 0 0 0 - - -;
#X obj 74 300 s sweepAngle;
#X text 17 250 Sweep Angle;
#N canvas 76 279 490 446 distanceCalc 0;
#X obj 266 13 inlet;
#X floatatom 200 168 5 0 0 0 - - -;
#X obj 80 13 inlet;
#X obj 170 13 inlet;
#X obj 82 142 +;
#X obj 151 168 / 360;
#X floatatom 29 164 5 0 0 0 - - -;
#X obj 82 167 * 3.14159;
#X obj 82 215 *;
#X floatatom 22 239 8 0 0 0 - - -;
#X obj 82 191 * 2;
#X obj 80 36 s \$0_bladeLen;
#X obj 170 36 s \$0_armLength;
#X obj 266 36 s \$0_sweepAngle;
#X obj 82 95 r \$0_bladeLen;
#X obj 97 119 r \$0_armLength;
#X obj 151 144 r \$0_sweepAngle;
#X floatatom 411 184 5 0 0 0 - - -;
#X obj 362 184 / 360;
#X floatatom 305 160 5 0 0 0 - - -;
#X obj 293 183 * 3.14159;
#X obj 293 231 *;
#X floatatom 237 259 8 0 0 0 - - -;
#X obj 293 207 * 2;
#X obj 293 135 r \$0_armLength;
#X obj 362 160 r \$0_sweepAngle;
#X obj 293 259 s \$0_minCirc;
#X obj 98 365 r \$0_minCirc;
#X obj 98 387 outlet;
#X obj 111 217 r \$0_minCirc;
#X floatatom 22 271 8 0 0 0 - - -;
#X obj 82 239 -;
#X obj 82 275 /;
#X obj 112 251 r NoOfSources;
#X floatatom 19 302 8 0 0 0 - - -;
#X obj 82 301 s \$0_deltaCirc;
#X obj 187 365 r \$0_deltaCirc;
#X obj 187 387 outlet;
#X connect 0 0 13 0;
#X connect 2 0 11 0;
#X connect 3 0 12 0;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 5 0 8 1;
#X connect 7 0 10 0;
#X connect 8 0 9 0;
#X connect 8 0 31 0;
#X connect 10 0 8 0;
#X connect 14 0 4 0;
#X connect 15 0 4 1;
#X connect 16 0 5 0;
#X connect 16 0 1 0;
#X connect 18 0 21 1;
#X connect 20 0 23 0;
#X connect 21 0 22 0;
#X connect 21 0 26 0;
#X connect 23 0 21 0;
#X connect 24 0 20 0;
#X connect 24 0 19 0;
#X connect 25 0 18 0;
#X connect 25 0 17 0;
#X connect 27 0 28 0;
#X connect 29 0 31 1;
#X connect 31 0 30 0;
#X connect 31 0 32 0;
#X connect 32 0 34 0;
#X connect 32 0 35 0;
#X connect 33 0 32 1;
#X connect 36 0 37 0;
#X restore 197 -118 pd distanceCalc;
#X obj 284 -142 r sweepAngle;
#X obj 197 -186 r bladeLen;
#X obj 240 -163 r armLength;
#X obj -88 -158 r sweepAngle;
#X obj 197 -92 s firstDist;
#X obj 284 -93 s deltaDist;
#X obj 216 65 s firstSpeed;
#X obj 311 64 s deltaSpeed;
#X floatatom 140 -91 8 0 0 0 - - -;
#X floatatom 365 -93 8 0 0 0 - - -;
#N canvas 236 158 426 423 windspeed 0;
#X obj 3 -19 +~ 1;
#X obj 3 76 +~;
#X obj 3 3 *~ 0.25;
#X obj 19 53 +~;
#X obj 3 98 clip~ 0 1;
#N canvas 548 156 136 193 squall 0;
#X obj 63 20 noise~;
#X obj 63 83 hip~ 0;
#X obj 63 41 lop~ 3;
#X obj 63 62 lop~ 3;
#X obj 0 86 *~;
#X obj 22 130 *~;
#X obj 0 20 max~ 0.4;
#X obj 0 42 -~ 0.4;
#X obj 0 64 *~ 8;
#X obj 63 104 *~ 20;
#X obj 0 0 inlet~;
#X obj 22 154 outlet~;
#X connect 0 0 2 0;
#X connect 1 0 9 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 4 0;
#X connect 8 0 4 1;
#X connect 9 0 5 1;
#X connect 10 0 6 0;
#X restore 77 28 pd squall;
#N canvas 398 157 136 192 gust 0;
#X obj 0 0 noise~;
#X obj 0 63 hip~ 0;
#X obj 0 106 *~;
#X obj 67 44 *~;
#X obj 67 21 +~ 0.5;
#X obj 67 67 -~ 0.125;
#X obj 0 42 lop~ 0.5;
#X obj 0 21 lop~ 0.5;
#X obj 0 84 *~ 50;
#X obj 67 0 inlet~;
#X obj 0 131 outlet~;
#X connect 0 0 7 0;
#X connect 1 0 8 0;
#X connect 2 0 10 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 0 3 1;
#X connect 5 0 2 1;
#X connect 6 0 1 0;
#X connect 7 0 6 0;
#X connect 8 0 2 0;
#X connect 9 0 4 0;
#X restore 18 29 pd gust;
#X obj 3 120 outlet~;
#X obj 3 -41 osc~ 0.01;
#X connect 0 0 2 0;
#X connect 1 0 4 0;
#X connect 2 0 5 0;
#X connect 2 0 6 0;
#X connect 2 0 1 0;
#X connect 3 0 1 1;
#X connect 4 0 7 0;
#X connect 5 0 3 1;
#X connect 6 0 3 0;
#X connect 8 0 0 0;
#X restore 757 -190 pd windspeed;
#X obj 757 -22 delwrite~ varwind 3000;
#X obj 840 -187 hsl 128 15 0 50 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 800 -84 snapshot~;
#X obj 800 -109 metro 100;
#X obj 800 -131 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X floatatom 800 -57 10 0 0 0 - - -;
#X obj 757 -155 *~ 1;
#X obj 757 -129 +~ 1;
#X obj 800 -156 loadbang;
#X text 797 -39 Wind Speed;
#N canvas 57 585 305 180 thickCalc 0;
#X obj 173 86 r NoOfSources;
#X obj 23 16 inlet;
#X obj 26 64 inlet;
#X obj 26 86 s \$0_tipThick;
#X obj 158 62 -;
#X obj 158 111 /;
#X obj 158 134 outlet;
#X obj 23 39 s \$0_hiltThick;
#X floatatom 126 94 5 0 0 0 - - -;
#X obj 173 40 r \$0_tipThick;
#X obj 158 15 r \$0_hiltThick;
#X floatatom 94 136 8 0 0 0 - - -;
#X connect 0 0 5 1;
#X connect 1 0 7 0;
#X connect 2 0 3 0;
#X connect 4 0 5 0;
#X connect 4 0 8 0;
#X connect 5 0 6 0;
#X connect 5 0 11 0;
#X connect 9 0 4 1;
#X connect 10 0 4 0;
#X restore 237 165 pd thickCalc;
#X obj 237 188 s deltaThick;
#X floatatom 182 189 8 0 0 0 - - -;
#X obj 16 359 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 7600 1;
#X obj 16 429 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1000 1;
#X floatatom 13 389 8 0 0 0 - - -;
#X obj 67 388 s hiltThick;
#X floatatom 13 457 8 0 0 0 - - -;
#X obj 71 456 s tipThick;
#X text 12 341 Hilt Thickness;
#X text 13 411 Tip Thickness;
#X obj 237 120 r hiltThick;
#X obj 306 142 r tipThick;
#X obj 414 -198 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 414 -176 s GO;
#X msg 254 238 1;
#X obj 254 303 tenSource;
#X obj 16 503 hsl 100 20 100 1 1 0 empty empty empty -2 -8 0 10 -262144
-1 -1 5000 1;
#X obj 13 571 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 2400 1;
#X floatatom 13 529 8 0 0 0 - - -;
#X obj 72 530 s distance;
#X text 12 481 Distance to Observer;
#X floatatom 10 599 8 0 0 0 - - -;
#X obj 69 600 s angle;
#X text 10 553 Angle to Observer;
#X obj 305 281 r distance;
#X obj 279 255 r angle;
#X obj 371 303 tenSource;
#X obj 422 281 r distance;
#X obj 396 261 r angle;
#X msg 371 238 2;
#X obj 488 301 tenSource;
#X obj 539 279 r distance;
#X obj 513 256 r angle;
#X msg 488 236 3;
#X obj 604 305 tenSource;
#X obj 655 284 r distance;
#X obj 629 260 r angle;
#X msg 604 240 4;
#X obj 723 306 tenSource;
#X obj 774 285 r distance;
#X obj 748 263 r angle;
#X msg 723 241 5;
#X obj 252 410 tenSource;
#X obj 303 389 r distance;
#X obj 277 367 r angle;
#X msg 252 345 6;
#X obj 373 412 tenSource;
#X obj 424 388 r distance;
#X obj 398 367 r angle;
#X msg 373 347 7;
#X obj 489 412 tenSource;
#X obj 540 386 r distance;
#X obj 514 367 r angle;
#X msg 489 347 8;
#X obj 605 412 tenSource;
#X obj 656 389 r distance;
#X obj 630 368 r angle;
#X msg 605 347 9;
#X obj 728 412 tenSource;
#X obj 779 390 r distance;
#X obj 753 369 r angle;
#X msg 728 347 10;
#X obj 509 178 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X connect 2 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 0 0;
#X connect 5 1 1 0;
#X connect 6 0 2 0;
#X connect 8 0 9 0;
#X connect 8 0 52 0;
#X connect 8 1 10 0;
#X connect 8 1 53 0;
#X connect 11 0 29 1;
#X connect 12 0 31 1;
#X connect 13 0 30 1;
#X connect 14 0 8 0;
#X connect 15 0 8 1;
#X connect 16 0 8 2;
#X connect 17 0 8 3;
#X connect 22 0 29 1;
#X connect 23 0 29 1;
#X connect 24 0 31 1;
#X connect 25 0 31 1;
#X connect 26 0 21 0;
#X connect 26 0 27 0;
#X connect 28 0 29 0;
#X connect 28 0 30 0;
#X connect 28 0 31 0;
#X connect 29 0 18 0;
#X connect 29 0 34 0;
#X connect 30 0 19 0;
#X connect 30 0 33 0;
#X connect 31 0 20 0;
#X connect 31 0 32 0;
#X connect 35 0 36 0;
#X connect 36 0 28 0;
#X connect 41 0 42 0;
#X connect 41 0 43 0;
#X connect 45 0 50 0;
#X connect 45 0 54 0;
#X connect 45 1 51 0;
#X connect 45 1 55 0;
#X connect 46 0 45 2;
#X connect 47 0 45 0;
#X connect 48 0 45 1;
#X connect 49 0 36 0;
#X connect 56 0 63 0;
#X connect 58 0 63 1;
#X connect 58 0 64 1;
#X connect 59 0 62 0;
#X connect 60 0 59 0;
#X connect 61 0 60 0;
#X connect 63 0 64 0;
#X connect 64 0 57 0;
#X connect 64 0 59 0;
#X connect 65 0 61 0;
#X connect 67 0 68 0;
#X connect 67 0 69 0;
#X connect 70 0 72 0;
#X connect 70 0 73 0;
#X connect 71 0 74 0;
#X connect 71 0 75 0;
#X connect 78 0 67 0;
#X connect 79 0 67 1;
#X connect 80 0 81 0;
#X connect 82 0 83 0;
#X connect 84 0 86 0;
#X connect 84 0 87 0;
#X connect 85 0 89 0;
#X connect 85 0 90 0;
#X connect 92 0 83 2;
#X connect 93 0 83 1;
#X connect 95 0 94 2;
#X connect 96 0 94 1;
#X connect 97 0 94 0;
#X connect 99 0 98 2;
#X connect 100 0 98 1;
#X connect 101 0 98 0;
#X connect 103 0 102 2;
#X connect 104 0 102 1;
#X connect 105 0 102 0;
#X connect 107 0 106 2;
#X connect 108 0 106 1;
#X connect 109 0 106 0;
#X connect 111 0 110 2;
#X connect 112 0 110 1;
#X connect 113 0 110 0;
#X connect 115 0 114 2;
#X connect 116 0 114 1;
#X connect 117 0 114 0;
#X connect 119 0 118 2;
#X connect 120 0 118 1;
#X connect 121 0 118 0;
#X connect 123 0 122 2;
#X connect 124 0 122 1;
#X connect 125 0 122 0;
#X connect 127 0 126 2;
#X connect 128 0 126 1;
#X connect 129 0 126 0;
#X connect 130 0 82 0;
#X connect 130 0 97 0;
#X connect 130 0 101 0;
#X connect 130 0 105 0;
#X connect 130 0 109 0;
#X connect 130 0 129 0;
#X connect 130 0 125 0;
#X connect 130 0 121 0;
#X connect 130 0 117 0;
#X connect 130 0 113 0;