blob: 0af86d39817982f03741f8b59adc6ff3f762fb30 (
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
|
max v2;
#N vpatcher 282 124 678 511;
#P hidden message 324 118 22 196617 set;
#P hidden newex 324 92 45 196617 loadbang;
#N vpatcher 116 168 848 567;
#P message 515 334 85 196617 vasp bufn1 bufn2;
#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 515 355 73 196617 p clear_buffer;
#P hidden newex 707 332 48 196617 r 1048path;
#P user umenu 88 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 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 1048path;
#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 150 93 43 196617 p loader;
#P newex 58 158 61 196617 vasp.update;
#P comment 155 190 157 196617 clear imaginary part of soundfile (vector with index 1);
#P message 58 191 85 196617 vasp bufn1 bufn2;
#P newex 58 238 45 196617 vasp.= 0;
#P newex 58 213 45 196617 vasp.n 1;
#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 389 41 49 196617 p wfkeys;
#P comment 574 212 127 196617 imaginary part of soundfile;
#P message 58 115 85 196617 vasp bufn1 bufn2;
#P hidden message 389 206 50 196617 set bufn2;
#P user waveform~ 389 227 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 606 355 95 196617 buffer~ bufn2 2000;
#P hidden message 390 82 50 196617 set bufn1;
#P hidden newex 389 60 45 196617 loadbang;
#P user waveform~ 389 100 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 58 285 61 196617 vasp.update;
#P newex 606 334 95 196617 buffer~ bufn1 2000;
#P newex 58 137 49 196617 vasp.cfft;
#P comment 155 116 197 196617 transform into real and imaginary part;
#P comment 581 84 119 196617 real part of the soundfile;
#P comment 58 73 29 196617 read;
#P connect 12 0 3 0;
#P connect 3 0 19 0;
#P connect 17 0 15 0;
#P connect 15 0 16 0;
#P connect 16 0 5 0;
#P hidden connect 21 1 20 0;
#P hidden connect 14 0 6 0;
#P hidden connect 8 0 6 0;
#P hidden fasten 7 0 11 0 394 70 394 70;
#P hidden fasten 11 0 10 0 394 222 394 222;
#P hidden connect 14 0 10 0;
#P hidden fasten 4 1 8 0 696 352 707 352 707 71 395 71;
#P hidden connect 7 0 8 0;
#P connect 24 0 23 0;
#P hidden connect 22 0 4 0;
#P pop;
#P newobj 57 325 85 196617 p more_examples;
#P message 57 143 85 196617 vasp bufn1 bufn2;
#P newex 57 219 45 196617 vasp.n 0;
#P newex 220 219 45 196617 vasp.n 1;
#P comment 269 220 53 196617 vector 1;
#P message 220 271 130 196617;
#P newex 220 241 60 196617 prepend set;
#P comment 105 220 53 196617 vector 0;
#P message 57 271 130 196617;
#P newex 57 241 60 196617 prepend set;
#P comment 52 70 168 196617 get one vector of a vasp;
#P comment 52 48 89 196622 vasp.n;
#P comment 52 88 183 196617 argument/right inlet: index of vector;
#P connect 11 0 10 0;
#P connect 10 0 3 0;
#P hidden fasten 14 0 4 0 329 267 62 267;
#P connect 3 0 4 0;
#P fasten 11 0 9 0 62 187 225 187;
#P connect 9 0 6 0;
#P connect 6 0 7 0;
#P hidden fasten 14 0 7 0 329 268 225 268;
#P hidden connect 13 0 14 0;
#P pop;
|
