annotate SwordSounds/sourceSpeed.pd @ 101:7f67b04e6c5d

Swordsounds: Distance between observer and source calculated working on angle - source relationship
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 25 Jul 2015 09:37:39 +0100
parents cb211bfa6029
children 899f8e554fa6
rev   line source
r@101 1 #N canvas 0 23 1408 813 10;
r@101 2 #X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034
r@95 3 -1 -1;
r@101 4 #X obj -219 -68 s GO;
r@101 5 #X obj -279 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@101 6 -1 -1;
r@101 7 #X obj -279 -68 s setUp;
r@101 8 #X obj -98 420 line~;
r@101 9 #X text -89 -100 Start calculation with elevation = 0 \, arm length
r@95 10 is constant \, acceleration/deceleration is constant.;
r@101 11 #X obj -211 469 loadbang;
r@101 12 #X obj -211 490 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@101 13 1 1;
r@101 14 #X obj -211 508 metro 10;
r@101 15 #X obj -211 530 snapshot~;
r@101 16 #X floatatom -211 550 5 0 0 0 - - -;
r@101 17 #X obj -130 566 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
r@101 18 -1 -1 0 1;
r@101 19 #X msg -268 354 \$1 \$2;
r@101 20 #X obj -268 329 pack;
r@101 21 #X msg -98 386 0;
r@101 22 #X obj -269 306 f;
r@101 23 #X obj -269 261 r GO;
r@101 24 #X msg 41 388 0 \$1;
r@101 25 #X obj 40 311 t f b;
r@101 26 #X obj 41 339 delay;
r@101 27 #X obj -98 365 r setUp;
r@101 28 #X text -115 346 Start at 0 speed;
r@101 29 #X text 83 399 \$1 = time to reach speed of 0;
r@101 30 #X obj 55 264 r preswingTime;
r@101 31 #X text -7 224 Trigger once full speed;
r@101 32 #X obj -98 453 outlet~;
r@101 33 #X obj 233 -103 inlet;
r@101 34 #X obj 327 -105 inlet;
r@101 35 #X obj 233 -80 s \$0_thisGroup;
r@101 36 #X obj 327 -81 s \$0_thisSource;
r@101 37 #X text -331 385 \$1 = source speed;
r@101 38 #X text -331 401 \$2 = time to reach source speed;
r@101 39 #X obj -243 305 r preswingTime;
r@101 40 #X obj 236 16 r \$0_thisGroup;
r@101 41 #X obj 251 36 r \$0_thisSource;
r@101 42 #X obj 236 58 +;
r@101 43 #X floatatom 190 85 5 0 0 0 - - -;
r@101 44 #X obj 236 84 s \$0_mySourceNo;
r@101 45 #X obj -239 -39 r \$0_mySourceNo;
r@101 46 #X obj -224 -19 r deltaPreCirc;
r@101 47 #X obj -239 2 *;
r@101 48 #X obj -239 43 +;
r@101 49 #X obj -224 22 r minPreCirc;
r@101 50 #X floatatom -302 64 5 0 0 0 - - -;
r@101 51 #X obj -224 64 r preswingTime;
r@101 52 #X obj -239 107 /;
r@101 53 #X obj -224 85 * 0.001;
r@101 54 #X obj -239 134 * 2;
r@101 55 #X text -196 114 Average Speed;
r@101 56 #X text -199 138 Top Speed for this source;
r@101 57 #X floatatom -292 160 5 0 0 0 - - -;
r@101 58 #X obj -239 161 s \$0_myPreSourceSpeed;
r@101 59 #X obj -254 282 r \$0_myPreSourceSpeed;
r@101 60 #X obj 98 328 r postswingTime;
r@101 61 #X floatatom 130 351 5 0 0 0 - - -;
r@101 62 #X obj 40 244 r GO;
r@101 63 #X obj 40 286 f;
r@101 64 #X obj 41 366 f;
r@101 65 #X obj 436 7 r start_armLength;
r@101 66 #X obj 421 -15 r length;
r@101 67 #X obj 421 69 -;
r@101 68 #X obj 469 50 r NoOfSources;
r@101 69 #X obj 454 29 r \$0_mySourceNo;
r@101 70 #X obj 454 72 /;
r@101 71 #X obj 421 94 *;
r@101 72 #X floatatom 376 162 5 0 0 0 - - -;
r@101 73 #X obj 421 137 +;
r@101 74 #X obj 436 115 r start_armLength;
r@101 75 #X text 476 163 Distance from centre of arc;
r@101 76 #X obj 421 162 sig~;
r@101 77 #X obj 421 210 s~ \$0_srcCnt;
r@101 78 #X obj 618 324 loadbang;
r@101 79 #X obj 618 345 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@95 80 1;
r@101 81 #X obj 618 363 metro 10;
r@101 82 #X obj 618 385 snapshot~;
r@101 83 #X floatatom 618 405 5 0 0 0 - - -;
r@101 84 #X obj 457 331 r~ \$0_srcCnt;
r@101 85 #X obj 457 360 thisPosition;
r@101 86 #X text 446 376 Y;
r@101 87 #X text 472 376 X;
r@101 88 #X text 494 376 Z;
r@101 89 #X obj 615 431 loadbang;
r@101 90 #X obj 615 452 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@101 91 1;
r@101 92 #X obj 615 470 metro 10;
r@101 93 #X obj 615 492 snapshot~;
r@101 94 #X floatatom 615 512 5 0 0 0 - - -;
r@101 95 #X obj 322 414 loadbang;
r@101 96 #X obj 322 435 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@101 97 1;
r@101 98 #X obj 322 453 metro 10;
r@101 99 #X obj 322 475 snapshot~;
r@101 100 #X floatatom 322 495 5 0 0 0 - - -;
r@101 101 #X obj 333 304 loadbang;
r@101 102 #X obj 333 325 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@101 103 1;
r@101 104 #X obj 333 343 metro 10;
r@101 105 #X obj 333 365 snapshot~;
r@101 106 #X floatatom 333 385 5 0 0 0 - - -;
r@101 107 #X obj 467 402 thisAngle;
r@95 108 #X connect 0 0 1 0;
r@95 109 #X connect 2 0 3 0;
r@95 110 #X connect 4 0 9 0;
r@95 111 #X connect 4 0 25 0;
r@95 112 #X connect 6 0 7 0;
r@95 113 #X connect 7 0 8 0;
r@95 114 #X connect 8 0 9 0;
r@95 115 #X connect 9 0 10 0;
r@95 116 #X connect 9 0 11 0;
r@95 117 #X connect 12 0 4 0;
r@95 118 #X connect 13 0 12 0;
r@95 119 #X connect 14 0 4 0;
r@95 120 #X connect 15 0 13 0;
r@95 121 #X connect 16 0 15 0;
r@95 122 #X connect 17 0 4 0;
r@95 123 #X connect 18 0 19 1;
r@95 124 #X connect 18 1 19 0;
r@98 125 #X connect 19 0 57 0;
r@95 126 #X connect 20 0 14 0;
r@98 127 #X connect 23 0 56 1;
r@95 128 #X connect 26 0 28 0;
r@95 129 #X connect 27 0 29 0;
r@95 130 #X connect 32 0 13 1;
r@95 131 #X connect 33 0 35 0;
r@95 132 #X connect 34 0 35 1;
r@95 133 #X connect 35 0 36 0;
r@95 134 #X connect 35 0 37 0;
r@95 135 #X connect 38 0 40 0;
r@95 136 #X connect 39 0 40 1;
r@95 137 #X connect 40 0 41 0;
r@95 138 #X connect 41 0 43 0;
r@95 139 #X connect 41 0 45 0;
r@95 140 #X connect 42 0 41 1;
r@95 141 #X connect 44 0 46 0;
r@95 142 #X connect 45 0 47 0;
r@95 143 #X connect 46 0 45 1;
r@95 144 #X connect 47 0 50 0;
r@98 145 #X connect 47 0 51 0;
r@98 146 #X connect 52 0 15 1;
r@95 147 #X connect 53 0 54 0;
r@98 148 #X connect 53 0 57 1;
r@98 149 #X connect 55 0 56 0;
r@98 150 #X connect 56 0 18 0;
r@98 151 #X connect 57 0 17 0;
r@98 152 #X connect 58 0 60 1;
r@98 153 #X connect 59 0 60 0;
r@98 154 #X connect 60 0 64 0;
r@98 155 #X connect 61 0 63 1;
r@98 156 #X connect 62 0 63 0;
r@98 157 #X connect 63 0 64 1;
r@98 158 #X connect 64 0 66 0;
r@98 159 #X connect 66 0 65 0;
r@100 160 #X connect 66 0 69 0;
r@98 161 #X connect 67 0 66 1;
r@101 162 #X connect 69 0 70 0;
r@101 163 #X connect 71 0 72 0;
r@101 164 #X connect 72 0 73 0;
r@95 165 #X connect 73 0 74 0;
r@100 166 #X connect 74 0 75 0;
r@101 167 #X connect 76 0 77 0;
r@101 168 #X connect 77 0 94 0;
r@101 169 #X connect 77 0 96 0;
r@101 170 #X connect 77 1 89 0;
r@101 171 #X connect 77 1 96 1;
r@101 172 #X connect 77 2 84 0;
r@101 173 #X connect 77 2 96 2;
r@101 174 #X connect 77 3 74 0;
r@101 175 #X connect 77 3 96 3;
r@101 176 #X connect 81 0 82 0;
r@101 177 #X connect 82 0 83 0;
r@101 178 #X connect 83 0 84 0;
r@101 179 #X connect 84 0 85 0;
r@100 180 #X connect 86 0 87 0;
r@101 181 #X connect 87 0 88 0;
r@101 182 #X connect 88 0 89 0;
r@101 183 #X connect 89 0 90 0;
r@101 184 #X connect 91 0 92 0;
r@101 185 #X connect 92 0 93 0;
r@101 186 #X connect 93 0 94 0;
r@101 187 #X connect 94 0 95 0;