Mercurial > hg > weather-synthesis-prototyping
changeset 129:5e7c747e4876
Correct azimuth angle between source and observer calulated from the sine rule
| author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Wed, 12 Aug 2015 19:22:56 +0100 |
| parents | 17d7696c19c5 |
| children | 14568c160639 |
| files | SwordSounds/Sword10_D3.pd SwordSounds/arcsin~.pd SwordSounds/panCalc.pd SwordSounds/panTest.pd SwordSounds/sweepTime.pd SwordSounds/thisAngle.pd SwordSounds/woSoFreqD3.pd |
| diffstat | 7 files changed, 402 insertions(+), 390 deletions(-) [+] |
line wrap: on
line diff
--- a/SwordSounds/Sword10_D3.pd Wed Aug 12 15:07:08 2015 +0100 +++ b/SwordSounds/Sword10_D3.pd Wed Aug 12 19:22:56 2015 +0100 @@ -1,4 +1,4 @@ -#N canvas 58 100 1429 707 10; +#N canvas 52 128 1429 707 10; #X obj 581 -63 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X obj 644 -63 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; #X text 641 -154 Gain; @@ -40,14 +40,14 @@ #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 4257 1; +-1 -1 2475 1; #X floatatom -165 242 8 0 0 0 - - -; #X text 87 -186 Blade Length; #X text 86 -120 Arm Length; #X text -120 -176 Number of Sources; #X text -54 220 Top Speed; #X obj 132 35 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 0 1; +-262144 -1 -1 7150 1; #X floatatom 129 67 8 0 0 0 - - -; #N canvas 528 427 426 335 thickCalc 0; #X obj 173 139 r NoOfSources; @@ -75,9 +75,9 @@ #X connect 10 0 5 0; #X restore 412 -83 pd thickCalc; #X obj -168 303 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 2805 1; -#X obj -169 388 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 2475 1; +-262144 -1 -1 6600 1; +#X obj -169 388 hsl 100 20 0.0001 0.01 0 0 empty empty empty -2 -8 +0 10 -262144 -1 -1 5900 1; #X floatatom -171 333 8 0 0 0 - - -; #X obj -117 332 s hiltThick; #X floatatom -172 416 8 0 0 0 - - -; @@ -243,8 +243,8 @@ #X connect 76 0 72 0; #X connect 76 0 48 0; #X restore 411 -116 pd angleCalc; -#X obj 583 -135 hsl 100 25 0 1000 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 396 1; +#X obj 583 -135 hsl 100 25 0.1 1000 1 0 empty empty empty -2 -8 0 10 +-262144 -1 -1 9155 1; #X obj 54 -209 loadbang; #X obj 52 -140 loadbang; #X obj -148 -198 loadbang; @@ -255,27 +255,24 @@ #X obj -201 -196 r setUp; #X obj 3 -142 r setUp; #X obj 2 -207 r setUp; -#X text 819 -33 Presets; +#X text 819 -28 Presets; #X msg 891 -138 20 160 0.01 0.004 2 0 127; #X msg 901 -115 30 280 0.0095 0.0032 2 60 120; -#X text 746 313 Currently the noise sources are not connected but still -getting a zipping type sound. It seems to get worse with sources lower -down the blade - this needs looked into; #X obj 882 -190 loadbang; #X obj 194 -192 loadbang; #X obj 194 -168 delay 13; -#X obj 834 -108 t b; -#X obj 814 -85 s setUp; +#X obj 822 -89 t b; +#X obj 822 -47 s setUp; #X obj 130 113 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X floatatom 127 145 8 0 0 0 - - -; #X obj 69 93 r setUp; #X obj 125 226 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 9900 1; +-1 -1 7700 1; #X floatatom 122 258 8 0 0 0 - - -; #X obj 64 206 r setUp; #X obj 123 304 hsl 100 20 -90 90 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 9900 1; +-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; @@ -443,14 +440,14 @@ #X msg 198 12 80; #X obj 408 37 centreAngles; #X obj -163 -74 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4950 1; +-262144 -1 -1 5346 1; #X obj -164 20 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 4950 1; +-1 -1 5019 1; #X obj -164 111 hsl 100 20 -50 50 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 4950 1; +-262144 -1 -1 5346 1; #X obj -166 -51 s Xobs; #X obj -167 40 s Yobs; -#X obj -167 133 s Zobs; +#X obj -167 138 s Zobs; #X floatatom -206 -51 5 0 0 0 - - -; #X floatatom -206 41 5 0 0 0 - - -; #X floatatom -207 133 5 0 0 0 - - -; @@ -482,23 +479,25 @@ #X msg -93 278 0.02; #X msg -99 362 0.008; #X msg -30 191 35; -#X obj 881 125 s thisXobs; +#X obj 882 125 s thisXobs; #X obj -166 -119 r thisXobs; -#X obj 900 104 s thisYobs; +#X obj 899 104 s thisYobs; #X obj -167 -27 r thisYobs; #X obj -167 66 r thisZobs; -#X obj 920 82 s thisZobs; -#X obj 939 59 s thisTS; -#X obj 959 38 s thisHT; -#X obj 978 18 s thisTT; -#X msg 882 -161 0 0 0 25 0.02 0.006 40; -#X obj 882 -43 unpack f f f f f f f f; -#X obj 998 -4 s thisPrA; -#X obj 1013 -23 s thisPrE; +#X obj 917 82 s thisZobs; +#X obj 934 59 s thisTS; +#X obj 952 38 s thisHT; +#X obj 970 18 s thisTT; +#X obj 987 -4 s thisPrA; +#X obj 1005 -23 s thisPrE; #X obj 129 14 r thisPrA; #X obj 127 92 r thisPoA; #X obj 122 205 r thisPrE; #X obj 120 283 r thisPoE; +#X obj 882 -67 unpack f f f f f f f f f; +#X obj 1023 -44 s thisG; +#X obj 822 -68 delay 9; +#X msg 882 -161 0 0 0 25 0.02 0.006 80 50 500; #X connect 3 0 5 0; #X connect 4 0 0 0; #X connect 4 1 1 0; @@ -507,8 +506,8 @@ #X connect 10 0 9 0; #X connect 10 0 11 0; #X connect 16 0 17 0; -#X connect 16 0 75 0; -#X connect 16 0 118 0; +#X connect 16 0 74 0; +#X connect 16 0 117 0; #X connect 19 0 21 0; #X connect 19 0 22 0; #X connect 20 0 23 0; @@ -523,83 +522,86 @@ #X connect 36 0 19 0; #X connect 37 0 20 0; #X connect 39 0 4 0; -#X connect 39 0 120 0; +#X connect 39 0 119 0; #X connect 40 0 6 0; -#X connect 41 0 78 0; -#X connect 42 0 82 0; +#X connect 41 0 77 0; +#X connect 42 0 81 0; #X connect 43 0 10 0; #X connect 44 0 19 0; #X connect 45 0 20 0; #X connect 46 0 39 0; -#X connect 47 0 82 0; -#X connect 48 0 78 0; +#X connect 47 0 81 0; +#X connect 48 0 77 0; #X connect 49 0 6 0; -#X connect 51 0 57 0; -#X connect 51 0 134 0; -#X connect 52 0 57 0; -#X connect 52 0 134 0; -#X connect 54 0 133 0; -#X connect 55 0 56 0; -#X connect 56 0 32 0; -#X connect 57 0 58 0; -#X connect 59 0 60 0; -#X connect 61 0 59 0; -#X connect 62 0 63 0; -#X connect 62 0 69 0; -#X connect 62 0 119 0; -#X connect 64 0 62 0; -#X connect 65 0 66 0; -#X connect 67 0 65 0; -#X connect 78 0 77 0; -#X connect 80 0 4 1; -#X connect 80 0 81 0; -#X connect 82 0 8 0; -#X connect 83 0 84 0; -#X connect 84 0 80 0; -#X connect 86 0 16 0; +#X connect 51 0 56 0; +#X connect 51 0 138 0; +#X connect 52 0 56 0; +#X connect 52 0 138 0; +#X connect 53 0 141 0; +#X connect 54 0 55 0; +#X connect 55 0 32 0; +#X connect 56 0 140 0; +#X connect 58 0 59 0; +#X connect 60 0 58 0; +#X connect 61 0 62 0; +#X connect 61 0 68 0; +#X connect 61 0 118 0; +#X connect 63 0 61 0; +#X connect 64 0 65 0; +#X connect 66 0 64 0; +#X connect 77 0 76 0; +#X connect 79 0 4 1; +#X connect 79 0 80 0; +#X connect 81 0 8 0; +#X connect 82 0 83 0; +#X connect 83 0 79 0; +#X connect 85 0 16 0; +#X connect 87 0 90 0; +#X connect 87 0 93 0; #X connect 88 0 91 0; #X connect 88 0 94 0; #X connect 89 0 92 0; #X connect 89 0 95 0; -#X connect 90 0 93 0; -#X connect 90 0 96 0; -#X connect 97 0 88 0; -#X connect 98 0 90 0; -#X connect 99 0 89 0; +#X connect 96 0 87 0; +#X connect 97 0 89 0; +#X connect 98 0 88 0; +#X connect 99 0 87 0; #X connect 100 0 88 0; #X connect 101 0 89 0; -#X connect 102 0 90 0; -#X connect 103 0 89 0; -#X connect 104 0 16 0; -#X connect 105 0 90 0; -#X connect 106 0 88 0; -#X connect 107 0 62 0; -#X connect 108 0 59 0; -#X connect 109 0 62 0; -#X connect 110 0 65 0; -#X connect 111 0 89 0; -#X connect 112 0 89 0; -#X connect 113 0 89 0; -#X connect 114 0 10 0; -#X connect 115 0 88 0; -#X connect 116 0 90 0; -#X connect 118 0 76 0; -#X connect 119 0 70 0; -#X connect 121 0 19 0; -#X connect 122 0 20 0; -#X connect 123 0 10 0; -#X connect 125 0 88 0; +#X connect 102 0 88 0; +#X connect 103 0 16 0; +#X connect 104 0 89 0; +#X connect 105 0 87 0; +#X connect 106 0 61 0; +#X connect 107 0 58 0; +#X connect 108 0 61 0; +#X connect 109 0 64 0; +#X connect 110 0 88 0; +#X connect 111 0 88 0; +#X connect 112 0 88 0; +#X connect 113 0 10 0; +#X connect 114 0 87 0; +#X connect 115 0 89 0; +#X connect 117 0 75 0; +#X connect 118 0 69 0; +#X connect 120 0 19 0; +#X connect 121 0 20 0; +#X connect 122 0 10 0; +#X connect 124 0 87 0; +#X connect 126 0 88 0; #X connect 127 0 89 0; -#X connect 128 0 90 0; -#X connect 133 0 57 0; -#X connect 133 0 134 0; -#X connect 134 0 124 0; -#X connect 134 1 126 0; -#X connect 134 2 129 0; -#X connect 134 3 130 0; -#X connect 134 4 131 0; -#X connect 134 5 132 0; -#X connect 134 6 135 0; -#X connect 134 7 136 0; -#X connect 139 0 62 0; -#X connect 140 0 65 0; +#X connect 134 0 16 0; +#X connect 136 0 61 0; +#X connect 137 0 64 0; +#X connect 138 0 123 0; +#X connect 138 1 125 0; +#X connect 138 2 128 0; +#X connect 138 3 129 0; +#X connect 138 4 130 0; +#X connect 138 5 131 0; +#X connect 138 6 132 0; +#X connect 138 7 133 0; +#X connect 138 8 139 0; +#X connect 140 0 57 0; +#X connect 141 0 56 0; +#X connect 141 0 138 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordSounds/arcsin~.pd Wed Aug 12 19:22:56 2015 +0100 @@ -0,0 +1,40 @@ +#N canvas 549 79 369 390 10; +#X obj 178 28 inlet~; +#X obj 163 67 *~; +#X obj 116 67 sig~ 1; +#X obj 148 95 -~; +#X obj 220 307 outlet~; +#X obj 148 119 sqrt~; +#X obj 133 144 -~; +#X obj 220 168 /~; +#X obj 220 193 atan~; +#X obj 220 218 *~ 2; +#X obj 220 241 *~ 360; +#X obj 145 242 loadbang; +#X obj 145 263 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 145 281 metro 10; +#X obj 145 303 snapshot~; +#X floatatom 145 323 8 0 0 0 - - -; +#X obj 220 262 /~ 3.14159; +#X obj 220 283 /~ 2; +#X connect 0 0 1 1; +#X connect 0 0 1 0; +#X connect 0 0 7 1; +#X connect 1 0 3 1; +#X connect 2 0 3 0; +#X connect 2 0 6 0; +#X connect 3 0 5 0; +#X connect 5 0 6 1; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 16 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 15 0; +#X connect 16 0 17 0; +#X connect 17 0 14 0; +#X connect 17 0 4 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordSounds/panCalc.pd Wed Aug 12 19:22:56 2015 +0100 @@ -0,0 +1,68 @@ +#N canvas 576 204 723 538 10; +#X obj 245 -85 r Xobs; +#X obj 260 -44 r Zobs; +#X obj 245 -63 sig~; +#X obj 260 -24 sig~; +#X obj 245 -3 /~; +#X obj 245 21 atan~; +#X obj 246 50 /~ 6.28319; +#X obj 248 69 *~ 360; +#X obj 46 -76 loadbang; +#X obj 46 -55 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 46 -37 metro 10; +#X obj 46 -15 snapshot~; +#X floatatom 46 5 5 0 0 0 - - -; +#X obj 221 105 -~; +#X obj 317 2 loadbang; +#X obj 317 23 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 317 41 metro 10; +#X obj 317 63 snapshot~; +#X floatatom 317 83 5 0 0 0 - - -; +#X obj 221 130 *~ -1; +#X obj 99 141 +~ 0.5; +#X obj 99 120 /~ 180; +#X obj 115 -112 inlet~; +#X obj 200 250 outlet~; +#X obj 486 -100 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 +-1; +#X obj 486 -47 s GO; +#X obj 426 -100 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 +-1 -1; +#X obj 426 -47 s setUp; +#X obj 34 96 loadbang; +#X obj 34 117 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 34 135 metro 10; +#X obj 34 157 snapshot~; +#X floatatom 34 177 5 0 0 0 - - -; +#X connect 0 0 2 0; +#X connect 1 0 3 0; +#X connect 2 0 4 0; +#X connect 3 0 4 1; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 13 1; +#X connect 7 0 17 0; +#X connect 8 0 9 0; +#X connect 9 0 10 0; +#X connect 10 0 11 0; +#X connect 11 0 12 0; +#X connect 13 0 19 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 17 0; +#X connect 17 0 18 0; +#X connect 20 0 31 0; +#X connect 20 0 23 0; +#X connect 21 0 20 0; +#X connect 22 0 11 0; +#X connect 22 0 21 0; +#X connect 24 0 25 0; +#X connect 26 0 27 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; +#X connect 31 0 32 0;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/SwordSounds/panTest.pd Wed Aug 12 19:22:56 2015 +0100 @@ -0,0 +1,14 @@ +#N canvas 345 211 450 300 10; +#X obj 210 160 dac~; +#X obj 204 54 osc~ 440; +#X obj 287 88 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144 +-1 -1 12700 1; +#X obj 262 110 sig~; +#X obj 210 119 fcpan~; +#X floatatom 382 121 5 0 0 0 - - -; +#X connect 1 0 4 0; +#X connect 2 0 3 0; +#X connect 2 0 5 0; +#X connect 3 0 4 1; +#X connect 4 0 0 0; +#X connect 4 1 0 1;
--- a/SwordSounds/sweepTime.pd Wed Aug 12 15:07:08 2015 +0100 +++ b/SwordSounds/sweepTime.pd Wed Aug 12 19:22:56 2015 +0100 @@ -28,9 +28,9 @@ #X floatatom 152 198 5 0 0 0 - - -; #X obj 214 185 r topSpeed; #X obj 214 210 / 2; -#X obj 199 234 /; -#X obj 199 258 * 1000; -#X floatatom 246 287 5 0 0 0 - - -; +#X obj 199 293 /; +#X obj 199 317 * 1000; +#X floatatom 246 346 5 0 0 0 - - -; #X floatatom 542 40 5 0 0 0 - - -; #X obj 598 75 r start_armLength; #X obj 613 96 r bladeLen; @@ -43,22 +43,22 @@ #X floatatom 536 187 5 0 0 0 - - -; #X obj 598 174 r topSpeed; #X obj 598 199 / 2; -#X obj 583 223 /; -#X obj 583 247 * 1000; +#X obj 583 275 /; +#X obj 583 299 * 1000; #X obj 583 -17 r postsweepAzim; -#X text 683 252 Time from 0 azimuth to; -#X text 686 267 stationary at post sweep; +#X text 683 304 Time from 0 azimuth to; +#X text 686 319 stationary at post sweep; #X text 637 199 Assuming constant acceleration; -#X floatatom 635 274 5 0 0 0 - - -; -#X obj 199 320 s preswingTime; -#X obj 583 306 s postswingTime; +#X floatatom 635 326 5 0 0 0 - - -; +#X obj 199 379 s preswingTime; +#X obj 583 358 s postswingTime; #X text 249 211 Assuming constant acceleration; #X text 25 240 Time from pre-sweep azimuth; #X text 26 253 to centre at top speed; #X text 8 186 Pre sweep Circumference; #X text 396 167 Post sweep Circumference; -#X text 315 321 Acceleration time; -#X text 692 307 Decceleration time; +#X text 315 380 Acceleration time; +#X text 692 359 Decceleration time; #X text 246 130 Full radius; #X text 648 119 Full radius; #X obj 1037 70 r preswingTime; @@ -73,6 +73,10 @@ #X obj 1037 122 t f b; #X floatatom 955 252 5 0 0 0 - - -; #X obj 582 10 * -1; +#X obj 214 233 t f b; +#X obj 241 257 delay 9; +#X obj 598 222 t f b; +#X obj 625 246 delay 9; #X connect 0 0 4 0; #X connect 1 0 5 0; #X connect 2 0 3 0; @@ -91,7 +95,7 @@ #X connect 22 0 23 0; #X connect 22 0 26 0; #X connect 24 0 25 0; -#X connect 25 0 26 1; +#X connect 25 0 71 0; #X connect 26 0 27 0; #X connect 27 0 28 0; #X connect 27 0 48 0; @@ -105,7 +109,7 @@ #X connect 37 0 38 0; #X connect 37 0 41 0; #X connect 39 0 40 0; -#X connect 40 0 41 1; +#X connect 40 0 73 0; #X connect 41 0 42 0; #X connect 42 0 47 0; #X connect 42 0 49 0; @@ -124,3 +128,9 @@ #X connect 68 0 60 1; #X connect 68 1 60 0; #X connect 70 0 35 0; +#X connect 71 0 26 1; +#X connect 71 1 72 0; +#X connect 72 0 26 0; +#X connect 73 0 41 1; +#X connect 73 1 74 0; +#X connect 74 0 41 0;
--- a/SwordSounds/thisAngle.pd Wed Aug 12 15:07:08 2015 +0100 +++ b/SwordSounds/thisAngle.pd Wed Aug 12 19:22:56 2015 +0100 @@ -1,39 +1,16 @@ -#N canvas 217 124 1158 672 10; +#N canvas 88 62 1440 726 10; #X obj -19 -52 inlet~; #X obj 58 -52 inlet~; #X obj 134 -53 inlet~; #X obj -19 -31 s~ \$0_Ydiff; #X obj 58 -31 s~ \$0_Xdiff; #X obj 134 -32 s~ \$0_Zdiff; -#X obj -73 60 r Yobs; -#X obj -73 83 sig~; -#X obj -73 124 -~; -#X obj -58 103 r~ \$0_Ydiff; -#X obj -147 85 loadbang; -#X obj -147 106 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 -1 1; -#X obj -147 124 metro 10; -#X obj -147 146 snapshot~; -#X floatatom -147 166 5 0 0 0 - - -; #X obj -130 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj -130 -5 s GO; #X obj -190 -58 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 -1; #X obj -190 -5 s setUp; -#X obj -73 360 atan~; -#X obj -73 338 /~; -#X obj -174 415 loadbang; -#X obj -174 436 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 -1 1; -#X obj -174 454 metro 10; -#X obj -174 476 snapshot~; -#X floatatom -174 496 5 0 0 0 - - -; -#X obj -73 383 /~ 6.28319; -#X obj -73 405 *~ 360; -#X obj -88 464 s~ \$0_srcObsElev; -#X text -129 502 Elevation angle between source and observer; -#X text -54 157 Length between observer and source on the Y plane; #X obj 230 -58 inlet~; #X obj 230 -37 s~ \$0_scrObsDist; #X obj 451 -74 inlet~; @@ -55,49 +32,6 @@ #X obj 205 45 metro 10; #X obj 205 67 snapshot~; #X floatatom 205 87 8 0 0 0 - - -; -#X obj 342 63 r~ \$0_Xdiff; -#X obj 357 107 r~ \$0_Zdiff; -#X obj 357 131 *~; -#X obj 342 87 *~; -#X obj 342 156 +~; -#X obj 495 160 *~; -#X obj 526 208 *~; -#X obj 342 202 *~ 2; -#X obj 342 179 sqrt~; -#X obj 480 319 -~; -#X obj 480 185 +~; -#X obj 480 348 /~; -#X obj 342 248 *~; -#X obj 480 369 arccos~; -#X obj 350 328 loadbang; -#X obj 350 349 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 350 367 metro 10; -#X obj 350 389 snapshot~; -#X floatatom 350 409 8 0 0 0 - - -; -#X obj 541 275 *~; -#X obj 526 298 +~; -#X obj 526 185 sig~; -#X obj 526 165 r Zobs; -#X obj 541 229 r Xobs; -#X obj 541 250 sig~; -#X text 357 499 Azimuth angle between source and observer; -#X obj 480 453 s~ \$0_srcObsAzim; -#X obj 659 134 r~ \$0_srcObsAzim; -#X obj 659 158 /~ 360; -#X obj 659 182 cos~; -#X obj 674 227 /~ 360; -#X obj 674 251 cos~; -#X obj 659 275 *~; -#X obj 659 297 arccos~; -#X obj 753 262 loadbang; -#X obj 753 283 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 753 301 metro 10; -#X obj 753 323 snapshot~; -#X floatatom 753 343 8 0 0 0 - - -; -#X obj 674 203 r~ \$0_srcObsElev; -#X obj -43 283 r~ \$0_Xdiff; #X obj 338 -72 loadbang; #X obj 338 -51 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; @@ -110,37 +44,8 @@ #X obj 477 9 metro 10; #X obj 477 31 snapshot~; #X floatatom 477 51 8 0 0 0 - - -; -#X obj -121 385 sig~ 90; -#X obj -88 432 -~; #X text 45 106 Y \, X \, Z dist between source and centre; #X text 61 119 Based on length \, azim and elev; -#X msg -65 -93 0.2; -#X obj 676 405 r~ \$0_scrObsDist; -#X obj 661 426 /~; -#X obj 661 451 arccos~; -#X obj 722 444 loadbang; -#X obj 722 465 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 722 483 metro 10; -#X obj 722 505 snapshot~; -#X floatatom 722 525 8 0 0 0 - - -; -#X obj 116 341 r~ currentElev; -#X obj 225 336 loadbang; -#X obj 225 357 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 225 375 metro 10; -#X obj 225 397 snapshot~; -#X floatatom 225 417 5 0 0 0 - - -; -#X obj -58 259 sig~; -#X obj -58 312 -~; -#X obj -58 236 r Xobs; -#X obj 76 194 loadbang; -#X obj 76 215 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 76 233 metro 10; -#X obj 76 255 snapshot~; -#X floatatom 76 275 5 0 0 0 - - -; -#X obj 101 402 -~; #X obj 575 -75 inlet~; #X obj 601 -31 loadbang; #X obj 601 -10 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 @@ -159,163 +64,117 @@ #X obj 451 -53 s~ \$0_scrObsYDist; #X obj 575 -54 s~ \$0_scrObsXDist; #X obj 691 -56 s~ \$0_scrObsZDist; -#X obj 855 92 atan~; -#X obj 854 68 /~; -#X obj 849 15 r~ \$0_scrObsXDist; -#X obj 868 42 r~ \$0_scrObsZDist; -#X obj 856 121 /~ 6.28319; -#X obj 858 140 *~ 360; -#X obj 877 184 loadbang; -#X obj 877 205 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +#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 1; -#X obj 877 223 metro 10; -#X obj 877 245 snapshot~; -#X floatatom 877 265 5 0 0 0 - - -; -#X obj 357 223 r~ \$0_scrObsYDist; -#X obj 495 134 r~ \$0_scrObsYDist; -#X obj 661 382 r~ \$0_scrObsYDist; -#X obj 816 184 outlet~; +#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 connect 0 0 3 0; -#X connect 0 0 37 0; +#X connect 0 0 16 0; #X connect 1 0 4 0; -#X connect 1 0 42 0; +#X connect 1 0 21 0; #X connect 2 0 5 0; -#X connect 2 0 47 0; +#X connect 2 0 26 0; #X connect 6 0 7 0; -#X connect 7 0 8 0; -#X connect 8 0 13 0; -#X connect 8 0 20 0; -#X connect 9 0 8 1; +#X connect 8 0 9 0; #X connect 10 0 11 0; -#X connect 11 0 12 0; -#X connect 12 0 13 0; +#X connect 10 0 31 0; +#X connect 12 0 36 0; +#X connect 12 0 53 0; #X connect 13 0 14 0; +#X connect 14 0 15 0; #X connect 15 0 16 0; -#X connect 17 0 18 0; -#X connect 19 0 26 0; -#X connect 20 0 19 0; +#X connect 16 0 17 0; +#X connect 18 0 19 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; #X connect 21 0 22 0; -#X connect 22 0 23 0; #X connect 23 0 24 0; #X connect 24 0 25 0; +#X connect 25 0 26 0; #X connect 26 0 27 0; -#X connect 27 0 101 1; -#X connect 27 0 127 0; +#X connect 28 0 29 0; +#X connect 29 0 30 0; +#X connect 30 0 31 0; #X connect 31 0 32 0; -#X connect 31 0 93 0; -#X connect 33 0 98 0; -#X connect 33 0 141 0; +#X connect 33 0 34 0; #X connect 34 0 35 0; #X connect 35 0 36 0; #X connect 36 0 37 0; -#X connect 37 0 38 0; -#X connect 39 0 40 0; -#X connect 40 0 41 0; +#X connect 40 0 44 0; +#X connect 40 0 54 0; #X connect 41 0 42 0; #X connect 42 0 43 0; +#X connect 43 0 44 0; #X connect 44 0 45 0; -#X connect 45 0 46 0; -#X connect 46 0 47 0; -#X connect 47 0 48 0; -#X connect 49 0 52 0; -#X connect 49 0 52 1; -#X connect 50 0 51 1; +#X connect 47 0 51 0; +#X connect 47 0 55 0; +#X connect 48 0 49 0; +#X connect 49 0 50 0; #X connect 50 0 51 0; -#X connect 51 0 53 1; -#X connect 52 0 53 0; -#X connect 53 0 57 0; -#X connect 53 0 59 0; -#X connect 54 0 59 1; -#X connect 55 0 69 0; -#X connect 56 0 61 0; -#X connect 57 0 56 0; -#X connect 58 0 60 0; -#X connect 59 0 58 0; -#X connect 60 0 62 0; -#X connect 61 0 60 1; -#X connect 62 0 66 0; -#X connect 62 0 75 0; +#X connect 51 0 52 0; +#X connect 57 0 58 1; +#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 63 0 64 0; -#X connect 64 0 65 0; -#X connect 65 0 66 0; -#X connect 66 0 67 0; -#X connect 68 0 69 1; -#X connect 69 0 58 1; -#X connect 70 0 55 0; -#X connect 70 0 55 1; -#X connect 71 0 70 0; +#X connect 64 0 66 1; +#X connect 65 0 67 0; +#X connect 66 0 69 1; +#X connect 67 0 68 0; +#X connect 68 0 66 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 72 0 73 0; -#X connect 73 0 68 0; -#X connect 73 0 68 1; +#X connect 73 0 74 0; +#X connect 74 0 75 0; #X connect 76 0 77 0; -#X connect 77 0 78 0; -#X connect 78 0 81 0; -#X connect 79 0 80 0; -#X connect 80 0 81 1; -#X connect 81 0 82 0; -#X connect 82 0 86 0; -#X connect 83 0 84 0; +#X connect 77 0 58 0; +#X connect 78 0 79 0; +#X connect 79 0 61 0; +#X connect 80 0 81 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 86 0; -#X connect 86 0 87 0; -#X connect 88 0 79 0; -#X connect 89 0 120 1; -#X connect 90 0 91 0; -#X connect 91 0 92 0; -#X connect 92 0 93 0; -#X connect 93 0 94 0; -#X connect 95 0 96 0; -#X connect 96 0 97 0; -#X connect 97 0 98 0; -#X connect 98 0 99 0; -#X connect 100 0 101 0; -#X connect 101 0 28 0; -#X connect 101 0 24 0; -#X connect 105 0 106 1; -#X connect 106 0 107 0; -#X connect 107 0 111 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 113 0 127 1; -#X connect 113 0 117 0; -#X connect 114 0 115 0; -#X connect 115 0 116 0; -#X connect 116 0 117 0; -#X connect 117 0 118 0; -#X connect 119 0 120 0; -#X connect 120 0 20 1; -#X connect 120 0 125 0; -#X connect 121 0 119 0; -#X connect 122 0 123 0; -#X connect 123 0 124 0; -#X connect 124 0 125 0; -#X connect 125 0 126 0; -#X connect 128 0 132 0; -#X connect 128 0 142 0; -#X connect 129 0 130 0; -#X connect 130 0 131 0; -#X connect 131 0 132 0; -#X connect 132 0 133 0; -#X connect 135 0 139 0; -#X connect 135 0 143 0; -#X connect 136 0 137 0; -#X connect 137 0 138 0; -#X connect 138 0 139 0; -#X connect 139 0 140 0; -#X connect 144 0 148 0; -#X connect 145 0 144 0; -#X connect 146 0 145 0; -#X connect 147 0 145 1; -#X connect 148 0 149 0; -#X connect 149 0 153 0; -#X connect 149 0 158 0; -#X connect 150 0 151 0; -#X connect 151 0 152 0; -#X connect 152 0 153 0; -#X connect 153 0 154 0; -#X connect 155 0 61 1; -#X connect 156 0 54 0; -#X connect 156 0 54 1; -#X connect 157 0 106 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;
--- a/SwordSounds/woSoFreqD3.pd Wed Aug 12 15:07:08 2015 +0100 +++ b/SwordSounds/woSoFreqD3.pd Wed Aug 12 19:22:56 2015 +0100 @@ -1,4 +1,4 @@ -#N canvas 39 24 1440 824 10; +#N canvas 333 23 1440 824 10; #X text 125 140 Frequency (Hz); #X obj 288 616 throw~ l; #X obj 321 597 throw~ r; @@ -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 242 208 702 650 freqGain 0; +#N canvas 39 137 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; @@ -350,7 +350,7 @@ #X obj 219 193 *~ 1; #X text 292 106 Length; #X obj 305 247 arccos; -#X obj 305 223 r sigMac; +#X obj 315 218 r sigMac; #X obj 240 337 +; #X obj 305 269 t f b; #X obj 240 298 delay 9; @@ -369,6 +369,12 @@ #X obj 419 420 cos~; #X obj 419 444 *~; #X obj 398 467 *~; +#X obj 517 364 loadbang; +#X obj 517 385 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 517 403 metro 10; +#X obj 517 425 snapshot~; +#X floatatom 517 445 5 0 0 0 - - -; #X obj 320 324 +~ 90; #X connect 2 0 4 0; #X connect 3 0 4 1; @@ -389,7 +395,6 @@ #X connect 26 0 27 1; #X connect 27 0 38 0; #X connect 29 0 32 0; -#X connect 30 0 29 0; #X connect 32 0 31 1; #X connect 32 1 33 0; #X connect 33 0 31 0; @@ -400,7 +405,7 @@ #X connect 38 0 11 0; #X connect 38 0 44 0; #X connect 39 0 45 0; -#X connect 39 0 49 0; +#X connect 39 0 54 0; #X connect 40 0 42 0; #X connect 42 0 43 0; #X connect 42 0 43 1; @@ -411,7 +416,12 @@ #X connect 46 0 47 1; #X connect 47 0 48 1; #X connect 48 0 10 0; -#X connect 49 0 40 0; +#X connect 49 0 50 0; +#X connect 50 0 51 0; +#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; @@ -434,12 +444,10 @@ #X obj 270 -78 s~ \$0_dist; #X obj 340 -79 s~ \$0_azim; #X obj 330 -37 r~ \$0_azim; -#X obj 330 6 +~ 0.5; -#X obj 330 28 s~ \$0_thisPan; +#X obj 330 10 s~ \$0_thisPan; #X obj 321 550 r~ \$0_thisPan; #X obj 619 57 r~ \$0_dist; #X obj 598 14 r~ \$0_azim; -#X obj 330 -15 /~ 360; #X obj 288 572 fcpan~; #X obj 621 312 r~ \$0_dist; #X obj 598 270 r~ \$0_azim; @@ -469,12 +477,19 @@ #X obj 857 142 *~ 0.015; #X obj 997 12 clip~ 1 20; #X obj 552 381 s~ \$0-liftNoiseGain; +#X obj 240 48 snapshot~; +#X obj 240 1 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1 +; +#X floatatom 240 74 10 0 0 0 - - -; +#X obj 240 -25 loadbang; +#X obj 240 23 metro 10; +#X obj 330 -16 panCalc; #X connect 3 0 5 0; #X connect 3 0 7 0; #X connect 4 0 21 0; #X connect 6 0 10 0; #X connect 8 0 4 0; -#X connect 9 0 83 0; +#X connect 9 0 81 0; #X connect 12 0 3 0; #X connect 13 0 16 0; #X connect 14 0 13 0; @@ -486,7 +501,7 @@ #X connect 23 0 32 0; #X connect 24 0 26 0; #X connect 25 0 46 0; -#X connect 25 0 86 0; +#X connect 25 0 84 0; #X connect 26 0 25 0; #X connect 27 0 29 0; #X connect 28 0 27 0; @@ -507,7 +522,7 @@ #X connect 51 0 57 0; #X connect 52 0 54 1; #X connect 53 0 54 0; -#X connect 54 0 110 0; +#X connect 54 0 108 0; #X connect 55 0 54 2; #X connect 56 0 54 5; #X connect 57 0 61 0; @@ -521,37 +536,41 @@ #X connect 70 0 71 0; #X connect 72 0 74 0; #X connect 73 0 75 0; -#X connect 76 0 82 0; -#X connect 77 0 78 0; -#X connect 79 0 83 1; -#X connect 80 0 57 6; -#X connect 81 0 57 4; -#X connect 82 0 77 0; -#X connect 83 0 1 0; -#X connect 83 1 2 0; -#X connect 84 0 54 6; -#X connect 85 0 54 4; -#X connect 86 0 28 0; -#X connect 86 0 41 0; -#X connect 87 0 95 1; -#X connect 88 0 104 0; -#X connect 88 0 95 0; -#X connect 89 0 99 0; +#X connect 73 0 109 0; +#X connect 76 0 114 0; +#X connect 78 0 81 1; +#X connect 79 0 57 6; +#X connect 80 0 57 4; +#X connect 81 0 1 0; +#X connect 81 1 2 0; +#X connect 82 0 54 6; +#X connect 83 0 54 4; +#X connect 84 0 28 0; +#X connect 84 0 41 0; +#X connect 85 0 93 1; +#X connect 86 0 102 0; +#X connect 86 0 93 0; +#X connect 87 0 97 0; +#X connect 88 0 89 0; +#X connect 88 0 93 2; #X connect 90 0 91 0; -#X connect 90 0 95 2; -#X connect 92 0 93 0; -#X connect 93 0 96 0; -#X connect 94 0 106 0; -#X connect 95 0 105 1; -#X connect 96 0 90 0; -#X connect 99 0 97 0; -#X connect 99 1 98 0; -#X connect 100 0 104 1; -#X connect 101 0 89 1; -#X connect 102 0 99 1; -#X connect 104 0 108 0; -#X connect 105 0 89 0; -#X connect 106 0 107 0; -#X connect 107 0 109 0; -#X connect 108 0 105 0; -#X connect 109 0 90 0; +#X connect 91 0 94 0; +#X connect 92 0 104 0; +#X connect 93 0 103 1; +#X connect 94 0 88 0; +#X connect 97 0 95 0; +#X connect 97 1 96 0; +#X connect 98 0 102 1; +#X connect 99 0 87 1; +#X connect 100 0 97 1; +#X connect 102 0 106 0; +#X connect 103 0 87 0; +#X connect 104 0 105 0; +#X connect 105 0 107 0; +#X connect 106 0 103 0; +#X connect 107 0 88 0; +#X connect 109 0 111 0; +#X connect 110 0 113 0; +#X connect 112 0 110 0; +#X connect 113 0 109 0; +#X connect 114 0 77 0;