Mercurial > hg > physical-model-of-a-sword-sound
comparison sourceSpeed.pd @ 4:a254690411fe tip
New files added
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Sat, 07 Oct 2017 08:28:38 +0100 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
3:a19106b36088 | 4:a254690411fe |
---|---|
1 #N canvas 584 109 1231 826 10; | |
2 #X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 | |
3 -1 -1; | |
4 #X obj -219 -68 s GO; | |
5 #X obj -279 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 | |
6 -1 -1; | |
7 #X obj -279 -68 s setUp; | |
8 #X text -89 -100 Start calculation with elevation = 0 \, arm length | |
9 is constant \, acceleration/deceleration is constant.; | |
10 #X obj -202 498 loadbang; | |
11 #X obj -202 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 | |
12 1 1; | |
13 #X obj -202 537 metro 10; | |
14 #X obj -202 559 snapshot~; | |
15 #X floatatom -202 579 5 0 0 0 - - -; | |
16 #X obj -121 595 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 | |
17 -1 -1 0 1; | |
18 #X msg -259 383 \$1 \$2; | |
19 #X obj -259 358 pack; | |
20 #X msg -89 415 0; | |
21 #X obj -260 335 f; | |
22 #X obj -281 291 r GO; | |
23 #X msg 50 417 0 \$1; | |
24 #X obj 49 340 t f b; | |
25 #X obj 50 368 delay; | |
26 #X obj -89 394 r setUp; | |
27 #X text -106 375 Start at 0 speed; | |
28 #X text 92 428 \$1 = time to reach speed of 0; | |
29 #X obj 64 293 r preswingTime; | |
30 #X text 2 253 Trigger once full speed; | |
31 #X obj -89 482 outlet~; | |
32 #X obj 367 -102 inlet; | |
33 #X obj 266 -101 inlet; | |
34 #X text -322 414 \$1 = source speed; | |
35 #X text -322 430 \$2 = time to reach source speed; | |
36 #X obj -234 334 r preswingTime; | |
37 #X obj -215 156 r preswingTime; | |
38 #X obj -230 199 /; | |
39 #X obj -215 177 * 0.001; | |
40 #X obj -230 226 * 2; | |
41 #X text -187 206 Average Speed; | |
42 #X text -190 230 Top Speed for this source; | |
43 #X floatatom -283 252 5 0 0 0 - - -; | |
44 #X obj 107 357 r postswingTime; | |
45 #X floatatom 139 380 5 0 0 0 - - -; | |
46 #X obj 49 273 r GO; | |
47 #X obj 49 315 f; | |
48 #X obj 50 395 f; | |
49 #X obj 272 482 vline~; | |
50 #X obj -89 449 vline~; | |
51 #X obj 266 -77 s \$0-fullArc; | |
52 #X obj 367 -79 s \$0-thislength; | |
53 #X obj 513 483 r \$0-thislength; | |
54 #X obj 474 22 * 0.01745; | |
55 #X floatatom 538 20 0 0 0 0 - - -; | |
56 #X obj 489 93 * 0.01745; | |
57 #X floatatom 552 93 0 0 0 0 - - -; | |
58 #X obj 474 45 cos; | |
59 #X obj 489 114 cos; | |
60 #X obj 474 164 *; | |
61 #X obj 489 138 t f b; | |
62 #X obj 489 213 * 0.01745; | |
63 #X obj 489 188 r presweepElev; | |
64 #X floatatom 552 213 0 0 0 0 - - -; | |
65 #X obj 584 186 * 0.01745; | |
66 #X obj 584 161 r postsweepElev; | |
67 #X floatatom 648 184 0 0 0 0 - - -; | |
68 #X obj 584 207 sin; | |
69 #X obj 584 229 t f b; | |
70 #X obj 489 237 sin; | |
71 #X obj 489 261 *; | |
72 #X obj 504 311 * 0.01745; | |
73 #X obj 620 296 * 0.01745; | |
74 #X floatatom 684 294 0 0 0 0 - - -; | |
75 #X floatatom 569 311 0 0 0 0 - - -; | |
76 #X obj 504 342 -; | |
77 #X obj 504 367 cos; | |
78 #X obj 504 387 t f b; | |
79 #X obj 489 412 *; | |
80 #X obj 620 319 t f b; | |
81 #X obj 474 461 +; | |
82 #X obj 489 436 t f b; | |
83 #X obj 474 484 acos; | |
84 #X obj 474 507 *; | |
85 #X obj 474 -3 r presweepElev; | |
86 #X obj 489 68 r postsweepElev; | |
87 #X obj 338 245 -; | |
88 #X obj 338 290 select 1; | |
89 #X msg 338 314 4.24115; | |
90 #X obj 459 555 +; | |
91 #X obj 474 530 t f b; | |
92 #X obj 397 290 select 0; | |
93 #X msg 397 314 0; | |
94 #X obj 378 376 -; | |
95 #X obj 378 399 * 2; | |
96 #X floatatom 285 295 5 0 0 0 - - -; | |
97 #X obj 338 172 r postsweepAzim; | |
98 #X obj 353 194 r presweepAzim; | |
99 #X obj 353 216 t f b; | |
100 #X floatatom 458 585 0 0 0 0 - - -; | |
101 #X floatatom 533 539 0 0 0 0 - - -; | |
102 #X obj 303 581 spigot; | |
103 #X obj 393 350 t f b b; | |
104 #X floatatom 435 636 0 0 0 0 - - -; | |
105 #X obj 336 537 * -1; | |
106 #X obj 336 558 + 1; | |
107 #X obj 362 583 spigot; | |
108 #X obj 504 286 r postsweepAzim; | |
109 #X obj 620 271 r presweepAzim; | |
110 #X obj 338 268 >= 180; | |
111 #X obj 387 612 abs; | |
112 #X obj 387 638 outlet; | |
113 #X floatatom -84 186 0 0 0 0 - - -; | |
114 #X connect 0 0 1 0; | |
115 #X connect 2 0 3 0; | |
116 #X connect 5 0 6 0; | |
117 #X connect 6 0 7 0; | |
118 #X connect 7 0 8 0; | |
119 #X connect 8 0 9 0; | |
120 #X connect 8 0 10 0; | |
121 #X connect 11 0 43 0; | |
122 #X connect 12 0 11 0; | |
123 #X connect 13 0 43 0; | |
124 #X connect 14 0 12 0; | |
125 #X connect 15 0 14 0; | |
126 #X connect 16 0 43 0; | |
127 #X connect 17 0 18 1; | |
128 #X connect 17 1 18 0; | |
129 #X connect 18 0 41 0; | |
130 #X connect 19 0 13 0; | |
131 #X connect 22 0 40 1; | |
132 #X connect 25 0 45 0; | |
133 #X connect 26 0 44 0; | |
134 #X connect 29 0 12 1; | |
135 #X connect 30 0 32 0; | |
136 #X connect 31 0 33 0; | |
137 #X connect 32 0 31 1; | |
138 #X connect 32 0 106 0; | |
139 #X connect 33 0 36 0; | |
140 #X connect 33 0 14 1; | |
141 #X connect 37 0 38 0; | |
142 #X connect 37 0 41 1; | |
143 #X connect 39 0 40 0; | |
144 #X connect 40 0 17 0; | |
145 #X connect 41 0 16 0; | |
146 #X connect 43 0 8 0; | |
147 #X connect 43 0 24 0; | |
148 #X connect 46 0 77 1; | |
149 #X connect 47 0 51 0; | |
150 #X connect 49 0 52 0; | |
151 #X connect 51 0 53 0; | |
152 #X connect 52 0 54 0; | |
153 #X connect 53 0 74 0; | |
154 #X connect 54 0 53 1; | |
155 #X connect 54 1 53 0; | |
156 #X connect 55 0 63 0; | |
157 #X connect 56 0 57 0; | |
158 #X connect 56 0 55 0; | |
159 #X connect 58 0 61 0; | |
160 #X connect 59 0 60 0; | |
161 #X connect 59 0 58 0; | |
162 #X connect 61 0 62 0; | |
163 #X connect 62 0 64 1; | |
164 #X connect 62 1 64 0; | |
165 #X connect 63 0 64 0; | |
166 #X connect 64 0 72 0; | |
167 #X connect 65 0 69 0; | |
168 #X connect 66 0 73 0; | |
169 #X connect 69 0 70 0; | |
170 #X connect 70 0 71 0; | |
171 #X connect 71 0 72 1; | |
172 #X connect 71 1 72 0; | |
173 #X connect 72 0 75 0; | |
174 #X connect 73 0 69 1; | |
175 #X connect 73 1 69 0; | |
176 #X connect 74 0 76 0; | |
177 #X connect 75 0 74 1; | |
178 #X connect 75 1 74 0; | |
179 #X connect 76 0 77 0; | |
180 #X connect 77 0 84 0; | |
181 #X connect 77 0 94 0; | |
182 #X connect 77 0 95 0; | |
183 #X connect 78 0 48 0; | |
184 #X connect 78 0 47 0; | |
185 #X connect 79 0 50 0; | |
186 #X connect 79 0 49 0; | |
187 #X connect 80 0 103 0; | |
188 #X connect 81 0 82 0; | |
189 #X connect 82 0 87 0; | |
190 #X connect 83 0 93 0; | |
191 #X connect 83 0 100 0; | |
192 #X connect 84 0 83 1; | |
193 #X connect 84 0 96 0; | |
194 #X connect 84 1 83 0; | |
195 #X connect 85 0 86 0; | |
196 #X connect 86 0 87 0; | |
197 #X connect 87 0 88 0; | |
198 #X connect 88 0 83 0; | |
199 #X connect 90 0 80 0; | |
200 #X connect 91 0 92 0; | |
201 #X connect 92 0 80 1; | |
202 #X connect 92 1 80 0; | |
203 #X connect 95 0 104 0; | |
204 #X connect 96 0 87 1; | |
205 #X connect 96 2 87 0; | |
206 #X connect 98 0 99 0; | |
207 #X connect 99 0 95 1; | |
208 #X connect 100 0 104 0; | |
209 #X connect 101 0 65 0; | |
210 #X connect 101 0 68 0; | |
211 #X connect 102 0 67 0; | |
212 #X connect 102 0 66 0; | |
213 #X connect 103 0 81 0; | |
214 #X connect 103 0 85 0; | |
215 #X connect 103 0 89 0; | |
216 #X connect 103 0 98 0; | |
217 #X connect 103 0 100 1; | |
218 #X connect 104 0 97 0; | |
219 #X connect 104 0 105 0; |