blob: c8e57c54260ebfd99a94a5227acce51624d19d3f (
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
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
|
#N canvas 440 23 498 425 10;
#X obj 5 2 cnv 15 450 20 empty empty logistic_sigmoid 2 11 1 18 -233017
-66577 0;
#X msg 422 3 pddp;
#X text 283 392 released under the GNU GPL;
#X text 158 361 For more info:;
#X floatatom 25 127 8 0 0 0 - - -;
#X floatatom 25 288 8 0 0 0 - - -;
#X obj 28 305 hsl 200 20 0 1 0 0 empty empty curved_output 22 11 1
12 -262144 -1 -1 0 1;
#X obj 28 101 hsl 200 20 0 1 0 0 empty empty raw_input 22 11 1 12 -261681
-1 -1 0 1;
#N canvas 273 69 474 407 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 53 343 tabwrite \$0-curve;
#X obj 139 53 trigger bang float;
#X obj 83 177 mod 200;
#X obj 54 287 / 200;
#X text 96 287 mapping output range: 0 to 1;
#N canvas 739 87 465 373 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 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 15 0;
#X connect 2 1 3 0;
#X connect 3 0 4 0;
#X connect 4 0 15 0;
#X connect 5 0 6 0;
#X connect 6 0 15 0;
#X connect 7 0 11 0;
#X connect 7 1 8 0;
#X connect 8 0 14 0;
#X connect 8 1 9 0;
#X connect 9 0 10 0;
#X connect 10 0 14 0;
#X connect 11 0 12 0;
#X connect 12 0 14 0;
#X connect 13 0 7 0;
#X connect 14 0 16 0;
#X connect 15 0 18 0;
#X connect 18 0 19 0;
#X connect 19 0 17 0;
#X restore 265 348 pd receive from gcanvas;
#X obj 138 9 receive \$0-x-slider;
#X obj 54 108 speedlim 100;
#X obj 53 313 logistic_sigmoid;
#X connect 0 0 15 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 16 1;
#X connect 10 0 3 1;
#X connect 10 0 7 0;
#X connect 11 0 16 0;
#X connect 14 0 9 0;
#X connect 15 0 1 0;
#X connect 16 0 8 0;
#X restore 377 71 pd draw_array;
#X obj 262 359 pddp/open mapping-about;
#X text 16 391 (C) Copyright 2007 Free Software Foundation;
#X obj 25 217 logistic_sigmoid;
#X obj 139 167 hsl 50 15 0 1 0 1 \$0-x-slider \$0-x-slider-receive
x 5 9 0 11 -232576 -1 -1 4900 0;
#X floatatom 145 187 7 0 0 0 - - -;
#X text 17 39 This object curves the input range using a double-exponential
seat controlled by one parameter.;
#X text 15 71 (click in the gray area to play);
#N canvas 475 288 686 489 tottest 0;
#X msg 44 33 capture 1;
#X obj 169 106 bang;
#X obj 227 106 bang;
#X msg 168 130 1;
#X msg 227 128 0;
#X obj 110 82 route motion mouse mouseup;
#X obj 112 161 spigot;
#X obj 46 9 loadbang;
#X obj 112 187 unpack float float float;
#X obj 19 215 moses 273;
#X obj 353 235 moses 103;
#X obj 411 255 moses 303;
#X obj 77 235 moses 473;
#X obj 77 255 - 273;
#X obj 411 275 - 103;
#X obj 411 349 cyclone/speedlim 150;
#X obj 77 319 cyclone/speedlim 150;
#X obj 469 285 bang;
#X msg 469 306 200;
#X obj 353 285 bang;
#X msg 353 306 0;
#X obj 149 268 bang;
#X msg 149 289 200;
#X obj 56 267 bang;
#X msg 56 288 0;
#X obj 411 375 send \$0-y-slider-receive;
#X obj 77 343 send \$0-x-slider-receive;
#N canvas 748 481 466 316 constrain 0;
#X obj 15 12 inlet;
#X obj 114 276 outlet;
#X obj 15 52 unpack float float float float;
#X obj 45 116 receive \$0-xmin;
#X obj 75 137 receive \$0-xmax;
#X obj 15 137 moses;
#X obj 45 157 moses;
#X obj 114 247 pack float float;
#X obj 200 137 moses;
#X obj 230 157 moses;
#X obj 137 207 trigger bang float;
#X obj 260 137 receive \$0-ymax;
#X obj 230 116 receive \$0-ymin;
#X connect 0 0 2 0;
#X connect 2 0 5 0;
#X connect 2 1 8 0;
#X connect 3 0 5 1;
#X connect 4 0 6 1;
#X connect 5 1 6 0;
#X connect 6 0 7 0;
#X connect 7 0 1 0;
#X connect 8 1 9 0;
#X connect 9 0 10 0;
#X connect 10 0 7 0;
#X connect 10 1 7 1;
#X connect 11 0 9 1;
#X connect 12 0 8 1;
#X restore 339 112 pd constrain mouse messages;
#N canvas 0 22 458 308 set 0;
#X obj 75 26 inlet;
#X obj 108 115 send \$0-xmax;
#X obj 19 115 send \$0-xmin;
#X obj 200 114 send \$0-ymin;
#X obj 291 114 send \$0-ymax;
#X obj 74 52 unpack float float float float;
#X connect 0 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 1 0;
#X connect 5 2 3 0;
#X connect 5 3 4 0;
#X restore 450 67 pd set xmin xmax ymin ymax;
#X text 530 26 xmin xmax ymin ymax;
#X msg 416 26 273 103 473 303;
#X obj 345 135 print HERE;
#X obj 39 60 toxy/tot .root;
#X obj 25 120 print RAW;
#X connect 0 0 32 0;
#X connect 1 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 6 1;
#X connect 4 0 6 1;
#X connect 5 0 6 0;
#X connect 5 1 1 0;
#X connect 5 1 27 0;
#X connect 5 1 33 0;
#X connect 5 2 2 0;
#X connect 6 0 8 0;
#X connect 7 0 0 0;
#X connect 8 0 9 0;
#X connect 8 1 10 0;
#X connect 9 1 12 0;
#X connect 10 0 19 0;
#X connect 10 1 11 0;
#X connect 11 0 14 0;
#X connect 11 1 17 0;
#X connect 12 0 13 0;
#X connect 13 0 16 0;
#X connect 14 0 15 0;
#X connect 15 0 25 0;
#X connect 16 0 26 0;
#X connect 17 0 18 0;
#X connect 18 0 15 0;
#X connect 19 0 20 0;
#X connect 20 0 15 0;
#X connect 21 0 22 0;
#X connect 23 0 24 0;
#X connect 27 0 31 0;
#X connect 30 0 28 0;
#X connect 32 2 5 0;
#X restore 177 248 pd tottest;
#X obj 272 103 cnv 15 200 200 empty empty empty 20 12 0 14 -233017
-66577 0;
#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 272 103 graph;
#X connect 4 0 11 0;
#X connect 5 0 6 0;
#X connect 7 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 11 1;
#X connect 12 0 13 0;
|
