aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/xsample/pd/xgroove~.pd
blob: 039066257731b6b8064525928ce687f7171176c7 (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
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
#N canvas 69 62 945 610 12;
#X obj 215 253 hsl 128 15 0.001 3 1 1 empty empty speed 0 -8 0 10 -225271
-1 -1 5000 1;
#X msg 603 169 loop \$1;
#X obj 28 72 bng 15 250 50 0 empty empty empty 20 8 0 8 -258699 -1
-1;
#X msg 27 92 stop;
#N canvas 0 0 450 300 graph7 0;
#X array \$0-buf 10000 float 0;
#X coords 0 1 9999 -1 300 150 1;
#X restore 573 269 graph;
#X obj 17 556 dac~;
#X msg 120 73 reset;
#X text 299 321 min/max points;
#X text 50 69 start;
#X text 67 90 stop;
#X msg 119 99 help;
#X text 280 269 (float or signal);
#X msg 749 167 interp \$1;
#X msg 237 305 all;
#X text 747 94 interpolation;
#X text 622 116 once;
#X text 768 116 none;
#X text 768 148 linear;
#X text 224 75 units;
#X msg 225 163 units \$1;
#X msg 358 163 sclmode \$1;
#X text 244 127 ms;
#X text 244 142 s;
#X text 377 127 buffer;
#X text 377 142 loop;
#X obj 487 208 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1
-1;
#X obj 335 349 print A;
#N canvas 0 0 450 300 graph2 0;
#X array \$0-scp 300 float 0;
#X coords 0 1 299 -1 300 100 1;
#X restore 573 447 graph;
#X obj 26 525 *~;
#X obj 82 491 hsl 128 15 0.0001 1 1 0 empty empty volume -2 -6 0 8
-261689 -1 -1 0 1;
#X obj 79 509 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0
10 -261689 -1 -1 0.0001 256;
#X msg 25 249 pos \$1;
#X msg 63 220 200;
#X msg 25 221 100;
#X obj 507 209 nbx 5 14 0 1e+037 0 1 empty empty frq 0 -6 0 10 -228992
-1 -1 220 256;
#N canvas 19 334 427 333 loopzone 0;
#X msg 28 84 xzone \$1;
#X obj 31 43 hsl 128 15 0 300 0 0 empty empty empty -2 -6 0 8 -262131
-1 -1 0 1;
#X floatatom 28 64 5 0 0 0 - - -;
#X msg 203 207 xfade \$1;
#X obj 203 142 vdl 15 0 0 4 empty empty empty 0 -6 0 8 -262144 -1 -1
0;
#X text 202 123 loop zone mode;
#X text 222 141 keep loop pos;
#X text 222 157 keep loop length;
#X text 222 173 keep fade length;
#X msg 47 205 xshape \$1;
#X obj 48 155 vdl 15 0 0 3 empty empty empty 0 -6 0 8 -262144 -1 -1
0;
#X text 45 133 fade zone shape;
#X text 67 152 linear;
#X text 67 168 quarter sine;
#X text 67 184 half sine;
#X text 125 67 length of the loop zone;
#X text 123 84 (in units);
#X text 222 188 zone inside loop;
#X text 21 9 xgroove~ crossfading loop zone;
#X obj 27 255 s to-g;
#X connect 0 0 19 0;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 3 0 19 0;
#X connect 4 0 3 0;
#X connect 9 0 19 0;
#X connect 10 0 9 0;
#X restore 23 414 pd loopzone;
#X text 64 147 set buffer;
#X text 23 383 settings for;
#X text 22 395 cross-fading loop zone;
#X text 399 349 print attributes;
#X obj 357 394 bng 15 250 50 0 empty empty loop_bang 0 -6 0 8 -262131
-1 -1;
#X text 357 60 scale mode;
#X text 354 75 (pos message and position outlet);
#X text 622 148 bidirectional;
#X text 244 111 buffer size;
#X obj 574 419 hsl 300 15 0 10000 0 0 empty bufpos empty -2 -6 0 8
-262144 -1 -1 10628 1;
#X obj 236 527 nbx 5 14 -1e+037 1e+037 0 0 empty empty position 0 -6
0 10 -228992 -1 -1 3554.44 256;
#N canvas 0 0 474 324 watch 0;
#X obj 163 18 loadbang;
#X obj 88 80 snapshot~;
#X obj 164 44 metro 50;
#X obj 143 109 s bufpos;
#X obj 176 196 outlet;
#X obj 22 14 inlet~;
#X obj 88 14 inlet~;
#X obj 22 196 tabwrite~ \$0-scp;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 1 0 4 0;
#X connect 1 0 7 0;
#X connect 2 0 1 0;
#X connect 2 0 7 0;
#X connect 5 0 7 0;
#X connect 6 0 1 0;
#X restore 235 492 pd watch;
#X text 377 111 units in loop;
#N canvas 97 34 266 202 genosc 0;
#X obj 38 29 inlet;
#X obj 64 94 osc~ 1000;
#X obj 38 54 route bang;
#X obj 37 134 tabwrite~ \$0-buf;
#X obj 158 94 loadbang;
#X connect 0 0 2 0;
#X connect 1 0 3 0;
#X connect 2 0 3 0;
#X connect 2 1 1 0;
#X connect 4 0 3 0;
#X restore 487 229 pd genosc;
#X text 600 97 loop mode;
#X text 23 201 set position;
#X obj 299 426 nbx 5 14 0 1e+037 0 1 empty empty min 0 -6 0 10 -262131
-1 -1 1004 256;
#X obj 356 426 nbx 5 14 0 1e+037 0 1 empty empty max 0 -6 0 10 -262131
-1 -1 8996 256;
#X obj 298 309 nbx 5 14 0 1e+037 0 1 empty empty min 0 -6 0 10 -225271
-1 -1 1004 256;
#X obj 355 309 nbx 5 14 0 1e+037 0 1 empty empty max 0 -6 0 10 -225271
-1 -1 8996 256;
#X text 244 95 frames (def.);
#X text 377 96 units in buffer (def.);
#X text 622 132 forward (def.);
#X text 768 132 4-point (def.);
#N canvas 12 194 490 407 attributes 0;
#X msg 82 74 getattributes;
#X msg 138 133 getmax;
#X msg 81 133 getmin;
#X text 198 75 dump all attributes;
#X text 200 135 get min/max positions;
#X msg 82 105 getbuffer;
#X msg 80 162 getpos;
#X text 140 162 get current position;
#X text 167 105 get buffer name;
#X msg 79 251 getloop;
#X msg 79 276 getinterp;
#X text 147 251 get loop mode;
#X text 160 276 get interpolation mode;
#X msg 79 197 getunits;
#X text 152 197 get unit setting;
#X msg 79 222 getsclmode;
#X text 170 222 get scale mode;
#X msg 79 315 getxfade;
#X msg 78 365 getxshape;
#X text 157 315 get crossfade mode;
#X msg 79 340 getxzone;
#X text 154 340 get crossfade length;
#X text 156 367 get crossfade shape;
#X text 19 12 xgroove~ attributes;
#X obj 19 195 s to-g;
#X msg 82 49 getmethods;
#X text 174 49 dump all methods;
#X connect 0 0 24 0;
#X connect 1 0 24 0;
#X connect 2 0 24 0;
#X connect 5 0 24 0;
#X connect 6 0 24 0;
#X connect 9 0 24 0;
#X connect 10 0 24 0;
#X connect 13 0 24 0;
#X connect 15 0 24 0;
#X connect 17 0 24 0;
#X connect 18 0 24 0;
#X connect 20 0 24 0;
#X connect 25 0 24 0;
#X restore 24 343 pd attributes;
#X text 23 324 attribute stuff;
#X text 484 177 generate;
#X obj 26 10 cnv 15 850 40 empty empty xgroove~ 10 22 0 24 -260818
-1 0;
#X msg 105 221 1000;
#X msg 96 249 posmod \$1;
#X text 146 227 modulo;
#X text 301 439 min/max points;
#X text 299 454 (sample rounded);
#X obj 603 120 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -225271 -1
-1 0;
#X obj 749 119 vradio 15 1 0 3 empty empty empty 0 -6 0 8 -225271 -1
-1 0;
#X obj 225 99 vradio 15 1 0 4 empty empty empty 0 -6 0 8 -225271 -1
-1 0;
#X obj 358 99 vradio 15 1 0 4 empty empty empty 0 -6 0 8 -225271 -1
-1 0;
#X obj 65 164 s to-g;
#X obj 298 197 s to-g;
#X obj 61 278 s to-g;
#X obj 180 304 r to-g;
#X obj 704 201 s to-g;
#X obj 191 349 xgroove~ \$0-buf;
#X text 227 29 http://grrrr.org/ext;
#X obj 79 550 line~;
#X msg 79 527 \$1 50;
#X obj 212 271 nbx 5 14 -1e+037 1e+037 0 0 empty empty empty 0 -6 0
10 -225271 -1 -1 0.0233854 256;
#X text 227 10 varispeed sample player \, (C)2001-2005 Thomas Grill
;
#X connect 0 0 82 0;
#X connect 1 0 77 0;
#X connect 2 0 73 0;
#X connect 3 0 73 0;
#X connect 6 0 73 0;
#X connect 10 0 73 0;
#X connect 12 0 77 0;
#X connect 13 0 78 0;
#X connect 19 0 74 0;
#X connect 20 0 74 0;
#X connect 25 0 49 0;
#X connect 28 0 5 0;
#X connect 28 0 5 1;
#X connect 29 0 30 0;
#X connect 30 0 81 0;
#X connect 31 0 75 0;
#X connect 32 0 31 0;
#X connect 33 0 31 0;
#X connect 34 0 49 0;
#X connect 47 0 46 0;
#X connect 54 0 78 1;
#X connect 55 0 78 2;
#X connect 64 0 65 0;
#X connect 65 0 75 0;
#X connect 69 0 1 0;
#X connect 70 0 12 0;
#X connect 71 0 19 0;
#X connect 72 0 20 0;
#X connect 76 0 78 0;
#X connect 78 0 28 0;
#X connect 78 0 47 0;
#X connect 78 1 47 1;
#X connect 78 2 52 0;
#X connect 78 3 53 0;
#X connect 78 4 40 0;
#X connect 78 5 26 0;
#X connect 80 0 28 1;
#X connect 81 0 80 0;
#X connect 82 0 78 0;