r@86
|
1 #N canvas 111 28 1171 835 10;
|
r@85
|
2 #X obj 541 -103 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
|
r@85
|
3 #X obj 604 -103 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
|
r@85
|
4 #X text 601 -194 Gain;
|
r@85
|
5 #X obj 540 -220 loadbang;
|
r@85
|
6 #N canvas 865 368 284 318 opLevels 0;
|
r@85
|
7 #X obj 85 188 dac~;
|
r@85
|
8 #X obj 30 70 catch~ l;
|
r@85
|
9 #X obj 155 76 catch~ r;
|
r@85
|
10 #X obj 155 106 *~ 0.45;
|
r@85
|
11 #X obj 30 104 *~ 0.45;
|
r@85
|
12 #X obj 30 210 prvu~;
|
r@85
|
13 #X obj 155 213 prvu~;
|
r@85
|
14 #X obj 100 69 / 127;
|
r@85
|
15 #X obj 100 34 inlet;
|
r@85
|
16 #X obj 30 239 outlet;
|
r@85
|
17 #X obj 155 241 outlet;
|
r@85
|
18 #X obj 155 30 r NoOfSources;
|
r@85
|
19 #X obj 30 131 /~ 15;
|
r@85
|
20 #X obj 155 132 /~ 15;
|
r@85
|
21 #X connect 1 0 4 0;
|
r@85
|
22 #X connect 2 0 3 0;
|
r@85
|
23 #X connect 3 0 13 0;
|
r@85
|
24 #X connect 4 0 12 0;
|
r@85
|
25 #X connect 5 0 9 0;
|
r@85
|
26 #X connect 6 0 10 0;
|
r@85
|
27 #X connect 7 0 3 1;
|
r@85
|
28 #X connect 7 0 4 1;
|
r@85
|
29 #X connect 8 0 7 0;
|
r@85
|
30 #X connect 11 0 12 1;
|
r@85
|
31 #X connect 11 0 13 1;
|
r@85
|
32 #X connect 12 0 0 0;
|
r@85
|
33 #X connect 12 0 5 0;
|
r@85
|
34 #X connect 13 0 0 1;
|
r@85
|
35 #X connect 13 0 6 0;
|
r@85
|
36 #X restore 540 -146 pd opLevels;
|
r@85
|
37 #X msg 540 -197 5;
|
r@85
|
38 #N canvas 601 144 807 545 speedCalc 0;
|
r@85
|
39 #X obj 59 -12 inlet;
|
r@85
|
40 #X obj 135 -11 inlet;
|
r@85
|
41 #X obj 217 -12 inlet;
|
r@85
|
42 #X obj 317 -12 inlet;
|
r@85
|
43 #X obj 59 11 s \$0_swLen;
|
r@85
|
44 #X obj 135 11 s \$0_armLen;
|
r@85
|
45 #X obj 317 10 s \$0_tipSpeed;
|
r@85
|
46 #X obj 142 237 r \$0_tipSpeed;
|
r@85
|
47 #X obj 211 437 outlet;
|
r@85
|
48 #X obj 211 414 r \$0_minSpeed;
|
r@85
|
49 #X obj 127 285 s \$0_minSpeed;
|
r@85
|
50 #X obj 310 414 r \$0_deltaSpeed;
|
r@85
|
51 #X obj 504 335 s \$0_deltaSpeed;
|
r@85
|
52 #X obj 310 437 outlet;
|
r@85
|
53 #X obj 212 104 r \$0_swLen;
|
r@85
|
54 #X obj 127 216 /;
|
r@85
|
55 #X floatatom 81 243 5 0 0 0 - - -;
|
r@85
|
56 #X obj 227 127 r \$0_armLen;
|
r@85
|
57 #X obj 212 194 +;
|
r@85
|
58 #X obj 227 149 t f b;
|
r@85
|
59 #X floatatom 212 216 5 0 0 0 - - -;
|
r@85
|
60 #X obj 99 143 r \$0_armLen;
|
r@85
|
61 #X obj 217 11 s \$0_sourceTot;
|
r@85
|
62 #X obj 519 274 r \$0_sourceTot;
|
r@85
|
63 #X obj 127 261 *;
|
r@85
|
64 #X floatatom 85 285 5 0 0 0 - - -;
|
r@85
|
65 #X obj 519 186 r \$0_minSpeed;
|
r@85
|
66 #X obj 504 253 -;
|
r@85
|
67 #X obj 504 163 r \$0_tipSpeed;
|
r@85
|
68 #X obj 504 296 /;
|
r@85
|
69 #X obj 519 207 t f b;
|
r@85
|
70 #X floatatom 521 315 5 0 0 0 - - -;
|
r@85
|
71 #X obj 546 230 delay 9;
|
r@85
|
72 #X text 244 198 Length of blade and arm;
|
r@85
|
73 #X obj 99 165 t f b;
|
r@85
|
74 #X obj 126 189 delay 9;
|
r@85
|
75 #X obj 254 173 delay 6;
|
r@85
|
76 #X text -49 216 Ratio of arm to total length;
|
r@85
|
77 #X text 69 308 Speed of blade at the hilt;
|
r@85
|
78 #X text 387 247 Difference between;
|
r@85
|
79 #X text 369 259 speed at tip and hilt;
|
r@85
|
80 #X text 459 357 Difference in speed for each source;
|
r@85
|
81 #X text 459 369 based on a linear scale;
|
r@85
|
82 #X text 417 16 as well as the difference in speed of each source;
|
r@85
|
83 #X text 431 2 Patch that calculates the minimum speed;
|
r@85
|
84 #X connect 0 0 4 0;
|
r@85
|
85 #X connect 1 0 5 0;
|
r@85
|
86 #X connect 2 0 22 0;
|
r@85
|
87 #X connect 3 0 6 0;
|
r@85
|
88 #X connect 7 0 24 1;
|
r@85
|
89 #X connect 9 0 8 0;
|
r@85
|
90 #X connect 11 0 13 0;
|
r@85
|
91 #X connect 14 0 18 0;
|
r@85
|
92 #X connect 15 0 16 0;
|
r@85
|
93 #X connect 15 0 24 0;
|
r@85
|
94 #X connect 17 0 19 0;
|
r@85
|
95 #X connect 18 0 20 0;
|
r@85
|
96 #X connect 18 0 15 1;
|
r@85
|
97 #X connect 19 0 18 1;
|
r@85
|
98 #X connect 19 1 36 0;
|
r@85
|
99 #X connect 21 0 34 0;
|
r@85
|
100 #X connect 23 0 29 1;
|
r@85
|
101 #X connect 24 0 10 0;
|
r@85
|
102 #X connect 24 0 25 0;
|
r@85
|
103 #X connect 26 0 30 0;
|
r@85
|
104 #X connect 27 0 29 0;
|
r@85
|
105 #X connect 28 0 27 0;
|
r@85
|
106 #X connect 29 0 31 0;
|
r@85
|
107 #X connect 29 0 12 0;
|
r@85
|
108 #X connect 30 0 27 1;
|
r@85
|
109 #X connect 30 1 32 0;
|
r@85
|
110 #X connect 32 0 27 0;
|
r@85
|
111 #X connect 34 0 15 0;
|
r@85
|
112 #X connect 34 1 35 0;
|
r@85
|
113 #X connect 35 0 15 0;
|
r@85
|
114 #X connect 36 0 18 0;
|
r@85
|
115 #X restore 534 140 pd speedCalc;
|
r@85
|
116 #X floatatom 443 164 8 0 0 0 - - -;
|
r@85
|
117 #X floatatom 688 162 8 0 0 0 - - -;
|
r@85
|
118 #X msg 14 -225 1;
|
r@85
|
119 #X msg 13 -94 100;
|
r@85
|
120 #X msg 12 -159 0.59;
|
r@85
|
121 #X obj 534 45 r bladeLen;
|
r@85
|
122 #X obj 557 68 r armLength;
|
r@85
|
123 #X obj 580 92 r NoOfSources;
|
r@85
|
124 #X obj 603 117 r topSpeed;
|
r@85
|
125 #X obj 14 -202 s bladeLen;
|
r@85
|
126 #X obj 12 -138 s armLength;
|
r@85
|
127 #X obj 13 -71 s NoOfSources;
|
r@85
|
128 #X obj 78 89 s topSpeed;
|
r@85
|
129 #X obj 26 63 hsl 100 20 0 100 0 0 empty empty empty -2 -8 0 10 -262144
|
r@85
|
130 -1 -1 0 1;
|
r@85
|
131 #X floatatom 23 89 8 0 0 0 - - -;
|
r@85
|
132 #X text 47 -226 Blade Length;
|
r@85
|
133 #X text 46 -160 Arm Length;
|
r@85
|
134 #X text 41 -94 Number of Sources;
|
r@85
|
135 #X text 134 67 Top Speed;
|
r@85
|
136 #X obj 23 147 hsl 100 20 0 360 0 0 empty empty empty -2 -8 0 10 -262144
|
r@85
|
137 -1 -1 0 1;
|
r@85
|
138 #X floatatom 20 179 8 0 0 0 - - -;
|
r@85
|
139 #X obj 75 178 s sweepAngle;
|
r@85
|
140 #X text 134 148 Sweep Angle;
|
r@85
|
141 #X obj 370 -13 r sweepAngle;
|
r@85
|
142 #X obj 277 -57 r bladeLen;
|
r@85
|
143 #X obj 323 -34 r armLength;
|
r@85
|
144 #X obj 508 164 s firstSpeed;
|
r@85
|
145 #X obj 603 163 s deltaSpeed;
|
r@85
|
146 #X floatatom 220 38 8 0 0 0 - - -;
|
r@85
|
147 #X floatatom 458 36 8 0 0 0 - - -;
|
r@85
|
148 #N canvas 833 342 426 335 thickCalc 0;
|
r@85
|
149 #X obj 173 139 r NoOfSources;
|
r@85
|
150 #X obj 23 16 inlet;
|
r@85
|
151 #X obj 26 64 inlet;
|
r@85
|
152 #X obj 26 86 s \$0_tipThick;
|
r@85
|
153 #X obj 158 115 -;
|
r@85
|
154 #X obj 158 164 /;
|
r@85
|
155 #X obj 158 187 outlet;
|
r@85
|
156 #X obj 23 39 s \$0_hiltThick;
|
r@85
|
157 #X floatatom 126 147 5 0 0 0 - - -;
|
r@85
|
158 #X obj 173 44 r \$0_tipThick;
|
r@85
|
159 #X obj 158 19 r \$0_hiltThick;
|
r@85
|
160 #X floatatom 94 189 8 0 0 0 - - -;
|
r@85
|
161 #X obj 173 72 t f b;
|
r@85
|
162 #X obj 200 95 delay 9;
|
r@85
|
163 #X text 58 237 Calculates the difference in thickness between sources
|
r@85
|
164 ;
|
r@85
|
165 #X text 59 254 based on the blade tapering in a straight line;
|
r@85
|
166 #X connect 0 0 5 1;
|
r@85
|
167 #X connect 1 0 7 0;
|
r@85
|
168 #X connect 2 0 3 0;
|
r@85
|
169 #X connect 4 0 5 0;
|
r@85
|
170 #X connect 4 0 8 0;
|
r@85
|
171 #X connect 5 0 6 0;
|
r@85
|
172 #X connect 5 0 11 0;
|
r@85
|
173 #X connect 9 0 12 0;
|
r@85
|
174 #X connect 10 0 4 0;
|
r@85
|
175 #X connect 12 0 4 1;
|
r@85
|
176 #X connect 12 1 13 0;
|
r@85
|
177 #X connect 13 0 4 0;
|
r@85
|
178 #X restore 372 -123 pd thickCalc;
|
r@85
|
179 #X obj 372 -100 s deltaThick;
|
r@85
|
180 #X floatatom 317 -99 8 0 0 0 - - -;
|
r@85
|
181 #X obj 20 238 hsl 100 20 0 0.03 0 0 empty empty empty -2 -8 0 10 -262144
|
r@85
|
182 -1 -1 0 1;
|
r@85
|
183 #X obj 19 323 hsl 100 20 0 0.01 0 0 empty empty empty -2 -8 0 10 -262144
|
r@85
|
184 -1 -1 0 1;
|
r@85
|
185 #X floatatom 17 268 8 0 0 0 - - -;
|
r@85
|
186 #X obj 71 267 s hiltThick;
|
r@85
|
187 #X floatatom 16 351 8 0 0 0 - - -;
|
r@85
|
188 #X obj 74 350 s tipThick;
|
r@85
|
189 #X text 134 240 Hilt Thickness;
|
r@85
|
190 #X text 126 324 Tip Thickness;
|
r@85
|
191 #X obj 372 -168 r hiltThick;
|
r@85
|
192 #X obj 441 -146 r tipThick;
|
r@85
|
193 #X obj 214 -180 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1
|
r@85
|
194 -1;
|
r@85
|
195 #X obj 214 -127 s GO;
|
r@85
|
196 #X obj 775 -93 tenSource;
|
r@85
|
197 #X obj 19 405 hsl 100 20 100 1 1 0 empty empty empty -2 -8 0 10 -262144
|
r@85
|
198 -1 -1 0 1;
|
r@85
|
199 #X obj 15 490 hsl 100 20 -180 180 0 0 empty empty empty -2 -8 0 10
|
r@85
|
200 -262144 -1 -1 0 1;
|
r@85
|
201 #X floatatom 16 431 8 0 0 0 - - -;
|
r@85
|
202 #X text 129 409 Distance to Observer;
|
r@85
|
203 #X floatatom 12 518 8 0 0 0 - - -;
|
r@85
|
204 #X text 137 484 Angle to Observer;
|
r@85
|
205 #X obj 809 -129 r distance;
|
r@85
|
206 #X obj 792 -150 r angle;
|
r@85
|
207 #X obj 775 -191 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
208 -1 -1;
|
r@85
|
209 #X obj 214 -226 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
|
r@85
|
210 0 1;
|
r@85
|
211 #X obj 214 -207 metro 200;
|
r@85
|
212 #X obj 268 -231 hsl 100 20 300 50 0 0 empty empty empty -2 -8 0 10
|
r@85
|
213 -262144 -1 -1 0 1;
|
r@85
|
214 #X obj 154 -180 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985
|
r@85
|
215 -1 -1;
|
r@85
|
216 #X obj 154 -127 s setUp;
|
r@85
|
217 #X obj -30 37 r setUp;
|
r@85
|
218 #X obj -38 127 r setUp;
|
r@85
|
219 #X obj -34 215 r setUp;
|
r@85
|
220 #X obj -35 303 r setUp;
|
r@85
|
221 #X obj -36 384 r setUp;
|
r@85
|
222 #X obj -39 468 r setUp;
|
r@85
|
223 #X obj 775 -219 r setUp;
|
r@85
|
224 #X obj 75 432 s obsDistance;
|
r@85
|
225 #X obj 71 519 s obsAngle;
|
r@85
|
226 #N canvas 427 69 911 675 circumferCalc 0;
|
r@85
|
227 #X obj 266 13 inlet;
|
r@85
|
228 #X floatatom 365 172 5 0 0 0 - - -;
|
r@85
|
229 #X obj 80 13 inlet;
|
r@85
|
230 #X obj 170 13 inlet;
|
r@85
|
231 #X obj 247 146 +;
|
r@85
|
232 #X obj 316 172 / 360;
|
r@85
|
233 #X obj 247 171 * 3.14159;
|
r@85
|
234 #X obj 247 219 *;
|
r@85
|
235 #X obj 247 195 * 2;
|
r@85
|
236 #X obj 80 36 s \$0_bladeLen;
|
r@85
|
237 #X obj 170 36 s \$0_armLength;
|
r@85
|
238 #X obj 266 36 s \$0_sweepAngle;
|
r@85
|
239 #X obj 247 99 r \$0_bladeLen;
|
r@85
|
240 #X obj 262 123 r \$0_armLength;
|
r@85
|
241 #X obj 316 148 r \$0_sweepAngle;
|
r@85
|
242 #X floatatom 734 192 5 0 0 0 - - -;
|
r@85
|
243 #X obj 685 192 / 360;
|
r@85
|
244 #X floatatom 628 168 5 0 0 0 - - -;
|
r@85
|
245 #X obj 616 191 * 3.14159;
|
r@85
|
246 #X obj 616 239 *;
|
r@85
|
247 #X floatatom 560 267 8 0 0 0 - - -;
|
r@85
|
248 #X obj 616 215 * 2;
|
r@85
|
249 #X obj 616 143 r \$0_armLength;
|
r@85
|
250 #X obj 685 168 r \$0_sweepAngle;
|
r@85
|
251 #X obj 616 267 s \$0_minCirc;
|
r@85
|
252 #X obj 265 459 r \$0_minCirc;
|
r@85
|
253 #X obj 265 481 outlet;
|
r@85
|
254 #X obj 262 279 r \$0_minCirc;
|
r@85
|
255 #X floatatom 188 339 8 0 0 0 - - -;
|
r@85
|
256 #X obj 247 305 -;
|
r@85
|
257 #X obj 247 341 /;
|
r@85
|
258 #X obj 277 317 r NoOfSources;
|
r@85
|
259 #X floatatom 185 370 8 0 0 0 - - -;
|
r@85
|
260 #X obj 247 367 s \$0_deltaCirc;
|
r@85
|
261 #X obj 354 459 r \$0_deltaCirc;
|
r@85
|
262 #X obj 354 481 outlet;
|
r@85
|
263 #X obj 260 246 s maxCirc;
|
r@85
|
264 #X obj 191 172 s length;
|
r@85
|
265 #X text 122 176 Arc radius;
|
r@85
|
266 #X text 318 195 % of circle;
|
r@85
|
267 #X text 323 242 Circumference of arc of tip;
|
r@85
|
268 #X text 692 210 % of circle;
|
r@85
|
269 #X text 601 289 Circumference of arc of hilt;
|
r@85
|
270 #X floatatom 187 243 8 0 0 0 - - -;
|
r@85
|
271 #X text 199 390 Difference of circumference length for each source
|
r@85
|
272 ;
|
r@85
|
273 #X text 199 405 based on linear spacing between sources;
|
r@85
|
274 #X connect 0 0 11 0;
|
r@85
|
275 #X connect 2 0 9 0;
|
r@85
|
276 #X connect 3 0 10 0;
|
r@85
|
277 #X connect 4 0 6 0;
|
r@85
|
278 #X connect 4 0 37 0;
|
r@85
|
279 #X connect 5 0 7 1;
|
r@85
|
280 #X connect 6 0 8 0;
|
r@85
|
281 #X connect 7 0 29 0;
|
r@85
|
282 #X connect 7 0 36 0;
|
r@85
|
283 #X connect 7 0 43 0;
|
r@85
|
284 #X connect 8 0 7 0;
|
r@85
|
285 #X connect 12 0 4 0;
|
r@85
|
286 #X connect 13 0 4 1;
|
r@85
|
287 #X connect 14 0 5 0;
|
r@85
|
288 #X connect 14 0 1 0;
|
r@85
|
289 #X connect 16 0 19 1;
|
r@85
|
290 #X connect 18 0 21 0;
|
r@85
|
291 #X connect 19 0 20 0;
|
r@85
|
292 #X connect 19 0 24 0;
|
r@85
|
293 #X connect 21 0 19 0;
|
r@85
|
294 #X connect 22 0 18 0;
|
r@85
|
295 #X connect 22 0 17 0;
|
r@85
|
296 #X connect 23 0 16 0;
|
r@85
|
297 #X connect 23 0 15 0;
|
r@85
|
298 #X connect 25 0 26 0;
|
r@85
|
299 #X connect 27 0 29 1;
|
r@85
|
300 #X connect 29 0 28 0;
|
r@85
|
301 #X connect 29 0 30 0;
|
r@85
|
302 #X connect 30 0 32 0;
|
r@85
|
303 #X connect 30 0 33 0;
|
r@85
|
304 #X connect 31 0 30 1;
|
r@85
|
305 #X connect 34 0 35 0;
|
r@85
|
306 #X restore 277 11 pd circumferCalc;
|
r@85
|
307 #X obj 277 37 s circumMin;
|
r@85
|
308 #X obj 370 36 s deltaCircum;
|
r@85
|
309 #N canvas 361 106 954 607 angleCalc 0;
|
r@85
|
310 #X obj -142 102 * 0.75;
|
r@85
|
311 #X obj 231 187 * 0.25;
|
r@85
|
312 #X obj -142 142 /;
|
r@85
|
313 #X msg -157 248 1 \$1;
|
r@85
|
314 #X obj -157 225 f;
|
r@85
|
315 #X obj -157 274 line 0;
|
r@85
|
316 #X obj -171 193 r GO;
|
r@85
|
317 #X msg -113 248 0;
|
r@85
|
318 #X obj -142 166 * 1000;
|
r@85
|
319 #X obj 169 334 line 0;
|
r@85
|
320 #X obj 169 207 delay \$1;
|
r@85
|
321 #X obj 142 155 f;
|
r@85
|
322 #X obj 142 112 r GO;
|
r@85
|
323 #X obj 142 181 t f b;
|
r@85
|
324 #X obj 169 283 i;
|
r@85
|
325 #X msg 169 305 1 \$1;
|
r@85
|
326 #X msg 214 305 0;
|
r@85
|
327 #X obj 231 229 /;
|
r@85
|
328 #X obj 231 251 * 1000;
|
r@85
|
329 #X obj -157 352 *;
|
r@85
|
330 #X obj -128 297 r sweepAngle;
|
r@85
|
331 #X obj -154 405 hsl 100 25 0 360 0 0 empty empty empty -2 -8 0 10 -262144
|
r@85
|
332 -1 -1 0 1;
|
r@85
|
333 #X obj -128 319 * -0.75;
|
r@85
|
334 #X obj -157 376 +;
|
r@85
|
335 #X obj -128 343 * -1;
|
r@85
|
336 #X obj -127 191 s \$0_thisDe;
|
r@85
|
337 #X obj 157 134 r \$0_thisDe;
|
r@85
|
338 #X obj 169 372 *;
|
r@85
|
339 #X obj 219 332 r sweepAngle;
|
r@85
|
340 #X obj 172 396 hsl 100 25 -360 360 0 0 empty empty empty -2 -8 0 10
|
r@85
|
341 -262144 -1 -1 0 1;
|
r@85
|
342 #X obj 214 283 r GO;
|
r@85
|
343 #X obj -142 78 r maxCirc;
|
r@85
|
344 #X obj 231 165 r maxCirc;
|
r@85
|
345 #X obj -127 121 r topSpeed;
|
r@85
|
346 #X obj 246 208 r topSpeed;
|
r@85
|
347 #X obj -35 535 s currentAngle;
|
r@85
|
348 #X obj -35 489 +;
|
r@85
|
349 #X floatatom -35 514 8 0 0 0 - - -;
|
r@85
|
350 #X obj -20 464 t f b;
|
r@85
|
351 #X obj 474 202 delay \$1;
|
r@85
|
352 #X obj 476 144 f;
|
r@85
|
353 #X obj 476 118 r GO;
|
r@85
|
354 #X obj 476 170 t f b;
|
r@85
|
355 #X obj 512 50 r maxCirc;
|
r@85
|
356 #X obj 527 72 r topSpeed;
|
r@85
|
357 #X obj 512 96 /;
|
r@85
|
358 #X obj 512 118 * 1000;
|
r@85
|
359 #X obj 474 224 s end;
|
r@85
|
360 #X obj -113 227 r end;
|
r@85
|
361 #X obj -20 431 r end;
|
r@85
|
362 #X obj 219 355 * -0.25;
|
r@85
|
363 #X text -206 42 0.75 represents the ratio of swing that;
|
r@85
|
364 #X text 106 71 0.25 represents the ratio of swing that;
|
r@85
|
365 #X text 106 85 the sword is decelerating;
|
r@85
|
366 #X text -115 146 Time taken for acceleration;
|
r@85
|
367 #X text -52 188 Send as a delay;
|
r@85
|
368 #X text 186 113 Recieve as a delay;
|
r@85
|
369 #X text -226 173 Start swing;
|
r@85
|
370 #X text -72 227 Reset angle;
|
r@85
|
371 #X text -72 239 once swing complete;
|
r@85
|
372 #X text -73 323 Start angle is;
|
r@85
|
373 #X text -73 335 3/4 of total angle;
|
r@85
|
374 #X text 452 243 Send bang message at the;
|
r@85
|
375 #X text 453 255 end of the swing to reset;
|
r@85
|
376 #X text 285 249 Time for last;
|
r@85
|
377 #X text 287 260 1/4 of swing;
|
r@85
|
378 #X text 245 294 Set to 0 at start;
|
r@85
|
379 #X text -206 56 the sword is before 0 degrees;
|
r@85
|
380 #X text -92 565 Output of complete swing \, split into 75% before 0
|
r@85
|
381 degrees and 25% past 0 degrees;
|
r@85
|
382 #X text 276 354 Once delay from start to 0 degrees complete;
|
r@85
|
383 #X text 276 366 count down from 0 to finish the total swing angle;
|
r@85
|
384 #X text 98 9 Patch that calculates the angle between 0 degrees for
|
r@85
|
385 the full length of the swing;
|
r@85
|
386 #X connect 0 0 2 0;
|
r@85
|
387 #X connect 1 0 17 0;
|
r@85
|
388 #X connect 2 0 8 0;
|
r@85
|
389 #X connect 3 0 5 0;
|
r@85
|
390 #X connect 4 0 3 0;
|
r@85
|
391 #X connect 5 0 19 0;
|
r@85
|
392 #X connect 6 0 4 0;
|
r@85
|
393 #X connect 7 0 5 0;
|
r@85
|
394 #X connect 8 0 4 1;
|
r@85
|
395 #X connect 8 0 25 0;
|
r@85
|
396 #X connect 9 0 27 0;
|
r@85
|
397 #X connect 10 0 14 0;
|
r@85
|
398 #X connect 11 0 13 0;
|
r@85
|
399 #X connect 12 0 11 0;
|
r@85
|
400 #X connect 13 0 10 1;
|
r@85
|
401 #X connect 13 1 10 0;
|
r@85
|
402 #X connect 14 0 15 0;
|
r@85
|
403 #X connect 15 0 9 0;
|
r@85
|
404 #X connect 16 0 9 0;
|
r@85
|
405 #X connect 17 0 18 0;
|
r@85
|
406 #X connect 18 0 14 1;
|
r@85
|
407 #X connect 19 0 23 0;
|
r@85
|
408 #X connect 20 0 22 0;
|
r@85
|
409 #X connect 21 0 36 0;
|
r@85
|
410 #X connect 22 0 24 0;
|
r@85
|
411 #X connect 22 0 19 1;
|
r@85
|
412 #X connect 23 0 21 0;
|
r@85
|
413 #X connect 24 0 23 1;
|
r@85
|
414 #X connect 26 0 11 1;
|
r@85
|
415 #X connect 27 0 29 0;
|
r@85
|
416 #X connect 28 0 50 0;
|
r@85
|
417 #X connect 29 0 38 0;
|
r@85
|
418 #X connect 30 0 16 0;
|
r@85
|
419 #X connect 31 0 0 0;
|
r@85
|
420 #X connect 32 0 1 0;
|
r@85
|
421 #X connect 33 0 2 1;
|
r@85
|
422 #X connect 34 0 17 1;
|
r@85
|
423 #X connect 36 0 37 0;
|
r@85
|
424 #X connect 37 0 35 0;
|
r@85
|
425 #X connect 38 0 36 1;
|
r@85
|
426 #X connect 38 1 36 0;
|
r@85
|
427 #X connect 39 0 47 0;
|
r@85
|
428 #X connect 40 0 42 0;
|
r@85
|
429 #X connect 41 0 40 0;
|
r@85
|
430 #X connect 42 0 39 1;
|
r@85
|
431 #X connect 42 1 39 0;
|
r@85
|
432 #X connect 43 0 45 0;
|
r@85
|
433 #X connect 44 0 45 1;
|
r@85
|
434 #X connect 45 0 46 0;
|
r@85
|
435 #X connect 46 0 40 1;
|
r@85
|
436 #X connect 48 0 7 0;
|
r@85
|
437 #X connect 49 0 38 0;
|
r@85
|
438 #X connect 50 0 27 1;
|
r@85
|
439 #X restore 431 -220 pd angleCalc;
|
r@85
|
440 #X obj 543 -175 hsl 100 25 0 127 0 0 empty empty empty -2 -8 0 10 -262144
|
r@86
|
441 -1 -1 390 1;
|
r@85
|
442 #X msg 775 -172 10;
|
r@85
|
443 #X obj 14 -249 loadbang;
|
r@85
|
444 #X obj 12 -180 loadbang;
|
r@85
|
445 #X obj 13 -116 loadbang;
|
r@85
|
446 #X obj 826 -113 r elev;
|
r@85
|
447 #X msg 15 -22 0;
|
r@85
|
448 #X obj 15 0 s elev;
|
r@85
|
449 #X text 134 496 (Azimuth);
|
r@85
|
450 #X obj 910 -81 tenSource;
|
r@85
|
451 #X obj 944 -117 r distance;
|
r@85
|
452 #X obj 927 -138 r angle;
|
r@85
|
453 #X obj 910 -179 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
454 -1 -1;
|
r@85
|
455 #X obj 910 -207 r setUp;
|
r@85
|
456 #X obj 961 -101 r elev;
|
r@85
|
457 #X obj 774 72 tenSource;
|
r@85
|
458 #X obj 808 36 r distance;
|
r@85
|
459 #X obj 791 15 r angle;
|
r@85
|
460 #X obj 774 -26 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
461 -1 -1;
|
r@85
|
462 #X obj 774 -54 r setUp;
|
r@85
|
463 #X obj 825 52 r elev;
|
r@85
|
464 #X obj 903 81 tenSource;
|
r@85
|
465 #X obj 937 45 r distance;
|
r@85
|
466 #X obj 920 24 r angle;
|
r@85
|
467 #X obj 903 -17 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
468 -1 -1;
|
r@85
|
469 #X obj 903 -45 r setUp;
|
r@85
|
470 #X obj 954 61 r elev;
|
r@85
|
471 #X obj 771 223 tenSource;
|
r@85
|
472 #X obj 805 187 r distance;
|
r@85
|
473 #X obj 788 166 r angle;
|
r@85
|
474 #X obj 771 125 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
475 -1 -1;
|
r@85
|
476 #X obj 771 97 r setUp;
|
r@85
|
477 #X obj 822 203 r elev;
|
r@85
|
478 #X obj 905 230 tenSource;
|
r@85
|
479 #X obj 939 194 r distance;
|
r@85
|
480 #X obj 922 173 r angle;
|
r@85
|
481 #X obj 905 132 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
482 -1 -1;
|
r@85
|
483 #X obj 905 104 r setUp;
|
r@85
|
484 #X obj 956 210 r elev;
|
r@85
|
485 #X msg 905 151 5;
|
r@85
|
486 #X msg 771 144 6;
|
r@85
|
487 #X msg 903 2 7;
|
r@85
|
488 #X msg 774 -7 8;
|
r@85
|
489 #X msg 910 -160 9;
|
r@85
|
490 #X obj 15 -45 loadbang;
|
r@85
|
491 #X obj 437 545 s thisTS;
|
r@85
|
492 #X obj 456 524 s thisSA;
|
r@85
|
493 #X obj 476 502 s thisHT;
|
r@85
|
494 #X obj 495 479 s thisTT;
|
r@85
|
495 #X obj 515 458 s thisOD;
|
r@85
|
496 #X obj 534 438 s thisOA;
|
r@85
|
497 #X obj 554 416 s thisG;
|
r@85
|
498 #X obj 23 37 r thisTS;
|
r@85
|
499 #X obj 20 126 r thisSA;
|
r@85
|
500 #X obj 17 215 r thisHT;
|
r@85
|
501 #X obj 16 303 r thisTT;
|
r@85
|
502 #X obj 16 384 r thisOD;
|
r@85
|
503 #X obj 13 469 r thisOA;
|
r@85
|
504 #X obj 488 -195 r thisG;
|
r@85
|
505 #X obj 437 392 unpack f f f f f f f;
|
r@85
|
506 #X msg 437 264 43 215 0.0085 0.0025 8 0 40;
|
r@85
|
507 #X msg 446 287 20 160 0.01 0.004 4 0 127;
|
r@85
|
508 #X obj 774 385 tenSource;
|
r@85
|
509 #X obj 808 349 r distance;
|
r@85
|
510 #X obj 791 328 r angle;
|
r@85
|
511 #X obj 774 287 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
512 -1 -1;
|
r@85
|
513 #X obj 774 259 r setUp;
|
r@85
|
514 #X obj 825 365 r elev;
|
r@85
|
515 #X obj 903 394 tenSource;
|
r@85
|
516 #X obj 937 358 r distance;
|
r@85
|
517 #X obj 920 337 r angle;
|
r@85
|
518 #X obj 903 296 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
519 -1 -1;
|
r@85
|
520 #X obj 903 268 r setUp;
|
r@85
|
521 #X obj 954 374 r elev;
|
r@85
|
522 #X obj 771 536 tenSource;
|
r@85
|
523 #X obj 805 500 r distance;
|
r@85
|
524 #X obj 788 479 r angle;
|
r@85
|
525 #X obj 771 438 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
526 -1 -1;
|
r@85
|
527 #X obj 771 410 r setUp;
|
r@85
|
528 #X obj 822 516 r elev;
|
r@85
|
529 #X obj 905 543 tenSource;
|
r@85
|
530 #X obj 939 507 r distance;
|
r@85
|
531 #X obj 922 486 r angle;
|
r@85
|
532 #X obj 905 445 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
|
r@85
|
533 -1 -1;
|
r@85
|
534 #X obj 905 417 r setUp;
|
r@85
|
535 #X obj 956 523 r elev;
|
r@85
|
536 #X msg 774 306 4;
|
r@85
|
537 #X msg 903 315 3;
|
r@85
|
538 #X msg 771 457 2;
|
r@85
|
539 #X msg 905 464 1;
|
r@85
|
540 #X msg 458 327 65 280 0.005 0.0025 20 60 20;
|
r@85
|
541 #X obj -37 -45 r setUp;
|
r@85
|
542 #X obj -40 -114 r setUp;
|
r@85
|
543 #X obj -37 -182 r setUp;
|
r@85
|
544 #X obj -38 -247 r setUp;
|
r@85
|
545 #X connect 3 0 5 0;
|
r@85
|
546 #X connect 4 0 0 0;
|
r@85
|
547 #X connect 4 1 1 0;
|
r@85
|
548 #X connect 5 0 80 0;
|
r@85
|
549 #X connect 6 0 7 0;
|
r@85
|
550 #X connect 6 0 33 0;
|
r@85
|
551 #X connect 6 1 8 0;
|
r@85
|
552 #X connect 6 1 34 0;
|
r@85
|
553 #X connect 9 0 16 0;
|
r@85
|
554 #X connect 10 0 18 0;
|
r@85
|
555 #X connect 11 0 17 0;
|
r@85
|
556 #X connect 12 0 6 0;
|
r@85
|
557 #X connect 13 0 6 1;
|
r@85
|
558 #X connect 14 0 6 2;
|
r@85
|
559 #X connect 15 0 6 3;
|
r@85
|
560 #X connect 20 0 19 0;
|
r@85
|
561 #X connect 20 0 21 0;
|
r@85
|
562 #X connect 26 0 27 0;
|
r@85
|
563 #X connect 26 0 28 0;
|
r@85
|
564 #X connect 30 0 76 2;
|
r@85
|
565 #X connect 31 0 76 0;
|
r@85
|
566 #X connect 32 0 76 1;
|
r@85
|
567 #X connect 37 0 38 0;
|
r@85
|
568 #X connect 37 0 39 0;
|
r@85
|
569 #X connect 40 0 42 0;
|
r@85
|
570 #X connect 40 0 43 0;
|
r@85
|
571 #X connect 41 0 44 0;
|
r@85
|
572 #X connect 41 0 45 0;
|
r@85
|
573 #X connect 48 0 37 0;
|
r@85
|
574 #X connect 49 0 37 1;
|
r@85
|
575 #X connect 50 0 51 0;
|
r@85
|
576 #X connect 53 0 55 0;
|
r@85
|
577 #X connect 53 0 74 0;
|
r@85
|
578 #X connect 54 0 57 0;
|
r@85
|
579 #X connect 54 0 75 0;
|
r@85
|
580 #X connect 59 0 52 2;
|
r@85
|
581 #X connect 60 0 52 1;
|
r@85
|
582 #X connect 61 0 81 0;
|
r@85
|
583 #X connect 62 0 63 0;
|
r@85
|
584 #X connect 63 0 50 0;
|
r@85
|
585 #X connect 64 0 63 1;
|
r@85
|
586 #X connect 65 0 66 0;
|
r@85
|
587 #X connect 67 0 20 0;
|
r@85
|
588 #X connect 68 0 26 0;
|
r@85
|
589 #X connect 69 0 40 0;
|
r@85
|
590 #X connect 70 0 41 0;
|
r@85
|
591 #X connect 71 0 53 0;
|
r@85
|
592 #X connect 72 0 54 0;
|
r@85
|
593 #X connect 73 0 61 0;
|
r@85
|
594 #X connect 76 0 35 0;
|
r@85
|
595 #X connect 76 0 77 0;
|
r@85
|
596 #X connect 76 1 36 0;
|
r@85
|
597 #X connect 76 1 78 0;
|
r@85
|
598 #X connect 80 0 4 0;
|
r@85
|
599 #X connect 81 0 52 0;
|
r@85
|
600 #X connect 82 0 9 0;
|
r@85
|
601 #X connect 83 0 11 0;
|
r@85
|
602 #X connect 84 0 10 0;
|
r@85
|
603 #X connect 85 0 52 3;
|
r@85
|
604 #X connect 86 0 87 0;
|
r@85
|
605 #X connect 90 0 89 2;
|
r@85
|
606 #X connect 91 0 89 1;
|
r@85
|
607 #X connect 92 0 123 0;
|
r@85
|
608 #X connect 93 0 92 0;
|
r@85
|
609 #X connect 94 0 89 3;
|
r@85
|
610 #X connect 96 0 95 2;
|
r@85
|
611 #X connect 97 0 95 1;
|
r@85
|
612 #X connect 98 0 122 0;
|
r@85
|
613 #X connect 99 0 98 0;
|
r@85
|
614 #X connect 100 0 95 3;
|
r@85
|
615 #X connect 102 0 101 2;
|
r@85
|
616 #X connect 103 0 101 1;
|
r@85
|
617 #X connect 104 0 121 0;
|
r@85
|
618 #X connect 105 0 104 0;
|
r@85
|
619 #X connect 106 0 101 3;
|
r@85
|
620 #X connect 108 0 107 2;
|
r@85
|
621 #X connect 109 0 107 1;
|
r@85
|
622 #X connect 110 0 120 0;
|
r@85
|
623 #X connect 111 0 110 0;
|
r@85
|
624 #X connect 112 0 107 3;
|
r@85
|
625 #X connect 114 0 113 2;
|
r@85
|
626 #X connect 115 0 113 1;
|
r@85
|
627 #X connect 116 0 119 0;
|
r@85
|
628 #X connect 117 0 116 0;
|
r@85
|
629 #X connect 118 0 113 3;
|
r@85
|
630 #X connect 119 0 113 0;
|
r@85
|
631 #X connect 120 0 107 0;
|
r@85
|
632 #X connect 121 0 101 0;
|
r@85
|
633 #X connect 122 0 95 0;
|
r@85
|
634 #X connect 123 0 89 0;
|
r@85
|
635 #X connect 124 0 86 0;
|
r@85
|
636 #X connect 132 0 20 0;
|
r@85
|
637 #X connect 133 0 26 0;
|
r@85
|
638 #X connect 134 0 40 0;
|
r@85
|
639 #X connect 135 0 41 0;
|
r@85
|
640 #X connect 136 0 53 0;
|
r@85
|
641 #X connect 137 0 54 0;
|
r@85
|
642 #X connect 138 0 80 0;
|
r@85
|
643 #X connect 139 0 125 0;
|
r@85
|
644 #X connect 139 1 126 0;
|
r@85
|
645 #X connect 139 2 127 0;
|
r@85
|
646 #X connect 139 3 128 0;
|
r@85
|
647 #X connect 139 4 129 0;
|
r@85
|
648 #X connect 139 5 130 0;
|
r@85
|
649 #X connect 139 6 131 0;
|
r@85
|
650 #X connect 140 0 139 0;
|
r@85
|
651 #X connect 141 0 139 0;
|
r@85
|
652 #X connect 143 0 142 2;
|
r@85
|
653 #X connect 144 0 142 1;
|
r@85
|
654 #X connect 145 0 166 0;
|
r@85
|
655 #X connect 146 0 145 0;
|
r@85
|
656 #X connect 147 0 142 3;
|
r@85
|
657 #X connect 149 0 148 2;
|
r@85
|
658 #X connect 150 0 148 1;
|
r@85
|
659 #X connect 151 0 167 0;
|
r@85
|
660 #X connect 152 0 151 0;
|
r@85
|
661 #X connect 153 0 148 3;
|
r@85
|
662 #X connect 155 0 154 2;
|
r@85
|
663 #X connect 156 0 154 1;
|
r@85
|
664 #X connect 157 0 168 0;
|
r@85
|
665 #X connect 158 0 157 0;
|
r@85
|
666 #X connect 159 0 154 3;
|
r@85
|
667 #X connect 161 0 160 2;
|
r@85
|
668 #X connect 162 0 160 1;
|
r@85
|
669 #X connect 163 0 169 0;
|
r@85
|
670 #X connect 164 0 163 0;
|
r@85
|
671 #X connect 165 0 160 3;
|
r@85
|
672 #X connect 166 0 142 0;
|
r@85
|
673 #X connect 167 0 148 0;
|
r@85
|
674 #X connect 168 0 154 0;
|
r@85
|
675 #X connect 169 0 160 0;
|
r@85
|
676 #X connect 170 0 139 0;
|
r@85
|
677 #X connect 171 0 86 0;
|
r@85
|
678 #X connect 172 0 10 0;
|
r@85
|
679 #X connect 173 0 11 0;
|
r@85
|
680 #X connect 174 0 9 0;
|