diff SwordSounds/sourceSpeed.pd @ 100:cb211bfa6029

Swordsounds: position of the point sounce source wrt the centre of the sphere is calculated.

Distance between the source and a point representing an observer is calculated.

Still to calculate the angle between line joining the source and observer and the sword.

--- a/SwordSounds/sourceSpeed.pd	Fri Jul 24 19:31:22 2015 +0100
+++ b/SwordSounds/sourceSpeed.pd	Fri Jul 24 22:21:07 2015 +0100
@@ -73,17 +73,58 @@
 #X obj 773 107 +;
 #X obj 788 85 r start_armLength;
 #X text 828 133 Distance from centre of arc;
-#X obj 1064 -89 r preswingTime;
-#X obj 1049 -67 +;
-#X obj 1036 34 delay;
-#X obj 1034 -19 t f b;
-#X obj 1034 -132 r GO;
-#X obj 1034 -44 f;
-#X obj 1063 11 + 5;
-#X obj 1049 -111 r postswingTime;
-#X obj 1036 57 s myEnd;
-#X obj 773 156 outlet~;
 #X obj 773 132 sig~;
+#X obj 761 268 r~ currentElev;
+#X obj 1073 383 r~ currentAzim;
+#X obj 773 180 s~ \$0_srcCnt;
+#X obj 761 292 /~ 360;
+#X obj 761 315 sin~;
+#X obj 761 358 *~;
+#X obj 776 335 r~ \$0_srcCnt;
+#X obj 1058 270 r~ currentElev;
+#X obj 1058 294 /~ 360;
+#X obj 1058 360 *~;
+#X obj 1073 337 r~ \$0_srcCnt;
+#X obj 1058 317 cos~;
+#X obj 1073 428 cos~;
+#X obj 1073 407 /~ 360;
+#X obj 1058 453 *~;
+#X obj 914 387 r~ currentAzim;
+#X obj 899 274 r~ currentElev;
+#X obj 899 298 /~ 360;
+#X obj 899 364 *~;
+#X obj 914 341 r~ \$0_srcCnt;
+#X obj 914 411 /~ 360;
+#X obj 899 457 *~;
+#X obj 899 321 cos~;
+#X obj 914 432 sin~;
+#X text 1029 246 Z position of source;
+#X obj 711 400 sig~;
+#X obj 761 426 -~;
+#X obj 856 502 sig~;
+#X obj 899 524 -~;
+#X obj 1014 497 sig~;
+#X obj 1058 521 -~;
+#X obj 1014 474 r Zobs;
+#X obj 761 455 *~;
+#X obj 899 549 *~;
+#X obj 1058 546 *~;
+#X obj 819 565 +~;
+#X obj 1043 593 +~;
+#X obj 1043 617 sqrt~;
+#X obj 1153 498 loadbang;
+#X obj 1153 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj 1153 537 metro 10;
+#X obj 1153 559 snapshot~;
+#X floatatom 1153 579 5 0 0 0 - - -;
+#X text 751 245 Y position of source;
+#X text 892 247 X position of source;
+#X obj 856 479 r Xobs;
+#X obj 711 377 r Yobs;
+#X text 671 610 Distance between the observer as a point in 3D space
+and the sound source.;
+#X obj 1043 640 outlet~;
 #X connect 0 0 1 0;
 #X connect 2 0 3 0;
 #X connect 4 0 9 0;
@@ -136,15 +177,52 @@
 #X connect 63 0 64 1;
 #X connect 64 0 66 0;
 #X connect 66 0 65 0;
-#X connect 66 0 79 0;
+#X connect 66 0 69 0;
 #X connect 67 0 66 1;
-#X connect 69 0 70 1;
-#X connect 70 0 74 1;
-#X connect 71 0 77 0;
-#X connect 72 0 75 0;
-#X connect 72 1 71 0;
+#X connect 69 0 72 0;
+#X connect 70 0 73 0;
+#X connect 71 0 83 0;
 #X connect 73 0 74 0;
-#X connect 74 0 72 0;
-#X connect 75 0 71 1;
-#X connect 76 0 70 0;
-#X connect 79 0 78 0;
+#X connect 74 0 75 0;
+#X connect 75 0 96 1;
+#X connect 76 0 75 1;
+#X connect 77 0 78 0;
+#X connect 78 0 81 0;
+#X connect 79 0 84 0;
+#X connect 80 0 79 1;
+#X connect 81 0 79 0;
+#X connect 82 0 84 1;
+#X connect 83 0 82 0;
+#X connect 84 0 100 1;
+#X connect 85 0 90 0;
+#X connect 86 0 87 0;
+#X connect 87 0 92 0;
+#X connect 88 0 91 0;
+#X connect 89 0 88 1;
+#X connect 90 0 93 0;
+#X connect 91 0 98 1;
+#X connect 92 0 88 0;
+#X connect 93 0 91 1;
+#X connect 95 0 96 0;
+#X connect 96 0 102 0;
+#X connect 96 0 102 1;
+#X connect 97 0 98 0;
+#X connect 98 0 103 0;
+#X connect 98 0 103 1;
+#X connect 99 0 100 0;
+#X connect 100 0 104 0;
+#X connect 100 0 104 1;
+#X connect 101 0 99 0;
+#X connect 102 0 105 0;
+#X connect 103 0 105 1;
+#X connect 104 0 106 1;
+#X connect 105 0 106 0;
+#X connect 106 0 107 0;
+#X connect 107 0 111 0;
+#X connect 107 0 118 0;
+#X connect 108 0 109 0;
+#X connect 109 0 110 0;
+#X connect 110 0 111 0;
+#X connect 111 0 112 0;
+#X connect 115 0 97 0;
+#X connect 116 0 95 0;