Mercurial > hg > weather-synthesis-prototyping
view newSwordAuto/sourceSpeed.pd @ 167:e2b1b7fda168
Sword - Trying to resove zipper sound when swinging. No joy yet but distance now an audio signal
author | Rod Selfridge <r.selfridge@qmul.ac.uk> |
---|---|
date | Thu, 04 Feb 2016 15:48:58 +0000 |
parents | 6aaeb2789f99 |
children | a57729aedc75 |
line wrap: on
line source
#N canvas 140 48 1008 758 10; #X obj -219 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -4034 -1 -1; #X obj -219 -68 s GO; #X obj -279 -121 bng 50 250 50 0 empty empty empty 17 7 0 10 -257985 -1 -1; #X obj -279 -68 s setUp; #X text -89 -100 Start calculation with elevation = 0 \, arm length is constant \, acceleration/deceleration is constant.; #X obj -202 498 loadbang; #X obj -202 519 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; #X obj -202 537 metro 10; #X obj -202 559 snapshot~; #X floatatom -202 579 5 0 0 0 - - -; #X obj -121 595 hsl 128 15 0 80 0 0 empty empty empty -2 -8 0 10 -262144 -1 -1 0 1; #X msg -259 383 \$1 \$2; #X obj -259 358 pack; #X msg -89 415 0; #X obj -260 335 f; #X obj -281 291 r GO; #X msg 50 417 0 \$1; #X obj 49 340 t f b; #X obj 50 368 delay; #X obj -89 394 r setUp; #X text -106 375 Start at 0 speed; #X text 92 428 \$1 = time to reach speed of 0; #X obj 64 293 r preswingTime; #X text 2 253 Trigger once full speed; #X obj -89 482 outlet~; #X obj 233 -103 inlet; #X obj 327 -105 inlet; #X obj 233 -80 s \$0_thisGroup; #X obj 327 -81 s \$0_thisSource; #X text -322 414 \$1 = source speed; #X text -322 430 \$2 = time to reach source speed; #X obj -234 334 r preswingTime; #X obj -215 73 r deltaPreCirc; #X obj -230 94 *; #X obj -230 135 +; #X obj -215 114 r minPreCirc; #X floatatom -293 156 5 0 0 0 - - -; #X obj -215 156 r preswingTime; #X obj -230 199 /; #X obj -215 177 * 0.001; #X obj -230 226 * 2; #X text -187 206 Average Speed; #X text -190 230 Top Speed for this source; #X floatatom -283 252 5 0 0 0 - - -; #X obj 107 357 r postswingTime; #X floatatom 139 380 5 0 0 0 - - -; #X obj 49 273 r GO; #X obj 49 315 f; #X obj 50 395 f; #X floatatom -74 98 0 0 0 0 - - -; #X floatatom -118 137 0 0 0 0 - - -; #X floatatom -302 114 0 0 0 0 - - -; #X floatatom -266 68 0 0 0 0 - - -; #X obj -230 12 r \$0_thisGroup; #X obj -215 31 r \$0_thisSource; #X obj -230 52 +; #X obj 272 482 vline~; #X obj -89 449 vline~; #X connect 0 0 1 0; #X connect 2 0 3 0; #X connect 5 0 6 0; #X connect 6 0 7 0; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 8 0 10 0; #X connect 11 0 57 0; #X connect 12 0 11 0; #X connect 13 0 57 0; #X connect 14 0 12 0; #X connect 15 0 14 0; #X connect 16 0 57 0; #X connect 17 0 18 1; #X connect 17 1 18 0; #X connect 18 0 48 0; #X connect 19 0 13 0; #X connect 22 0 47 1; #X connect 25 0 27 0; #X connect 26 0 28 0; #X connect 31 0 12 1; #X connect 32 0 33 1; #X connect 32 0 49 0; #X connect 33 0 34 0; #X connect 33 0 51 0; #X connect 34 0 36 0; #X connect 34 0 38 0; #X connect 35 0 34 1; #X connect 35 0 50 0; #X connect 37 0 39 0; #X connect 38 0 40 0; #X connect 39 0 38 1; #X connect 40 0 43 0; #X connect 40 0 14 1; #X connect 44 0 45 0; #X connect 44 0 48 1; #X connect 46 0 47 0; #X connect 47 0 17 0; #X connect 48 0 16 0; #X connect 53 0 55 0; #X connect 54 0 55 1; #X connect 55 0 33 0; #X connect 57 0 8 0; #X connect 57 0 24 0;