From d0441a85a78ea946920362deea21da7e01dcb91e Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Thu, 2 Aug 2007 00:43:09 +0000 Subject: added inlets to match arguments and streamlined implementation using float_argument svn path=/trunk/externals/mapping/; revision=8343 --- notescale.pd | 53 ++++++++++++++++++++++++++++------------------------- 1 file changed, 28 insertions(+), 25 deletions(-) (limited to 'notescale.pd') diff --git a/notescale.pd b/notescale.pd index ad28d63..6b5c219 100644 --- a/notescale.pd +++ b/notescale.pd @@ -1,26 +1,29 @@ -#N canvas 37 318 448 450 10; -#X obj 64 49 inlet; -#X obj 64 389 outlet; -#X obj 64 297 expr $f1 * ($f3 - $f2) + $f2; -#X obj 357 231 f \$2; -#X obj 159 230 f \$1; -#X obj 159 257 expr if ($f1 == $f2 \, 0 \, $f1) \; if ($f1 == $f2 \, -127 \, $f2); -#X obj 229 152 loadbang; -#X obj 229 179 t b b; -#X text 114 49 input range: 0 to 1; -#X obj 64 96 min 1; -#X obj 64 116 max 0; -#X text 123 389 output range: MIDI note #s; -#X connect 0 0 9 0; +#N canvas 378 159 563 324 10; +#X obj 51 42 inlet; +#X obj 51 233 outlet; +#X obj 51 171 expr $f1 * ($f3 - $f2) + $f2; +#X obj 189 61 loadbang; +#X text 10 10 input range: 0 to 1; +#X obj 51 89 min 1; +#X obj 51 109 max 0; +#X text 110 233 output range: MIDI note #s; +#X obj 133 42 inlet; +#X obj 304 42 inlet; +#X text 172 42 0-127; +#X text 343 41 0-127; +#X obj 189 84 trigger bang bang; +#X obj 133 110 purepd/float_argument \$1 0; +#X obj 304 110 purepd/float_argument \$2 127; +#X text 25 290 (C) Copyright 2007 Free Software Foundation; +#X text 289 290 released under the GNU GPLv3 or later; +#X connect 0 0 5 0; #X connect 2 0 1 0; -#X connect 3 0 5 1; -#X connect 4 0 5 0; -#X connect 5 0 2 1; -#X connect 5 1 2 2; -#X connect 6 0 7 0; -#X connect 7 0 4 0; -#X connect 7 1 3 0; -#X connect 9 0 10 0; -#X connect 10 0 2 0; -#X connect 10 0 7 0; +#X connect 3 0 12 0; +#X connect 5 0 6 0; +#X connect 6 0 2 0; +#X connect 8 0 13 0; +#X connect 9 0 14 0; +#X connect 12 0 13 0; +#X connect 12 1 14 0; +#X connect 13 0 2 1; +#X connect 14 0 2 2; -- cgit v1.2.1