blob: 23d44f30e7da58796496b784ebe1843c92f91654 (
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
|
max v2;
#N vpatcher 176 110 856 641;
#P origin 0 8;
#P message 434 416 131 196617 vasp bufcnorm1 bufcnorm2;
#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 434 483 78 196617 p clear_buffers;
#P hidden newex 519 440 54 196617 r #01path;
#P user umenu 89 115 72 196647 1 64 131 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 54 196617 s #01path;
#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 connect 5 0 2 0;
#P fasten 1 0 2 0 143 134 64 134;
#P connect 4 1 1 0;
#P pop;
#P hidden newobj 151 140 43 196617 p loader;
#P newex 62 368 63 196617 vasp.* 0.05;
#P comment 195 240 101 196617 set all samples to 1;
#P newex 62 288 61 196617 vasp.update;
#P message 62 239 131 196617 vasp bufcnorm1 bufcnorm2;
#P newex 62 263 60 196617 vasp.cnorm;
#P comment 194 324 72 196617 inverse cfft;
#P newex 62 392 61 196617 vasp.update;
#P message 62 323 131 196617 vasp bufcnorm1 bufcnorm2;
#P newex 62 344 52 196617 vasp.c!fft;
#P comment 612 327 42 196617 44.1kHz;
#P comment 326 328 35 196617 0 Hz;
#P newex 62 207 61 196617 vasp.update;
#P comment 590 210 49 196617 imaginary;
#P message 62 158 131 196617 vasp bufcnorm1 bufcnorm2;
#P newex 62 179 49 196617 vasp.cfft;
#P hidden message 327 207 73 196617 set bufcnorm2;
#P user waveform~ 327 225 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 519 483 120 196617 buffer~ bufcnorm2 4000;
#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 327 42 49 196617 p wfkeys;
#P message 286 465 27 196617 stop;
#P message 218 465 65 196617 startwindow;
#P newex 327 484 29 196617 dac~;
#P newex 327 439 30 196617 line~;
#P message 327 416 72 196617 0 \, 4000 4000;
#P newex 327 465 84 196617 play~ bufcnorm1;
#P hidden message 327 85 73 196617 set bufcnorm1;
#P hidden newex 327 64 45 196617 loadbang;
#P user waveform~ 327 104 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 519 464 120 196617 buffer~ bufcnorm1 4000;
#P comment 58 69 218 196617 sets complex radius of samples to unity;
#P comment 58 47 89 196622 vasp.cnorm;
#P comment 58 84 105 196617 needs two buffers;
#P comment 616 90 26 196617 real;
#P comment 194 159 26 196617 cfft;
#P comment 469 326 35 196617 sr/2;
#P comment 127 370 172 196617 reduce gain (safe your loudspeakers);
#P comment 64 117 25 196617 read;
#P connect 23 0 22 0;
#P connect 22 0 25 0;
#P connect 33 0 32 0;
#P connect 32 0 34 0;
#P connect 29 0 28 0;
#P connect 28 0 36 0;
#P connect 36 0 30 0;
#P hidden connect 38 1 37 0;
#P hidden connect 10 0 11 0;
#P hidden fasten 8 1 11 0 634 481 655 481 655 84;
#P hidden connect 18 0 9 0;
#P hidden connect 11 0 9 0;
#P hidden fasten 10 0 21 0 332 207 332 207;
#P hidden fasten 18 0 20 0 332 100 332 100;
#P hidden connect 21 0 20 0;
#P connect 13 0 14 0;
#P connect 14 0 12 0;
#P connect 12 0 15 0;
#P fasten 16 0 15 0 223 484 332 484;
#P fasten 17 0 15 0 291 484 332 484;
#P connect 12 0 15 1;
#P connect 41 0 40 0;
#P hidden connect 39 0 8 0;
#P hidden fasten 20 5 9 4 632 327 650 327 650 101 632 101;
#P hidden connect 9 5 20 4;
#P pop;
|