blob: d008f65c5fd002c1ff33dd22437853cd88c0e3dd (
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
|
max v2;
#N vpatcher 218 95 852 551;
#P hidden newex 507 347 48 196617 r 1141path;
#P user umenu 63 136 72 196647 1 64 152 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 1141path;
#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 125 158 43 196617 p loader;
#P message 353 344 125 196617 vasp bufcpowi1 bufcpowi2;
#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 353 392 73 196617 p clear_buffer;
#P comment 38 61 151 196617 complex integer power function;
#P comment 38 113 132 196617 argument: exponent (int);
#P newex 44 392 61 196617 vasp.update;
#P message 44 253 125 196617 vasp bufcpowi1 bufcpowi2;
#P message 228 392 27 196617 stop;
#P message 160 392 65 196617 startwindow;
#P newex 269 419 29 196617 dac~;
#P newex 269 367 30 196617 line~;
#P message 269 344 72 196617 0 \, 8000 8000;
#P newex 269 392 82 196617 play~ bufcpowi1;
#P hidden message 269 198 71 196617 set bufcpowi2;
#P user waveform~ 269 216 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 466 392 118 196617 buffer~ bufcpowi2 8000;
#P newex 44 370 45 196617 vasp.opt;
#P message 44 325 125 196617 vasp bufcpowi1 bufcpowi2;
#P newex 44 346 52 196617 vasp.c!fft;
#P comment 38 77 93 196617 complex sample^n;
#P newex 44 273 65 196617 vasp.cpowi 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 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 269 31 49 196617 p wfkeys;
#P hidden message 269 76 71 196617 set bufcpowi1;
#P hidden newex 269 50 45 196617 loadbang;
#P user waveform~ 269 97 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 44 223 61 196617 vasp.update;
#P newex 44 295 61 196617 vasp.update;
#P message 44 177 125 196617 vasp bufcpowi1 bufcpowi2;
#P newex 466 371 118 196617 buffer~ bufcpowi1 8000;
#P newex 44 199 49 196617 vasp.cfft;
#P comment 38 34 89 196622 vasp.cpowi;
#P comment 38 95 100 196617 needs two vectors;
#P comment 38 137 33 196617 read;
#P connect 5 0 3 0;
#P connect 3 0 7 0;
#P connect 26 0 12 0;
#P connect 12 0 6 0;
#P connect 15 0 14 0;
#P connect 14 0 16 0;
#P connect 16 0 27 0;
#P hidden connect 33 1 32 0;
#P hidden connect 9 0 10 0;
#P hidden fasten 4 1 10 0 579 390 597 390 597 72 274 72;
#P hidden connect 11 0 8 0;
#P hidden connect 10 0 8 0;
#P hidden connect 9 0 19 0;
#P hidden connect 19 0 18 0;
#P connect 21 0 22 0;
#P connect 22 0 20 0;
#P fasten 25 0 23 0 233 412 274 412;
#P fasten 24 0 23 0 165 412 274 412;
#P connect 20 0 23 0;
#P connect 20 0 23 1;
#P connect 31 0 30 0;
#P hidden connect 34 0 4 0;
#P pop;
|