Mercurial > hg > weather-synthesis-prototyping
comparison SwordLogLoFiWiiD2/freqCalcCyl4_Lofi.pd @ 196:fbfc8f1c6515
sword - LoFi D2 with wii added to test stuff out
More button controls added
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Tue, 01 Mar 2016 11:03:49 +0000 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
195:154a4980ed70 | 196:fbfc8f1c6515 |
---|---|
1 #N canvas 337 23 1326 739 10; | |
2 #X obj 519 467 /~ 1; | |
3 #X obj 519 427 *~; | |
4 #X obj 233 73 inlet; | |
5 #X obj 240 96 s \$0-diameter; | |
6 #X obj 540 445 r \$0-diameter; | |
7 #X obj 130 95 s~ \$0-windSpeed; | |
8 #X obj 534 406 r~ \$0-windSpeed; | |
9 #X obj 519 493 s~ \$0-myFreq; | |
10 #X obj 646 67 inlet; | |
11 #X text 483 512 Calculates the frequency; | |
12 #X text 484 524 based on the physics of; | |
13 #X text 107 382 Calculates the gain of the dipole source; | |
14 #X text 469 47 Azimuth; | |
15 #X text 651 49 Pan; | |
16 #X text 543 51 Elevation; | |
17 #X text 394 52 Distance; | |
18 #X text 228 52 Diameter; | |
19 #X text 143 51 Wind Speed; | |
20 #X obj 238 346 s~ \$0-dragDiGain; | |
21 #X obj 127 367 s~ \$0-liftDiGain; | |
22 #X obj 646 136 s \$0-thisPan; | |
23 #X obj 127 215 r~ \$0-windSpeed; | |
24 #X obj 154 236 r \$0-diameter; | |
25 #X obj 646 91 max 0.01; | |
26 #X obj 646 114 min 0.99; | |
27 #X text 484 537 the object and environment; | |
28 #X obj 130 75 inlet~; | |
29 #X obj 398 71 inlet~; | |
30 #X obj 403 94 s~ \$0-dist; | |
31 #X obj 182 257 r~ \$0-dist; | |
32 #X obj 470 70 inlet~; | |
33 #X obj 477 92 s~ \$0-azim; | |
34 #X obj 238 298 r~ \$0-azim; | |
35 #X obj 544 69 inlet~; | |
36 #X obj 552 92 s~ \$0-elev; | |
37 #X obj 210 277 r~ \$0-elev; | |
38 #N canvas 339 112 976 679 Dipoles 0; | |
39 #X obj 76 62 r~ \$0-myFreq; | |
40 #X obj 91 107 r~ \$0-liftDiGain; | |
41 #X obj 353 69 r~ \$0-myFreq; | |
42 #X obj 368 135 r~ \$0-liftDiGain; | |
43 #X obj 368 157 *~ 0.6; | |
44 #X obj 621 62 r~ \$0-myFreq; | |
45 #X obj 636 125 r~ \$0-liftDiGain; | |
46 #X obj 621 86 *~ 5; | |
47 #X obj 353 93 *~ 3; | |
48 #X obj 215 359 r~ \$0-myFreq; | |
49 #X obj 230 432 r~ \$0-dragDiGain; | |
50 #X obj 215 387 *~ 2; | |
51 #X obj 494 358 r~ \$0-myFreq; | |
52 #X obj 528 406 r~ \$0-dragDiGain; | |
53 #X obj 494 386 *~ 4; | |
54 #X obj 528 429 *~ 0.125; | |
55 #X obj 210 199 *~; | |
56 #X obj 210 264 throw~ l; | |
57 #X obj 237 241 throw~ r; | |
58 #X obj 210 220 fcpan; | |
59 #X obj 237 198 r \$0-thisPan; | |
60 #X obj 210 67 r~ \$0-thisNoise; | |
61 #X obj 480 192 *~; | |
62 #X obj 480 257 throw~ l; | |
63 #X obj 507 234 throw~ r; | |
64 #X obj 480 213 fcpan; | |
65 #X obj 507 191 r \$0-thisPan; | |
66 #X obj 480 68 r~ \$0-thisNoise; | |
67 #X obj 750 183 *~; | |
68 #X obj 750 248 throw~ l; | |
69 #X obj 777 225 throw~ r; | |
70 #X obj 750 204 fcpan; | |
71 #X obj 777 182 r \$0-thisPan; | |
72 #X obj 750 65 r~ \$0-thisNoise; | |
73 #X obj 636 147 *~ 0.1; | |
74 #X obj 360 478 *~; | |
75 #X obj 360 543 throw~ l; | |
76 #X obj 387 520 throw~ r; | |
77 #X obj 360 499 fcpan; | |
78 #X obj 387 477 r \$0-thisPan; | |
79 #X obj 360 358 r~ \$0-thisNoise; | |
80 #X obj 634 476 *~; | |
81 #X obj 634 541 throw~ l; | |
82 #X obj 661 518 throw~ r; | |
83 #X obj 634 497 fcpan; | |
84 #X obj 661 475 r \$0-thisPan; | |
85 #X obj 634 358 r~ \$0-thisNoise; | |
86 #X text 273 27 Generates the sound associated with the lift dipole. | |
87 ; | |
88 #X text 318 326 Generates the sound associated with the drag dipole. | |
89 ; | |
90 #X obj 210 158 *~ 1; | |
91 #X obj 480 159 *~ 1; | |
92 #X obj 750 154 *~ 1; | |
93 #X obj 634 442 *~ 1; | |
94 #X obj 360 445 *~ 1; | |
95 #X obj 210 108 vcf~ 10; | |
96 #X obj 210 134 vcf~ 10; | |
97 #X obj 480 116 vcf~ 10; | |
98 #X obj 480 138 vcf~ 10; | |
99 #X obj 750 107 vcf~ 10; | |
100 #X obj 750 131 vcf~ 10; | |
101 #X obj 360 402 vcf~ 10; | |
102 #X obj 360 423 vcf~ 10; | |
103 #X obj 634 400 vcf~ 10; | |
104 #X obj 634 421 vcf~ 10; | |
105 #X obj 53 291 noise~; | |
106 #X obj 53 314 s~ \$0-thisNoise; | |
107 #X connect 0 0 54 1; | |
108 #X connect 0 0 55 1; | |
109 #X connect 1 0 16 1; | |
110 #X connect 2 0 8 0; | |
111 #X connect 3 0 4 0; | |
112 #X connect 4 0 22 1; | |
113 #X connect 5 0 7 0; | |
114 #X connect 6 0 34 0; | |
115 #X connect 7 0 58 1; | |
116 #X connect 7 0 59 1; | |
117 #X connect 8 0 56 1; | |
118 #X connect 8 0 57 1; | |
119 #X connect 9 0 11 0; | |
120 #X connect 10 0 35 1; | |
121 #X connect 11 0 60 1; | |
122 #X connect 11 0 61 1; | |
123 #X connect 12 0 14 0; | |
124 #X connect 13 0 15 0; | |
125 #X connect 14 0 62 1; | |
126 #X connect 14 0 63 1; | |
127 #X connect 15 0 41 1; | |
128 #X connect 16 0 19 0; | |
129 #X connect 19 0 17 0; | |
130 #X connect 19 1 18 0; | |
131 #X connect 20 0 19 1; | |
132 #X connect 21 0 54 0; | |
133 #X connect 22 0 25 0; | |
134 #X connect 25 0 23 0; | |
135 #X connect 25 1 24 0; | |
136 #X connect 26 0 25 1; | |
137 #X connect 27 0 56 0; | |
138 #X connect 28 0 31 0; | |
139 #X connect 31 0 29 0; | |
140 #X connect 31 1 30 0; | |
141 #X connect 32 0 31 1; | |
142 #X connect 33 0 58 0; | |
143 #X connect 34 0 28 1; | |
144 #X connect 35 0 38 0; | |
145 #X connect 38 0 36 0; | |
146 #X connect 38 1 37 0; | |
147 #X connect 39 0 38 1; | |
148 #X connect 40 0 60 0; | |
149 #X connect 41 0 44 0; | |
150 #X connect 44 0 42 0; | |
151 #X connect 44 1 43 0; | |
152 #X connect 45 0 44 1; | |
153 #X connect 46 0 62 0; | |
154 #X connect 49 0 16 0; | |
155 #X connect 50 0 22 0; | |
156 #X connect 51 0 28 0; | |
157 #X connect 52 0 41 0; | |
158 #X connect 53 0 35 0; | |
159 #X connect 54 0 55 0; | |
160 #X connect 55 0 49 0; | |
161 #X connect 56 0 57 0; | |
162 #X connect 57 0 50 0; | |
163 #X connect 58 0 59 0; | |
164 #X connect 59 0 51 0; | |
165 #X connect 60 0 61 0; | |
166 #X connect 61 0 53 0; | |
167 #X connect 62 0 63 0; | |
168 #X connect 63 0 52 0; | |
169 #X connect 64 0 65 0; | |
170 #X restore 774 538 pd Dipoles; | |
171 #X obj 404 480 r myMet; | |
172 #X obj 404 501 snapshot~; | |
173 #X floatatom 404 522 0 0 0 0 - - -; | |
174 #X obj 438 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 | |
175 -1; | |
176 #X obj 438 221 s GO; | |
177 #X obj 378 168 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 | |
178 -1 -1; | |
179 #X obj 378 245 s setUp; | |
180 #X obj 378 221 Uzi 20; | |
181 #N canvas 181 90 1238 721 GoldfreqGainLoFi 1; | |
182 #N canvas 759 125 286 294 pow6 0; | |
183 #X obj 47 67 *~; | |
184 #X obj 76 67 *~; | |
185 #X obj 76 35 inlet~; | |
186 #X obj 47 163 outlet~; | |
187 #X obj 136 184 snapshot~; | |
188 #X obj 136 159 metro 100; | |
189 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
190 1; | |
191 #X floatatom 136 211 10 0 0 0 - - -; | |
192 #X obj 216 210 outlet; | |
193 #X obj 136 111 loadbang; | |
194 #X obj 106 67 *~; | |
195 #X obj 47 93 *~; | |
196 #X obj 47 118 *~; | |
197 #X obj 372 202 *; | |
198 #X obj 372 228 *; | |
199 #X obj 382 22 hsl 128 15 0 10 0 0 empty empty empty -2 -8 0 10 -262144 | |
200 -1 -1 0 1; | |
201 #X floatatom 374 288 10 0 0 0 - - -; | |
202 #X obj 303 20 t f b; | |
203 #X floatatom 455 55 5 0 0 0 - - -; | |
204 #X obj 372 260 *; | |
205 #X obj 400 202 *; | |
206 #X msg 303 -4 6; | |
207 #X obj 434 201 *; | |
208 #X connect 0 0 11 0; | |
209 #X connect 1 0 11 1; | |
210 #X connect 2 0 0 0; | |
211 #X connect 2 0 0 1; | |
212 #X connect 2 0 1 1; | |
213 #X connect 2 0 10 0; | |
214 #X connect 2 0 10 1; | |
215 #X connect 2 0 1 0; | |
216 #X connect 4 0 7 0; | |
217 #X connect 4 0 8 0; | |
218 #X connect 5 0 4 0; | |
219 #X connect 6 0 5 0; | |
220 #X connect 9 0 6 0; | |
221 #X connect 10 0 12 1; | |
222 #X connect 11 0 12 0; | |
223 #X connect 12 0 4 0; | |
224 #X connect 12 0 3 0; | |
225 #X connect 13 0 14 0; | |
226 #X connect 14 0 19 0; | |
227 #X connect 15 0 13 0; | |
228 #X connect 15 0 13 1; | |
229 #X connect 15 0 18 0; | |
230 #X connect 15 0 20 0; | |
231 #X connect 15 0 20 1; | |
232 #X connect 17 0 13 0; | |
233 #X connect 17 0 13 1; | |
234 #X connect 17 0 20 0; | |
235 #X connect 17 0 20 1; | |
236 #X connect 17 0 22 0; | |
237 #X connect 17 0 22 1; | |
238 #X connect 17 1 13 0; | |
239 #X connect 17 1 20 0; | |
240 #X connect 17 1 22 0; | |
241 #X connect 19 0 16 0; | |
242 #X connect 20 0 14 1; | |
243 #X connect 21 0 17 0; | |
244 #X connect 22 0 19 1; | |
245 #X restore 218 145 pd pow6; | |
246 #X text 533 2 Distance; | |
247 #X text 724 595 Calculates Drag Dipole gain; | |
248 #X text 48 508 Calculates Lift Dipole gain; | |
249 #X obj 218 112 inlet~; | |
250 #X text 327 152 Diameter; | |
251 #X obj 292 150 inlet; | |
252 #X obj 219 528 outlet~; | |
253 #X obj 758 523 outlet~; | |
254 #X text 314 259 Length; | |
255 #X obj 219 284 *~ 1; | |
256 #X obj 234 391 /~ 360; | |
257 #X obj 234 440 *~; | |
258 #X obj 219 463 *~; | |
259 #X text 268 112 Wind speed; | |
260 #X text 321 196 Corr Length; | |
261 #X obj 283 415 /~ 360; | |
262 #X obj 283 461 *~; | |
263 #X obj 283 437 cos~; | |
264 #X obj 219 502 *~; | |
265 #X text 370 104 Speed of Sound to power 3; | |
266 #X obj 518 189 cos~; | |
267 #X obj 518 212 *~; | |
268 #X obj 466 213 sig~ 1; | |
269 #X obj 503 243 -~; | |
270 #N canvas 1150 227 286 289 pow4 0; | |
271 #X obj 47 67 *~; | |
272 #X obj 76 67 *~; | |
273 #X obj 76 35 inlet~; | |
274 #X obj 47 163 outlet~; | |
275 #X obj 136 184 snapshot~; | |
276 #X obj 136 159 metro 100; | |
277 #X obj 136 137 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 | |
278 1; | |
279 #X floatatom 136 211 10 0 0 0 - - -; | |
280 #X obj 216 210 outlet; | |
281 #X obj 136 111 loadbang; | |
282 #X obj 47 93 *~; | |
283 #X connect 0 0 10 0; | |
284 #X connect 1 0 10 1; | |
285 #X connect 2 0 0 0; | |
286 #X connect 2 0 0 1; | |
287 #X connect 2 0 1 1; | |
288 #X connect 2 0 1 0; | |
289 #X connect 4 0 7 0; | |
290 #X connect 4 0 8 0; | |
291 #X connect 5 0 4 0; | |
292 #X connect 6 0 5 0; | |
293 #X connect 9 0 6 0; | |
294 #X connect 10 0 3 0; | |
295 #X connect 10 0 4 0; | |
296 #X restore 503 266 pd pow4; | |
297 #X obj 404 298 *~; | |
298 #X obj 219 346 /~; | |
299 #X obj 132 346 s~ \$0-aGainG; | |
300 #X obj 872 290 r~ \$0-aGainG; | |
301 #X obj 758 500 *~ 0.1; | |
302 #X obj 723 340 +~ 90; | |
303 #X obj 723 363 /~ 360; | |
304 #X obj 723 409 *~; | |
305 #X obj 723 385 sin~; | |
306 #X obj 773 359 /~ 360; | |
307 #X obj 773 405 *~; | |
308 #X obj 773 381 cos~; | |
309 #X obj 758 436 *~; | |
310 #X text 709 1 Azimuth; | |
311 #X text 608 3 Elevation; | |
312 #X text 892 379 Speed of Sound to power 3; | |
313 #X obj 872 423 /~; | |
314 #X text 588 167 Remember - Goldstein moves cylinder; | |
315 #X obj 518 170 /~ 360; | |
316 #X obj 758 475 *~; | |
317 #X obj 218 205 *~; | |
318 #X obj 234 417 sin~; | |
319 #X obj 404 167 *~; | |
320 #X obj 404 141 r~ \$0-thisDist; | |
321 #X obj 520 40 s~ \$0-thisDist; | |
322 #X obj 513 18 inlet~; | |
323 #X obj 404 220 *~ 32; | |
324 #X obj 404 193 *~ 4.05513e+07; | |
325 #X obj 713 19 inlet~; | |
326 #X obj 720 44 s~ \$0-gain_azim; | |
327 #X obj 283 392 r~ \$0-gain_azim; | |
328 #X obj 611 21 inlet~; | |
329 #X obj 887 312 r~ \$0-thisDist; | |
330 #X obj 887 336 *~; | |
331 #X obj 887 361 *~ 4.05513e+07; | |
332 #X obj 887 399 *~ 32; | |
333 #X obj 616 44 s~ \$0-gain_elev; | |
334 #X obj 518 130 r~ \$0-gain_elev; | |
335 #X obj 723 315 r~ \$0-gain_elev; | |
336 #X obj 234 369 r~ \$0-gain_elev; | |
337 #X obj 240 258 r bladeLen; | |
338 #X text 25 173 St ^2 * mass air * sqrt(2*pi); | |
339 #X obj 218 171 *~ 0.1228; | |
340 #X obj 293 192 *~ 5; | |
341 #X obj 293 170 sig~; | |
342 #X obj 551 191 /~ 343.56; | |
343 #X obj 773 336 r~ \$0-gain_azim; | |
344 #X connect 0 0 68 0; | |
345 #X connect 4 0 0 0; | |
346 #X connect 4 0 71 0; | |
347 #X connect 6 0 70 0; | |
348 #X connect 10 0 27 0; | |
349 #X connect 10 0 28 0; | |
350 #X connect 11 0 47 0; | |
351 #X connect 12 0 13 1; | |
352 #X connect 13 0 19 0; | |
353 #X connect 16 0 18 0; | |
354 #X connect 17 0 19 1; | |
355 #X connect 18 0 17 0; | |
356 #X connect 18 0 17 1; | |
357 #X connect 19 0 7 0; | |
358 #X connect 21 0 22 0; | |
359 #X connect 22 0 24 1; | |
360 #X connect 23 0 24 0; | |
361 #X connect 24 0 25 0; | |
362 #X connect 25 0 26 1; | |
363 #X connect 26 0 27 1; | |
364 #X connect 27 0 13 0; | |
365 #X connect 29 0 42 0; | |
366 #X connect 30 0 8 0; | |
367 #X connect 31 0 32 0; | |
368 #X connect 32 0 34 0; | |
369 #X connect 33 0 38 0; | |
370 #X connect 34 0 33 0; | |
371 #X connect 34 0 33 1; | |
372 #X connect 35 0 37 0; | |
373 #X connect 36 0 38 1; | |
374 #X connect 37 0 36 0; | |
375 #X connect 37 0 36 1; | |
376 #X connect 38 0 45 0; | |
377 #X connect 42 0 45 1; | |
378 #X connect 44 0 21 0; | |
379 #X connect 45 0 30 0; | |
380 #X connect 46 0 10 0; | |
381 #X connect 47 0 12 0; | |
382 #X connect 47 0 12 1; | |
383 #X connect 48 0 53 0; | |
384 #X connect 49 0 48 0; | |
385 #X connect 49 0 48 1; | |
386 #X connect 51 0 50 0; | |
387 #X connect 52 0 26 0; | |
388 #X connect 53 0 52 0; | |
389 #X connect 54 0 55 0; | |
390 #X connect 56 0 16 0; | |
391 #X connect 57 0 62 0; | |
392 #X connect 58 0 59 0; | |
393 #X connect 58 0 59 1; | |
394 #X connect 59 0 60 0; | |
395 #X connect 60 0 61 0; | |
396 #X connect 61 0 42 1; | |
397 #X connect 63 0 44 0; | |
398 #X connect 64 0 31 0; | |
399 #X connect 65 0 11 0; | |
400 #X connect 66 0 10 1; | |
401 #X connect 68 0 46 0; | |
402 #X connect 69 0 46 1; | |
403 #X connect 70 0 69 0; | |
404 #X connect 71 0 22 1; | |
405 #X connect 72 0 35 0; | |
406 #X restore 127 322 pd GoldfreqGainLoFi; | |
407 #X obj 519 387 sig~ 0.2; | |
408 #X connect 0 0 7 0; | |
409 #X connect 0 0 38 0; | |
410 #X connect 1 0 0 0; | |
411 #X connect 2 0 3 0; | |
412 #X connect 4 0 0 1; | |
413 #X connect 6 0 1 1; | |
414 #X connect 8 0 23 0; | |
415 #X connect 21 0 45 0; | |
416 #X connect 22 0 45 1; | |
417 #X connect 23 0 24 0; | |
418 #X connect 24 0 20 0; | |
419 #X connect 26 0 5 0; | |
420 #X connect 27 0 28 0; | |
421 #X connect 29 0 45 2; | |
422 #X connect 30 0 31 0; | |
423 #X connect 32 0 45 4; | |
424 #X connect 33 0 34 0; | |
425 #X connect 35 0 45 3; | |
426 #X connect 37 0 38 0; | |
427 #X connect 38 0 39 0; | |
428 #X connect 40 0 41 0; | |
429 #X connect 42 0 44 0; | |
430 #X connect 44 0 43 0; | |
431 #X connect 45 0 19 0; | |
432 #X connect 45 1 18 0; | |
433 #X connect 46 0 1 0; |