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