view MechAeolian/harpD1.pd @ 303:8b51c20529a6

Edgetone development models

#N canvas 151 30 1167 772 10;
#X obj -193 285 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj -130 285 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text -133 194 Gain;
#X obj -185 165 loadbang;
#N canvas 555 179 313 396 opLevels 0;
#X obj 79 184 dac~;
#X obj 30 70 catch~ l;
#X obj 128 70 catch~ r;
#X obj 129 104 *~ 0.45;
#X obj 30 104 *~ 0.45;
#X obj 30 210 prvu~;
#X obj 129 211 prvu~;
#X obj 93 33 inlet;
#X obj 30 239 outlet;
#X obj 129 239 outlet;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 3 0 0 1;
#X connect 4 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 4 1;
#X connect 7 0 3 1;
#X restore -194 242 pd opLevels;
#X obj -191 213 hsl 100 25 0.01 1e+12 1 0 empty empty empty -2 -8 0
10 -262144 -1 -1 100 1;
#X text -106 139 No Of Sources;
#X obj -194 142 r GAIN;
#X floatatom -251 243 8 0 0 0 - - -;
#X obj 409 254 delwrite~ varwind 3000;
#X obj 518 36 hsl 128 15 0 15 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1185 1;
#X obj 409 80 *~ 1;
#X obj 409 106 +~ 1;
#X obj 607 -8 loadbang;
#N canvas 20 383 344 123 machCalc 0;
#X text 107 15 Speed of Sound (dry air 20 Degs C);
#X obj 26 -14 vd~ varwind;
#X obj 26 33 s~ MY_MACH;
#X obj 26 9 /~ 343.56;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X restore 665 49 pd machCalc;
#X floatatom 556 59 5 0 0 0 - - -;
#X obj 515 12 r SPEED;
#N canvas 634 290 596 443 windDirection 0;
#X obj 183 0 inlet~;
#X obj 280 52 inlet;
#X obj 280 86 sig~;
#X obj 185 251 *~;
#X obj 185 279 outlet~;
#X obj 246 254 outlet~;
#X obj 200 195 cos~;
#X obj 200 135 +~;
#X obj 200 71 lop~ 1;
#X obj 246 194 *~ 360;
#X obj 200 91 lop~ 1;
#X obj 200 30 noise~;
#X obj 200 51 lop~ 1;
#X obj 200 157 /~ 360;
#X obj 200 113 *~ 800;
#X obj 200 221 abs~;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 7 1;
#X connect 3 0 4 0;
#X connect 6 0 15 0;
#X connect 7 0 13 0;
#X connect 8 0 10 0;
#X connect 9 0 5 0;
#X connect 10 0 14 0;
#X connect 11 0 12 0;
#X connect 12 0 8 0;
#X connect 13 0 6 0;
#X connect 13 0 9 0;
#X connect 14 0 7 0;
#X connect 15 0 3 1;
#X restore 443 170 pd windDirection;
#X obj 561 230 snapshot~;
#X floatatom 561 257 10 0 0 0 - - -;
#X text 558 275 Wind Speed;
#X obj 539 145 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 642 230 snapshot~;
#X floatatom 642 257 10 0 0 0 - - -;
#X text 648 281 Wind Direction;
#X obj 409 50 WindGenD1;
#X msg 570 13 20;
#X obj 642 207 r myMet;
#X obj 561 207 r myMet;
#X obj 457 201 TUCalc2;
#X obj 478 59 * 0.5;
#X obj 515 59 * 0.88;
#X obj 457 225 s blust;
#X floatatom 508 223 0 0 0 0 - - -;
#X msg 607 12 7;
#X msg 44 128 1.1 0.001 0.95 6 90 6700 87 20;
#X msg -47 490 1.1 0.0009 0.85 6 90 3000 50 20;
#X msg 539 490 1.1 0.0009 0.85 6 90 6000 80 20;
#X msg -27 -43 1.1 0.00075 0.95 6 90 5000 68.23 20;
#X msg 126 293 1.1 0.0006 0.95 6 90 5000 50 20;
#X msg 557 531 0.9 0.0002286 0.65 6 90 7940 59.98 20;
#X msg 252 527 0.9 0.0002794 0.65 6 90 7820 49.5 20;
#X msg -33 532 0.9 0.0004064 0.65 6 90 8050 67.91 20;
#X msg 142 332 0.9 0.0006096 0.65 6 90 6650 70.79 20;
#X msg 57 167 0.9 0.0008636 0.65 6 90 6900 82.83 20;
#X msg -13 -1 0.9 0.0010668 0.65 6 90 6640 68.23 20;
#X obj -216 0 s guitar;
#X obj -13 -21 r guitar;
#X obj 57 148 r guitar;
#X obj 142 313 r guitar;
#X obj -33 511 r guitar;
#X obj 252 508 r guitar;
#X obj 557 510 r guitar;
#X obj -216 -21 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj -156 -1 s rand1;
#X obj -27 -64 r rand1;
#X obj 44 107 r rand1;
#X obj 126 273 r rand1;
#X obj -47 469 r rand1;
#X obj 236 467 r rand1;
#X obj 540 469 r rand1;
#X obj -156 -21 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 246 -45 hsl 300 35 1 10000 1 0 empty empty empty -2 -8 0 10
-262144 -1 -1 3000 1;
#X obj 282 13 s mod;
#X msg -185 188 0.015;
#X obj -48 -107 r rand2;
#X obj 26 65 r rand2;
#X obj 105 233 r rand2;
#X obj -63 429 r rand2;
#X obj 212 426 r rand2;
#X obj 518 429 r rand2;
#X obj -140 51 s rand2;
#X obj -140 32 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj -43 43 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
1 1;
#X obj 26 210 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
1 1;
#X obj 112 377 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
1 1;
#X obj -67 575 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
1 1;
#X obj 217 576 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
1 1;
#X obj 526 577 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
1 1;
#X msg 237 487 1.1 0.0007 1 6 90 6300 56 20;
#X msg -74 -2 0;
#X floatatom 32 41 0 0 0 0 - - -;
#X floatatom 102 207 0 0 0 0 - - -;
#X floatatom 187 374 0 0 0 0 - - -;
#X floatatom 12 573 0 0 0 0 - - -;
#X floatatom 297 571 0 0 0 0 - - -;
#X floatatom 602 575 0 0 0 0 - - -;
#X obj 378 181 sig~;
#X msg 378 158 1.1;
#X msg -48 -84 1.4 0.00046919 0.65 6 90 1000 80 20;
#X msg 26 88 1.4 0.00046919 0.7 6 90 1000 92.78 20;
#X msg 105 254 1.4 0.00046919 0.85 6 90 1000 136.81 20;
#X msg -63 450 1.4 0.00046919 0.9 6 90 1000 306.76 20;
#X msg 212 447 1.4 0.001 0.9 6 90 1000 97.76 20;
#X msg 518 450 1.4 0.001 0.9 6 90 1000 94 20;
#X obj 142 353 MA_Test2;
#X obj 252 548 MA_Test2;
#X obj 57 188 MA_Test2;
#X obj -13 19 MA_Test2;
#X obj -33 552 MA_Test2;
#X obj 557 552 MA_Test2;
#X connect 3 0 64 0;
#X connect 4 0 0 0;
#X connect 4 1 1 0;
#X connect 5 0 4 0;
#X connect 5 0 8 0;
#X connect 7 0 5 0;
#X connect 10 0 15 0;
#X connect 10 0 30 0;
#X connect 10 0 31 0;
#X connect 11 0 12 0;
#X connect 12 0 18 0;
#X connect 12 0 9 0;
#X connect 13 0 34 0;
#X connect 16 0 10 0;
#X connect 17 0 29 0;
#X connect 17 1 22 0;
#X connect 18 0 19 0;
#X connect 21 0 17 1;
#X connect 22 0 23 0;
#X connect 25 0 11 0;
#X connect 26 0 10 0;
#X connect 27 0 22 0;
#X connect 28 0 18 0;
#X connect 29 0 32 0;
#X connect 29 0 33 0;
#X connect 30 0 11 1;
#X connect 31 0 12 1;
#X connect 34 0 10 0;
#X connect 35 0 97 0;
#X connect 36 0 99 0;
#X connect 37 0 100 0;
#X connect 38 0 98 0;
#X connect 39 0 95 0;
#X connect 40 0 100 0;
#X connect 41 0 96 0;
#X connect 42 0 99 0;
#X connect 43 0 95 0;
#X connect 44 0 97 0;
#X connect 45 0 98 0;
#X connect 47 0 45 0;
#X connect 48 0 44 0;
#X connect 49 0 43 0;
#X connect 50 0 42 0;
#X connect 51 0 41 0;
#X connect 52 0 40 0;
#X connect 53 0 46 0;
#X connect 55 0 38 0;
#X connect 56 0 35 0;
#X connect 57 0 39 0;
#X connect 58 0 36 0;
#X connect 59 0 79 0;
#X connect 60 0 37 0;
#X connect 61 0 54 0;
#X connect 62 0 63 0;
#X connect 64 0 5 0;
#X connect 65 0 89 0;
#X connect 66 0 90 0;
#X connect 67 0 91 0;
#X connect 68 0 92 0;
#X connect 69 0 93 0;
#X connect 70 0 94 0;
#X connect 72 0 71 0;
#X connect 79 0 96 0;
#X connect 80 0 98 0;
#X connect 88 0 87 0;
#X connect 89 0 98 0;
#X connect 90 0 97 0;
#X connect 91 0 95 0;
#X connect 92 0 99 0;
#X connect 93 0 96 0;
#X connect 94 0 100 0;
#X connect 95 0 75 0;
#X connect 95 1 83 0;
#X connect 96 0 77 0;
#X connect 96 1 85 0;
#X connect 97 0 74 0;
#X connect 97 1 82 0;
#X connect 98 0 73 0;
#X connect 98 1 81 0;
#X connect 99 0 76 0;
#X connect 99 1 84 0;
#X connect 100 0 78 0;
#X connect 100 1 86 0;