blob: 4195b423af3718b61bdc31e383ba522a54042886 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
#N canvas 528 218 488 369 10;
#X obj 5 2 cnv 15 450 20 empty empty [curve] 2 11 1 18 -233017 -66577
0;
#X msg 422 3 pddp;
#X text 27 320 (C) Copyright 2004 Hans-Christoph Steiner <hans@at.or.at>
;
#X text 244 334 released under the GNU GPL;
#X text 158 291 For more info:;
#X floatatom 25 163 8 0 0 0 - - -;
#X floatatom 25 224 8 0 0 0 - - -;
#X obj 28 241 hsl 200 15 0 1 0 0 empty empty empty 22 8 1 12 -262144
-1 -1 19878 1;
#X obj 28 143 hsl 200 15 0 1 0 0 empty empty empty 22 8 1 12 -261681
-1 -1 300 1;
#N canvas 0 22 450 300 graph1 0;
#X array \$0-curve 100 float 0;
#X coords 0 1 99 -1 100 100 1;
#X restore 321 111 graph;
#N canvas 266 69 387 377 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 83 147 mod 100;
#X obj 54 43 loadbang;
#X text 96 257 mapping output range: -1 to 1;
#X obj 54 257 / 50;
#X obj 53 229 - 50;
#X obj 139 53 t b s;
#X obj 139 32 symbol;
#X obj 138 9 receive \$0-type;
#X obj 54 180 trigger float float;
#X obj 127 127 select 0;
#X obj 53 313 tabwrite \$0-curve;
#X obj 53 283 curve sin;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 13 0;
#X connect 4 0 5 0;
#X connect 5 0 3 1;
#X connect 5 0 14 0;
#X connect 6 0 0 0;
#X connect 8 0 16 0;
#X connect 9 0 8 0;
#X connect 10 0 0 0;
#X connect 10 1 16 1;
#X connect 11 0 10 0;
#X connect 12 0 11 0;
#X connect 13 0 9 0;
#X connect 13 1 15 1;
#X connect 14 0 1 1;
#X connect 16 0 15 0;
#X restore 321 89 pd draw_array;
#X text 17 39 This object maps the input range to a exponential curve
\, the inverse of a logarithmic curve.;
#X msg 61 82 atan;
#X msg 98 82 cos;
#X obj 104 184 receive \$0-type;
#X msg 128 82 sin;
#X obj 262 289 pddp_open mapping-about;
#X text 286 231 related objects:;
#X obj 342 250 curve_power;
#X obj 342 268 curve_log;
#X obj 259 268 curve_exp;
#X obj 107 114 send \$0-type;
#X obj 25 203 sinusoid sin;
#X obj 259 250 curve;
#X connect 5 0 22 0;
#X connect 6 0 7 0;
#X connect 8 0 5 0;
#X connect 12 0 21 0;
#X connect 13 0 21 0;
#X connect 14 0 22 1;
#X connect 15 0 21 0;
#X connect 22 0 6 0;
|
