view MechAeolian/testBedMAD1.pd @ 303:8b51c20529a6

Edgetone development models
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Sat, 11 Nov 2017 17:43:39 +0000
parents f461a0f5d471
children
line wrap: on
line source
#N canvas 294 170 1323 659 10;
#X obj -154 155 delwrite~ varwind 3000;
#X obj -44 -36 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 593 1;
#X obj -153 8 *~ 1;
#X obj -153 34 +~ 1;
#X obj -283 258 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X obj -220 258 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
#X text -223 167 Gain;
#X obj -275 138 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 -284 215 pd opLevels;
#X msg -275 161 5;
#X obj -281 186 hsl 100 25 0.1 1e+09 1 0 empty empty empty -2 -8 0
10 -262144 -1 -1 9482 1;
#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 -219 -140 pd machCalc;
#X obj 140 -114 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X obj 140 -47 s SET_UP;
#X floatatom -6 -13 5 0 0 0 - - -;
#X obj -284 115 r GAIN;
#X obj -47 -60 r SPEED;
#X floatatom -341 216 8 0 0 0 - - -;
#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 -362 30 pd windDirection;
#X obj -135 81 snapshot~;
#X floatatom -135 108 10 0 0 0 - - -;
#X text -138 126 Wind Speed;
#X obj -340 -14 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj -339 -78 snapshot~;
#X floatatom -339 -51 10 0 0 0 - - -;
#X text -301 -31 Wind Direction;
#X obj -153 -22 WindGenD1;
#X obj -135 -125 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
1 1;
#X obj -135 -150 loadbang;
#X obj -135 -79 s myMet;
#X obj -339 -101 r myMet;
#X obj -135 58 r myMet;
#X obj -348 61 TUCalc2;
#X obj -84 -13 * 0.5;
#X obj -47 -13 * 0.88;
#X obj -135 -103 metro 100;
#X obj -348 85 s blust;
#X floatatom -297 83 0 0 0 0 - - -;
#X obj 140 -72 uzi 20;
#X obj -42 55 bng 35 250 50 0 empty empty empty 17 7 0 10 -261234 -1
-1;
#X obj -42 122 s option1;
#X obj 259 -30 r option1;
#X obj 513 -29 r option1;
#X obj 294 233 r option1;
#X obj 548 234 r option1;
#X obj 26 55 bng 35 250 50 0 empty empty empty 17 7 0 10 -262130 -1
-1;
#X obj 26 122 s option2;
#X obj 234 -74 r option2;
#X obj 488 -72 r option2;
#X obj 276 189 r option2;
#X obj 530 191 r option2;
#X obj 39 -92 r option1;
#X obj 9 -114 r option2;
#X obj 215 -115 r option3;
#X obj 469 -113 r option3;
#X obj 245 142 r option3;
#X obj 499 144 r option3;
#X obj -20 -136 r option3;
#X obj 95 55 bng 35 250 50 0 empty empty empty 17 7 0 10 -204786 -1
-1;
#X obj 95 122 s option3;
#X obj 259 15 mechTone1;
#X obj 513 16 mechTone1;
#X obj 292 281 mechTone1;
#X obj 547 279 mechTone1;
#X msg -20 -116 7;
#X msg 9 -94 3;
#X msg 39 -72 10;
#X msg 530 213 0.009 0.8 4 90 0 0.5;
#X msg 547 254 0.0119 1.2 4 90 0 0.5;
#X msg 292 256 0.0122 1.2 4 90 0 0.5;
#X msg 276 212 0.0089 0.8 4 90 0 0.5;
#X msg 513 -9 0.012 1.2 4 90 0 0.5;
#X msg 488 -50 0.0095 0.8 4 90 0 0.5;
#X msg 234 -51 0.009 0.8 4 90 0 0.5;
#X msg 259 -10 0.012 1.2 4 90 0 0.5;
#X msg 215 -95 0.002 2.01 4 90 0 0.5 800 2000;
#X msg 469 -94 0.002 2.01 4 90 0 0.5 800 2000;
#X msg 245 163 0.002 2.01 4 90 0 0.5 800 2000;
#X msg 499 164 0.002 2.01 4 90 0 0.5 800 2000;
#X connect 1 0 14 0;
#X connect 1 0 33 0;
#X connect 1 0 34 0;
#X connect 2 0 3 0;
#X connect 3 0 0 0;
#X connect 3 0 19 0;
#X connect 7 0 9 0;
#X connect 8 0 4 0;
#X connect 8 1 5 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 10 0 17 0;
#X connect 12 0 38 0;
#X connect 15 0 10 0;
#X connect 16 0 1 0;
#X connect 18 0 32 0;
#X connect 18 1 23 0;
#X connect 19 0 20 0;
#X connect 22 0 18 1;
#X connect 23 0 24 0;
#X connect 26 0 2 0;
#X connect 27 0 35 0;
#X connect 28 0 27 0;
#X connect 30 0 23 0;
#X connect 31 0 19 0;
#X connect 32 0 36 0;
#X connect 32 0 37 0;
#X connect 33 0 2 1;
#X connect 34 0 3 1;
#X connect 35 0 29 0;
#X connect 38 0 13 0;
#X connect 39 0 40 0;
#X connect 41 0 74 0;
#X connect 42 0 71 0;
#X connect 43 0 69 0;
#X connect 44 0 68 0;
#X connect 45 0 46 0;
#X connect 47 0 73 0;
#X connect 48 0 72 0;
#X connect 49 0 70 0;
#X connect 50 0 67 0;
#X connect 51 0 66 0;
#X connect 52 0 65 0;
#X connect 53 0 75 0;
#X connect 54 0 76 0;
#X connect 55 0 77 0;
#X connect 56 0 78 0;
#X connect 57 0 64 0;
#X connect 58 0 59 0;
#X connect 64 0 1 0;
#X connect 65 0 1 0;
#X connect 66 0 1 0;
#X connect 67 0 63 0;
#X connect 68 0 63 0;
#X connect 69 0 62 0;
#X connect 70 0 62 0;
#X connect 71 0 61 0;
#X connect 72 0 61 0;
#X connect 73 0 60 0;
#X connect 74 0 60 0;
#X connect 75 0 60 0;
#X connect 76 0 61 0;
#X connect 77 0 62 0;
#X connect 78 0 63 0;