Mercurial > hg > weather-synthesis-prototyping
diff June/obsPosition.pd @ 94:2dea66bf32a1
New swordsounds folder created
within swordsounds:
Work on calculating the speed of a source by using calculations in the audio domain
assuming radius does not vary
assuming constant acceleration
assuming zero elevation
assuming sound hear from center of sweep
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Wed, 22 Jul 2015 15:22:45 +0100 |
parents | 65306ede8d41 |
children |
line wrap: on
line diff
--- a/June/obsPosition.pd Tue Jul 21 10:11:11 2015 +0100 +++ b/June/obsPosition.pd Wed Jul 22 15:22:45 2015 +0100 @@ -1,69 +1,128 @@ -#N canvas 199 51 694 515 10; -#X obj -122 343 r obsDistance; -#X obj 40 155 r obsAngle; +#N canvas 203 146 1178 769 10; #X obj -117 35 inlet; -#X obj 265 82 r bladeLen; -#X obj 280 188 r armLength; +#X obj 296 -12 r bladeLen; +#X obj 311 94 r armLength; #X obj -117 58 s \$0_sourceNo; -#X obj 279 103 r NoOfSources; -#X obj 265 213 +; -#X obj 265 123 /; -#X obj 265 167 *; -#X obj 280 144 r \$0_sourceNo; -#X obj 25 210 / 360; -#X obj 25 232 * 6.28319; -#X floatatom -33 283 8 0 0 0 - - -; -#X obj 25 283 *; -#X floatatom -32 345 8 0 0 0 - - -; -#X obj 49 397 hsl 128 15 15 25 0 0 empty empty empty -2 -8 0 10 -262144 --1 -1 0 1; -#X obj 25 133 r currentAngle; -#X floatatom -53 403 8 0 0 0 - - -; -#X obj 25 345 t f b; -#X obj 25 178 +; -#X obj 10 376 +; -#X obj 25 257 cos; -#X obj -80 150 hsl 75 25 -360 360 0 0 empty empty empty -2 -8 0 10 --262144 -1 -1 5357 1; -#X floatatom -83 182 5 0 0 0 - - -; -#X obj 10 418 outlet; -#X floatatom -19 211 5 0 0 0 - - -; -#X obj 73 211 outlet; -#X text 67 176 Combine observer angle; -#X text 67 188 and angle of swing; -#X text 291 213 Distance from centre of arc to the source; -#X obj 25 320 * -1; -#X text 61 284 Distance between the centre of the arc and source in -line between centre and observer; -#X text 54 427 Total distance between observer and the specific source -in line from centre; -#X text 91 24 This also needs to change to Audio control signal as -the angle is constantly changing throughout the swing.; -#X connect 0 0 21 0; -#X connect 1 0 20 1; -#X connect 2 0 5 0; -#X connect 3 0 8 0; -#X connect 4 0 7 1; -#X connect 6 0 8 1; -#X connect 7 0 14 1; -#X connect 8 0 9 0; -#X connect 9 0 7 0; -#X connect 10 0 9 1; -#X connect 11 0 12 0; -#X connect 12 0 22 0; -#X connect 14 0 31 0; -#X connect 17 0 20 0; -#X connect 17 0 23 0; -#X connect 19 0 21 1; -#X connect 19 1 21 0; -#X connect 20 0 11 0; -#X connect 20 0 26 0; -#X connect 20 0 27 0; -#X connect 21 0 16 0; -#X connect 21 0 18 0; -#X connect 21 0 25 0; -#X connect 22 0 13 0; -#X connect 22 0 14 0; +#X obj 310 9 r NoOfSources; +#X obj 296 119 +; +#X obj 296 29 /; +#X obj 296 73 *; +#X obj 311 50 r \$0_sourceNo; +#X text 322 117 Distance from centre of arc to the source; +#X obj 30 58 r~ swordAngle; +#X obj -116 -15 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -61 -14 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 +-1 -1; +#X obj -116 10 s setUp; +#X obj -61 10 s GO; +#X floatatom 260 146 5 0 0 0 - - -; +#X obj 30 88 /~ 360; +#X obj 30 138 *~ 1; +#X obj 30 114 cos~; +#X obj -61 115 r obsDistance; +#X obj -61 136 sig~; +#X obj 15 173 -~; +#X obj 72 143 r~ swordAngle; +#X obj 72 170 /~ 360; +#X obj 72 194 sin~; +#X obj 296 144 s \$0_thisLength; +#X obj 72 220 *~ 1; +#X obj 107 193 r \$0_thisLength; +#X obj 15 245 *~; +#X obj 72 247 *~; +#X obj 15 273 +~; +#X obj 15 296 sqrt~; +#X obj -64 302 metro 10; +#X obj -64 333 snapshot~; +#X floatatom -65 357 8 0 0 0 - - -; +#X obj -64 271 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj -64 246 loadbang; +#X obj 70 115 r \$0_thisLength; +#X obj 404 216 r \$0_thisLength; +#X obj 404 239 sig~; +#X obj 404 264 *~; +#X obj 612 220 r obsDistance; +#X obj 612 241 sig~; +#X obj 612 265 *~; +#X obj 15 330 s~ \$0sourceDist; +#X obj 509 220 r~ \$0sourceDist; +#X obj 509 262 *~; +#X text 422 194 l; +#X text 552 197 B; +#X text 644 198 Z; +#X obj 494 293 +~; +#X obj 494 319 -~; +#X obj 524 323 r \$0_thisLength; +#X obj 524 346 sig~; +#X obj 625 323 r~ \$0sourceDist; +#X obj 625 346 *~ 2; +#X obj 524 375 *~; +#X obj 494 398 /~; +#X obj 394 386 loadbang; +#X obj 394 409 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +1; +#X obj 394 430 metro 10; +#X obj 394 453 snapshot~; +#X floatatom 394 477 5 0 0 0 - - -; +#X obj 494 424 arccos~; +#X connect 0 0 3 0; +#X connect 1 0 6 0; +#X connect 2 0 5 1; +#X connect 4 0 6 1; +#X connect 5 0 15 0; +#X connect 5 0 25 0; +#X connect 6 0 7 0; +#X connect 7 0 5 0; +#X connect 8 0 7 1; +#X connect 10 0 16 0; +#X connect 11 0 13 0; +#X connect 12 0 14 0; +#X connect 16 0 18 0; +#X connect 17 0 21 1; +#X connect 18 0 17 0; +#X connect 19 0 20 0; +#X connect 20 0 21 0; +#X connect 21 0 28 0; +#X connect 21 0 28 1; +#X connect 22 0 23 0; #X connect 23 0 24 0; -#X connect 31 0 19 0; -#X connect 31 0 15 0; +#X connect 24 0 26 0; +#X connect 26 0 29 0; +#X connect 26 0 29 1; +#X connect 27 0 26 1; +#X connect 28 0 30 0; +#X connect 29 0 30 1; +#X connect 30 0 31 0; +#X connect 31 0 33 0; +#X connect 31 0 44 0; +#X connect 32 0 33 0; +#X connect 33 0 34 0; +#X connect 35 0 32 0; +#X connect 36 0 35 0; +#X connect 37 0 17 1; +#X connect 38 0 39 0; +#X connect 39 0 40 0; +#X connect 39 0 40 1; +#X connect 40 0 50 0; +#X connect 41 0 42 0; +#X connect 42 0 43 0; +#X connect 42 0 43 1; +#X connect 43 0 51 1; +#X connect 45 0 46 0; +#X connect 45 0 46 1; +#X connect 46 0 50 1; +#X connect 50 0 51 0; +#X connect 51 0 57 0; +#X connect 52 0 53 0; +#X connect 53 0 56 0; +#X connect 54 0 55 0; +#X connect 55 0 56 1; +#X connect 56 0 57 1; +#X connect 57 0 63 0; +#X connect 58 0 59 0; +#X connect 59 0 60 0; +#X connect 60 0 61 0; +#X connect 61 0 62 0; +#X connect 63 0 61 0;