view SwordSounds/sourceSpeed.pd @ 95:132bfea825a2

SwordSounds continue development. Single source working but no azimuth info for source yet.

#N canvas 117 23 1408 813 10;
#X obj 212 -172 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
-1;
#X obj 212 -119 s GO;
#X obj 152 -172 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
-1 -1;
#X obj 152 -119 s setUp;
#X obj 333 369 line~;
#X text 342 -151 Start calculation with elevation = 0 \, arm length
is constant \, acceleration/deceleration is constant.;
#X obj 220 418 loadbang;
#X obj 220 439 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 220 457 metro 10;
#X obj 220 479 snapshot~;
#X floatatom 220 499 5 0 0 0 - - -;
#X obj 301 515 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X msg 163 303 \$1 \$2;
#X obj 163 278 pack;
#X msg 333 335 0;
#X obj 162 255 f;
#X obj 162 210 r GO;
#X msg 472 337 0 \$1;
#X obj 471 260 t f b;
#X obj 472 288 delay;
#X obj 333 314 r setUp;
#X text 316 295 Start at 0 speed;
#X text 514 348 \$1 = time to reach speed of 0;
#X obj 486 213 r preswingTime;
#X text 424 173 Trigger once full speed;
#X obj 333 402 outlet~;
#X obj 664 -154 inlet;
#X obj 758 -156 inlet;
#X obj 664 -131 s \$0_thisGroup;
#X obj 758 -132 s \$0_thisSource;
#X text 100 334 \$1 = source speed;
#X text 100 350 \$2 = time to reach source speed;
#X obj 188 254 r preswingTime;
#X obj 667 -35 r \$0_thisGroup;
#X obj 682 -15 r \$0_thisSource;
#X obj 667 7 +;
#X floatatom 621 34 5 0 0 0 - - -;
#X obj 667 33 s \$0_mySourceNo;
#X obj 192 -90 r \$0_mySourceNo;
#X obj 207 -70 r deltaPreCirc;
#X obj 192 -49 *;
#X obj 192 -8 +;
#X obj 207 -29 r minPreCirc;
#X floatatom 129 13 5 0 0 0 - - -;
#X obj 207 13 r preswingTime;
#X obj 192 56 /;
#X obj 207 34 * 0.001;
#X obj 192 83 * 2;
#X text 235 63 Average Speed;
#X text 232 87 Top Speed for this source;
#X floatatom 139 109 5 0 0 0 - - -;
#X obj 454 -84 r \$0_mySourceNo;
#X obj 454 -43 *;
#X obj 454 -2 +;
#X floatatom 391 19 5 0 0 0 - - -;
#X obj 454 62 /;
#X obj 469 40 * 0.001;
#X obj 454 89 * 2;
#X text 497 69 Average Speed;
#X text 494 93 Top Speed for this source;
#X floatatom 401 115 5 0 0 0 - - -;
#X obj 469 -64 r deltaPostCirc;
#X obj 469 -23 r minPostCirc;
#X obj 469 19 r postswingTime;
#X obj 192 110 s \$0_myPreSourceSpeed;
#X obj 177 231 r \$0_myPreSourceSpeed;
#X obj 454 116 s \$0_myPostSourceSpeed;
#X obj 529 277 r postswingTime;
#X floatatom 561 300 5 0 0 0 - - -;
#X obj 471 193 r GO;
#X obj 471 235 f;
#X obj 472 315 f;
#X obj 893 -14 r start_armLength;
#X obj 878 -36 r length;
#X obj 878 48 -;
#X obj 926 29 r NoOfSources;
#X obj 911 8 r \$0_mySourceNo;
#X obj 911 51 /;
#X obj 878 73 *;
#X floatatom 829 142 5 0 0 0 - - -;
#X obj 878 116 +;
#X obj 893 94 r start_armLength;
#X obj 878 143 outlet;
#X text 933 142 Distance from centre of arc;
#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 71 0;
#X connect 20 0 14 0;
#X connect 23 0 70 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 64 0;
#X connect 51 0 52 0;
#X connect 52 0 53 0;
#X connect 53 0 54 0;
#X connect 53 0 55 0;
#X connect 55 0 57 0;
#X connect 56 0 55 1;
#X connect 57 0 60 0;
#X connect 57 0 66 0;
#X connect 61 0 52 1;
#X connect 62 0 53 1;
#X connect 63 0 56 0;
#X connect 65 0 15 1;
#X connect 67 0 68 0;
#X connect 67 0 71 1;
#X connect 69 0 70 0;
#X connect 70 0 18 0;
#X connect 71 0 17 0;
#X connect 72 0 74 1;
#X connect 73 0 74 0;
#X connect 74 0 78 0;
#X connect 75 0 77 1;
#X connect 76 0 77 0;
#X connect 77 0 78 1;
#X connect 78 0 80 0;
#X connect 80 0 79 0;
#X connect 80 0 82 0;
#X connect 81 0 80 1;