diff SwordSounds/sourceSpeed.pd @ 101:7f67b04e6c5d

Swordsounds: Distance between observer and source calculated
working on angle - source relationship

--- a/SwordSounds/sourceSpeed.pd	Fri Jul 24 22:21:07 2015 +0100
+++ b/SwordSounds/sourceSpeed.pd	Sat Jul 25 09:37:39 2015 +0100
@@ -1,130 +1,110 @@
-#N canvas 19 30 1408 813 10;
-#X obj 133 -151 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
--1;
-#X obj 133 -98 s GO;
-#X obj 73 -151 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
+#N canvas 0 23 1408 813 10;
+#X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034
 -1 -1;
-#X obj 73 -98 s setUp;
-#X obj 254 390 line~;
-#X text 263 -130 Start calculation with elevation = 0 \, arm length
+#X obj -219 -68 s GO;
+#X obj -279 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
+-1 -1;
+#X obj -279 -68 s setUp;
+#X obj -98 420 line~;
+#X text -89 -100 Start calculation with elevation = 0 \, arm length
 is constant \, acceleration/deceleration is constant.;
-#X obj 141 439 loadbang;
-#X obj 141 460 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj -211 469 loadbang;
+#X obj -211 490 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+1 1;
+#X obj -211 508 metro 10;
+#X obj -211 530 snapshot~;
+#X floatatom -211 550 5 0 0 0 - - -;
+#X obj -130 566 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
+-1 -1 0 1;
+#X msg -268 354 \$1 \$2;
+#X obj -268 329 pack;
+#X msg -98 386 0;
+#X obj -269 306 f;
+#X obj -269 261 r GO;
+#X msg 41 388 0 \$1;
+#X obj 40 311 t f b;
+#X obj 41 339 delay;
+#X obj -98 365 r setUp;
+#X text -115 346 Start at 0 speed;
+#X text 83 399 \$1 = time to reach speed of 0;
+#X obj 55 264 r preswingTime;
+#X text -7 224 Trigger once full speed;
+#X obj -98 453 outlet~;
+#X obj 233 -103 inlet;
+#X obj 327 -105 inlet;
+#X obj 233 -80 s \$0_thisGroup;
+#X obj 327 -81 s \$0_thisSource;
+#X text -331 385 \$1 = source speed;
+#X text -331 401 \$2 = time to reach source speed;
+#X obj -243 305 r preswingTime;
+#X obj 236 16 r \$0_thisGroup;
+#X obj 251 36 r \$0_thisSource;
+#X obj 236 58 +;
+#X floatatom 190 85 5 0 0 0 - - -;
+#X obj 236 84 s \$0_mySourceNo;
+#X obj -239 -39 r \$0_mySourceNo;
+#X obj -224 -19 r deltaPreCirc;
+#X obj -239 2 *;
+#X obj -239 43 +;
+#X obj -224 22 r minPreCirc;
+#X floatatom -302 64 5 0 0 0 - - -;
+#X obj -224 64 r preswingTime;
+#X obj -239 107 /;
+#X obj -224 85 * 0.001;
+#X obj -239 134 * 2;
+#X text -196 114 Average Speed;
+#X text -199 138 Top Speed for this source;
+#X floatatom -292 160 5 0 0 0 - - -;
+#X obj -239 161 s \$0_myPreSourceSpeed;
+#X obj -254 282 r \$0_myPreSourceSpeed;
+#X obj 98 328 r postswingTime;
+#X floatatom 130 351 5 0 0 0 - - -;
+#X obj 40 244 r GO;
+#X obj 40 286 f;
+#X obj 41 366 f;
+#X obj 436 7 r start_armLength;
+#X obj 421 -15 r length;
+#X obj 421 69 -;
+#X obj 469 50 r NoOfSources;
+#X obj 454 29 r \$0_mySourceNo;
+#X obj 454 72 /;
+#X obj 421 94 *;
+#X floatatom 376 162 5 0 0 0 - - -;
+#X obj 421 137 +;
+#X obj 436 115 r start_armLength;
+#X text 476 163 Distance from centre of arc;
+#X obj 421 162 sig~;
+#X obj 421 210 s~ \$0_srcCnt;
+#X obj 618 324 loadbang;
+#X obj 618 345 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
 1;
-#X obj 141 478 metro 10;
-#X obj 141 500 snapshot~;
-#X floatatom 141 520 5 0 0 0 - - -;
-#X obj 222 536 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 0 1;
-#X msg 84 324 \$1 \$2;
-#X obj 84 299 pack;
-#X msg 254 356 0;
-#X obj 83 276 f;
-#X obj 83 231 r GO;
-#X msg 393 358 0 \$1;
-#X obj 392 281 t f b;
-#X obj 393 309 delay;
-#X obj 254 335 r setUp;
-#X text 237 316 Start at 0 speed;
-#X text 435 369 \$1 = time to reach speed of 0;
-#X obj 407 234 r preswingTime;
-#X text 345 194 Trigger once full speed;
-#X obj 254 423 outlet~;
-#X obj 585 -133 inlet;
-#X obj 679 -135 inlet;
-#X obj 585 -110 s \$0_thisGroup;
-#X obj 679 -111 s \$0_thisSource;
-#X text 21 355 \$1 = source speed;
-#X text 21 371 \$2 = time to reach source speed;
-#X obj 109 275 r preswingTime;
-#X obj 588 -14 r \$0_thisGroup;
-#X obj 603 6 r \$0_thisSource;
-#X obj 588 28 +;
-#X floatatom 542 55 5 0 0 0 - - -;
-#X obj 588 54 s \$0_mySourceNo;
-#X obj 113 -69 r \$0_mySourceNo;
-#X obj 128 -49 r deltaPreCirc;
-#X obj 113 -28 *;
-#X obj 113 13 +;
-#X obj 128 -8 r minPreCirc;
-#X floatatom 50 34 5 0 0 0 - - -;
-#X obj 128 34 r preswingTime;
-#X obj 113 77 /;
-#X obj 128 55 * 0.001;
-#X obj 113 104 * 2;
-#X text 156 84 Average Speed;
-#X text 153 108 Top Speed for this source;
-#X floatatom 60 130 5 0 0 0 - - -;
-#X obj 113 131 s \$0_myPreSourceSpeed;
-#X obj 98 252 r \$0_myPreSourceSpeed;
-#X obj 450 298 r postswingTime;
-#X floatatom 482 321 5 0 0 0 - - -;
-#X obj 392 214 r GO;
-#X obj 392 256 f;
-#X obj 393 336 f;
-#X obj 788 -23 r start_armLength;
-#X obj 773 -45 r length;
-#X obj 773 39 -;
-#X obj 821 20 r NoOfSources;
-#X obj 806 -1 r \$0_mySourceNo;
-#X obj 806 42 /;
-#X obj 773 64 *;
-#X floatatom 728 132 5 0 0 0 - - -;
-#X obj 773 107 +;
-#X obj 788 85 r start_armLength;
-#X text 828 133 Distance from centre of arc;
-#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 obj 618 363 metro 10;
+#X obj 618 385 snapshot~;
+#X floatatom 618 405 5 0 0 0 - - -;
+#X obj 457 331 r~ \$0_srcCnt;
+#X obj 457 360 thisPosition;
+#X text 446 376 Y;
+#X text 472 376 X;
+#X text 494 376 Z;
+#X obj 615 431 loadbang;
+#X obj 615 452 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 615 470 metro 10;
+#X obj 615 492 snapshot~;
+#X floatatom 615 512 5 0 0 0 - - -;
+#X obj 322 414 loadbang;
+#X obj 322 435 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 322 453 metro 10;
+#X obj 322 475 snapshot~;
+#X floatatom 322 495 5 0 0 0 - - -;
+#X obj 333 304 loadbang;
+#X obj 333 325 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 333 343 metro 10;
+#X obj 333 365 snapshot~;
+#X floatatom 333 385 5 0 0 0 - - -;
+#X obj 467 402 thisAngle;
 #X connect 0 0 1 0;
 #X connect 2 0 3 0;
 #X connect 4 0 9 0;
@@ -179,50 +159,29 @@
 #X connect 66 0 65 0;
 #X connect 66 0 69 0;
 #X connect 67 0 66 1;
-#X connect 69 0 72 0;
-#X connect 70 0 73 0;
-#X connect 71 0 83 0;
+#X connect 69 0 70 0;
+#X connect 71 0 72 0;
+#X connect 72 0 73 0;
 #X connect 73 0 74 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 76 0 77 0;
+#X connect 77 0 94 0;
+#X connect 77 0 96 0;
+#X connect 77 1 89 0;
+#X connect 77 1 96 1;
+#X connect 77 2 84 0;
+#X connect 77 2 96 2;
+#X connect 77 3 74 0;
+#X connect 77 3 96 3;
+#X connect 81 0 82 0;
+#X connect 82 0 83 0;
+#X connect 83 0 84 0;
+#X connect 84 0 85 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;
+#X connect 87 0 88 0;
+#X connect 88 0 89 0;
+#X connect 89 0 90 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;