blob: 211e127510a26646503ab6376876002d570aaba5 (
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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
|
#N canvas 360 135 572 442 12;
#X obj 413 35 import mapping ggee;
#X obj 5 2 cnv 15 550 20 empty empty simplified_quadratic 2 11 1 18
-233017 -66577 0;
#X msg 516 2 pddp;
#X text 324 394 released under the GNU GPL;
#X text 243 352 For more info:;
#X floatatom 35 127 8 0 0 0 - - -;
#X floatatom 35 278 8 0 0 0 - - -;
#X obj 38 305 hsl 200 20 0 1 0 0 empty empty curved_output 22 11 1
12 -262144 -1 -1 0 1;
#X obj 38 101 hsl 200 20 0 1 0 0 empty empty raw_input 22 11 1 12 -261681
-1 -1 0 1;
#X obj 360 352 pddp/open mapping-about;
#X text 11 394 (C) Copyright 2007 Free Software Foundation;
#X obj 175 167 hsl 50 15 0 1 0 1 \$0-x-slider \$0-x-slider-receive
x 5 9 0 11 -232576 -1 -1 1495 0;
#X floatatom 181 187 7 0 0 0 - - -;
#X obj 35 217 simplified_quadratic;
#N canvas 273 69 482 415 draw_array 0;
#X msg 54 82 bang;
#X obj 54 133 until;
#X text 85 82 start;
#X obj 54 155 f;
#X obj 83 155 + 1;
#X obj 54 43 loadbang;
#X obj 54 210 trigger float float;
#X obj 127 157 select 0;
#X obj 66 343 tabwrite \$0-curve;
#X obj 139 53 trigger bang float;
#X obj 83 177 mod 200;
#X obj 54 254 / 200;
#X text 96 254 mapping output range: 0 to 1;
#N canvas 0 22 461 369 receive 0;
#X obj 253 33 receive \$0-y;
#X obj 253 57 moses;
#X obj 280 78 moses 201;
#X obj 331 99 bang;
#X msg 331 120 200;
#X obj 238 98 bang;
#X msg 238 119 0;
#X obj 91 56 moses;
#X obj 118 77 moses 201;
#X obj 169 98 bang;
#X msg 169 119 200;
#X obj 76 97 bang;
#X msg 76 118 0;
#X obj 91 32 receive \$0-x;
#X obj 117 289 receive \$0-x-slider;
#X floatatom 118 312 5 0 0 0 - - -;
#X floatatom 279 313 5 0 0 0 - - -;
#X obj 280 290 receive \$0-y-slider;
#X obj 118 169 / 200;
#X obj 280 170 / 200;
#X obj 118 249 send \$0-x-slider-receive;
#X obj 280 250 send \$0-y-slider-receive;
#X msg 281 193 1 \$1;
#X obj 280 221 -;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 1 1 2 0;
#X connect 2 0 19 0;
#X connect 2 1 3 0;
#X connect 3 0 4 0;
#X connect 4 0 19 0;
#X connect 5 0 6 0;
#X connect 6 0 19 0;
#X connect 7 0 11 0;
#X connect 7 1 8 0;
#X connect 8 0 18 0;
#X connect 8 1 9 0;
#X connect 9 0 10 0;
#X connect 10 0 18 0;
#X connect 11 0 12 0;
#X connect 12 0 18 0;
#X connect 13 0 7 0;
#X connect 14 0 15 0;
#X connect 17 0 16 0;
#X connect 18 0 20 0;
#X connect 19 0 22 0;
#X connect 22 0 23 0;
#X connect 23 0 21 0;
#X restore 265 348 pd receive from gcanvas;
#X obj 138 9 receive \$0-x-slider;
#X obj 293 12 receive \$0-y-slider;
#X obj 294 50 trigger bang float;
#X obj 54 108 cyclone/speedlim 100;
#X obj 54 280 simplified_quadratic;
#X connect 0 0 17 0;
#X connect 1 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 6 0;
#X connect 4 0 10 0;
#X connect 5 0 0 0;
#X connect 6 0 11 0;
#X connect 6 1 8 1;
#X connect 7 0 1 1;
#X connect 9 0 0 0;
#X connect 9 1 18 1;
#X connect 10 0 3 1;
#X connect 10 0 7 0;
#X connect 11 0 18 0;
#X connect 14 0 9 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X connect 17 0 1 0;
#X connect 18 0 8 0;
#X restore 409 73 pd draw_array;
#X obj 304 103 gcanvas 200 200;
#N canvas 0 22 450 300 graph1 0;
#X array \$0-curve 200 float 0;
#X coords 0 1 199 0 200 200 1;
#X restore 304 103 graph;
#X obj 304 308 send \$0-x;
#X text 3 33 This object curves the input range using a simplified
quadratic bezier curve controlled by one parameter.;
#X connect 5 0 13 0;
#X connect 6 0 7 0;
#X connect 8 0 5 0;
#X connect 11 0 12 0;
#X connect 11 0 13 1;
#X connect 13 0 6 0;
#X connect 15 0 17 0;
|
