Mercurial > hg > weather-synthesis-prototyping

annotate scene demo/testBed.pd @ 115:61d267c71a18

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
freqCalcCyl2_D4Mach added. This includes the effect of mach number on the angle of sound radiated from the dipole. This is limited up to 0.3M. angleCalc converted to an object for both control and audio.
author Rod Selfridge <r.selfridge@qmul.ac.uk>
date Fri, 31 Jul 2015 07:15:40 +0100
parents 4628d8c3731f
children 622e6692b214
rev   line source
r@115 1 #N canvas 106 91 842 605 10;
r@106 2 #X msg 88 -43 300;
r@106 3 #X obj 59 -86 loadbang;
r@106 4 #N canvas 236 158 426 423 windspeed 0;
r@106 5 #X obj 3 -19 +~ 1;
r@106 6 #X obj 3 76 +~;
r@106 7 #X obj 3 3 *~ 0.25;
r@106 8 #X obj 19 53 +~;
r@106 9 #X obj 3 98 clip~ 0 1;
r@106 10 #N canvas 548 156 136 193 squall 0;
r@106 11 #X obj 63 20 noise~;
r@106 12 #X obj 63 83 hip~ 0;
r@106 13 #X obj 63 41 lop~ 3;
r@106 14 #X obj 63 62 lop~ 3;
r@106 15 #X obj 0 86 *~;
r@106 16 #X obj 22 130 *~;
r@106 17 #X obj 0 64 *~ 8;
r@106 18 #X obj 63 104 *~ 20;
r@106 19 #X obj 0 0 inlet~;
r@106 20 #X obj 22 154 outlet~;
r@106 21 #X obj 0 20 max~ 0.42;
r@106 22 #X obj 0 42 -~ 0.42;
r@106 23 #X connect 0 0 2 0;
r@106 24 #X connect 1 0 7 0;
r@106 25 #X connect 2 0 3 0;
r@106 26 #X connect 3 0 1 0;
r@106 27 #X connect 4 0 5 0;
r@106 28 #X connect 5 0 9 0;
r@106 29 #X connect 6 0 4 0;
r@106 30 #X connect 6 0 4 1;
r@106 31 #X connect 7 0 5 1;
r@106 32 #X connect 8 0 10 0;
r@106 33 #X connect 10 0 11 0;
r@106 34 #X connect 11 0 6 0;
r@106 35 #X restore 77 28 pd squall;
r@106 36 #N canvas 398 157 136 192 gust 0;
r@106 37 #X obj 0 0 noise~;
r@106 38 #X obj 0 63 hip~ 0;
r@106 39 #X obj 0 106 *~;
r@106 40 #X obj 67 44 *~;
r@106 41 #X obj 67 21 +~ 0.5;
r@106 42 #X obj 67 67 -~ 0.125;
r@106 43 #X obj 0 42 lop~ 0.5;
r@106 44 #X obj 0 21 lop~ 0.5;
r@106 45 #X obj 0 84 *~ 50;
r@106 46 #X obj 67 0 inlet~;
r@106 47 #X obj 0 131 outlet~;
r@106 48 #X connect 0 0 7 0;
r@106 49 #X connect 1 0 8 0;
r@106 50 #X connect 2 0 10 0;
r@106 51 #X connect 3 0 5 0;
r@106 52 #X connect 4 0 3 0;
r@106 53 #X connect 4 0 3 1;
r@106 54 #X connect 5 0 2 1;
r@106 55 #X connect 6 0 1 0;
r@106 56 #X connect 7 0 6 0;
r@106 57 #X connect 8 0 2 0;
r@106 58 #X connect 9 0 4 0;
r@106 59 #X restore 18 29 pd gust;
r@106 60 #X obj 3 120 outlet~;
r@106 61 #X obj 3 -41 osc~ 0.01;
r@106 62 #X connect 0 0 2 0;
r@106 63 #X connect 1 0 4 0;
r@106 64 #X connect 2 0 5 0;
r@106 65 #X connect 2 0 6 0;
r@106 66 #X connect 2 0 1 0;
r@106 67 #X connect 3 0 1 1;
r@106 68 #X connect 4 0 7 0;
r@106 69 #X connect 5 0 3 1;
r@106 70 #X connect 6 0 3 0;
r@106 71 #X connect 8 0 0 0;
r@106 72 #X restore -376 -133 pd windspeed;
r@106 73 #X obj -376 61 delwrite~ varwind 3000;
r@115 74 #X obj -293 -131 hsl 128 15 0 150 0 0 empty empty empty -2 -8 0 10
r@115 75 -262144 -1 -1 4000 1;
r@106 76 #X obj -333 -28 snapshot~;
r@106 77 #X obj -333 -53 metro 100;
r@106 78 #X obj -333 -75 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@106 79 1 1;
r@106 80 #X floatatom -333 -1 10 0 0 0 - - -;
r@106 81 #X obj -376 -99 *~ 1;
r@106 82 #X obj -376 -73 +~ 1;
r@106 83 #X obj -333 -100 loadbang;
r@106 84 #X text -336 17 Wind Speed;
r@106 85 #X obj -157 -130 loadbang;
r@106 86 #X msg -157 -102 5;
r@106 87 #X obj 103 6 hsl 128 15 0.001 0.01 1 0 empty empty empty -2 -8 0 10
r@108 88 -262144 -1 -1 6059 1;
r@106 89 #X floatatom 115 30 8 0 0 0 - - -;
r@106 90 #X obj 166 280 hsl 128 15 0.009 0.9 0 0 empty empty empty -2 -8 0 10
r@106 91 -262144 -1 -1 6999 1;
r@106 92 #X floatatom 192 309 5 0 0 0 - - -;
r@106 93 #X text 238 7 Diameter;
r@106 94 #X obj 141 162 hsl 128 15 -90 90 0 0 empty empty empty -2 -8 0 10 -262144
r@106 95 -1 -1 6350 1;
r@106 96 #X floatatom 162 191 5 0 0 0 - - -;
r@106 97 #X obj 153 217 hsl 128 15 -180 180 0 0 empty empty empty -2 -8 0 10
r@106 98 -262144 -1 -1 9525 1;
r@106 99 #X floatatom 177 246 5 0 0 0 - - -;
r@115 100 #X obj 128 105 hsl 128 15 100 1 1 0 empty empty empty -2 -8 0 10 -262144
r@115 101 -1 -1 5847 1;
r@106 102 #X floatatom 139 134 5 0 0 0 - - -;
r@106 103 #X text 307 281 Pan Value;
r@106 104 #X text 280 162 Elevation;
r@106 105 #X text 292 218 Azimuth;
r@106 106 #X text 266 106 Distance;
r@106 107 #X obj -384 227 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@106 108 #X obj -321 227 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@106 109 #X text -324 136 Gain;
r@106 110 #X obj -385 110 loadbang;
r@106 111 #N canvas 865 368 284 318 opLevels 0;
r@106 112 #X obj 74 188 dac~;
r@106 113 #X obj 30 70 catch~ l;
r@106 114 #X obj 128 70 catch~ r;
r@106 115 #X obj 129 104 *~ 0.45;
r@106 116 #X obj 30 104 *~ 0.45;
r@106 117 #X obj 30 210 prvu~;
r@106 118 #X obj 129 211 prvu~;
r@106 119 #X obj 93 68 / 127;
r@106 120 #X obj 93 33 inlet;
r@106 121 #X obj 30 239 outlet;
r@106 122 #X obj 129 239 outlet;
r@106 123 #X obj 74 143 /~ 15;
r@106 124 #X obj 95 165 /~ 15;
r@106 125 #X obj 196 132 inlet;
r@106 126 #X connect 1 0 4 0;
r@106 127 #X connect 2 0 3 0;
r@106 128 #X connect 3 0 6 0;
r@106 129 #X connect 3 0 12 0;
r@106 130 #X connect 4 0 5 0;
r@106 131 #X connect 4 0 11 0;
r@106 132 #X connect 5 0 9 0;
r@106 133 #X connect 6 0 10 0;
r@106 134 #X connect 7 0 3 1;
r@106 135 #X connect 7 0 4 1;
r@106 136 #X connect 8 0 7 0;
r@106 137 #X connect 11 0 0 0;
r@106 138 #X connect 12 0 0 1;
r@106 139 #X connect 13 0 11 1;
r@106 140 #X connect 13 0 12 1;
r@106 141 #X restore -385 184 pd opLevels;
r@106 142 #X msg -385 133 5;
r@106 143 #X obj -382 155 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
r@115 144 -1 -1 490 1;
r@106 145 #X obj -115 -25 snapshot~;
r@106 146 #X obj -115 -50 metro 100;
r@106 147 #X floatatom -115 2 10 0 0 0 - - -;
r@106 148 #X obj -115 -97 loadbang;
r@106 149 #X obj -115 -74 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@106 150 1 1;
r@106 151 #X text -118 20 Mach No;
r@106 152 #N canvas 20 383 344 123 machCalc 0;
r@106 153 #X obj 26 9 /~ 343.59;
r@106 154 #X text 107 15 Speed of Sound (dry air 20 Degs C);
r@106 155 #X obj 26 -14 vd~ varwind;
r@115 156 #X obj 26 33 s~ MY_MACH;
r@106 157 #X connect 0 0 3 0;
r@106 158 #X connect 2 0 0 0;
r@106 159 #X restore -50 -149 pd machCalc;
r@106 160 #X obj 232 -143 bng 35 250 50 0 empty empty empty 17 7 0 10 -4032 -1
r@106 161 -1;
r@106 162 #X floatatom 88 330 8 0 0 0 - - -;
r@106 163 #X msg 46 -11 0.003;
r@106 164 #X msg 9 90 12;
r@106 165 #X msg -11 146 0;
r@106 166 #X msg -31 202 90;
r@106 167 #X msg -54 265 0.5;
r@106 168 #X obj 59 -62 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
r@106 169 -1;
r@106 170 #X obj 116 62 hsl 128 15 1 10 0 0 empty empty empty -2 -8 0 10 -262144
r@108 171 -1 -1 4233 1;
r@106 172 #X floatatom 137 81 8 0 0 0 - - -;
r@106 173 #X msg 25 47 4;
r@106 174 #X obj -265 158 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
r@115 175 -1 -1 6690 1;
r@106 176 #X obj -264 111 loadbang;
r@106 177 #X msg -264 134 5;
r@106 178 #X text -203 137 No Of Sources;
r@106 179 #X text 248 46 Length;
r@115 180 #X obj 52 302 freqCalcCyl2_D4Mach;
r@115 181 #X obj -254 -2 s WSPEED;
r@115 182 #X obj -200 -64 r~ MY_MACH;
r@115 183 #X obj -182 4 s SIG_MACH;
r@115 184 #X obj 232 -102 s SET_UP;
r@115 185 #X obj 102 -15 r SET_UP;
r@115 186 #X obj 175 40 r SET_UP;
r@115 187 #X obj 242 79 r SET_UP;
r@115 188 #X obj 229 131 r SET_UP;
r@115 189 #X obj 235 191 r SET_UP;
r@115 190 #X obj 243 249 r SET_UP;
r@115 191 #X connect 0 0 60 0;
r@115 192 #X connect 1 0 51 0;
r@106 193 #X connect 2 0 9 0;
r@106 194 #X connect 4 0 9 1;
r@106 195 #X connect 4 0 10 1;
r@106 196 #X connect 5 0 8 0;
r@115 197 #X connect 5 0 61 0;
r@106 198 #X connect 6 0 5 0;
r@106 199 #X connect 7 0 6 0;
r@106 200 #X connect 9 0 10 0;
r@106 201 #X connect 10 0 3 0;
r@106 202 #X connect 10 0 5 0;
r@106 203 #X connect 11 0 7 0;
r@115 204 #X connect 13 0 14 0;
r@115 205 #X connect 14 0 4 0;
r@115 206 #X connect 15 0 16 0;
r@115 207 #X connect 15 0 60 1;
r@115 208 #X connect 17 0 18 0;
r@115 209 #X connect 17 0 60 6;
r@115 210 #X connect 20 0 21 0;
r@115 211 #X connect 20 0 60 4;
r@115 212 #X connect 22 0 23 0;
r@115 213 #X connect 22 0 60 5;
r@115 214 #X connect 24 0 25 0;
r@115 215 #X connect 24 0 60 3;
r@115 216 #X connect 33 0 35 0;
r@115 217 #X connect 34 0 30 0;
r@115 218 #X connect 34 1 31 0;
r@115 219 #X connect 35 0 36 0;
r@115 220 #X connect 36 0 34 0;
r@115 221 #X connect 37 0 39 0;
r@115 222 #X connect 37 0 63 0;
r@115 223 #X connect 38 0 37 0;
r@115 224 #X connect 40 0 41 0;
r@115 225 #X connect 41 0 38 0;
r@115 226 #X connect 44 0 64 0;
r@115 227 #X connect 46 0 15 0;
r@115 228 #X connect 47 0 24 0;
r@115 229 #X connect 48 0 20 0;
r@115 230 #X connect 49 0 22 0;
r@115 231 #X connect 50 0 17 0;
r@115 232 #X connect 51 0 0 0;
r@115 233 #X connect 51 0 46 0;
r@115 234 #X connect 51 0 47 0;
r@115 235 #X connect 51 0 48 0;
r@115 236 #X connect 51 0 49 0;
r@115 237 #X connect 51 0 50 0;
r@115 238 #X connect 51 0 54 0;
r@115 239 #X connect 52 0 53 0;
r@115 240 #X connect 52 0 60 2;
r@115 241 #X connect 54 0 52 0;
r@115 242 #X connect 55 0 34 1;
r@115 243 #X connect 56 0 57 0;
r@115 244 #X connect 57 0 55 0;
r@115 245 #X connect 60 0 45 0;
r@115 246 #X connect 62 0 37 0;
r@115 247 #X connect 65 0 15 0;
r@115 248 #X connect 66 0 52 0;
r@115 249 #X connect 67 0 24 0;
r@115 250 #X connect 68 0 20 0;
r@115 251 #X connect 69 0 22 0;
r@115 252 #X connect 70 0 17 0;