view SwordSounds2/sourceSpeed.pd @ 176:a297efeba5c0

Sword model - Calculated bases for the plane of the sword, the projection matrix and the position of the observer projected onto this plane. Then can calculate the elevation and the azimuth between source and observer.

Next - add additional sources along the blade length.

#N canvas 140 48 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;
#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 -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 457 331 r~ \$0_srcCnt;
#X text 453 373 Y;
#X text 465 374 X;
#X text 477 374 Z;
#X obj 457 360 thisPosition;
#X obj 427 538 outlet~;
#X obj 493 523 outlet~;
#X obj 468 402 thisAngle;
#X obj 586 532 outlet~;
#X obj 289 476 loadbang;
#X obj 289 497 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 289 515 metro 10;
#X obj 289 537 snapshot~;
#X floatatom 289 557 5 0 0 0 - - -;
#X connect 0 0 1 0;
#X connect 2 0 3 0;
#X connect 4 0 9 0;
#X connect 4 0 25 0;
#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 9 0 11 0;
#X connect 12 0 4 0;
#X connect 13 0 12 0;
#X connect 14 0 4 0;
#X connect 15 0 13 0;
#X connect 16 0 15 0;
#X connect 17 0 4 0;
#X connect 18 0 19 1;
#X connect 18 1 19 0;
#X connect 19 0 57 0;
#X connect 20 0 14 0;
#X connect 23 0 56 1;
#X connect 26 0 28 0;
#X connect 27 0 29 0;
#X connect 32 0 13 1;
#X connect 33 0 35 0;
#X connect 34 0 35 1;
#X connect 35 0 36 0;
#X connect 35 0 37 0;
#X connect 38 0 40 0;
#X connect 39 0 40 1;
#X connect 40 0 41 0;
#X connect 41 0 43 0;
#X connect 41 0 45 0;
#X connect 42 0 41 1;
#X connect 44 0 46 0;
#X connect 45 0 47 0;
#X connect 46 0 45 1;
#X connect 47 0 50 0;
#X connect 47 0 51 0;
#X connect 52 0 15 1;
#X connect 53 0 54 0;
#X connect 53 0 57 1;
#X connect 55 0 56 0;
#X connect 56 0 18 0;
#X connect 57 0 17 0;
#X connect 58 0 60 1;
#X connect 59 0 60 0;
#X connect 60 0 64 0;
#X connect 61 0 63 1;
#X connect 62 0 63 0;
#X connect 63 0 64 1;
#X connect 64 0 66 0;
#X connect 66 0 65 0;
#X connect 66 0 69 0;
#X connect 67 0 66 1;
#X connect 69 0 70 0;
#X connect 71 0 75 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 3 83 0;
#X connect 75 4 78 4;
#X connect 75 5 78 5;
#X connect 75 6 78 6;
#X connect 78 0 77 0;
#X connect 78 1 79 0;
#X connect 80 0 81 0;
#X connect 81 0 82 0;
#X connect 82 0 83 0;
#X connect 83 0 84 0;