blob: 3705f2571d42f42596fab99804bc80a242c29b0c (
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
|
#N canvas 416 140 464 319 10;
#X obj 5 2 cnv 15 450 20 empty empty [hid_cuberoot] 2 11 1 18 -233017
-66577 0;
#X obj 422 3 pddp;
#X text 27 280 (C) Copyright 2004 Hans-Christoph Steiner <hans@at.or.at>
;
#X text 244 294 released under the GNU GPL;
#X text 98 251 For more info:;
#X obj 202 249 pddp_open all_about_hid_mapping;
#X floatatom 25 123 8 0 0 0 - - -;
#X floatatom 25 184 8 0 0 0 - - -;
#X obj 28 201 hsl 200 15 0 1 0 0 empty empty empty 22 8 1 12 -262144
-1 -1 0 1;
#X obj 28 103 hsl 200 15 0 1 0 0 empty empty empty 22 8 1 12 -261681
-1 -1 0 1;
#X obj 25 153 hid_cuberoot;
#N canvas 0 22 450 300 graph1 0;
#X array hid_cuberoot 100 float 0;
#X coords 0 1 99 0 100 100 1;
#X restore 321 111 graph;
#N canvas 266 69 327 317 draw_array 0;
#X msg 57 52 bang;
#X obj 57 73 until;
#X text 88 52 start;
#X obj 57 95 f;
#X obj 86 95 + 1;
#X obj 132 97 sel 0;
#X obj 86 117 mod 100;
#X obj 57 150 t f f;
#X obj 94 177 s array_index;
#X obj 170 262 r array_index;
#X obj 57 13 loadbang;
#X obj 57 207 / 100;
#X text 99 207 [hid] output range: 0 to 1;
#X obj 56 233 hid_cuberoot;
#X obj 56 283 tabwrite hid_cuberoot;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 7 0;
#X connect 4 0 6 0;
#X connect 5 0 1 1;
#X connect 6 0 3 1;
#X connect 6 0 5 0;
#X connect 7 0 11 0;
#X connect 7 1 8 0;
#X connect 9 0 14 1;
#X connect 10 0 0 0;
#X connect 11 0 13 0;
#X connect 13 0 14 0;
#X restore 321 78 pd draw_array;
#X text 15 34 This object maps the input range to a cube root curve
\, i.e. [pow 0.333333] \, "cube root of X" \, or X^0.333333.;
#X connect 6 0 10 0;
#X connect 7 0 8 0;
#X connect 9 0 6 0;
#X connect 10 0 7 0;
|
