annotate sept - Dec 14/udly.pd @ 115:61d267c71a18
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 |
3504138285bb |
| children |
|
| rev |
line source |
|
r@33
|
1 #N canvas 128 91 234 472 10;
|
|
r@33
|
2 #X obj 82 24 delwrite~ \$0-a \$1;
|
|
r@33
|
3 #X obj 5 234 delread~ \$0-a;
|
|
r@33
|
4 #X obj 82 1 r~ udly;
|
|
r@33
|
5 #X obj 5 1 r shake;
|
|
r@33
|
6 #X obj 5 387 *~;
|
|
r@33
|
7 #X obj 20 163 \$1;
|
|
r@33
|
8 #X obj 20 189 -;
|
|
r@33
|
9 #X obj 20 211 / \$1;
|
|
r@33
|
10 #X obj 5 22 t b b;
|
|
r@33
|
11 #X obj 5 89 random;
|
|
r@33
|
12 #X obj 35 45 \$1;
|
|
r@33
|
13 #X obj 35 66 * 10000;
|
|
r@33
|
14 #X obj 5 109 / 10000;
|
|
r@33
|
15 #N canvas 0 0 450 300 cpan 0;
|
|
r@33
|
16 #X obj -2 -2 inlet~ signal;
|
|
r@33
|
17 #X obj 88 192 *~;
|
|
r@33
|
18 #X obj -2 192 *~;
|
|
r@33
|
19 #X obj 104 110 cos~;
|
|
r@33
|
20 #X obj 104 87 -~ 0.25;
|
|
r@33
|
21 #X obj 104 65 *~ 0.25;
|
|
r@33
|
22 #X obj -2 220 outlet~ left;
|
|
r@33
|
23 #X obj 88 220 outlet~ right;
|
|
r@33
|
24 #X obj 14 166 cos~;
|
|
r@33
|
25 #X obj 14 142 -~ 0.25;
|
|
r@33
|
26 #X obj 107 37 inlet~;
|
|
r@33
|
27 #X connect 0 0 2 0;
|
|
r@33
|
28 #X connect 0 0 1 0;
|
|
r@33
|
29 #X connect 1 0 7 0;
|
|
r@33
|
30 #X connect 2 0 6 0;
|
|
r@33
|
31 #X connect 3 0 1 1;
|
|
r@33
|
32 #X connect 4 0 3 0;
|
|
r@33
|
33 #X connect 4 0 9 0;
|
|
r@33
|
34 #X connect 5 0 4 0;
|
|
r@33
|
35 #X connect 8 0 2 1;
|
|
r@33
|
36 #X connect 9 0 8 0;
|
|
r@33
|
37 #X connect 10 0 5 0;
|
|
r@33
|
38 #X restore 5 410 pd cpan;
|
|
r@33
|
39 #X obj 5 449 throw~ la;
|
|
r@33
|
40 #X obj 75 448 throw~ ra;
|
|
r@33
|
41 #X obj 59 160 random 10000;
|
|
r@33
|
42 #X obj 21 267 *;
|
|
r@33
|
43 #X obj 5 130 t f b f b;
|
|
r@33
|
44 #X obj 59 183 / 20000;
|
|
r@33
|
45 #X obj 59 206 + 0.5;
|
|
r@33
|
46 #X obj 36 315 * 400;
|
|
r@33
|
47 #X obj 36 337 + 400;
|
|
r@33
|
48 #X obj 5 364 bp~ 1000 2;
|
|
r@33
|
49 #X connect 1 0 23 0;
|
|
r@33
|
50 #X connect 2 0 0 0;
|
|
r@33
|
51 #X connect 3 0 8 0;
|
|
r@33
|
52 #X connect 4 0 13 0;
|
|
r@33
|
53 #X connect 5 0 6 0;
|
|
r@33
|
54 #X connect 6 0 7 0;
|
|
r@33
|
55 #X connect 7 0 17 0;
|
|
r@33
|
56 #X connect 8 0 9 0;
|
|
r@33
|
57 #X connect 8 1 10 0;
|
|
r@33
|
58 #X connect 9 0 12 0;
|
|
r@33
|
59 #X connect 10 0 11 0;
|
|
r@33
|
60 #X connect 11 0 9 1;
|
|
r@33
|
61 #X connect 12 0 18 0;
|
|
r@33
|
62 #X connect 13 0 14 0;
|
|
r@33
|
63 #X connect 13 1 15 0;
|
|
r@33
|
64 #X connect 16 0 19 0;
|
|
r@33
|
65 #X connect 17 0 4 1;
|
|
r@33
|
66 #X connect 17 0 13 1;
|
|
r@33
|
67 #X connect 17 0 21 0;
|
|
r@33
|
68 #X connect 18 0 1 0;
|
|
r@33
|
69 #X connect 18 1 5 0;
|
|
r@33
|
70 #X connect 18 2 6 1;
|
|
r@33
|
71 #X connect 18 3 16 0;
|
|
r@33
|
72 #X connect 19 0 20 0;
|
|
r@33
|
73 #X connect 20 0 17 1;
|
|
r@33
|
74 #X connect 21 0 22 0;
|
|
r@33
|
75 #X connect 22 0 23 1;
|
|
r@33
|
76 #X connect 23 0 4 0;
|
