blob: c383ddde41fd4b2431196497d03667dfe71ee01b (
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
|
#N canvas 1 53 567 455 12;
#X declare -lib mapping -lib ggee;
#X obj 418 32 import mapping ggee;
#X obj 5 2 cnv 15 550 20 empty empty cubic_seat 2 11 1 18 -233017 -66577
0;
#X msg 516 2 pddp;
#X text 313 393 released under the GNU GPL;
#X text 263 356 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 168 167 hsl 50 15 0 1 0 1 \$0-y-slider \$0-y-slider-receive
y 5 9 0 11 -204800 -1 -1 2720 0;
#X floatatom 175 186 7 0 0 0 - - -;
#X obj 362 356 pddp/open mapping-about;
#X text 0 393 (C) Copyright 2007 Free Software Foundation;
#X obj 74 167 hsl 50 15 0 1 0 1 \$0-x-slider \$0-x-slider-receive x
5 9 0 11 -232576 -1 -1 1984 0;
#X floatatom 80 187 7 0 0 0 - - -;
#X text 6 33 This object curves the input range using cubic curves
that meet at the specified point \, forming a seat.;
#X obj 35 247 cubic_seat;
#N canvas 273 69 478 411 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 cubic_seat;
#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 16 1 18 2;
#X connect 17 0 1 0;
#X connect 18 0 8 0;
#X restore 409 71 pd draw_array;
#X obj 304 103 gcanvas 200 200;
#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 304 103 graph;
#X obj 304 308 send \$0-x;
#X obj 446 307 send \$0-y;
#N canvas 473 250 494 344 META 0;
#X text 12 185 HELP_PATCH_AUTHORS "pd meta" information added by Jonathan
Wilkes for Pd version 0.42.;
#X text 12 25 LICENSE GPL v2;
#X text 12 105 INLET_1 float;
#X text 12 145 OUTLET_0 float;
#X text 12 165 AUTHOR Cyrille Henry and Hans-Christoph Steiner;
#X text 12 85 INLET_0 float;
#X text 12 5 KEYWORDS control abstraction;
#X text 12 125 INLET_2 float;
#X text 12 45 DESCRIPTION curve the input range using cubic curves
that meet at the specified point \, forming a seat.;
#X restore 506 418 pd META;
#X connect 5 0 16 0;
#X connect 6 0 7 0;
#X connect 8 0 5 0;
#X connect 9 0 10 0;
#X connect 9 0 16 2;
#X connect 13 0 14 0;
#X connect 13 0 16 1;
#X connect 16 0 6 0;
#X connect 18 0 20 0;
#X connect 18 1 21 0;
|
