diff SwordSounds/thisAngle.pd @ 131:04f0a00c5fbd

Azimuth imporved (I hope) and pan values calculated for each source

--- a/SwordSounds/thisAngle.pd	Wed Aug 12 21:20:01 2015 +0100
+++ b/SwordSounds/thisAngle.pd	Thu Aug 13 08:23:24 2015 +0100
@@ -1,4 +1,4 @@
-#N canvas 88 62 1440 726 10;
+#N canvas 18 44 1440 726 10;
 #X obj -19 -52 inlet~;
 #X obj 58 -52 inlet~;
 #X obj 134 -53 inlet~;
@@ -64,81 +64,77 @@
 #X obj 451 -53 s~ \$0_scrObsYDist;
 #X obj 575 -54 s~ \$0_scrObsXDist;
 #X obj 691 -56 s~ \$0_scrObsZDist;
-#X obj 41 449 outlet~;
-#X obj 87 227 r~ \$0_Xdiff;
-#X obj 72 251 -~;
-#X obj 72 279 *~;
-#X obj 175 227 r~ \$0_Zdiff;
-#X obj 160 249 -~;
-#X obj 160 274 *~;
-#X obj 72 312 +~;
-#X obj 72 335 sqrt~;
-#X obj -28 286 r~ currentAzim;
-#X obj 57 362 /~;
-#X obj -28 311 /~ 360;
-#X obj -28 335 sin~;
-#X obj 41 400 *~;
-#X obj 41 424 arcsin~;
-#X obj 115 389 loadbang;
-#X obj 115 410 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 430 443 s~ \$0-Az;
+#X obj 79 497 loadbang;
+#X obj 79 518 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 115 428 metro 10;
-#X obj 115 450 snapshot~;
-#X floatatom 115 470 8 0 0 0 - - -;
-#X obj 72 185 r Xobs;
-#X obj 72 206 sig~;
-#X obj 160 182 r Zobs;
-#X obj 160 204 sig~;
-#X obj -92 249 *~;
-#X obj -92 345 +~;
-#X obj -77 322 *~;
-#X obj -92 366 sqrt~;
-#X obj -92 204 r Xobs;
-#X obj -92 227 sig~;
-#X obj -77 298 sig~;
-#X obj -77 272 r Zobs;
-#X text -156 489 Calculating the azimuth angle between the observer
-and the source using the sine rule;
-#X obj 256 466 r~ currentAzim;
-#X obj 430 443 s~ \$0-Az;
-#X obj 271 487 r~ \$0-Az;
-#X obj 256 512 +~;
-#X obj 241 445 sig~ 180;
-#X obj 241 537 -~;
-#X obj 241 562 outlet~;
-#X obj 347 491 loadbang;
-#X obj 347 512 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 79 536 metro 10;
+#X obj 79 558 snapshot~;
+#X floatatom 79 578 8 0 0 0 - - -;
+#X obj 343 484 loadbang;
+#X obj 343 505 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 347 530 metro 10;
-#X obj 347 552 snapshot~;
-#X floatatom 347 572 8 0 0 0 - - -;
-#X obj 426 498 loadbang;
-#X obj 426 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 343 523 metro 10;
+#X obj 343 545 snapshot~;
+#X floatatom 343 565 8 0 0 0 - - -;
+#X obj 1018 322 loadbang;
+#X obj 1018 343 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj 1018 361 metro 10;
+#X obj 1018 383 snapshot~;
+#X floatatom 1018 403 8 0 0 0 - - -;
+#X obj 427 151 r~ \$0_Xdiff;
+#X obj 427 217 -~;
+#X obj 343 151 r~ \$0_Zdiff;
+#X obj 343 216 -~;
+#X obj 442 174 r Xobs;
+#X obj 442 195 sig~;
+#X obj 358 172 r Zobs;
+#X obj 358 194 sig~;
+#X obj 412 240 /~;
+#X obj 430 270 *~;
+#X obj 445 290 sig~ 1;
+#X obj 430 312 +~;
+#X obj 430 336 sqrt~;
+#X obj 412 360 /~;
+#X obj 426 408 arcsin~;
+#X obj 192 452 r~ currentAzim;
+#X obj 192 512 r~ \$0-Az;
+#X obj 177 536 -~;
+#X obj 177 571 outlet~;
+#X obj 585 385 loadbang;
+#X obj 585 406 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 426 537 metro 10;
-#X obj 426 559 snapshot~;
-#X floatatom 426 579 8 0 0 0 - - -;
-#X obj 643 263 loadbang;
-#X obj 643 284 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
-1;
-#X obj 643 302 metro 10;
-#X obj 643 324 snapshot~;
-#X floatatom 643 344 8 0 0 0 - - -;
-#X obj 354 196 r~ \$0_Xdiff;
-#X obj 339 220 -~;
-#X obj 442 196 r~ \$0_Zdiff;
-#X obj 427 218 -~;
-#X obj 339 154 r Xobs;
-#X obj 339 175 sig~;
-#X obj 427 151 r Zobs;
-#X obj 427 173 sig~;
-#X obj 417 270 /~;
-#X obj 417 299 *~;
-#X obj 472 288 sig~ 1;
-#X obj 467 343 +~;
-#X obj 466 367 sqrt~;
-#X obj 406 367 /~;
-#X obj 426 408 arcsin~;
+#X obj 585 424 metro 10;
+#X obj 585 446 snapshot~;
+#X floatatom 585 466 8 0 0 0 - - -;
+#X obj 177 430 sig~ 90;
+#X obj 177 484 -~;
+#X obj 1018 191 r~ currentAzim;
+#X obj 1003 169 sig~ 90;
+#X obj 1003 215 -~;
+#X obj 939 73 /~;
+#X obj 954 103 *~;
+#X obj 969 123 sig~ 1;
+#X obj 954 145 +~;
+#X obj 954 169 sqrt~;
+#X obj 939 193 /~;
+#X obj 939 216 arcsin~;
+#X obj 954 28 r Xobs;
+#X obj 954 49 sig~;
+#X obj 939 -17 r Zobs;
+#X obj 939 5 sig~;
+#X obj 988 245 -~;
+#X obj 232 570 s~ \$0-Pv;
+#X obj 881 196 r~ \$0-Pv;
+#X obj 854 178 sig~ 180;
+#X obj 958 308 -~;
+#X obj 973 281 +~;
+#X obj 866 216 +~;
+#X obj 958 331 /~ 90;
+#X obj 958 357 +~ 0.5;
+#X obj 902 279 sig~ 180;
+#X obj 958 386 outlet~;
 #X connect 0 0 3 0;
 #X connect 0 0 16 0;
 #X connect 1 0 4 0;
@@ -183,75 +179,71 @@
 #X connect 49 0 50 0;
 #X connect 50 0 51 0;
 #X connect 51 0 52 0;
-#X connect 57 0 58 1;
+#X connect 57 0 58 0;
 #X connect 58 0 59 0;
-#X connect 58 0 59 1;
-#X connect 59 0 63 0;
-#X connect 60 0 61 1;
-#X connect 61 0 62 0;
-#X connect 61 0 62 1;
-#X connect 62 0 63 1;
+#X connect 59 0 60 0;
+#X connect 60 0 61 0;
+#X connect 62 0 63 0;
 #X connect 63 0 64 0;
-#X connect 64 0 66 1;
-#X connect 65 0 67 0;
-#X connect 66 0 69 1;
+#X connect 64 0 65 0;
+#X connect 65 0 66 0;
 #X connect 67 0 68 0;
-#X connect 68 0 66 0;
+#X connect 68 0 69 0;
 #X connect 69 0 70 0;
-#X connect 70 0 74 0;
-#X connect 70 0 56 0;
-#X connect 71 0 72 0;
+#X connect 70 0 71 0;
 #X connect 72 0 73 0;
-#X connect 73 0 74 0;
+#X connect 73 0 80 1;
 #X connect 74 0 75 0;
+#X connect 75 0 80 0;
 #X connect 76 0 77 0;
-#X connect 77 0 58 0;
+#X connect 77 0 73 1;
 #X connect 78 0 79 0;
-#X connect 79 0 61 0;
+#X connect 79 0 75 1;
 #X connect 80 0 81 0;
+#X connect 80 0 81 1;
+#X connect 80 0 85 0;
 #X connect 81 0 83 0;
-#X connect 82 0 81 1;
-#X connect 83 0 69 0;
-#X connect 84 0 85 0;
-#X connect 85 0 80 0;
-#X connect 85 0 80 1;
-#X connect 86 0 82 0;
-#X connect 86 0 82 1;
-#X connect 87 0 86 0;
-#X connect 89 0 92 0;
-#X connect 91 0 92 1;
-#X connect 92 0 94 1;
-#X connect 92 0 99 0;
+#X connect 82 0 83 1;
+#X connect 83 0 84 0;
+#X connect 84 0 85 1;
+#X connect 85 0 86 0;
+#X connect 86 0 56 0;
+#X connect 86 0 94 0;
+#X connect 87 0 65 0;
+#X connect 87 0 97 1;
+#X connect 88 0 89 1;
+#X connect 89 0 60 0;
+#X connect 89 0 90 0;
+#X connect 89 0 113 0;
+#X connect 91 0 92 0;
+#X connect 92 0 93 0;
 #X connect 93 0 94 0;
 #X connect 94 0 95 0;
-#X connect 94 0 104 0;
 #X connect 96 0 97 0;
-#X connect 97 0 98 0;
-#X connect 98 0 99 0;
+#X connect 97 0 89 0;
+#X connect 98 0 100 1;
 #X connect 99 0 100 0;
+#X connect 100 0 112 1;
 #X connect 101 0 102 0;
-#X connect 102 0 103 0;
-#X connect 103 0 104 0;
+#X connect 101 0 102 1;
+#X connect 101 0 106 0;
+#X connect 102 0 104 0;
+#X connect 103 0 104 1;
 #X connect 104 0 105 0;
+#X connect 105 0 106 1;
 #X connect 106 0 107 0;
-#X connect 107 0 108 0;
+#X connect 107 0 112 0;
 #X connect 108 0 109 0;
-#X connect 109 0 110 0;
-#X connect 111 0 112 1;
-#X connect 112 0 119 0;
-#X connect 113 0 114 1;
-#X connect 114 0 119 1;
-#X connect 115 0 116 0;
-#X connect 116 0 112 0;
-#X connect 117 0 118 0;
-#X connect 118 0 114 0;
+#X connect 109 0 101 1;
+#X connect 110 0 111 0;
+#X connect 111 0 101 0;
+#X connect 112 0 117 1;
+#X connect 114 0 118 1;
+#X connect 115 0 118 0;
+#X connect 116 0 119 0;
+#X connect 117 0 116 1;
+#X connect 118 0 117 0;
 #X connect 119 0 120 0;
-#X connect 119 0 120 1;
-#X connect 119 0 124 0;
+#X connect 120 0 70 0;
 #X connect 120 0 122 0;
-#X connect 121 0 122 1;
-#X connect 122 0 123 0;
-#X connect 123 0 124 1;
-#X connect 124 0 125 0;
-#X connect 125 0 109 0;
-#X connect 125 0 90 0;
+#X connect 121 0 116 0;