aboutsummaryrefslogtreecommitdiff
path: root/control/rrad.shuffler.pd
blob: ccb52d4980807a989a89a76d2b233be495f13b30 (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
#N canvas 403 530 252 92 10;
#X obj 2 14 cnv 15 247 75 empty \$0-background-cnv empty 20 12 1 14
-195568 -66577 0;
#X obj 253 0 inlet;
#X obj 432 0 inlet OSC;
#N canvas 183 51 981 424 saves 0;
#X obj 45 160 originator \$1 \$0;
#X obj 152 132 inlet OSC;
#X obj 47 55 r \$0-substate;
#X obj 15 13 inlet substate;
#X obj 15 35 route substate;
#X obj 159 55 r \$0-copy;
#X msg 159 76 copy;
#X obj 243 50 r \$0-paste;
#X msg 241 71 paste;
#X text 154 15 This is the originator \, including some ready to use
standard functionality.;
#X text 502 42 Put your commun sends here \, if you like.;
#X msg 15 91 setsub \$1;
#X msg 249 184 svdir \$1;
#X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 250 163 savepanel;
#X obj 152 189 outlet OSC;
#X msg 108 214 svxdir /tmp/svdir.xml;
#X msg 78 241 ldxdir /tmp/svdir.xml;
#X obj 482 109 commun /bpm \$0;
#X obj 606 110 commun /s \$0;
#X obj 741 106 commun /rand \$0;
#X obj 741 82 r \$0-random-value;
#X obj 740 131 s \$0-random-value;
#X obj 606 86 r \$0-shuffle-value;
#X obj 606 133 s \$0-shuffle-value;
#X obj 482 85 r \$0-bpm;
#X obj 482 134 s \$0-bpm;
#X obj 486 185 r \$0-resolution;
#X obj 486 234 s \$0-resolution;
#X obj 486 209 commun /resol \$0;
#X obj 612 215 commun /play \$0;
#X obj 612 191 r \$0-play;
#X obj 612 240 s \$0-play;
#X connect 0 2 15 0;
#X connect 1 0 0 1;
#X connect 2 0 11 0;
#X connect 3 0 4 0;
#X connect 4 0 11 0;
#X connect 4 1 0 0;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 7 0 8 0;
#X connect 8 0 0 0;
#X connect 11 0 0 0;
#X connect 12 0 0 0;
#X connect 13 0 14 0;
#X connect 14 0 12 0;
#X connect 16 0 0 0;
#X connect 17 0 0 0;
#X connect 18 0 26 0;
#X connect 19 0 24 0;
#X connect 20 0 22 0;
#X connect 21 0 20 0;
#X connect 23 0 19 0;
#X connect 25 0 18 0;
#X connect 27 0 29 0;
#X connect 29 0 28 0;
#X connect 30 0 32 0;
#X connect 31 0 30 0;
#X restore 370 -1 pd saves;
#N canvas 569 61 450 300 cnv.ctl 0;
#X obj 90 188 s \$0-background-cnv;
#X floatatom 108 59 5 100 1000 0 width - -;
#X floatatom 112 83 4 50 500 0 height - -;
#X obj 92 132 pack 0 0;
#X msg 92 159 vis_size \$1 \$2;
#X obj 110 106 t b f;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 3 0;
#X connect 5 1 3 1;
#X restore 295 -1 pd cnv.ctl;
#X obj 253 69 outlet;
#X text 183 -1 look! ==>;
#X obj 370 20 outlet OSC;
#X obj 335 39 inlet;
#X obj 6 24 cnv 15 105 60 empty empty shuffle 10 12 0 10 -233017 -66577
0;
#X obj 68 54 nbx 3 12 0 100 0 0 \$0-shuffle-value \$0-shuffle-value
s 0 -6 1 10 -195568 -1 -1 18 256;
#X obj 16 54 nbx 4 12 0 1e+37 0 0 \$0-random-value \$0-random-value
rand 0 -6 1 10 -195568 -1 -1 18 256;
#X obj 164 62 bng 15 250 50 0 \$0-copy empty copy 0 -6 0 8 -225271
-1 -1;
#X obj 193 62 bng 15 250 50 0 \$0-paste empty paste 0 -6 0 8 -257472
-1 -1;
#X obj 200 30 cnv 15 45 15 empty \$0-resolution-show 1/4 1 8 0 10 -233017
-66577 0;
#N canvas 586 27 377 256 tempomap 0;
#X obj 30 11 inlet;
#X obj 95 164 outlet;
#X obj 75 13 r \$0-resolution;
#X obj 30 116 nroute b1 1;
#X obj 76 71 makefilename b%d;
#X msg 76 95 \$1;
#X obj 30 140 unpack s 0;
#X obj 75 52 expr pow(2 \, $f1);
#X obj 75 32 int;
#X obj 187 125 makefilename 1/%d;
#X obj 210 176 symbol \$0-resolution-show;
#X obj 209 152 loadbang;
#X obj 159 197 pack s s;
#X msg 158 217 \; \$2 label \$1;
#X connect 0 0 3 0;
#X connect 2 0 8 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 3 1;
#X connect 6 1 1 0;
#X connect 7 0 4 0;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X connect 9 0 12 0;
#X connect 10 0 12 1;
#X connect 11 0 10 0;
#X connect 12 0 13 0;
#X restore 253 23 pd tempomap;
#N canvas 45 266 651 594 shuffle 0;
#X obj 73 107 mod 2;
#X obj 73 128 select 0 1;
#X obj 82 315 f;
#X obj 41 315 f;
#X obj 55 369 outlet;
#X obj 260 171 random 10;
#X obj 260 202 * 0.001;
#X obj 333 172 * 0.001;
#X obj 96 239 delay 0;
#X obj 164 277 delay 0;
#X obj 155 18 r \$0-shuffle-value;
#X obj 333 130 r \$0-random-value;
#X obj 46 67 inlet;
#X obj 414 176 > 0;
#X obj 260 225 spigot;
#X obj 415 210 select 0;
#X msg 415 233 0;
#X obj 244 250 + 0;
#X obj 305 5 r \$0-bpm;
#X obj 305 29 select 0;
#X msg 305 51 120;
#X obj 401 19 r \$0-resolution;
#X obj 401 40 select 0;
#X msg 401 62 1;
#X obj 153 69 clip 0 100;
#X obj 452 63 int;
#X obj 305 75 expr 60000/$f1;
#X obj 452 84 expr 1/pow(2 \, $f1);
#X obj 479 140 *;
#X obj 153 96 * 0.01;
#X obj 228 132 *;
#X obj 473 108 t b b f;
#X obj 228 92 f 0;
#X floatatom 271 283 5 0 0 0 - - -;
#X obj 292 114 t b;
#X msg 191 243 0;
#X obj 247 377 t b;
#X msg 244 400 0;
#X obj 64 346 spigot;
#X obj 128 336 r \$0-play;
#X obj 142 442 s \$0-play;
#X msg 141 422 1;
#X obj 142 393 loadbang;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 1 1 5 0;
#X connect 1 1 9 0;
#X connect 2 0 38 0;
#X connect 3 0 38 0;
#X connect 5 0 6 0;
#X connect 6 0 14 0;
#X connect 7 0 6 1;
#X connect 8 0 3 0;
#X connect 9 0 2 0;
#X connect 10 0 24 0;
#X connect 11 0 7 0;
#X connect 11 0 13 0;
#X connect 12 0 0 0;
#X connect 12 0 2 1;
#X connect 12 0 3 1;
#X connect 13 0 14 1;
#X connect 13 0 15 0;
#X connect 14 0 17 1;
#X connect 15 0 16 0;
#X connect 16 0 17 1;
#X connect 17 0 33 0;
#X connect 17 0 9 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 19 1 26 0;
#X connect 20 0 26 0;
#X connect 21 0 22 0;
#X connect 22 0 23 0;
#X connect 22 1 25 0;
#X connect 23 0 31 0;
#X connect 24 0 29 0;
#X connect 25 0 27 0;
#X connect 26 0 28 0;
#X connect 26 0 34 0;
#X connect 27 0 31 0;
#X connect 28 0 30 1;
#X connect 29 0 30 0;
#X connect 29 0 32 1;
#X connect 30 0 17 0;
#X connect 31 0 32 0;
#X connect 31 1 28 0;
#X connect 31 2 28 1;
#X connect 32 0 30 0;
#X connect 34 0 32 0;
#X connect 35 0 9 1;
#X connect 35 0 8 1;
#X connect 36 0 37 0;
#X connect 37 0 9 1;
#X connect 38 0 4 0;
#X connect 39 0 38 1;
#X connect 41 0 40 0;
#X connect 42 0 41 0;
#X restore 253 47 pd shuffle;
#X obj 118 63 nbx 4 14 0 400 0 0 \$0-bpm \$0-bpm bpm 0 -6 0 8 -233017
-1 -1 120 256;
#X obj 118 31 hradio 13 1 0 6 \$0-resolution \$0-resolution resol 0
-6 0 8 -128992 -143491 -1 2;
#X obj 225 62 tgl 15 0 \$0-play \$0-play play 0 -6 0 8 -24198 -1 -1
1 1;
#X connect 1 0 15 0;
#X connect 2 0 3 1;
#X connect 3 0 7 0;
#X connect 8 0 3 0;
#X connect 15 0 16 0;
#X connect 16 0 5 0;
#X coords 0 0 1 1 250 90 1;