#N canvas 113 38 819 543 10;
#X floatatom 95 146 5 0 0 0 - - -;
#X floatatom 95 380 5 0 0 0 - - -;
#X floatatom 515 275 5 0 0 0 - - -;
#X floatatom 515 319 5 0 0 0 - - -;
#X obj 518 253 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X floatatom 652 276 5 0 0 0 - - -;
#X floatatom 122 174 5 0 0 1 in_low_border - -;
#X floatatom 149 235 5 0 0 1 in_high_border - -;
#X floatatom 177 260 5 0 0 1 out_low_border - -;
#X floatatom 204 288 5 0 0 1 out_high_border - -;
#X text 65 31 m_scale;
#X floatatom 456 405 5 0 0 0 - - -;
#X floatatom 456 445 5 0 0 0 - - -;
#X text 57 424 Actually low values also may be higher than high values:
;
#X floatatom 232 308 5 0 0 1 curve_exponent - -;
#X msg 255 329 dB;
#X text 295 331 send "dB" to use dB scale;
#X obj 518 336 hsl 128 15 0 1 0 0 empty empty 0-1 20 8 1 10 -262144
-1 -1 0 1;
#X obj 459 468 hsl 128 15 0 100 0 0 empty empty 0-100 20 8 1 10 -262144
-1 -1 0 1;
#X obj 459 373 hsl 128 15 0 100 0 0 empty empty 0-100 20 8 1 10 -262144
-1 -1 0 1;
#N canvas 381 198 613 435 visual-example 0;
#X floatatom 111 114 5 0 0 0 - - -;
#X floatatom 127 136 5 0 0 0 - - -;
#X floatatom 187 115 5 0 0 0 - - -;
#X floatatom 201 138 5 0 0 0 - - -;
#X floatatom 55 219 5 0 0 0 - - -;
#X floatatom 276 113 5 0 0 0 - - -;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-map 100 float 2;
#X coords 0 1 99 -1 200 140 1;
#X restore 272 182 graph;
#X msg 275 132 dB;
#X obj 55 290 tabwrite \$0-map;
#N canvas 0 0 450 300 count-to-100 0;
#X obj 171 145 until;
#X msg 171 88 100;
#X obj 171 173 f 0;
#X obj 202 174 + 1;
#X obj 214 144 0;
#X obj 171 116 t a b;
#X obj 170 198 outlet;
#X obj 171 61 inlet;
#X connect 0 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 2 0 6 0;
#X connect 3 0 2 1;
#X connect 4 0 2 1;
#X connect 5 0 0 0;
#X connect 5 1 4 0;
#X connect 7 0 1 0;
#X restore 55 70 pd count-to-100;
#X obj 55 49 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 55 100 t a a;
#X msg 267 79 0.5;
#X msg 303 79 1;
#X msg 335 79 2;
#X msg 372 79 4;
#X obj 55 195 m_scale 0 100 -1 1 dB;
#X connect 0 0 16 1;
#X connect 1 0 16 2;
#X connect 2 0 16 3;
#X connect 3 0 16 4;
#X connect 4 0 8 0;
#X connect 5 0 16 5;
#X connect 7 0 16 5;
#X connect 9 0 11 0;
#X connect 10 0 9 0;
#X connect 11 0 16 0;
#X connect 11 1 8 1;
#X connect 12 0 5 0;
#X connect 13 0 5 0;
#X connect 14 0 5 0;
#X connect 15 0 5 0;
#X connect 16 0 4 0;
#X restore 507 161 pd visual-example;
#X msg 696 275 dB;
#X text 82 54 scale input range to output range with linear or exponential
interpolation.;
#X text 83 91 Args: <in_low> <in_high> <out_low> <out_high> <optional:
curve exp. or "dB">;
#X obj 95 329 m_scale -10 10 0 100;
#X obj 515 298 m_scale 0 127 0 1 dB;
#X obj 456 424 m_scale 100 0 0 100 1;
#X msg 132 199 0 127 0 1;
#X text 204 200 or send a list here with all four values.;
#X connect 0 0 24 0;
#X connect 2 0 25 0;
#X connect 3 0 17 0;
#X connect 4 0 2 0;
#X connect 5 0 25 5;
#X connect 6 0 24 1;
#X connect 7 0 24 2;
#X connect 8 0 24 3;
#X connect 9 0 24 4;
#X connect 11 0 26 0;
#X connect 12 0 18 0;
#X connect 14 0 24 5;
#X connect 15 0 24 5;
#X connect 19 0 11 0;
#X connect 21 0 25 5;
#X connect 24 0 1 0;
#X connect 25 0 3 0;
#X connect 26 0 12 0;
#X connect 27 0 24 1;
