annotate MechAeolian/MA_Test.pd @ 281:dfd88add4725

Propeller: Reducing control on Audio channels Reduced the stereo spread for test purposes Pitch control added GUI Updated shh patch added to reduce audio spike when shifting start positions
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Tue, 07 Mar 2017 07:53:21 +0000
parents 2ae93fab838a
children
rev   line source
r@216 1 #N canvas 262 32 1139 792 10;
r@197 2 #X obj 249 -64 loadbang;
r@197 3 #X obj -164 205 delwrite~ varwind 3000;
r@197 4 #X obj -54 -46 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144
r@218 5 -1 -1 200 1;
r@197 6 #X obj -163 -2 *~ 1;
r@197 7 #X obj -163 24 +~ 1;
r@197 8 #X obj 35 -90 loadbang;
r@200 9 #X obj 296 26 hsl 128 15 0.0001 0.3 1 0 empty empty empty -2 -8 0 10
r@218 10 -262144 -1 -1 5395 1;
r@197 11 #X floatatom 303 52 8 0 0 0 - - -;
r@197 12 #X obj 364 302 hsl 128 15 0.01 0.99 0 0 empty empty empty -2 -8 0 10
r@197 13 -262144 -1 -1 6350 1;
r@197 14 #X floatatom 394 331 5 0 0 0 - - -;
r@197 15 #X obj 337 184 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@197 16 -1 -1 6350 1;
r@197 17 #X floatatom 365 213 5 0 0 0 - - -;
r@197 18 #X obj 350 239 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@218 19 -262144 -1 -1 9525 1;
r@197 20 #X floatatom 380 268 5 0 0 0 - - -;
r@197 21 #X obj 323 127 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
r@215 22 -1 -1 8877 1;
r@197 23 #X floatatom 339 156 5 0 0 0 - - -;
r@197 24 #X text 512 303 Pan Value;
r@197 25 #X obj -189 443 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@197 26 #X obj -126 443 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@197 27 #X text -129 352 Gain;
r@197 28 #X obj -181 323 loadbang;
r@197 29 #N canvas 555 179 313 396 opLevels 0;
r@197 30 #X obj 79 184 dac~;
r@197 31 #X obj 30 70 catch~ l;
r@197 32 #X obj 128 70 catch~ r;
r@197 33 #X obj 129 104 *~ 0.45;
r@197 34 #X obj 30 104 *~ 0.45;
r@197 35 #X obj 30 210 prvu~;
r@197 36 #X obj 129 211 prvu~;
r@197 37 #X obj 93 33 inlet;
r@197 38 #X obj 30 239 outlet;
r@197 39 #X obj 129 239 outlet;
r@197 40 #X connect 1 0 4 0;
r@197 41 #X connect 2 0 3 0;
r@197 42 #X connect 3 0 6 0;
r@197 43 #X connect 3 0 0 1;
r@197 44 #X connect 4 0 5 0;
r@197 45 #X connect 4 0 0 0;
r@197 46 #X connect 5 0 8 0;
r@197 47 #X connect 6 0 9 0;
r@197 48 #X connect 7 0 4 1;
r@197 49 #X connect 7 0 3 1;
r@197 50 #X restore -190 400 pd opLevels;
r@197 51 #X msg -181 346 5;
r@208 52 #X obj -187 371 hsl 100 25 0.1 1e+12 1 0 empty empty empty -2 -8 0
r@218 53 10 -262144 -1 -1 8100 1;
r@208 54 #N canvas 20 383 344 123 machCalc 0;
r@197 55 #X text 107 15 Speed of Sound (dry air 20 Degs C);
r@197 56 #X obj 26 -14 vd~ varwind;
r@197 57 #X obj 26 33 s~ MY_MACH;
r@197 58 #X obj 26 9 /~ 343.56;
r@197 59 #X connect 1 0 3 0;
r@197 60 #X connect 3 0 2 0;
r@197 61 #X restore 93 -33 pd machCalc;
r@197 62 #X obj 422 -121 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
r@197 63 -1;
r@197 64 #X msg 178 167 0;
r@197 65 #X msg 135 285 0.5;
r@197 66 #X obj 249 -40 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@197 67 -1 -1;
r@208 68 #X obj 309 84 hsl 128 15 0.01 20 0 0 empty empty empty -2 -8 0 10 -262144
r@218 69 -1 -1 248 1;
r@197 70 #X floatatom 331 103 8 0 0 0 - - -;
r@197 71 #X text -8 353 No Of Sources;
r@200 72 #X obj 422 -63 s SET_UP;
r@197 73 #X obj 294 7 r SET_UP;
r@197 74 #X obj 364 62 r SET_UP;
r@197 75 #X obj 434 101 r SET_UP;
r@197 76 #X obj 422 153 r SET_UP;
r@197 77 #X obj 432 213 r SET_UP;
r@197 78 #X obj 438 271 r SET_UP;
r@200 79 #X obj 382 360 hsl 128 15 0 10000 0 0 empty empty empty -2 -8 0 10
r@197 80 -262144 -1 -1 9969 1;
r@197 81 #X floatatom 415 389 5 0 0 0 - - -;
r@197 82 #X obj 460 334 r SET_UP;
r@208 83 #X obj 391 420 hsl 128 15 0 1000 0 0 empty empty empty -2 -8 0 10 -262144
r@218 84 -1 -1 635 1;
r@197 85 #X floatatom 410 447 5 0 0 0 - - -;
r@197 86 #X obj 484 388 r SET_UP;
r@197 87 #X obj 405 472 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@197 88 -262144 -1 -1 6350 1;
r@197 89 #X floatatom 416 494 5 0 0 0 - - -;
r@197 90 #X obj 500 441 r SET_UP;
r@197 91 #X msg 74 450 0;
r@197 92 #X floatatom -16 -23 5 0 0 0 - - -;
r@197 93 #X msg 281 -21 0;
r@197 94 #X obj -400 248 unpack f f f f f f;
r@197 95 #X obj -295 294 s GAIN;
r@197 96 #X obj -190 300 r GAIN;
r@197 97 #X obj -337 380 s DIST;
r@197 98 #X obj 500 101 r DIST;
r@197 99 #X obj -358 422 s LEN;
r@197 100 #X obj 478 49 r LEN;
r@197 101 #X obj -379 461 s DIA;
r@197 102 #X obj 476 -4 r DIA;
r@197 103 #X obj -400 499 s SPEED;
r@197 104 #X obj -57 -70 r SPEED;
r@197 105 #X floatatom -247 401 8 0 0 0 - - -;
r@197 106 #X msg 207 206 90;
r@197 107 #X obj 496 209 r ELEV;
r@197 108 #X obj 529 261 s elev;
r@197 109 #N canvas 634 290 596 443 windDirection 0;
r@197 110 #X obj 183 0 inlet~;
r@197 111 #X obj 280 52 inlet;
r@197 112 #X obj 280 86 sig~;
r@197 113 #X obj 185 251 *~;
r@197 114 #X obj 185 279 outlet~;
r@197 115 #X obj 246 254 outlet~;
r@197 116 #X obj 200 195 cos~;
r@197 117 #X obj 200 135 +~;
r@197 118 #X obj 200 71 lop~ 1;
r@197 119 #X obj 246 194 *~ 360;
r@197 120 #X obj 200 91 lop~ 1;
r@197 121 #X obj 200 30 noise~;
r@197 122 #X obj 200 51 lop~ 1;
r@197 123 #X obj 200 157 /~ 360;
r@197 124 #X obj 200 113 *~ 800;
r@197 125 #X obj 200 221 abs~;
r@197 126 #X connect 0 0 3 0;
r@197 127 #X connect 1 0 2 0;
r@197 128 #X connect 2 0 7 1;
r@197 129 #X connect 3 0 4 0;
r@197 130 #X connect 6 0 15 0;
r@197 131 #X connect 7 0 13 0;
r@197 132 #X connect 8 0 10 0;
r@197 133 #X connect 9 0 5 0;
r@197 134 #X connect 10 0 14 0;
r@197 135 #X connect 11 0 12 0;
r@197 136 #X connect 12 0 8 0;
r@197 137 #X connect 13 0 6 0;
r@197 138 #X connect 13 0 9 0;
r@197 139 #X connect 14 0 7 0;
r@197 140 #X connect 15 0 3 1;
r@218 141 #X restore -129 88 pd windDirection;
r@197 142 #X obj -11 148 snapshot~;
r@197 143 #X floatatom -11 175 10 0 0 0 - - -;
r@197 144 #X text -14 193 Wind Speed;
r@218 145 #X obj -33 63 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@197 146 -1 -1 0 1;
r@197 147 #X msg 199 110 4;
r@197 148 #X obj 70 148 snapshot~;
r@197 149 #X floatatom 70 175 10 0 0 0 - - -;
r@197 150 #X text 67 193 Wind Direction;
r@197 151 #X obj -163 -32 WindGenD1;
r@197 152 #X msg -2 -69 20;
r@197 153 #X obj 618 -69 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
r@197 154 1;
r@197 155 #X obj 618 -94 loadbang;
r@197 156 #X obj 618 -23 s myMet;
r@197 157 #X obj 70 125 r myMet;
r@197 158 #X obj -11 125 r myMet;
r@197 159 #X msg 158 222 45;
r@197 160 #X obj -316 338 s ELEV;
r@218 161 #X obj -115 119 TUCalc2;
r@197 162 #X msg 216 250 18.435;
r@197 163 #X msg 348 -33 0.019;
r@197 164 #X msg 349 -52 0.0254;
r@197 165 #X msg 349 -72 0.0127;
r@197 166 #X obj -94 -23 * 0.5;
r@197 167 #X obj -57 -23 * 0.88;
r@197 168 #X obj -295 275 line \$1 50;
r@197 169 #X obj -316 316 line \$1 50;
r@197 170 #X obj -337 358 line \$1 50;
r@197 171 #X obj -358 401 line \$1 50;
r@197 172 #X obj -379 442 line \$1 50;
r@197 173 #X obj -400 480 line \$1 50;
r@197 174 #X msg 253 183 0;
r@218 175 #X obj -115 143 s blust;
r@218 176 #X floatatom -64 141 0 0 0 0 - - -;
r@197 177 #X msg 251 101 12;
r@197 178 #X msg -400 130 23 0.006 5 4 85 1e+07;
r@197 179 #X msg -391 154 24 0.01 15 6 77 1e+07;
r@197 180 #X msg -379 182 17 0.0015 10 3 -100 1e+07;
r@197 181 #X msg -372 215 28 0.04 7 6 35 1e+07;
r@197 182 #X obj -75 284 sig~;
r@197 183 #X obj 293 577 MechAeolianD1;
r@197 184 #X msg 113 343 7850;
r@197 185 #X text 434 29 Diameter (m);
r@197 186 #X text 441 68 Length (m);
r@197 187 #X text 461 128 Obs Distance (m);
r@197 188 #X text 476 184 Obs Azimuth (degs);
r@197 189 #X text 489 240 Obs Elevation (degs);
r@197 190 #X text 526 361 Mass Desnity (kg / m^3);
r@197 191 #X text 541 415 Tension (N);
r@208 192 #X obj 422 -84 uzi 20;
r@208 193 #X msg 601 386 30.085;
r@208 194 #X msg 552 386 418;
r@200 195 #X obj 618 -47 metro 10;
r@211 196 #X msg 411 -27 0.00038;
r@211 197 #X msg 416 52 0.6477;
r@211 198 #X msg 629 429 86.3;
r@217 199 #X msg 236 11 0.003;
r@217 200 #X msg 215 67 0.4;
r@217 201 #X msg 93 397 50;
r@218 202 #X floatatom 208 600 0 0 0 0 - - -;
r@217 203 #X floatatom 342 604 0 0 0 0 - - -;
r@217 204 #X floatatom 394 603 0 0 0 0 - - -;
r@218 205 #X floatatom 260 605 0 0 0 0 - - -;
r@217 206 #X msg 35 -70 7;
r@217 207 #X msg -75 260 20;
r@217 208 #X msg 348 -16 0.004;
r@217 209 #X connect 0 0 28 0;
r@217 210 #X connect 2 0 49 0;
r@217 211 #X connect 2 0 89 0;
r@217 212 #X connect 2 0 90 0;
r@197 213 #X connect 3 0 4 0;
r@218 214 #X connect 4 0 1 0;
r@218 215 #X connect 4 0 67 0;
r@217 216 #X connect 5 0 129 0;
r@217 217 #X connect 6 0 7 0;
r@217 218 #X connect 6 0 106 0;
r@217 219 #X connect 8 0 9 0;
r@217 220 #X connect 8 0 106 5;
r@217 221 #X connect 10 0 11 0;
r@217 222 #X connect 10 0 106 3;
r@217 223 #X connect 12 0 13 0;
r@217 224 #X connect 12 0 65 0;
r@217 225 #X connect 12 0 106 4;
r@217 226 #X connect 14 0 15 0;
r@217 227 #X connect 14 0 106 2;
r@217 228 #X connect 20 0 22 0;
r@217 229 #X connect 21 0 17 0;
r@217 230 #X connect 21 1 18 0;
r@217 231 #X connect 22 0 23 0;
r@217 232 #X connect 23 0 21 0;
r@217 233 #X connect 23 0 62 0;
r@217 234 #X connect 25 0 115 0;
r@217 235 #X connect 26 0 10 0;
r@217 236 #X connect 27 0 8 0;
r@217 237 #X connect 28 0 50 0;
r@217 238 #X connect 28 0 122 0;
r@217 239 #X connect 28 0 71 0;
r@217 240 #X connect 28 0 26 0;
r@217 241 #X connect 28 0 82 0;
r@217 242 #X connect 28 0 27 0;
r@217 243 #X connect 28 0 123 0;
r@217 244 #X connect 28 0 107 0;
r@217 245 #X connect 28 0 124 0;
r@217 246 #X connect 28 0 48 0;
r@217 247 #X connect 29 0 30 0;
r@217 248 #X connect 29 0 106 1;
r@217 249 #X connect 33 0 6 0;
r@217 250 #X connect 34 0 29 0;
r@217 251 #X connect 35 0 14 0;
r@217 252 #X connect 36 0 10 0;
r@217 253 #X connect 37 0 12 0;
r@217 254 #X connect 38 0 8 0;
r@217 255 #X connect 39 0 40 0;
r@217 256 #X connect 39 0 106 7;
r@217 257 #X connect 41 0 39 0;
r@217 258 #X connect 42 0 43 0;
r@217 259 #X connect 42 0 106 6;
r@217 260 #X connect 44 0 42 0;
r@217 261 #X connect 45 0 46 0;
r@217 262 #X connect 47 0 45 0;
r@217 263 #X connect 48 0 45 0;
r@217 264 #X connect 51 0 96 0;
r@217 265 #X connect 51 1 95 0;
r@217 266 #X connect 51 2 94 0;
r@217 267 #X connect 51 3 93 0;
r@217 268 #X connect 51 4 92 0;
r@217 269 #X connect 51 5 91 0;
r@217 270 #X connect 53 0 23 0;
r@217 271 #X connect 55 0 14 0;
r@217 272 #X connect 57 0 29 0;
r@217 273 #X connect 59 0 6 0;
r@217 274 #X connect 61 0 2 0;
r@217 275 #X connect 63 0 12 0;
r@217 276 #X connect 64 0 12 0;
r@217 277 #X connect 66 0 84 0;
r@217 278 #X connect 66 1 72 0;
r@197 279 #X connect 67 0 68 0;
r@217 280 #X connect 70 0 66 1;
r@217 281 #X connect 71 0 14 0;
r@217 282 #X connect 72 0 73 0;
r@217 283 #X connect 75 0 3 0;
r@217 284 #X connect 76 0 2 0;
r@217 285 #X connect 77 0 118 0;
r@217 286 #X connect 78 0 77 0;
r@217 287 #X connect 80 0 72 0;
r@217 288 #X connect 81 0 67 0;
r@217 289 #X connect 82 0 12 0;
r@217 290 #X connect 84 0 98 0;
r@217 291 #X connect 84 0 99 0;
r@217 292 #X connect 85 0 12 0;
r@217 293 #X connect 86 0 6 0;
r@217 294 #X connect 87 0 6 0;
r@217 295 #X connect 88 0 6 0;
r@217 296 #X connect 89 0 3 1;
r@217 297 #X connect 90 0 4 1;
r@217 298 #X connect 91 0 52 0;
r@217 299 #X connect 92 0 83 0;
r@217 300 #X connect 93 0 54 0;
r@217 301 #X connect 94 0 56 0;
r@217 302 #X connect 95 0 58 0;
r@217 303 #X connect 96 0 60 0;
r@217 304 #X connect 97 0 12 0;
r@217 305 #X connect 100 0 14 0;
r@217 306 #X connect 101 0 51 0;
r@217 307 #X connect 102 0 51 0;
r@217 308 #X connect 103 0 51 0;
r@217 309 #X connect 104 0 51 0;
r@217 310 #X connect 106 0 125 0;
r@217 311 #X connect 106 1 128 0;
r@217 312 #X connect 106 2 126 0;
r@217 313 #X connect 106 3 127 0;
r@217 314 #X connect 107 0 39 0;
r@217 315 #X connect 115 0 32 0;
r@217 316 #X connect 116 0 42 0;
r@217 317 #X connect 117 0 42 0;
r@217 318 #X connect 118 0 79 0;
r@217 319 #X connect 119 0 6 0;
r@217 320 #X connect 120 0 29 0;
r@217 321 #X connect 121 0 106 6;
r@217 322 #X connect 122 0 6 0;
r@217 323 #X connect 123 0 29 0;
r@217 324 #X connect 124 0 42 0;
r@217 325 #X connect 129 0 2 0;
r@217 326 #X connect 130 0 105 0;
r@217 327 #X connect 131 0 6 0;