blob: 0e49d689a1bfdcbd22e51882ec3bc943c1fb95f9 (
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
|
max v2;
#N vpatcher 180 75 870 686;
#P message 437 500 135 196617 vasp bufrmax?1 bufrmax?2;
#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 437 542 78 196617 p clear_buffers;
#P newex 59 452 61 196617 vasp.update;
#P newex 59 210 61 196617 vasp.update;
#P hidden newex 535 500 48 196617 r 1155path;
#P user umenu 78 127 72 196647 1 64 143 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 631 722;
#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 1155path;
#P newex 138 102 79 196617 sprintf read %s;
#P user umenu 48 169 100 196647 1 64 185 1;
#X add drums.aif;
#X add voice.aif;
#X add test.aif;
#X add read a soundfile;
#P connect 3 0 4 0;
#P connect 4 0 5 0;
#P fasten 1 0 2 0 143 134 64 134;
#P connect 5 0 2 0;
#P connect 4 1 1 0;
#P pop;
#P hidden newobj 140 149 43 196617 p loader;
#P comment 52 129 26 196617 read;
#P comment 46 90 137 196617 needs two vectors;
#P newex 59 430 52 196617 vasp.c!fft;
#P message 59 409 135 196617 vasp bufrmax?1 bufrmax?2;
#P newex 59 189 49 196617 vasp.cfft;
#P message 59 167 135 196617 vasp bufrmax?1 bufrmax?2;
#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 344 97 49 196617 p wfkeys;
#P hidden message 344 278 75 196617 set bufrmax?2;
#P user waveform~ 344 299 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 534 542 122 196617 buffer~ bufrmax?2 2000;
#P flonum 92 321 68 9 0 0 160 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P comment 46 60 286 196617 maximum of the radius values of a complex vasp;
#P message 59 293 135 196617 vasp bufrmax?1 bufrmax?2;
#P newex 59 350 43 196617 vasp.c/;
#P newex 59 372 61 196617 vasp.update;
#P newex 58 522 51 196617 vasp.ropt;
#P message 58 498 135 196617 vasp bufrmax?1 bufrmax?2;
#P newex 59 260 62 196617 vasp.rmax?;
#P hidden message 344 145 75 196617 set bufrmax?1;
#P hidden newex 344 118 45 196617 loadbang;
#P user waveform~ 344 166 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 291 542 27 196617 stop;
#P message 224 542 65 196617 startwindow;
#P newex 344 520 30 196617 line~;
#P message 344 500 72 196617 0 \, 2000 2000;
#P newex 344 568 29 196617 dac~;
#P newex 344 542 85 196617 play~ bufrmax?1;
#P newex 58 542 61 196617 vasp.update;
#P message 59 241 135 196617 vasp bufrmax?1 bufrmax?2;
#P newex 534 521 122 196617 buffer~ bufrmax?1 2000;
#P comment 163 322 141 196617 -> current maximum;
#P comment 106 351 181 196617 use the maximum to optimize radius;
#P comment 52 482 179 196617 or use vasp.ropt which does the same;
#P comment 46 37 92 196622 vasp.rmax?;
#P comment 46 75 137 196617 right outlet: calculated value;
#P connect 18 0 19 0;
#P connect 19 0 7 0;
#P connect 29 0 30 0;
#P connect 30 0 38 0;
#P connect 6 0 17 0;
#P connect 22 0 21 0;
#P connect 21 0 20 0;
#P connect 31 0 32 0;
#P connect 32 0 39 0;
#P fasten 17 1 24 0 116 283 200 283 200 314 97 314;
#P connect 24 0 21 1;
#P hidden connect 36 1 35 0;
#P hidden connect 15 0 16 0;
#P hidden fasten 5 1 16 0 651 540 662 540 662 139 349 139;
#P hidden connect 28 0 14 0;
#P hidden connect 16 0 14 0;
#P hidden fasten 25 1 27 0 651 561 662 561 662 272 349 272;
#P hidden connect 15 0 27 0;
#P hidden connect 27 0 26 0;
#P hidden connect 28 0 26 0;
#P connect 10 0 11 0;
#P connect 11 0 8 0;
#P fasten 12 0 9 0 229 562 349 562;
#P fasten 13 0 9 0 296 562 349 562;
#P connect 8 0 9 0;
#P connect 8 0 9 1;
#P connect 41 0 40 0;
#P hidden connect 37 0 5 0;
#P pop;
|
