From ec427a5f2a769cd5d426a929b53dce79bfbb64e0 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Thu, 21 Sep 2006 00:14:29 +0000 Subject: made all three curves stay between 0 and 1 always svn path=/trunk/externals/mapping/; revision=5987 --- sinusoid.pd | 64 ++++++++++++++++++++++++++++++++----------------------------- 1 file changed, 34 insertions(+), 30 deletions(-) (limited to 'sinusoid.pd') diff --git a/sinusoid.pd b/sinusoid.pd index 339ccbe..83b4cf6 100644 --- a/sinusoid.pd +++ b/sinusoid.pd @@ -1,35 +1,39 @@ -#N canvas 297 154 620 504 10; -#X obj 50 36 inlet; -#X obj 204 19 inlet; -#X obj 47 411 outlet; -#X obj 50 150 pack float symbol; -#X msg 50 175 \$2 \$1; -#X obj 39 256 atan; -#X obj 39 277 / 1.26263; -#X obj 190 225 symbol; -#X msg 189 251 ERROR: argument not supported \$1 \, try atan cos or +#N canvas 73 115 576 439 10; +#X obj 40 26 inlet; +#X obj 194 9 inlet; +#X obj 37 401 outlet; +#X obj 40 140 pack float symbol; +#X msg 40 165 \$2 \$1; +#X obj 29 246 atan; +#X obj 29 267 / 1.26263; +#X obj 180 215 symbol; +#X msg 179 241 ERROR: argument not supported \$1 \, try atan cos or sin; -#X obj 208 74 symbol_argument \$1; -#X obj 249 19 loadbang; -#X obj 50 98 * 3.14159; -#X obj 188 273 print [sinusoid]; -#X obj 50 198 route atan sin cos; -#X obj 123 260 sin; -#X obj 152 260 cos; -#X connect 0 0 11 0; -#X connect 1 0 9 0; +#X obj 207 40 loadbang; +#X obj 40 88 * 3.14159; +#X obj 178 263 print [sinusoid]; +#X obj 40 188 route atan sin cos; +#X obj 113 250 sin; +#X obj 142 250 cos; +#X obj 142 270 + 1; +#X obj 142 290 / 2; +#X obj 198 64 purepd/symbol_argument \$1; +#X connect 0 0 10 0; +#X connect 1 0 17 0; #X connect 3 0 4 0; -#X connect 4 0 13 0; +#X connect 4 0 12 0; #X connect 5 0 6 0; #X connect 6 0 2 0; #X connect 7 0 8 0; -#X connect 8 0 12 0; -#X connect 9 0 3 1; -#X connect 10 0 9 0; -#X connect 11 0 3 0; -#X connect 13 0 5 0; -#X connect 13 1 14 0; -#X connect 13 2 15 0; -#X connect 13 3 7 0; -#X connect 14 0 2 0; -#X connect 15 0 2 0; +#X connect 8 0 11 0; +#X connect 9 0 17 0; +#X connect 10 0 3 0; +#X connect 12 0 5 0; +#X connect 12 1 13 0; +#X connect 12 2 14 0; +#X connect 12 3 7 0; +#X connect 13 0 2 0; +#X connect 14 0 15 0; +#X connect 15 0 16 0; +#X connect 16 0 2 0; +#X connect 17 0 3 1; -- cgit v1.2.1