Mercurial > hg > weather-synthesis-prototyping

annotate SwordSounds/sourceSpeed.pd @ 98:84a9624cbe77

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
SwordSounds: Create version with only 10 sources, equally space over the length of the sword. Calculate elevation change as well as azimuth change over the swing time.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 24 Jul 2015 16:16:18 +0100
parents 1fc3648f6c34
children 6f2ab99a4420
rev   line source
r@96 1 #N canvas 19 30 1408 813 10;
r@96 2 #X obj 133 -151 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
r@95 3 -1;
r@96 4 #X obj 133 -98 s GO;
r@96 5 #X obj 73 -151 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
r@95 6 -1 -1;
r@96 7 #X obj 73 -98 s setUp;
r@96 8 #X obj 254 390 line~;
r@96 9 #X text 263 -130 Start calculation with elevation = 0 \, arm length
r@95 10 is constant \, acceleration/deceleration is constant.;
r@96 11 #X obj 141 439 loadbang;
r@96 12 #X obj 141 460 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@95 13 1;
r@96 14 #X obj 141 478 metro 10;
r@96 15 #X obj 141 500 snapshot~;
r@96 16 #X floatatom 141 520 5 0 0 0 - - -;
r@96 17 #X obj 222 536 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144
r@95 18 -1 -1 0 1;
r@96 19 #X msg 84 324 \$1 \$2;
r@96 20 #X obj 84 299 pack;
r@96 21 #X msg 254 356 0;
r@96 22 #X obj 83 276 f;
r@96 23 #X obj 83 231 r GO;
r@96 24 #X msg 393 358 0 \$1;
r@96 25 #X obj 392 281 t f b;
r@96 26 #X obj 393 309 delay;
r@96 27 #X obj 254 335 r setUp;
r@96 28 #X text 237 316 Start at 0 speed;
r@96 29 #X text 435 369 \$1 = time to reach speed of 0;
r@96 30 #X obj 407 234 r preswingTime;
r@96 31 #X text 345 194 Trigger once full speed;
r@96 32 #X obj 254 423 outlet~;
r@96 33 #X obj 585 -133 inlet;
r@96 34 #X obj 679 -135 inlet;
r@96 35 #X obj 585 -110 s \$0_thisGroup;
r@96 36 #X obj 679 -111 s \$0_thisSource;
r@96 37 #X text 21 355 \$1 = source speed;
r@96 38 #X text 21 371 \$2 = time to reach source speed;
r@96 39 #X obj 109 275 r preswingTime;
r@96 40 #X obj 588 -14 r \$0_thisGroup;
r@96 41 #X obj 603 6 r \$0_thisSource;
r@96 42 #X obj 588 28 +;
r@96 43 #X floatatom 542 55 5 0 0 0 - - -;
r@96 44 #X obj 588 54 s \$0_mySourceNo;
r@96 45 #X obj 113 -69 r \$0_mySourceNo;
r@96 46 #X obj 128 -49 r deltaPreCirc;
r@96 47 #X obj 113 -28 *;
r@96 48 #X obj 113 13 +;
r@96 49 #X obj 128 -8 r minPreCirc;
r@96 50 #X floatatom 50 34 5 0 0 0 - - -;
r@96 51 #X obj 128 34 r preswingTime;
r@96 52 #X obj 113 77 /;
r@96 53 #X obj 128 55 * 0.001;
r@96 54 #X obj 113 104 * 2;
r@96 55 #X text 156 84 Average Speed;
r@96 56 #X text 153 108 Top Speed for this source;
r@96 57 #X floatatom 60 130 5 0 0 0 - - -;
r@96 58 #X obj 113 131 s \$0_myPreSourceSpeed;
r@96 59 #X obj 98 252 r \$0_myPreSourceSpeed;
r@96 60 #X obj 450 298 r postswingTime;
r@96 61 #X floatatom 482 321 5 0 0 0 - - -;
r@96 62 #X obj 392 214 r GO;
r@96 63 #X obj 392 256 f;
r@96 64 #X obj 393 336 f;
r@96 65 #X obj 788 -23 r start_armLength;
r@96 66 #X obj 773 -45 r length;
r@96 67 #X obj 773 39 -;
r@96 68 #X obj 821 20 r NoOfSources;
r@96 69 #X obj 806 -1 r \$0_mySourceNo;
r@96 70 #X obj 806 42 /;
r@96 71 #X obj 773 64 *;
r@96 72 #X floatatom 728 132 5 0 0 0 - - -;
r@96 73 #X obj 773 107 +;
r@96 74 #X obj 788 85 r start_armLength;
r@96 75 #X text 828 133 Distance from centre of arc;
r@98 76 #X obj 700 374 f;
r@98 77 #X obj 700 331 r GO;
r@98 78 #X obj 715 352 r preswingTime;
r@98 79 #X obj 862 432 line~;
r@98 80 #X obj 727 496 loadbang;
r@98 81 #X obj 727 517 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@96 82 1;
r@98 83 #X obj 727 535 metro 10;
r@98 84 #X obj 727 557 snapshot~;
r@98 85 #X floatatom 727 577 5 0 0 0 - - -;
r@98 86 #X obj 808 593 hsl 128 15 -90 270 0 0 empty empty empty -2 -8 0 10
r@98 87 -262144 -1 -1 6318 1;
r@98 88 #X obj 862 331 r setUp;
r@98 89 #X text 845 312 Start at 0 speed;
r@98 90 #X obj 862 459 outlet~;
r@98 91 #X obj 877 352 r presweepAzim;
r@98 92 #X obj 862 375 f;
r@98 93 #X msg 862 398 \$1;
r@98 94 #X msg 700 397 0 \$1;
r@98 95 #X obj 986 276 t f b;
r@98 96 #X obj 987 304 delay;
r@98 97 #X obj 1001 231 r preswingTime;
r@98 98 #X obj 1008 353 r postswingTime;
r@98 99 #X obj 986 211 r GO;
r@98 100 #X obj 986 253 f;
r@98 101 #X obj 987 331 f;
r@98 102 #X obj 987 376 pack;
r@98 103 #X obj 1029 279 r postsweepAzim;
r@98 104 #X msg 987 402 \$1 \$2;
r@96 105 #X obj 1064 -89 r preswingTime;
r@96 106 #X obj 1049 -67 +;
r@96 107 #X obj 1036 34 delay;
r@96 108 #X obj 1034 -19 t f b;
r@96 109 #X obj 1034 -132 r GO;
r@96 110 #X obj 1034 -44 f;
r@96 111 #X obj 1063 11 + 5;
r@98 112 #X obj 1029 302 * -1;
r@96 113 #X obj 1049 -111 r postswingTime;
r@96 114 #X obj 1036 57 s myEnd;
r@98 115 #X obj 810 331 r myEnd;
r@96 116 #X obj 773 156 outlet~;
r@96 117 #X obj 773 132 sig~;
r@98 118 #X text 925 451 Current source Azimuth angle;
r@98 119 #X obj 1135 259 f;
r@98 120 #X obj 1135 216 r GO;
r@98 121 #X obj 1186 278 r preswingTime;
r@98 122 #X obj 1309 421 line~;
r@98 123 #X obj 1174 485 loadbang;
r@98 124 #X obj 1174 506 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@98 125 1 1;
r@98 126 #X obj 1174 524 metro 10;
r@98 127 #X obj 1174 546 snapshot~;
r@98 128 #X floatatom 1174 566 5 0 0 0 - - -;
r@98 129 #X obj 1255 582 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10
r@98 130 -262144 -1 -1 12700 1;
r@98 131 #X obj 1309 320 r setUp;
r@98 132 #X text 1292 301 Start at 0 speed;
r@98 133 #X obj 1309 448 outlet~;
r@98 134 #X obj 1309 364 f;
r@98 135 #X msg 1309 387 \$1;
r@98 136 #X obj 1433 265 t f b;
r@98 137 #X obj 1434 293 delay;
r@98 138 #X obj 1448 220 r preswingTime;
r@98 139 #X obj 1455 342 r postswingTime;
r@98 140 #X obj 1433 200 r GO;
r@98 141 #X obj 1433 242 f;
r@98 142 #X obj 1434 320 f;
r@98 143 #X obj 1434 365 pack;
r@98 144 #X msg 1434 391 \$1 \$2;
r@98 145 #X obj 1257 320 r myEnd;
r@98 146 #X text 1372 440 Current source Azimuth angle;
r@98 147 #X obj 1324 341 r presweepElev;
r@98 148 #X obj 1476 268 r postsweepElev;
r@98 149 #X obj 1258 -49 +;
r@98 150 #X obj 1243 -22 /;
r@98 151 #X obj 1216 -70 t f f;
r@98 152 #X floatatom 1189 9 5 0 0 0 - - -;
r@98 153 #X obj 1258 1 r presweepElev;
r@98 154 #X obj 1273 23 r postsweepElev;
r@98 155 #X obj 1258 -93 r postswingTime;
r@98 156 #X obj 1273 -71 r preswingTime;
r@98 157 #X obj 1258 52 +;
r@98 158 #X obj 1243 75 *;
r@98 159 #X floatatom 1206 102 5 0 0 0 - - -;
r@98 160 #X obj 1150 346 pack;
r@98 161 #X obj 1243 98 s midElev;
r@98 162 #X obj 1150 238 r midElev;
r@98 163 #X msg 1150 380 \$1 \$2;
r@95 164 #X connect 0 0 1 0;
r@95 165 #X connect 2 0 3 0;
r@95 166 #X connect 4 0 9 0;
r@95 167 #X connect 4 0 25 0;
r@95 168 #X connect 6 0 7 0;
r@95 169 #X connect 7 0 8 0;
r@95 170 #X connect 8 0 9 0;
r@95 171 #X connect 9 0 10 0;
r@95 172 #X connect 9 0 11 0;
r@95 173 #X connect 12 0 4 0;
r@95 174 #X connect 13 0 12 0;
r@95 175 #X connect 14 0 4 0;
r@95 176 #X connect 15 0 13 0;
r@95 177 #X connect 16 0 15 0;
r@95 178 #X connect 17 0 4 0;
r@95 179 #X connect 18 0 19 1;
r@95 180 #X connect 18 1 19 0;
r@98 181 #X connect 19 0 57 0;
r@95 182 #X connect 20 0 14 0;
r@98 183 #X connect 23 0 56 1;
r@95 184 #X connect 26 0 28 0;
r@95 185 #X connect 27 0 29 0;
r@95 186 #X connect 32 0 13 1;
r@95 187 #X connect 33 0 35 0;
r@95 188 #X connect 34 0 35 1;
r@95 189 #X connect 35 0 36 0;
r@95 190 #X connect 35 0 37 0;
r@95 191 #X connect 38 0 40 0;
r@95 192 #X connect 39 0 40 1;
r@95 193 #X connect 40 0 41 0;
r@95 194 #X connect 41 0 43 0;
r@95 195 #X connect 41 0 45 0;
r@95 196 #X connect 42 0 41 1;
r@95 197 #X connect 44 0 46 0;
r@95 198 #X connect 45 0 47 0;
r@95 199 #X connect 46 0 45 1;
r@95 200 #X connect 47 0 50 0;
r@98 201 #X connect 47 0 51 0;
r@98 202 #X connect 52 0 15 1;
r@95 203 #X connect 53 0 54 0;
r@98 204 #X connect 53 0 57 1;
r@98 205 #X connect 55 0 56 0;
r@98 206 #X connect 56 0 18 0;
r@98 207 #X connect 57 0 17 0;
r@98 208 #X connect 58 0 60 1;
r@98 209 #X connect 59 0 60 0;
r@98 210 #X connect 60 0 64 0;
r@98 211 #X connect 61 0 63 1;
r@98 212 #X connect 62 0 63 0;
r@98 213 #X connect 63 0 64 1;
r@98 214 #X connect 64 0 66 0;
r@98 215 #X connect 66 0 65 0;
r@98 216 #X connect 66 0 108 0;
r@98 217 #X connect 67 0 66 1;
r@98 218 #X connect 69 0 85 0;
r@98 219 #X connect 70 0 69 0;
r@98 220 #X connect 71 0 69 1;
r@98 221 #X connect 72 0 76 0;
r@98 222 #X connect 72 0 81 0;
r@95 223 #X connect 73 0 74 0;
r@98 224 #X connect 74 0 75 0;
r@98 225 #X connect 75 0 76 0;
r@95 226 #X connect 76 0 77 0;
r@98 227 #X connect 76 0 78 0;
r@98 228 #X connect 79 0 83 0;
r@98 229 #X connect 82 0 83 1;
r@98 230 #X connect 83 0 84 0;
r@98 231 #X connect 84 0 72 0;
r@98 232 #X connect 85 0 72 0;
r@98 233 #X connect 86 0 87 1;
r@98 234 #X connect 86 1 87 0;
r@98 235 #X connect 87 0 92 0;
r@98 236 #X connect 88 0 91 1;
r@98 237 #X connect 89 0 93 1;
r@96 238 #X connect 90 0 91 0;
r@98 239 #X connect 91 0 86 0;
r@98 240 #X connect 92 0 93 0;
r@98 241 #X connect 93 0 95 0;
r@98 242 #X connect 94 0 103 0;
r@98 243 #X connect 95 0 72 0;
r@96 244 #X connect 96 0 97 1;
r@98 245 #X connect 97 0 101 1;
r@98 246 #X connect 98 0 105 0;
r@98 247 #X connect 99 0 102 0;
r@98 248 #X connect 99 1 98 0;
r@98 249 #X connect 100 0 101 0;
r@98 250 #X connect 101 0 99 0;
r@98 251 #X connect 102 0 98 1;
r@98 252 #X connect 103 0 92 1;
r@98 253 #X connect 104 0 97 0;
r@98 254 #X connect 106 0 83 0;
r@98 255 #X connect 108 0 107 0;
r@98 256 #X connect 110 0 149 0;
r@98 257 #X connect 111 0 110 0;
r@98 258 #X connect 112 0 149 1;
r@98 259 #X connect 113 0 117 0;
r@98 260 #X connect 113 0 122 0;
r@96 261 #X connect 114 0 115 0;
r@98 262 #X connect 115 0 116 0;
r@98 263 #X connect 116 0 117 0;
r@98 264 #X connect 117 0 118 0;
r@98 265 #X connect 117 0 119 0;
r@98 266 #X connect 120 0 123 0;
r@98 267 #X connect 123 0 124 0;
r@98 268 #X connect 124 0 113 0;
r@98 269 #X connect 125 0 126 1;
r@98 270 #X connect 125 1 126 0;
r@98 271 #X connect 126 0 131 0;
r@98 272 #X connect 127 0 130 1;
r@98 273 #X connect 128 0 132 1;
r@98 274 #X connect 129 0 130 0;
r@98 275 #X connect 130 0 125 0;
r@98 276 #X connect 131 0 132 0;
r@98 277 #X connect 132 0 133 0;
r@98 278 #X connect 133 0 113 0;
r@98 279 #X connect 134 0 123 0;
r@98 280 #X connect 136 0 123 1;
r@98 281 #X connect 137 0 131 1;
r@98 282 #X connect 138 0 139 1;
r@98 283 #X connect 139 0 141 0;
r@98 284 #X connect 139 0 147 0;
r@98 285 #X connect 140 0 138 0;
r@98 286 #X connect 140 1 139 0;
r@98 287 #X connect 142 0 146 0;
r@98 288 #X connect 143 0 146 1;
r@98 289 #X connect 144 0 140 0;
r@98 290 #X connect 145 0 138 1;
r@98 291 #X connect 146 0 147 1;
r@98 292 #X connect 147 0 148 0;
r@98 293 #X connect 147 0 150 0;
r@98 294 #X connect 149 0 152 0;
r@98 295 #X connect 151 0 110 1;
r@98 296 #X connect 152 0 113 0;