Range Patch - Pure Data

#N canvas 19 29 716 521 10;
#X text 441 140 se non vengono passati argomenti \, max e min sono
0 se questo è il caso dai come default 1 per max e 0 per min;
#X text 269 23 gli argomenti passati all'oggetto sono min e max. Nota:
per poter usare gli argomenti è necessario fare [loadbang] su [float]
\, così da memorizzarli durante la creazione dell'oggetto. Il minimo
fa anche da offset La formula che uso è x = (R*N)+offset \, dove R
è RANGE \, cioè MAX - MIN;
#X obj 26 26 inlet;
#X msg 62 422 \$1;
#X obj 141 24 loadbang;
#X obj 181 102 f \$2;
#X obj 141 102 f \$1;
#X text 218 104 MAX;
#X obj 142 351 -;
#X text 76 349 RANGE;
#X obj 62 391 expr $f2*($f1/1000)+$f3;
#X obj 62 457 outlet;
#X text 105 104 MIN;
#X text 71 27 N;
#X obj 141 289 swap;
#X obj 141 186 expr if(($f1==0) && ($f2==0) \, 0 \, $f1);
#X obj 166 253 expr if(($f1==0) && ($f2==0) \, 1 \, $f2);
#X obj 181 163 print arg2;
#X obj 170 135 print arg1;
#X obj 192 224 print check-min;
#X obj 237 286 print check-max;
#X obj 78 320 print swap-sx;
#X obj 221 331 print swap-dx;
#X obj 244 373 print range;
#X obj 51 75 print n;
#X obj 292 469 print calc;
#X obj 141 56 t b b;
#X connect 2 0 10 0;
#X connect 2 0 24 0;
#X connect 3 0 11 0;
#X connect 4 0 26 0;
#X connect 5 0 15 1;
#X connect 5 0 16 1;
#X connect 5 0 17 0;
#X connect 6 0 10 2;
#X connect 6 0 15 0;
#X connect 6 0 16 0;
#X connect 6 0 18 0;
#X connect 8 0 10 1;
#X connect 8 0 23 0;
#X connect 10 0 3 0;
#X connect 10 0 25 0;
#X connect 14 0 8 0;
#X connect 14 0 21 0;
#X connect 14 1 8 1;
#X connect 14 1 22 0;
#X connect 15 0 14 0;
#X connect 15 0 19 0;
#X connect 16 0 14 1;
#X connect 16 0 20 0;
#X connect 26 0 6 0;
#X connect 26 1 5 0;