diff SwordSounds/sourceSpeed.pd @ 96:1fc3648f6c34

SwordSounds: Azimuth, distance changed to audio signal Still ony one source
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Wed, 22 Jul 2015 20:01:33 +0100
parents 132bfea825a2
children 84a9624cbe77
line wrap: on
line diff
--- a/SwordSounds/sourceSpeed.pd	Wed Jul 22 18:10:54 2015 +0100
+++ b/SwordSounds/sourceSpeed.pd	Wed Jul 22 20:01:33 2015 +0100
@@ -1,93 +1,135 @@
-#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
+#N canvas 19 30 1408 813 10;
+#X obj 133 -151 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
+#X obj 133 -98 s GO;
+#X obj 73 -151 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
+#X obj 73 -98 s setUp;
+#X obj 254 390 line~;
+#X text 263 -130 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
+#X obj 141 439 loadbang;
+#X obj 141 460 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
+#X obj 141 478 metro 10;
+#X obj 141 500 snapshot~;
+#X floatatom 141 520 5 0 0 0 - - -;
+#X obj 222 536 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 msg 84 324 \$1 \$2;
+#X obj 84 299 pack;
+#X msg 254 356 0;
+#X obj 83 276 f;
+#X obj 83 231 r GO;
+#X msg 393 358 0 \$1;
+#X obj 392 281 t f b;
+#X obj 393 309 delay;
+#X obj 254 335 r setUp;
+#X text 237 316 Start at 0 speed;
+#X text 435 369 \$1 = time to reach speed of 0;
+#X obj 407 234 r preswingTime;
+#X text 345 194 Trigger once full speed;
+#X obj 254 423 outlet~;
+#X obj 585 -133 inlet;
+#X obj 679 -135 inlet;
+#X obj 585 -110 s \$0_thisGroup;
+#X obj 679 -111 s \$0_thisSource;
+#X text 21 355 \$1 = source speed;
+#X text 21 371 \$2 = time to reach source speed;
+#X obj 109 275 r preswingTime;
+#X obj 588 -14 r \$0_thisGroup;
+#X obj 603 6 r \$0_thisSource;
+#X obj 588 28 +;
+#X floatatom 542 55 5 0 0 0 - - -;
+#X obj 588 54 s \$0_mySourceNo;
+#X obj 113 -69 r \$0_mySourceNo;
+#X obj 128 -49 r deltaPreCirc;
+#X obj 113 -28 *;
+#X obj 113 13 +;
+#X obj 128 -8 r minPreCirc;
+#X floatatom 50 34 5 0 0 0 - - -;
+#X obj 128 34 r preswingTime;
+#X obj 113 77 /;
+#X obj 128 55 * 0.001;
+#X obj 113 104 * 2;
+#X text 156 84 Average Speed;
+#X text 153 108 Top Speed for this source;
+#X floatatom 60 130 5 0 0 0 - - -;
+#X obj 375 -63 r \$0_mySourceNo;
+#X obj 375 -22 *;
+#X obj 375 19 +;
+#X floatatom 312 40 5 0 0 0 - - -;
+#X obj 375 83 /;
+#X obj 390 61 * 0.001;
+#X obj 375 110 * 2;
+#X text 418 90 Average Speed;
+#X text 415 114 Top Speed for this source;
+#X floatatom 322 136 5 0 0 0 - - -;
+#X obj 390 -43 r deltaPostCirc;
+#X obj 390 -2 r minPostCirc;
+#X obj 390 40 r postswingTime;
+#X obj 113 131 s \$0_myPreSourceSpeed;
+#X obj 98 252 r \$0_myPreSourceSpeed;
+#X obj 375 137 s \$0_myPostSourceSpeed;
+#X obj 450 298 r postswingTime;
+#X floatatom 482 321 5 0 0 0 - - -;
+#X obj 392 214 r GO;
+#X obj 392 256 f;
+#X obj 393 336 f;
+#X obj 788 -23 r start_armLength;
+#X obj 773 -45 r length;
+#X obj 773 39 -;
+#X obj 821 20 r NoOfSources;
+#X obj 806 -1 r \$0_mySourceNo;
+#X obj 806 42 /;
+#X obj 773 64 *;
+#X floatatom 728 132 5 0 0 0 - - -;
+#X obj 773 107 +;
+#X obj 788 85 r start_armLength;
+#X text 828 133 Distance from centre of arc;
+#X obj 779 297 f;
+#X obj 779 254 r GO;
+#X obj 794 275 r preswingTime;
+#X obj 941 355 line~;
+#X obj 806 419 loadbang;
+#X obj 806 440 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X obj 806 458 metro 10;
+#X obj 806 480 snapshot~;
+#X floatatom 806 500 5 0 0 0 - - -;
+#X obj 887 516 hsl 128 15 -90 270 0 0 empty empty empty -2 -8 0 10
+-262144 -1 -1 5884 1;
+#X obj 941 254 r setUp;
+#X text 924 235 Start at 0 speed;
+#X obj 941 382 outlet~;
+#X obj 956 275 r presweepAzim;
+#X obj 941 298 f;
+#X msg 941 321 \$1;
+#X msg 779 320 0 \$1;
+#X obj 1065 199 t f b;
+#X obj 1066 227 delay;
+#X obj 1080 152 r preswingTime;
+#X obj 1087 276 r postswingTime;
+#X obj 1065 132 r GO;
+#X obj 1065 174 f;
+#X obj 1066 254 f;
+#X obj 1066 299 pack;
+#X obj 1108 202 r postsweepAzim;
+#X msg 1066 325 \$1 \$2;
+#X obj 1064 -89 r preswingTime;
+#X obj 1049 -67 +;
+#X obj 1036 34 delay;
+#X obj 1034 -19 t f b;
+#X obj 1034 -132 r GO;
+#X obj 1034 -44 f;
+#X obj 1063 11 + 5;
+#X obj 1108 225 * -1;
+#X obj 1049 -111 r postswingTime;
+#X obj 1036 57 s myEnd;
+#X obj 889 254 r myEnd;
+#X obj 773 156 outlet~;
+#X obj 773 132 sig~;
+#X text 1004 374 Current source Azimuth angle;
 #X connect 0 0 1 0;
 #X connect 2 0 3 0;
 #X connect 4 0 9 0;
@@ -151,5 +193,43 @@
 #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 80 0 122 0;
 #X connect 81 0 80 1;
+#X connect 83 0 99 0;
+#X connect 84 0 83 0;
+#X connect 85 0 83 1;
+#X connect 86 0 90 0;
+#X connect 86 0 95 0;
+#X connect 87 0 88 0;
+#X connect 88 0 89 0;
+#X connect 89 0 90 0;
+#X connect 90 0 91 0;
+#X connect 90 0 92 0;
+#X connect 93 0 97 0;
+#X connect 96 0 97 1;
+#X connect 97 0 98 0;
+#X connect 98 0 86 0;
+#X connect 99 0 86 0;
+#X connect 100 0 101 1;
+#X connect 100 1 101 0;
+#X connect 101 0 106 0;
+#X connect 102 0 105 1;
+#X connect 103 0 107 1;
+#X connect 104 0 105 0;
+#X connect 105 0 100 0;
+#X connect 106 0 107 0;
+#X connect 107 0 109 0;
+#X connect 108 0 117 0;
+#X connect 109 0 86 0;
+#X connect 110 0 111 1;
+#X connect 111 0 115 1;
+#X connect 112 0 119 0;
+#X connect 113 0 116 0;
+#X connect 113 1 112 0;
+#X connect 114 0 115 0;
+#X connect 115 0 113 0;
+#X connect 116 0 112 1;
+#X connect 117 0 106 1;
+#X connect 118 0 111 0;
+#X connect 120 0 97 0;
+#X connect 122 0 121 0;