From 3ab03fc4ffe64cff342b2cc10109d83e9538ce1d Mon Sep 17 00:00:00 2001 From: Ivica Ico Bukvic <ico@vt.edu> Date: Sat, 2 Nov 2013 20:50:48 -0400 Subject: [PATCH] slowed down the rate of update to avoid choking down the GUI (bumped update of the wii speed from 1 to 25ms) --- l2ork_addons/K12/wii_speed.pd | 103 +++++++++++++++------------------- 1 file changed, 45 insertions(+), 58 deletions(-) mode change 100755 => 100644 l2ork_addons/K12/wii_speed.pd diff --git a/l2ork_addons/K12/wii_speed.pd b/l2ork_addons/K12/wii_speed.pd old mode 100755 new mode 100644 index f8cb3ade3..28fd87ad1 --- a/l2ork_addons/K12/wii_speed.pd +++ b/l2ork_addons/K12/wii_speed.pd @@ -1,4 +1,4 @@ -#N canvas 519 50 431 465 10; +#N canvas 519 50 431 496 10; #X obj 120 131 bng 82 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 3 198 inlet; @@ -50,91 +50,78 @@ #X connect 20 0 21 0; #X connect 21 0 15 0; #X restore 3 223 pd unpack_motionplus; -#N canvas 18 50 396 489 motionplus_logic 0; +#N canvas 18 50 396 503 motionplus_logic 0; #X obj 45 30 inlet; -#X obj 94 31 inlet; -#X obj 231 36 inlet; -#X obj 278 37 inlet; +#X obj 87 30 inlet; +#X obj 219 30 inlet; +#X obj 266 30 inlet; #X obj 72 75 -; #X obj 251 80 -; #X text 249 10 X motion; #X text 61 5 Y motion; -#X floatatom 72 110 5 0 0 0 - - -; -#X floatatom 251 110 5 0 0 0 - - -; #X obj 14 163 expr if (abs($f2) >= abs($f1) \, $f2 \, $f1); -#X floatatom 14 187 5 0 0 0 - - -; #X msg 83 346 0; -#X obj 81 447 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 11 --262144 -1 -1 0 256 0; -#X obj 82 463 outlet; -#X text 198 33 Live; -#X text 315 36 Calibrated; -#X floatatom 208 234 10 0 0 0 - - -; +#X obj 82 481 outlet; +#X text 186 30 Live; +#X text 303 30 Calibrated; #X obj 142 285 expr pow($f1 \, 1.6); #X obj 14 381 expr -pow(-$f1 \, 1.6); -#X obj 82 405 expr if($f1 >= 1 \, 1 \, $f1) \;; -#X obj 82 426 expr if($f1 <= -1 \, -1 \, $f1) \;; #X obj 14 214 expr $f1/2000; #X obj 142 256 - 0.085; #X obj 14 243 moses 0.085; #X obj 14 308 moses -0.085; #X obj 14 346 + 0.085; +#X obj 82 442 expr if($f1 <= -1 \, -1 \, $f1); +#X obj 82 415 expr if($f1 >= 1 \, 1 \, $f1); #X connect 0 0 4 0; #X connect 1 0 4 1; #X connect 2 0 5 0; #X connect 3 0 5 1; #X connect 4 0 8 0; -#X connect 5 0 9 0; -#X connect 8 0 10 0; -#X connect 9 0 10 1; -#X connect 10 0 11 0; -#X connect 11 0 22 0; -#X connect 12 0 20 0; -#X connect 13 0 14 0; -#X connect 18 0 20 0; -#X connect 19 0 20 0; -#X connect 20 0 21 0; -#X connect 21 0 13 0; -#X connect 22 0 17 0; -#X connect 22 0 24 0; -#X connect 23 0 18 0; -#X connect 24 0 25 0; -#X connect 24 1 23 0; -#X connect 25 0 26 0; -#X connect 25 1 12 0; -#X connect 26 0 19 0; -#X connect 26 0 20 0; -#X restore 3 259 pd motionplus_logic; -#X obj 3 489 outlet; -#X obj 3 305 line 0 1; -#X msg 15 442 label \$1; -#X obj 15 419 tosymbol; -#X floatatom 15 329 5 0 0 0 - - -; -#X obj 15 373 int; -#X obj 15 351 * 100; -#X obj 15 396 / 100; +#X connect 5 0 8 1; +#X connect 8 0 15 0; +#X connect 9 0 21 0; +#X connect 13 0 21 0; +#X connect 14 0 21 0; +#X connect 15 0 17 0; +#X connect 16 0 13 0; +#X connect 17 0 18 0; +#X connect 17 1 16 0; +#X connect 18 0 19 0; +#X connect 18 1 9 0; +#X connect 19 0 14 0; +#X connect 19 0 21 0; +#X connect 20 0 10 0; +#X connect 21 0 20 0; +#X restore 3 299 pd motionplus_logic; +#X obj 3 529 outlet; +#X msg 15 482 label \$1; +#X obj 15 459 tosymbol; +#X obj 15 413 int; +#X obj 15 391 * 100; +#X obj 15 436 / 100; #X obj 162 62 loadbang; -#X msg 3 282 \$1 50; +#X msg 3 322 \$1 50; #X obj 162 159 ggee/image @pd_extra/K12/objects/wii_speed.png 1; #X obj 128 162 cnv 15 61 26 empty \$0-speed_num 0 10 12 0 20 -262144 -66577 0; -#X obj 15 466 send \$0-speed_num; +#X obj 15 506 send \$0-speed_num; #X msg 162 85 open @pd_extra/K12/objects/wii_speed.png; +#X obj 3 345 line 0 25; #X connect 0 0 2 1; #X connect 1 0 2 0; #X connect 2 0 3 1; #X connect 2 1 3 3; #X connect 2 2 3 0; #X connect 2 3 3 2; -#X connect 3 0 13 0; -#X connect 5 0 4 0; -#X connect 5 0 8 0; -#X connect 6 0 16 0; -#X connect 7 0 6 0; -#X connect 8 0 10 0; -#X connect 9 0 11 0; -#X connect 10 0 9 0; -#X connect 11 0 7 0; -#X connect 12 0 17 0; -#X connect 13 0 5 0; +#X connect 3 0 11 0; +#X connect 5 0 14 0; +#X connect 6 0 5 0; +#X connect 7 0 9 0; +#X connect 8 0 7 0; +#X connect 9 0 6 0; +#X connect 10 0 15 0; +#X connect 11 0 16 0; +#X connect 16 0 4 0; +#X connect 16 0 8 0; #X coords 0 -1 1 1 89 89 2 117 127; -- GitLab