From 0eee380c313088c07b1b3dbb249a0875213a8dc4 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Sat, 23 Dec 2006 06:24:59 +0000 Subject: added the ability to toggle on and off the max/min tracking svn path=/trunk/externals/mapping/; revision=7048 --- autoscale.pd | 211 ++++++++++++++++++++++++++++++++++++++--------------------- 1 file changed, 136 insertions(+), 75 deletions(-) (limited to 'autoscale.pd') diff --git a/autoscale.pd b/autoscale.pd index 5e1563c..c04649c 100644 --- a/autoscale.pd +++ b/autoscale.pd @@ -1,82 +1,143 @@ -#N canvas 348 266 816 509 10; +#N canvas 133 257 749 460 10; #X obj 5 20 inlet; -#X obj 77 433 outlet; -#X text 135 318 min; -#X text 262 319 max; -#X obj 97 295 moses 0; -#X obj 222 295 moses 0; -#X obj 77 92 trigger float float float bang bang; -#X obj 77 380 expr (($f1 - $f2) * (($f5 - $f4) / ($f3 - $f2))) + $f4 +#X obj 77 373 outlet; +#X obj 77 152 trigger float float float bang bang; +#X obj 77 320 expr (($f1 - $f2) * (($f5 - $f4) / ($f3 - $f2))) + $f4 ; -#X obj 286 319 + 1e-09; -#X obj 408 78 loadbang; -#X text 2 456 (C) Copyright 2004 Hans-Christoph Steiner +#X text 2 406 (C) Copyright 2004 Hans-Christoph Steiner ; -#X text 219 471 released under the GNU GPL; -#X text 417 455 $Revision: 1.3 $$Date: 2006-07-07 04:08:55 $; -#X text 417 468 $Author: eighthave $; +#X text 219 421 released under the GNU GPL; +#X text 417 405 $Revision: 1.4 $$Date: 2006-12-23 06:24:58 $; +#X text 417 418 $Author: eighthave $; #X obj 5 60 route reset; -#X obj 17 156 bang; -#X msg 17 219 0; -#X obj 356 319 expr if ($f1 == $f2 \, 0 \, $f1) \; if ($f1 == $f2 \, -1 \, $f2); -#X obj 266 276 float; -#X obj 97 318 float; -#X obj 141 276 float; -#X obj 356 20 inlet; -#X obj 555 20 inlet; -#X text 396 21 output min; -#X text 601 20 output max; +#X obj 355 20 inlet; +#X obj 456 20 inlet; +#X text 362 36 output min; +#X text 463 36 output max; #X text 44 21 data to be scaled; -#X obj 228 216 purepd/once; -#X obj 103 216 purepd/once; -#X obj 222 156 trigger 0 bang 0; -#X obj 97 156 trigger 0 bang 0; -#X text 195 407 ^-- these [purepd/once] bits are just here to get the +#X obj 589 20 inlet reset; +#N canvas 0 22 454 304 output 0; +#X obj 32 24 inlet; +#X obj 334 24 inlet; +#X obj 22 273 outlet; +#X obj 338 274 outlet; +#X text 78 273 min; +#X text 74 25 min; +#X text 380 26 max; +#X text 386 274 max; +#X obj 69 54 loadbang; +#X obj 37 167 expr if ($f1 == $f2 \, 0 \, $f1) \; if ($f1 == $f2 \, +1 \, $f2); +#X obj 235 135 purepd/float_argument \$2 1; +#X obj 69 77 trigger 0 bang; +#X text 183 76 [float_argument] doesn't output 0 on; +#X text 183 88 bang \, so send the 0 here.; +#X obj 37 135 purepd/float_argument \$1 0; +#X connect 0 0 14 0; +#X connect 1 0 10 0; +#X connect 8 0 11 0; +#X connect 9 0 2 0; +#X connect 9 1 3 0; +#X connect 10 0 9 1; +#X connect 11 0 14 0; +#X connect 11 1 10 0; +#X connect 14 0 9 0; +#X restore 356 292 pd output range; +#N canvas 463 201 461 355 track 0; +#X obj 161 31 inlet; +#X obj 38 285 outlet; +#X text 75 239 min; +#X text 202 240 max; +#X obj 37 216 moses 0; +#X obj 162 216 moses 0; +#X obj 226 240 + 1e-09; +#X obj 317 76 bang; +#X msg 317 139 0; +#X obj 206 197 float; +#X obj 37 239 float; +#X obj 81 197 float; +#X obj 168 137 purepd/once; +#X obj 43 137 purepd/once; +#X obj 162 77 trigger 0 bang 0; +#X obj 37 77 trigger 0 bang 0; +#X obj 369 24 inlet; +#X obj 225 284 outlet; +#X obj 34 31 inlet; +#X text 25 309 ^-- these [purepd/once] bits are just here to get the max/min tracking started; -#X obj 695 20 inlet reset; -#X obj 554 157 purepd/float_argument \$2 1; -#X obj 408 101 trigger 0 bang; -#X text 522 100 [float_argument] doesn't output 0 on; -#X text 522 112 bang \, so send the 0 here.; -#X obj 356 157 purepd/float_argument \$1 0; #X connect 0 0 14 0; -#X connect 4 0 19 0; -#X connect 5 1 8 0; -#X connect 6 0 7 0; -#X connect 6 1 29 0; -#X connect 6 2 28 0; -#X connect 6 3 36 0; -#X connect 6 4 32 0; -#X connect 7 0 1 0; -#X connect 8 0 5 1; -#X connect 8 0 7 2; -#X connect 9 0 33 0; -#X connect 14 0 15 0; -#X connect 14 1 6 0; -#X connect 15 0 16 0; -#X connect 15 0 26 1; -#X connect 15 0 27 1; -#X connect 16 0 18 0; -#X connect 16 0 19 0; -#X connect 17 0 7 3; -#X connect 17 1 7 4; -#X connect 18 0 5 1; -#X connect 19 0 4 1; -#X connect 19 0 7 1; -#X connect 20 0 4 1; -#X connect 21 0 36 0; -#X connect 22 0 32 0; -#X connect 26 0 18 0; -#X connect 27 0 20 0; -#X connect 28 0 5 0; -#X connect 28 1 26 0; -#X connect 28 2 18 1; -#X connect 29 0 4 0; -#X connect 29 1 27 0; -#X connect 29 2 20 1; -#X connect 31 0 15 0; -#X connect 32 0 17 1; -#X connect 33 0 36 0; -#X connect 33 1 32 0; -#X connect 36 0 17 0; +#X connect 4 0 10 0; +#X connect 5 1 6 0; +#X connect 6 0 5 1; +#X connect 6 0 17 0; +#X connect 7 0 8 0; +#X connect 7 0 12 1; +#X connect 7 0 13 1; +#X connect 8 0 9 0; +#X connect 8 0 10 0; +#X connect 9 0 5 1; +#X connect 10 0 4 1; +#X connect 10 0 1 0; +#X connect 11 0 4 1; +#X connect 12 0 9 0; +#X connect 13 0 11 0; +#X connect 14 0 5 0; +#X connect 14 1 12 0; +#X connect 14 2 9 1; +#X connect 15 0 4 0; +#X connect 15 1 13 0; +#X connect 15 2 11 1; +#X connect 16 0 7 0; +#X connect 18 0 15 0; +#X restore 156 292 pd track changes; +#X obj 335 152 trigger float bang bang; +#N canvas 634 182 462 312 gate 0; +#X obj 76 39 inlet; +#X obj 74 268 outlet; +#X obj 316 266 outlet; +#X obj 323 37 inlet; +#X msg 345 175 0; +#X msg 374 175 1; +#X obj 77 204 spigot 1; +#X obj 316 204 spigot 0; +#X msg 105 175 0; +#X msg 134 175 1; +#X obj 243 70 select 1 0; +#X connect 0 0 6 0; +#X connect 0 0 7 0; +#X connect 3 0 10 0; +#X connect 4 0 7 1; +#X connect 5 0 7 1; +#X connect 6 0 1 0; +#X connect 7 0 2 0; +#X connect 8 0 6 1; +#X connect 9 0 6 1; +#X connect 10 0 4 0; +#X connect 10 0 9 0; +#X connect 10 1 5 0; +#X connect 10 1 8 0; +#X restore 77 110 pd gate; +#X obj 589 39 route float bang; +#X connect 0 0 8 0; +#X connect 2 0 3 0; +#X connect 2 1 16 0; +#X connect 2 2 16 1; +#X connect 2 3 15 0; +#X connect 2 4 15 1; +#X connect 3 0 1 0; +#X connect 8 0 16 2; +#X connect 8 1 18 0; +#X connect 9 0 15 0; +#X connect 10 0 15 1; +#X connect 14 0 19 0; +#X connect 15 0 3 3; +#X connect 15 1 3 4; +#X connect 16 0 3 1; +#X connect 16 1 3 2; +#X connect 17 0 3 0; +#X connect 17 1 15 0; +#X connect 17 2 15 1; +#X connect 18 0 2 0; +#X connect 18 1 17 0; +#X connect 19 0 18 1; +#X connect 19 1 16 2; -- cgit v1.2.1