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;