changeset 130:14568c160639

Correct azimuth updated!!
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 12 Aug 2015 21:20:01 +0100
parents 5e7c747e4876
children 04f0a00c5fbd
files SwordSounds/Sword10_D3.pd SwordSounds/sourceSpeed.pd SwordSounds/thisAngle.pd SwordSounds/woSoFreqD3.pd
diffstat 4 files changed, 92 insertions(+), 15 deletions(-) [+]
line wrap: on
line diff
--- a/SwordSounds/Sword10_D3.pd	Wed Aug 12 19:22:56 2015 +0100
+++ b/SwordSounds/Sword10_D3.pd	Wed Aug 12 21:20:01 2015 +0100
@@ -40,7 +40,7 @@
 #X obj -148 -153 s NoOfSources;
 #X obj -110 242 s topSpeed;
 #X obj -162 216 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
--1 -1 2475 1;
+-1 -1 49 1;
 #X floatatom -165 242 8 0 0 0 - - -;
 #X text 87 -186 Blade Length;
 #X text 86 -120 Arm Length;
@@ -275,7 +275,7 @@
 -1 -1 0 1;
 #X floatatom 120 336 8 0 0 0 - - -;
 #X obj 62 284 r setUp;
-#N canvas 569 109 689 650 allSource 0;
+#N canvas 569 109 689 650 allSource 1;
 #X obj 187 127 r distance;
 #X obj 170 106 r angle;
 #X obj 153 65 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--- a/SwordSounds/sourceSpeed.pd	Wed Aug 12 19:22:56 2015 +0100
+++ b/SwordSounds/sourceSpeed.pd	Wed Aug 12 21:20:01 2015 +0100
@@ -1,4 +1,4 @@
-#N canvas 230 24 1408 813 10;
+#N canvas 11 23 1008 758 10;
 #X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034
 -1 -1;
 #X obj -219 -68 s GO;
@@ -80,9 +80,9 @@
 #X text 465 374 X;
 #X text 477 374 Z;
 #X obj 457 360 thisPosition;
-#X obj 468 402 thisAngle;
 #X obj 419 529 outlet~;
 #X obj 493 523 outlet~;
+#X obj 468 402 thisAngle;
 #X connect 0 0 1 0;
 #X connect 2 0 3 0;
 #X connect 4 0 9 0;
@@ -139,12 +139,12 @@
 #X connect 67 0 66 1;
 #X connect 69 0 70 0;
 #X connect 71 0 75 0;
-#X connect 75 0 76 0;
-#X connect 75 1 76 1;
-#X connect 75 2 76 2;
-#X connect 75 3 76 3;
-#X connect 75 3 77 0;
-#X connect 75 4 76 4;
-#X connect 75 5 76 5;
-#X connect 75 6 76 6;
-#X connect 76 0 78 0;
+#X connect 75 0 78 0;
+#X connect 75 1 78 1;
+#X connect 75 2 78 2;
+#X connect 75 3 76 0;
+#X connect 75 3 78 3;
+#X connect 75 4 78 4;
+#X connect 75 5 78 5;
+#X connect 75 6 78 6;
+#X connect 78 1 77 0;
--- a/SwordSounds/thisAngle.pd	Wed Aug 12 19:22:56 2015 +0100
+++ b/SwordSounds/thisAngle.pd	Wed Aug 12 21:20:01 2015 +0100
@@ -99,6 +99,46 @@
 #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
+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
+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 connect 0 0 3 0;
 #X connect 0 0 16 0;
 #X connect 1 0 4 0;
@@ -178,3 +218,40 @@
 #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 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 99 0 100 0;
+#X connect 101 0 102 0;
+#X connect 102 0 103 0;
+#X connect 103 0 104 0;
+#X connect 104 0 105 0;
+#X connect 106 0 107 0;
+#X connect 107 0 108 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 119 0 120 0;
+#X connect 119 0 120 1;
+#X connect 119 0 124 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;
--- a/SwordSounds/woSoFreqD3.pd	Wed Aug 12 19:22:56 2015 +0100
+++ b/SwordSounds/woSoFreqD3.pd	Wed Aug 12 21:20:01 2015 +0100
@@ -246,7 +246,7 @@
 #X restore 552 336 pd noiseGain;
 #X obj 575 228 r \$0-diameter;
 #X obj 609 291 r \$0_elev;
-#N canvas 39 137 702 650 freqGain 1;
+#N canvas 275 186 702 650 freqGain 1;
 #X text 36 127 Mass Density of Air \, squared;
 #X text 508 93 Speed of Sound to power 2;
 #N canvas 759 125 286 289 pow6 0;
@@ -410,6 +410,7 @@
 #X connect 42 0 43 0;
 #X connect 42 0 43 1;
 #X connect 43 0 44 1;
+#X connect 43 0 52 0;
 #X connect 44 0 7 0;
 #X connect 45 0 46 0;
 #X connect 46 0 47 0;
@@ -421,7 +422,6 @@
 #X connect 51 0 52 0;
 #X connect 52 0 53 0;
 #X connect 54 0 40 0;
-#X connect 54 0 52 0;
 #X restore 556 78 pd freqGain;
 #X obj 577 -31 r \$0-diameter;
 #X obj 608 35 r \$0_elev;