From 03a2ad8d2830491307abfdbf8fde1b4f2e4ab7ff Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Mon, 15 Nov 2004 21:16:56 +0000
Subject: added a [reset( message so you can recalibrate

svn path=/trunk/externals/hcs/; revision=2280
---
 autoscale.pd | 74 ++++++++++++++++++++++++++++++++++++------------------------
 1 file changed, 44 insertions(+), 30 deletions(-)

(limited to 'autoscale.pd')

diff --git a/autoscale.pd b/autoscale.pd
index 72b4a78..096ce4e 100644
--- a/autoscale.pd
+++ b/autoscale.pd
@@ -1,39 +1,45 @@
-#N canvas 254 119 641 537 10;
+#N canvas 206 226 769 538 10;
 #X obj 45 20 inlet;
-#X obj 45 453 outlet;
-#X obj 105 233 f;
-#X text 132 233 min;
-#X text 230 234 max;
-#X obj 324 167 f \$1;
-#X obj 522 167 f \$2;
-#X obj 105 210 moses 0;
-#X obj 190 210 moses 0;
-#X obj 45 102 trigger float float float bang bang;
-#X obj 45 390 expr (($f1 - $f2) * (($f5 - $f4) / ($f3 - $f2))) + $f4
+#X obj 175 453 outlet;
+#X obj 235 268 f;
+#X text 262 268 min;
+#X text 360 269 max;
+#X obj 454 167 f \$1;
+#X obj 652 167 f \$2;
+#X obj 235 245 moses 0;
+#X obj 320 245 moses 0;
+#X obj 175 102 trigger float float float bang bang;
+#X obj 175 390 expr (($f1 - $f2) * (($f5 - $f4) / ($f3 - $f2))) + $f4
 ;
-#X obj 196 170 oneshot;
-#X obj 234 191 f;
-#X obj 190 143 t f b f;
-#X obj 111 170 oneshot;
-#X obj 149 191 f;
-#X obj 105 143 t f b f;
-#X obj 254 234 + 1e-09;
-#X obj 348 213 ==;
-#X obj 348 233 sel 1;
-#X obj 415 77 loadbang;
-#X obj 348 299 print [autocal];
-#X floatatom 342 189 5 0 0 0 - - -;
-#X obj 415 100 t b b;
-#X obj 324 329 expr if ($f1 == $f2 \, 0 \, $f1) \; if ($f1 == $f2 \,
+#X obj 326 205 oneshot;
+#X obj 364 226 f;
+#X obj 320 178 t f b f;
+#X obj 241 205 oneshot;
+#X obj 279 226 f;
+#X obj 235 178 t f b f;
+#X obj 384 269 + 1e-09;
+#X obj 478 213 ==;
+#X obj 478 233 sel 1;
+#X obj 545 77 loadbang;
+#X obj 478 299 print [autocal];
+#X floatatom 472 189 5 0 0 0 - - -;
+#X obj 545 100 t b b;
+#X obj 454 329 expr if ($f1 == $f2 \, 0 \, $f1) \; if ($f1 == $f2 \,
 127 \, $f2);
-#X msg 348 278 using default range (0-127);
-#X obj 348 256 oneshot;
+#X msg 478 278 using default range (0-127);
+#X obj 478 256 oneshot;
 #X text 2 476 (C) Copyright 2004 Hans-Christoph Steiner <hans@at.or.at>
 ;
 #X text 219 491 released under the GNU GPL;
-#X text 11 512 $Revision: 1.2 $$Date: 2004-11-02 06:39:29 $;
-#X text 349 512 $Author: eighthave $;
-#X connect 0 0 9 0;
+#X text 417 475 $Revision: 1.3 $$Date: 2004-11-15 21:16:56 $;
+#X text 417 488 $Author: eighthave $;
+#X obj 45 54 route reset;
+#X obj 45 81 bang;
+#X msg 45 129 0;
+#X text 150 41 these [oneshot] bits are just here to get the ball rolling
+;
+#X msg 114 102 clear;
+#X connect 0 0 31 0;
 #X connect 2 0 7 1;
 #X connect 2 0 10 1;
 #X connect 5 0 18 0;
@@ -70,3 +76,11 @@
 #X connect 24 1 10 4;
 #X connect 25 0 21 0;
 #X connect 26 0 25 0;
+#X connect 31 0 32 0;
+#X connect 31 1 9 0;
+#X connect 32 0 33 0;
+#X connect 32 0 35 0;
+#X connect 33 0 2 0;
+#X connect 33 0 12 0;
+#X connect 35 0 14 0;
+#X connect 35 0 11 0;
-- 
cgit v1.2.1