Mercurial > hg > weather-synthesis-prototyping

annotate MechAeolian/harpD1.pd @ 225:f13bc86bb52f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Propellor GUI added for Will's demo Improved hysteresis for the Aeolian Harp. New Harp model added for further drafting
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Mon, 06 Jun 2016 11:00:13 +0100
parents 772c38206a3a
children
rev   line source
r@224 1 #N canvas 151 30 1167 772 10;
r@223 2 #X obj -193 285 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@223 3 #X obj -130 285 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@223 4 #X text -133 194 Gain;
r@223 5 #X obj -185 165 loadbang;
r@223 6 #N canvas 555 179 313 396 opLevels 0;
r@223 7 #X obj 79 184 dac~;
r@223 8 #X obj 30 70 catch~ l;
r@223 9 #X obj 128 70 catch~ r;
r@223 10 #X obj 129 104 *~ 0.45;
r@223 11 #X obj 30 104 *~ 0.45;
r@223 12 #X obj 30 210 prvu~;
r@223 13 #X obj 129 211 prvu~;
r@223 14 #X obj 93 33 inlet;
r@223 15 #X obj 30 239 outlet;
r@223 16 #X obj 129 239 outlet;
r@223 17 #X connect 1 0 4 0;
r@223 18 #X connect 2 0 3 0;
r@223 19 #X connect 3 0 6 0;
r@223 20 #X connect 3 0 0 1;
r@223 21 #X connect 4 0 5 0;
r@223 22 #X connect 4 0 0 0;
r@223 23 #X connect 5 0 8 0;
r@223 24 #X connect 6 0 9 0;
r@223 25 #X connect 7 0 4 1;
r@223 26 #X connect 7 0 3 1;
r@223 27 #X restore -194 242 pd opLevels;
r@224 28 #X obj -191 213 hsl 100 25 0.01 1e+12 1 0 empty empty empty -2 -8 0
r@225 29 10 -262144 -1 -1 100 1;
r@223 30 #X text -106 139 No Of Sources;
r@223 31 #X obj -194 142 r GAIN;
r@223 32 #X floatatom -251 243 8 0 0 0 - - -;
r@223 33 #X obj 409 254 delwrite~ varwind 3000;
r@223 34 #X obj 518 36 hsl 128 15 0 15 0 0 empty empty empty -2 -8 0 10 -262144
r@225 35 -1 -1 1185 1;
r@223 36 #X obj 409 80 *~ 1;
r@223 37 #X obj 409 106 +~ 1;
r@223 38 #X obj 607 -8 loadbang;
r@223 39 #N canvas 20 383 344 123 machCalc 0;
r@223 40 #X text 107 15 Speed of Sound (dry air 20 Degs C);
r@223 41 #X obj 26 -14 vd~ varwind;
r@223 42 #X obj 26 33 s~ MY_MACH;
r@223 43 #X obj 26 9 /~ 343.56;
r@223 44 #X connect 1 0 3 0;
r@223 45 #X connect 3 0 2 0;
r@223 46 #X restore 665 49 pd machCalc;
r@223 47 #X floatatom 556 59 5 0 0 0 - - -;
r@223 48 #X obj 515 12 r SPEED;
r@223 49 #N canvas 634 290 596 443 windDirection 0;
r@223 50 #X obj 183 0 inlet~;
r@223 51 #X obj 280 52 inlet;
r@223 52 #X obj 280 86 sig~;
r@223 53 #X obj 185 251 *~;
r@223 54 #X obj 185 279 outlet~;
r@223 55 #X obj 246 254 outlet~;
r@223 56 #X obj 200 195 cos~;
r@223 57 #X obj 200 135 +~;
r@223 58 #X obj 200 71 lop~ 1;
r@223 59 #X obj 246 194 *~ 360;
r@223 60 #X obj 200 91 lop~ 1;
r@223 61 #X obj 200 30 noise~;
r@223 62 #X obj 200 51 lop~ 1;
r@223 63 #X obj 200 157 /~ 360;
r@223 64 #X obj 200 113 *~ 800;
r@223 65 #X obj 200 221 abs~;
r@223 66 #X connect 0 0 3 0;
r@223 67 #X connect 1 0 2 0;
r@223 68 #X connect 2 0 7 1;
r@223 69 #X connect 3 0 4 0;
r@223 70 #X connect 6 0 15 0;
r@223 71 #X connect 7 0 13 0;
r@223 72 #X connect 8 0 10 0;
r@223 73 #X connect 9 0 5 0;
r@223 74 #X connect 10 0 14 0;
r@223 75 #X connect 11 0 12 0;
r@223 76 #X connect 12 0 8 0;
r@223 77 #X connect 13 0 6 0;
r@223 78 #X connect 13 0 9 0;
r@223 79 #X connect 14 0 7 0;
r@223 80 #X connect 15 0 3 1;
r@223 81 #X restore 443 170 pd windDirection;
r@223 82 #X obj 561 230 snapshot~;
r@223 83 #X floatatom 561 257 10 0 0 0 - - -;
r@223 84 #X text 558 275 Wind Speed;
r@223 85 #X obj 539 145 hsl 128 15 0 360 0 0 empty empty empty -2 -8 0 10 -262144
r@223 86 -1 -1 0 1;
r@223 87 #X obj 642 230 snapshot~;
r@223 88 #X floatatom 642 257 10 0 0 0 - - -;
r@224 89 #X text 648 281 Wind Direction;
r@223 90 #X obj 409 50 WindGenD1;
r@223 91 #X msg 570 13 20;
r@223 92 #X obj 642 207 r myMet;
r@223 93 #X obj 561 207 r myMet;
r@223 94 #X obj 457 201 TUCalc2;
r@223 95 #X obj 478 59 * 0.5;
r@223 96 #X obj 515 59 * 0.88;
r@223 97 #X obj 457 225 s blust;
r@223 98 #X floatatom 508 223 0 0 0 0 - - -;
r@223 99 #X msg 607 12 7;
r@224 100 #X msg 44 128 1.1 0.001 0.95 6 90 6700 87 20;
r@224 101 #X msg -47 490 1.1 0.0009 0.85 6 90 3000 50 20;
r@224 102 #X msg 539 490 1.1 0.0009 0.85 6 90 6000 80 20;
r@224 103 #X msg -27 -43 1.1 0.00075 0.95 6 90 5000 68.23 20;
r@224 104 #X msg 126 293 1.1 0.0006 0.95 6 90 5000 50 20;
r@224 105 #X msg 557 531 0.9 0.0002286 0.65 6 90 7940 59.98 20;
r@224 106 #X msg 252 527 0.9 0.0002794 0.65 6 90 7820 49.5 20;
r@224 107 #X msg -33 532 0.9 0.0004064 0.65 6 90 8050 67.91 20;
r@224 108 #X msg 142 332 0.9 0.0006096 0.65 6 90 6650 70.79 20;
r@224 109 #X msg 57 167 0.9 0.0008636 0.65 6 90 6900 82.83 20;
r@224 110 #X msg -13 -1 0.9 0.0010668 0.65 6 90 6640 68.23 20;
r@223 111 #X obj -216 0 s guitar;
r@224 112 #X obj -13 -21 r guitar;
r@224 113 #X obj 57 148 r guitar;
r@224 114 #X obj 142 313 r guitar;
r@224 115 #X obj -33 511 r guitar;
r@224 116 #X obj 252 508 r guitar;
r@224 117 #X obj 557 510 r guitar;
r@223 118 #X obj -216 -21 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@223 119 -1 -1;
r@223 120 #X obj -156 -1 s rand1;
r@224 121 #X obj -27 -64 r rand1;
r@224 122 #X obj 44 107 r rand1;
r@224 123 #X obj 126 273 r rand1;
r@224 124 #X obj -47 469 r rand1;
r@224 125 #X obj 236 467 r rand1;
r@224 126 #X obj 540 469 r rand1;
r@223 127 #X obj -156 -21 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@223 128 -1 -1;
r@224 129 #X obj 246 -45 hsl 300 35 1 10000 1 0 empty empty empty -2 -8 0 10
r@225 130 -262144 -1 -1 3000 1;
r@224 131 #X obj 282 13 s mod;
r@224 132 #X msg -185 188 0.015;
r@224 133 #X obj -48 -107 r rand2;
r@224 134 #X obj 26 65 r rand2;
r@224 135 #X obj 105 233 r rand2;
r@224 136 #X obj -63 429 r rand2;
r@224 137 #X obj 212 426 r rand2;
r@224 138 #X obj 518 429 r rand2;
r@224 139 #X obj -140 51 s rand2;
r@224 140 #X obj -140 32 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@224 141 -1 -1;
r@224 142 #X obj -43 43 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
r@224 143 1 1;
r@224 144 #X obj 26 210 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
r@225 145 1 1;
r@224 146 #X obj 112 377 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
r@225 147 1 1;
r@224 148 #X obj -67 575 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
r@224 149 1 1;
r@224 150 #X obj 217 576 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
r@224 151 1 1;
r@224 152 #X obj 526 577 tgl 30 0 empty empty empty 17 7 0 40 -260097 -4032 -4032
r@224 153 1 1;
r@224 154 #X msg 237 487 1.1 0.0007 1 6 90 6300 56 20;
r@224 155 #X msg -74 -2 0;
r@224 156 #X floatatom 32 41 0 0 0 0 - - -;
r@224 157 #X floatatom 102 207 0 0 0 0 - - -;
r@224 158 #X floatatom 187 374 0 0 0 0 - - -;
r@224 159 #X floatatom 12 573 0 0 0 0 - - -;
r@224 160 #X floatatom 297 571 0 0 0 0 - - -;
r@224 161 #X floatatom 602 575 0 0 0 0 - - -;
r@224 162 #X obj 378 181 sig~;
r@224 163 #X msg 378 158 1.1;
r@225 164 #X msg -48 -84 1.4 0.00046919 0.65 6 90 1000 80 20;
r@225 165 #X msg 26 88 1.4 0.00046919 0.7 6 90 1000 92.78 20;
r@225 166 #X msg 105 254 1.4 0.00046919 0.85 6 90 1000 136.81 20;
r@225 167 #X msg -63 450 1.4 0.00046919 0.9 6 90 1000 306.76 20;
r@225 168 #X msg 212 447 1.4 0.001 0.9 6 90 1000 97.76 20;
r@225 169 #X msg 518 450 1.4 0.001 0.9 6 90 1000 94 20;
r@224 170 #X obj 142 353 MA_Test2;
r@224 171 #X obj 252 548 MA_Test2;
r@225 172 #X obj 57 188 MA_Test2;
r@224 173 #X obj -13 19 MA_Test2;
r@225 174 #X obj -33 552 MA_Test2;
r@224 175 #X obj 557 552 MA_Test2;
r@224 176 #X connect 3 0 64 0;
r@223 177 #X connect 4 0 0 0;
r@223 178 #X connect 4 1 1 0;
r@224 179 #X connect 5 0 4 0;
r@224 180 #X connect 5 0 8 0;
r@224 181 #X connect 7 0 5 0;
r@224 182 #X connect 10 0 15 0;
r@224 183 #X connect 10 0 30 0;
r@224 184 #X connect 10 0 31 0;
r@224 185 #X connect 11 0 12 0;
r@224 186 #X connect 12 0 18 0;
r@224 187 #X connect 12 0 9 0;
r@224 188 #X connect 13 0 34 0;
r@224 189 #X connect 16 0 10 0;
r@224 190 #X connect 17 0 29 0;
r@224 191 #X connect 17 1 22 0;
r@224 192 #X connect 18 0 19 0;
r@224 193 #X connect 21 0 17 1;
r@224 194 #X connect 22 0 23 0;
r@224 195 #X connect 25 0 11 0;
r@224 196 #X connect 26 0 10 0;
r@224 197 #X connect 27 0 22 0;
r@224 198 #X connect 28 0 18 0;
r@224 199 #X connect 29 0 32 0;
r@224 200 #X connect 29 0 33 0;
r@224 201 #X connect 30 0 11 1;
r@223 202 #X connect 31 0 12 1;
r@224 203 #X connect 34 0 10 0;
r@225 204 #X connect 35 0 97 0;
r@225 205 #X connect 36 0 99 0;
r@225 206 #X connect 37 0 100 0;
r@225 207 #X connect 38 0 98 0;
r@225 208 #X connect 39 0 95 0;
r@225 209 #X connect 40 0 100 0;
r@225 210 #X connect 41 0 96 0;
r@225 211 #X connect 42 0 99 0;
r@225 212 #X connect 43 0 95 0;
r@225 213 #X connect 44 0 97 0;
r@225 214 #X connect 45 0 98 0;
r@224 215 #X connect 47 0 45 0;
r@224 216 #X connect 48 0 44 0;
r@224 217 #X connect 49 0 43 0;
r@224 218 #X connect 50 0 42 0;
r@224 219 #X connect 51 0 41 0;
r@223 220 #X connect 52 0 40 0;
r@224 221 #X connect 53 0 46 0;
r@224 222 #X connect 55 0 38 0;
r@224 223 #X connect 56 0 35 0;
r@224 224 #X connect 57 0 39 0;
r@224 225 #X connect 58 0 36 0;
r@224 226 #X connect 59 0 79 0;
r@224 227 #X connect 60 0 37 0;
r@223 228 #X connect 61 0 54 0;
r@224 229 #X connect 62 0 63 0;
r@224 230 #X connect 64 0 5 0;
r@225 231 #X connect 65 0 89 0;
r@225 232 #X connect 66 0 90 0;
r@225 233 #X connect 67 0 91 0;
r@225 234 #X connect 68 0 92 0;
r@225 235 #X connect 69 0 93 0;
r@225 236 #X connect 70 0 94 0;
r@224 237 #X connect 72 0 71 0;
r@225 238 #X connect 79 0 96 0;
r@225 239 #X connect 80 0 98 0;
r@225 240 #X connect 88 0 87 0;
r@225 241 #X connect 89 0 98 0;
r@225 242 #X connect 90 0 97 0;
r@225 243 #X connect 91 0 95 0;
r@225 244 #X connect 92 0 99 0;
r@225 245 #X connect 93 0 96 0;
r@225 246 #X connect 94 0 100 0;
r@225 247 #X connect 95 0 75 0;
r@225 248 #X connect 95 1 83 0;
r@225 249 #X connect 96 0 77 0;
r@225 250 #X connect 96 1 85 0;
r@225 251 #X connect 97 0 74 0;
r@225 252 #X connect 97 1 82 0;
r@225 253 #X connect 98 0 73 0;
r@225 254 #X connect 98 1 81 0;
r@225 255 #X connect 99 0 76 0;
r@225 256 #X connect 99 1 84 0;
r@225 257 #X connect 100 0 78 0;
r@225 258 #X connect 100 1 86 0;