blob: c2dbdf2cdcfb40068bcb61149c6319172599e426 (
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
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
|
max v2;
#N vpatcher 209 148 932 603;
#P origin 0 27;
#P user umenu 79 131 72 196647 1 64 147 1;
#X add bass.aif;
#X add beat.aif;
#X add fly.aif;
#X add plastic.aif;
#X add your_own...;
#N vpatcher 93 462 347 671;
#P message 59 102 28 196617 read;
#P newex 59 69 89 196617 route your_own...;
#N comlet popup comment in;
#P inlet 59 26 15 0;
#P newex 59 149 54 196617 s 1067path1;
#P newex 138 102 79 196617 sprintf read %s;
#P connect 2 0 3 0;
#P connect 3 0 4 0;
#P fasten 0 0 1 0 143 134 64 134;
#P connect 4 0 1 0;
#P connect 3 1 0 0;
#P pop;
#P hidden newobj 141 153 43 196617 p loader;
#P message 487 360 101 196617 vasp bufpol1 bufpol2;
#N vpatcher 40 55 218 175;
#P newex 45 79 61 196617 vasp.update;
#P newex 45 56 45 196617 vasp.= 0;
#N comlet vasp to clear in;
#P inlet 45 26 15 0;
#P connect 0 0 1 0;
#P connect 1 0 2 0;
#P pop;
#P newobj 487 380 78 196617 p clear_buffers;
#P hidden newex 589 336 54 196617 r 1067path1;
#P comment 52 133 26 196617 read;
#P newex 60 216 61 196617 vasp.update;
#N vpatcher 148 79 912 552;
#P origin 0 14;
#P user umenu 83 71 72 196647 1 64 87 1;
#X add bass.aif;
#X add beat.aif;
#X add fly.aif;
#X add plastic.aif;
#X add your_own...;
#N vpatcher 93 462 344 681;
#P message 59 102 28 196617 read;
#P newex 59 69 89 196617 route your_own...;
#N comlet popup comment in;
#P inlet 59 26 15 0;
#P newex 59 149 48 196617 s 1067path;
#P newex 138 102 79 196617 sprintf read %s;
#P connect 2 0 3 0;
#P connect 3 0 4 0;
#P connect 4 0 1 0;
#P fasten 0 0 1 0 143 134 64 134;
#P connect 3 1 0 0;
#P pop;
#P hidden newobj 145 89 43 196617 p loader;
#P message 521 380 101 196617 vasp bufpol3 bufpol4;
#N vpatcher 40 55 218 175;
#P newex 45 79 61 196617 vasp.update;
#P newex 45 56 45 196617 vasp.= 0;
#N comlet vasp to clear in;
#P inlet 45 26 15 0;
#P connect 0 0 1 0;
#P connect 1 0 2 0;
#P pop;
#P newobj 521 399 78 196617 p clear_buffers;
#P hidden newex 624 341 48 196617 r 1067path;
#P comment 56 72 26 196617 read;
#N vpatcher 40 55 418 371;
#P button 183 82 15 0;
#P newex 129 145 60 196617 prepend set;
#N comlet waveform~ mode messages;
#P inlet 129 121 15 0;
#P newex 259 64 27 196617 << 1;
#P newex 206 121 40 196617 change;
#P newex 206 145 107 196617 select 0 1 2;
#P newex 206 98 27 196617 |;
#P newex 47 121 40 196617 change;
#P outlet 129 252 15 0;
#P message 47 145 65 196617 constrain \$1;
#P newex 129 195 45 196617 loadbang;
#P newex 47 40 222 196617 pushkeys;
#P message 270 169 58 196617 mode move;
#P message 206 213 61 196617 mode select;
#P message 238 191 52 196617 mode loop;
#P connect 3 0 7 0;
#P connect 7 0 5 0;
#P connect 12 0 13 0;
#P fasten 2 0 6 0 275 243 134 243;
#P fasten 1 0 6 0 211 243 134 243;
#P fasten 0 0 6 0 243 243 134 243;
#P fasten 5 0 6 0 52 243 134 243;
#P connect 11 0 14 0;
#P connect 14 0 8 0;
#P connect 3 3 8 0;
#P connect 8 0 10 0;
#P connect 10 0 9 0;
#P connect 13 0 1 0;
#P connect 9 0 1 0;
#P connect 4 0 1 0;
#P connect 11 0 8 1;
#P connect 9 1 0 0;
#P connect 3 4 11 0;
#P connect 9 2 2 0;
#P pop;
#P hidden newobj 421 101 49 196617 p wfkeys;
#P hidden message 421 145 58 196617 set bufpol3;
#P hidden newex 421 121 45 196617 loadbang;
#P user waveform~ 421 163 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P message 380 400 27 196617 stop;
#P message 312 400 65 196617 startwindow;
#P newex 421 425 29 196617 dac~;
#P newex 421 375 30 196617 line~;
#P message 421 352 72 196617 0 \, 4000 4000;
#P newex 421 399 69 196617 play~ bufpol3;
#P newex 61 399 61 196617 vasp.freeze;
#P comment 119 294 190 196617 polar to cartesian coordinate conversion;
#P comment 178 238 81 196617 scale to 0 - 2¹;
#P comment 146 215 68 196617 random phase;
#P comment 130 184 116 196617 split amplitude and phase;
#P comment 130 157 193 196617 cartesian to polar coordinate conversion;
#P newex 624 399 105 196617 buffer~ bufpol4 4000;
#P newex 624 378 105 196617 buffer~ bufpol3 4000;
#P message 61 109 101 196617 vasp bufpol3 bufpol4;
#P newex 61 338 61 196617 vasp.update;
#P newex 61 315 52 196617 vasp.c!fft;
#P newex 61 292 51 196617 vasp.rect;
#P newex 61 269 58 196617 vasp.join 2;
#P newex 86 237 86 196617 vasp.* 3.141593;
#P newex 86 213 55 196617 vasp.noise;
#P newex 61 181 61 196617 vasp.split 2;
#P newex 61 155 55 196617 vasp.polar;
#P newex 61 133 49 196617 vasp.cfft;
#P comment 129 135 151 196617 complex fourier transmormation;
#P comment 56 31 193 196622 phase random_example;
#P comment 127 401 170 196617 is an abstraction that does the same;
#P connect 12 0 3 0;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P connect 5 0 8 0;
#P connect 8 0 9 0;
#P connect 9 0 10 0;
#P connect 10 0 11 0;
#P connect 5 1 6 0;
#P connect 6 0 7 0;
#P fasten 7 0 8 1 91 261 114 261;
#P hidden connect 36 1 35 0;
#P hidden connect 28 0 29 0;
#P hidden fasten 13 1 29 0 724 396 740 396 740 103 426 103;
#P hidden connect 30 0 27 0;
#P hidden connect 29 0 27 0;
#P connect 22 0 23 0;
#P connect 23 0 21 0;
#P connect 21 0 24 0;
#P fasten 26 0 24 0 385 420 426 420;
#P fasten 25 0 24 0 317 420 426 420;
#P connect 21 0 24 1;
#P connect 34 0 33 0;
#P hidden fasten 32 0 13 0 629 372 629 372;
#P pop;
#P newobj 60 380 115 196617 p phaserandom_example;
#P comment 173 258 173 196617 real-> amplitude / imaginary-> phase;
#P comment 173 174 179 196617 transform into real and imaginary part;
#P message 60 257 101 196617 vasp bufpol1 bufpol2;
#P message 60 173 101 196617 vasp bufpol1 bufpol2;
#P newex 60 277 55 196617 vasp.polar;
#N vpatcher 40 55 418 371;
#P button 183 82 15 0;
#P newex 129 145 60 196617 prepend set;
#N comlet waveform~ mode messages;
#P inlet 129 121 15 0;
#P newex 259 64 27 196617 << 1;
#P newex 206 121 40 196617 change;
#P newex 206 145 107 196617 select 0 1 2;
#P newex 206 98 27 196617 |;
#P newex 47 121 40 196617 change;
#P outlet 129 252 15 0;
#P message 47 145 65 196617 constrain \$1;
#P newex 129 195 45 196617 loadbang;
#P newex 47 40 222 196617 pushkeys;
#P message 270 169 58 196617 mode move;
#P message 206 213 61 196617 mode select;
#P message 238 191 52 196617 mode loop;
#P connect 3 0 7 0;
#P connect 7 0 5 0;
#P connect 12 0 13 0;
#P fasten 5 0 6 0 52 243 134 243;
#P fasten 0 0 6 0 243 243 134 243;
#P fasten 1 0 6 0 211 243 134 243;
#P fasten 2 0 6 0 275 243 134 243;
#P connect 11 0 14 0;
#P connect 3 3 8 0;
#P connect 14 0 8 0;
#P connect 8 0 10 0;
#P connect 10 0 9 0;
#P connect 4 0 1 0;
#P connect 9 0 1 0;
#P connect 13 0 1 0;
#P connect 11 0 8 1;
#P connect 9 1 0 0;
#P connect 3 4 11 0;
#P connect 9 2 2 0;
#P pop;
#P hidden newobj 382 43 49 196617 p wfkeys;
#P comment 607 215 86 196617 phase / imaginary;
#P hidden message 382 209 58 196617 set bufpol2;
#P user waveform~ 382 230 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P newex 589 380 105 196617 buffer~ bufpol2 2000;
#P hidden message 382 87 58 196617 set bufpol1;
#P hidden newex 382 63 45 196617 loadbang;
#P user waveform~ 382 105 312 99 3 9;
#W mode select;
#W mouseoutput continuous;
#W unit ms;
#W grid 1000.;
#W ticks 8.;
#W labels 1;
#W vlabels 1;
#W vticks 1;
#W vzoom 1.;
#W voffset 0.;
#W bpm 120. 4.;
#W frgb 0 0 0;
#W brgb 255 255 255;
#W rgb2 132 132 132;
#W rgb3 0 0 0;
#W rgb4 0 0 0;
#W rgb5 255 255 255;
#W rgb6 100 100 100;
#W rgb7 100 100 100;
#P newex 60 193 49 196617 vasp.cfft;
#P newex 60 304 61 196617 vasp.update;
#P newex 589 359 105 196617 buffer~ bufpol1 2000;
#P comment 52 59 192 196617 cartesian to polar coordinate conversion;
#P comment 52 36 89 196622 vasp.polar;
#P comment 617 90 78 196617 amplitude / real;
#P connect 15 0 5 0;
#P connect 5 0 20 0;
#P connect 16 0 14 0;
#P connect 14 0 4 0;
#P hidden connect 26 1 25 0;
#P hidden connect 7 0 8 0;
#P hidden fasten 3 1 8 0 689 377 699 377 699 82 387 82;
#P hidden connect 13 0 6 0;
#P hidden connect 8 0 6 0;
#P hidden fasten 7 0 11 0 387 68 387 68;
#P hidden connect 13 0 10 0;
#P hidden connect 11 0 10 0;
#P connect 24 0 23 0;
#P hidden connect 22 0 3 0;
#P pop;
|
