diff options
-rw-r--r-- | puremapping/curve_circle-help.pd | 57 | ||||
-rw-r--r-- | puremapping/curve_circle.pd | 55 |
2 files changed, 112 insertions, 0 deletions
diff --git a/puremapping/curve_circle-help.pd b/puremapping/curve_circle-help.pd new file mode 100644 index 0000000..8b7560c --- /dev/null +++ b/puremapping/curve_circle-help.pd @@ -0,0 +1,57 @@ +#N canvas 704 151 487 340 10; +#X floatatom 25 157 8 0 0 0 - - -; +#X floatatom 25 228 8 0 0 0 - - -; +#X obj 28 245 hsl 200 15 0 1 0 0 empty empty empty 22 8 1 12 -262144 +-1 -1 0 1; +#X obj 28 137 hsl 200 15 0 1 0 0 empty empty empty 22 8 1 12 -261681 +-1 -1 0 1; +#N canvas 0 22 450 300 (subpatch) 0; +#X array \$0-curve 200 float 0; +#X coords 0 1 199 0 200 200 1; +#X restore 254 92 graph; +#N canvas 199 25 427 417 draw_array 0; +#X msg 54 82 bang; +#X obj 54 103 until; +#X text 85 82 start; +#X obj 54 125 f; +#X obj 83 125 + 1; +#X obj 54 43 loadbang; +#X obj 54 180 trigger float float; +#X obj 127 127 select 0; +#X obj 53 363 tabwrite \$0-curve; +#X obj 139 9 inlet; +#X obj 139 53 trigger bang float; +#X obj 83 147 mod 200; +#X text 96 257 mapping output range: 0 to 1; +#X obj 54 229 / 200; +#X obj 53 283 curve_circle; +#X connect 0 0 1 0; +#X connect 1 0 3 0; +#X connect 3 0 4 0; +#X connect 3 0 6 0; +#X connect 4 0 11 0; +#X connect 5 0 0 0; +#X connect 6 0 13 0; +#X connect 6 1 8 1; +#X connect 7 0 1 1; +#X connect 9 0 10 0; +#X connect 10 0 0 0; +#X connect 10 1 14 1; +#X connect 11 0 3 1; +#X connect 11 0 7 0; +#X connect 13 0 14 0; +#X connect 14 0 8 0; +#X restore 127 206 pd draw_array; +#X obj 117 166 hsl 128 15 0 1 0 0 empty empty empty -2 -6 0 8 -262144 +-1 -1 7900 0; +#X obj 25 207 curve_circle; +#X text 17 39 This object generates a curve based on a 0 to 1 argument +range.; +#X floatatom 142 185 5 0 0 0 - - -; +#X connect 0 0 7 0; +#X connect 1 0 2 0; +#X connect 3 0 0 0; +#X connect 6 0 5 0; +#X connect 6 0 7 1; +#X connect 6 0 9 0; +#X connect 7 0 1 0; diff --git a/puremapping/curve_circle.pd b/puremapping/curve_circle.pd new file mode 100644 index 0000000..8c28619 --- /dev/null +++ b/puremapping/curve_circle.pd @@ -0,0 +1,55 @@ +#N canvas 316 130 527 415 10; +#X obj 65 15 inlet; +#X obj 195 15 inlet; +#X obj 65 303 outlet; +#X obj 111 188 pow 2; +#X obj 111 228 -; +#X msg 111 208 1 \$1; +#X obj 111 248 pow; +#X msg 195 170 1 \$1; +#X obj 195 190 /; +#X msg 111 148 1 \$1; +#X obj 111 168 -; +#X obj 255 86 tan; +#X obj 255 66 * 1.5708; +#X obj 65 106 moses 0; +#X obj 65 129 abs; +#X obj 65 188 pow 2; +#X obj 65 228 -; +#X msg 65 208 1 \$1; +#X obj 65 248 pow; +#X msg 65 148 1 \$1; +#X obj 65 168 -; +#X obj 65 269 * -1; +#X obj 195 41 moses 0.5; +#X obj 195 66 * 2; +#X obj 195 137 f; +#X connect 0 0 13 0; +#X connect 1 0 22 0; +#X connect 3 0 5 0; +#X connect 4 0 6 0; +#X connect 5 0 4 0; +#X connect 6 0 2 0; +#X connect 7 0 8 0; +#X connect 8 0 6 1; +#X connect 8 0 18 1; +#X connect 9 0 10 0; +#X connect 10 0 3 0; +#X connect 11 0 24 0; +#X connect 12 0 11 0; +#X connect 13 0 14 0; +#X connect 13 1 9 0; +#X connect 14 0 19 0; +#X connect 15 0 17 0; +#X connect 16 0 18 0; +#X connect 17 0 16 0; +#X connect 18 0 21 0; +#X connect 19 0 20 0; +#X connect 20 0 15 0; +#X connect 21 0 2 0; +#X connect 22 0 23 0; +#X connect 22 1 12 0; +#X connect 23 0 24 0; +#X connect 24 0 7 0; +#X connect 24 0 3 1; +#X connect 24 0 15 1; |