view scene demo/wireSrcPosD3.pd @ 169:453e9d2affb1

wind - TI Calculation created, wind speed and proportionality value adjusted to give smaller variation and value set is approx the average.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 05 Feb 2016 13:48:13 +0000
parents 6ff3ad934ae7
children 7743b49172ab
line wrap: on
line source
#N canvas 247 71 1377 690 10;
#X obj 8 25 inlet;
#X obj 51 21 unpack f f f f f f f f f;
#X obj 1018 41 inlet;
#X floatatom 983 64 5 0 0 0 - - -;
#X obj 47 182 +;
#X floatatom 10 208 5 0 0 0 - - -;
#X obj 150 210 +;
#X obj 150 166 * -1;
#X floatatom 117 233 5 0 0 0 - - -;
#X floatatom 8 159 5 0 0 0 - - -;
#X obj 972 34 -;
#X floatatom 925 54 5 0 0 0 - - -;
#X obj 1018 85 /;
#X obj 972 159 *;
#X floatatom 922 188 5 0 0 0 - - -;
#X floatatom 1039 113 5 0 0 0 - - -;
#X obj 987 117 t f b;
#X obj 972 206 +;
#X floatatom 935 229 5 0 0 0 - - -;
#X obj 380 143 r Xpos;
#X obj 456 144 r Ypos;
#X obj 539 138 r Zpos;
#X obj 441 239 +;
#X obj 441 265 +;
#X obj 441 290 sqrt;
#X floatatom 401 315 5 0 0 0 - - -;
#X obj 380 210 *;
#X obj 456 211 *;
#X obj 535 212 *;
#X obj 456 187 -;
#X obj 380 186 -;
#X obj 619 328 outlet;
#X obj 619 256 atan;
#X obj 619 234 /;
#X floatatom 584 328 5 0 0 0 - - -;
#X obj 619 280 * 360;
#X obj 619 304 / 6.28319;
#X obj 634 191 t f b;
#X obj 661 214 delay 9;
#X text 325 290 Distance to source;
#X obj 688 628 outlet;
#X text 641 655 Calculates the pan value;
#X obj 682 305 r YRpos;
#X obj 682 354 +;
#X obj 697 329 t f b;
#X floatatom 736 328 5 0 0 0 - - -;
#X obj 682 422 mod 360;
#X obj 601 449 > 180;
#X obj 641 449 < 360;
#X obj 608 475 spigot;
#X obj 568 500 spigot;
#X obj 682 449 / 360;
#X obj 728 473 spigot;
#X obj 688 498 spigot;
#X obj 721 449 < 180;
#X obj 761 449 > 0;
#X floatatom 733 629 5 0 0 0 - - -;
#X obj 688 603 clip 0 1;
#X obj 682 378 swap 360;
#X obj 682 400 -;
#X obj 568 542 + 1;
#X obj 568 521 * -1;
#X obj 688 580 * 2;
#X obj 441 315 outlet;
#X text 737 301 Azimuth to source;
#X obj 235 164 * 2;
#X obj 235 185 outlet;
#X floatatom 88 639 5 0 0 0 - - -;
#X obj 127 641 outlet;
#X obj 1014 138 delay 9;
#X obj 8 79 s \$0-1WirX;
#X obj 75 79 s \$0-1WirY;
#X obj 141 79 s \$0-1WirZ;
#X obj 208 79 s \$0-1WirLX;
#X obj 281 79 s \$0-1WirLY;
#X obj 354 79 s \$0-1WirLZ;
#X obj 47 138 r \$0-1WirLY;
#X obj 62 160 r \$0-1WirZ;
#X obj 47 209 s \$0-topW;
#X obj 150 143 r \$0-1WirLY;
#X obj 165 188 r \$0-1WirZ;
#X obj 161 235 s \$0-botW;
#X obj 987 181 r \$0-botW;
#X obj 972 229 s \$0-thisZ;
#X obj 127 616 r \$0-1WirLX;
#X obj 1033 60 r NO_WIR_SRC;
#X obj 395 164 r \$0-1WirX;
#X obj 471 162 r \$0-1WirY;
#X obj 330 208 s \$0-ad;
#X obj 408 210 s \$0-cd;
#X obj 485 213 s \$0-bd;
#X obj 634 168 r \$0-ad;
#X floatatom 12 102 5 0 0 0 - - -;
#X floatatom 80 104 5 0 0 0 - - -;
#X floatatom 151 101 5 0 0 0 - - -;
#X floatatom 214 101 5 0 0 0 - - -;
#X floatatom 289 98 5 0 0 0 - - -;
#X floatatom 357 100 5 0 0 0 - - -;
#X floatatom 430 98 5 0 0 0 - - -;
#X floatatom 502 100 5 0 0 0 - - -;
#X floatatom 575 102 5 0 0 0 - - -;
#X obj 579 77 s \$0-1WirRZ;
#X obj 506 77 s \$0-1WirRY;
#X obj 433 77 s \$0-1WirRX;
#X obj 619 144 r \$0-cd;
#X obj 724 233 atan;
#X obj 724 211 /;
#X obj 724 257 * 360;
#X obj 724 281 / 6.28319;
#X obj 739 168 t f b;
#X obj 766 191 delay 9;
#X obj 739 145 r \$0-ad;
#X obj 724 121 r \$0-bd;
#X text 538 346 Elevation to source;
#X floatatom 333 235 5 0 0 0 - - -;
#X floatatom 470 233 5 0 0 0 - - -;
#X floatatom 535 237 5 0 0 0 - - -;
#X obj 79 476 inlet;
#X floatatom 33 499 5 0 0 0 - - -;
#X text 25 394 comment;
#X floatatom 65 541 5 0 0 0 - - -;
#X obj 105 517 +;
#X obj 153 396 <;
#X obj 80 392 >;
#X obj 120 426 spigot;
#X obj 47 425 spigot;
#X floatatom 180 475 5 0 0 0 - - -;
#X obj 120 454 f;
#X floatatom 218 354 5 0 0 0 - - -;
#X floatatom 0 355 5 0 0 0 - - -;
#X obj 47 348 r Zpos;
#X obj 120 349 r Zpos;
#X obj 153 369 r Zpos;
#X obj 80 370 r Zpos;
#X obj 47 399 -;
#X obj 120 398 -;
#X msg 205 424 0;
#X obj 120 475 t f b;
#X obj 147 496 delay 9;
#X obj 62 323 r \$0-topW;
#X obj 168 330 r \$0-botW;
#X obj 550 182 r \$0-zRel;
#X obj 140 537 s \$0-zRel;
#X connect 0 0 1 0;
#X connect 1 0 70 0;
#X connect 1 0 92 0;
#X connect 1 1 71 0;
#X connect 1 1 93 0;
#X connect 1 2 72 0;
#X connect 1 2 94 0;
#X connect 1 3 73 0;
#X connect 1 3 95 0;
#X connect 1 4 74 0;
#X connect 1 4 96 0;
#X connect 1 5 75 0;
#X connect 1 5 97 0;
#X connect 1 6 98 0;
#X connect 1 6 103 0;
#X connect 1 7 99 0;
#X connect 1 7 102 0;
#X connect 1 8 100 0;
#X connect 1 8 101 0;
#X connect 2 0 3 0;
#X connect 2 0 12 0;
#X connect 4 0 5 0;
#X connect 4 0 78 0;
#X connect 6 0 8 0;
#X connect 6 0 81 0;
#X connect 7 0 6 0;
#X connect 10 0 11 0;
#X connect 10 0 13 0;
#X connect 12 0 15 0;
#X connect 12 0 16 0;
#X connect 13 0 14 0;
#X connect 13 0 17 0;
#X connect 16 0 13 1;
#X connect 16 1 69 0;
#X connect 17 0 18 0;
#X connect 17 0 83 0;
#X connect 19 0 30 0;
#X connect 20 0 29 0;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
#X connect 24 0 63 0;
#X connect 26 0 22 0;
#X connect 27 0 22 1;
#X connect 28 0 23 1;
#X connect 28 0 116 0;
#X connect 29 0 27 0;
#X connect 29 0 27 1;
#X connect 29 0 89 0;
#X connect 29 0 115 0;
#X connect 30 0 26 0;
#X connect 30 0 26 1;
#X connect 30 0 88 0;
#X connect 30 0 114 0;
#X connect 32 0 35 0;
#X connect 33 0 32 0;
#X connect 35 0 36 0;
#X connect 36 0 34 0;
#X connect 36 0 31 0;
#X connect 37 0 33 1;
#X connect 37 1 38 0;
#X connect 38 0 33 0;
#X connect 42 0 43 0;
#X connect 42 0 45 0;
#X connect 43 0 58 0;
#X connect 44 0 43 1;
#X connect 44 1 43 0;
#X connect 46 0 47 0;
#X connect 46 0 48 0;
#X connect 46 0 51 0;
#X connect 46 0 54 0;
#X connect 46 0 55 0;
#X connect 47 0 50 1;
#X connect 48 0 49 1;
#X connect 49 0 50 0;
#X connect 50 0 61 0;
#X connect 51 0 49 0;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 53 0 62 0;
#X connect 54 0 53 1;
#X connect 55 0 52 1;
#X connect 57 0 56 0;
#X connect 57 0 40 0;
#X connect 58 0 59 0;
#X connect 58 1 59 1;
#X connect 59 0 46 0;
#X connect 60 0 62 0;
#X connect 61 0 60 0;
#X connect 62 0 57 0;
#X connect 65 0 66 0;
#X connect 69 0 13 0;
#X connect 76 0 4 0;
#X connect 76 0 9 0;
#X connect 77 0 4 1;
#X connect 79 0 7 0;
#X connect 79 0 65 0;
#X connect 80 0 6 1;
#X connect 82 0 17 1;
#X connect 84 0 67 0;
#X connect 84 0 68 0;
#X connect 85 0 12 1;
#X connect 86 0 30 1;
#X connect 87 0 29 1;
#X connect 91 0 37 0;
#X connect 104 0 33 0;
#X connect 105 0 107 0;
#X connect 106 0 105 0;
#X connect 107 0 108 0;
#X connect 108 0 44 0;
#X connect 109 0 106 1;
#X connect 109 1 110 0;
#X connect 110 0 106 0;
#X connect 111 0 109 0;
#X connect 112 0 106 0;
#X connect 117 0 118 0;
#X connect 117 0 121 0;
#X connect 122 0 124 1;
#X connect 123 0 125 1;
#X connect 124 0 127 0;
#X connect 125 0 127 0;
#X connect 127 0 137 0;
#X connect 127 0 126 0;
#X connect 130 0 134 0;
#X connect 131 0 135 0;
#X connect 132 0 122 0;
#X connect 133 0 123 0;
#X connect 134 0 125 0;
#X connect 135 0 124 0;
#X connect 136 0 127 0;
#X connect 137 0 121 1;
#X connect 137 0 142 0;
#X connect 137 0 120 0;
#X connect 137 1 138 0;
#X connect 138 0 121 0;
#X connect 139 0 123 1;
#X connect 139 0 134 1;
#X connect 140 0 135 1;
#X connect 140 0 122 1;
#X connect 141 0 28 0;
#X connect 141 0 28 1;
#X connect 141 0 90 0;