blob: 89a88590eee214d5ed94b194aa47e1b1e0b5daf6 (
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
|
max v2;
#N vpatcher 176 195 828 655;
#P message 458 375 54 196617 vasp buflp;
#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 458 394 73 196617 p clear_buffer;
#P comment 214 247 44 196617 q-faktor;
#N vpatcher 169 125 534 375;
#P flonum 70 179 61 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 70 125 27 196617 t b f;
#P message 309 151 27 196617 stop;
#P message 243 151 65 196617 startwindow;
#P newex 243 173 29 196617 dac~;
#P comment 141 175 83 196617 period length in samples (float);
#P flonum 88 97 43 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 70 147 27 196617 / 1.;
#P flonum 68 73 54 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 54 49 53 196617 dspstate~;
#P comment 133 98 100 196617 frequency in Hz;
#P connect 1 1 2 0;
#P fasten 4 0 9 0 93 118 75 118;
#P fasten 2 0 3 0 73 115 54 115 54 145 75 145;
#P connect 9 0 3 0;
#P connect 3 0 10 0;
#P connect 9 1 3 1;
#P fasten 8 0 6 0 314 169 248 169;
#P connect 7 0 6 0;
#P pop;
#P newobj 51 394 109 196617 p Hz_to_period_length;
#P number 213 261 35 9 1 0 1 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 155 261 52 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 155 280 68 196617 pack 0. 0;
#P comment 46 90 266 196617 second argument: q-factor from 1 - ° (integer) default 1;
#P newex 54 329 61 196617 vasp.update;
#P message 54 261 54 196617 vasp buflp;
#P newex 54 307 65 196617 vasp.flp 220;
#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 318 95 49 196617 p wfkeys;
#P message 277 396 27 196617 stop;
#P message 209 396 65 196617 startwindow;
#P newex 318 421 29 196617 dac~;
#P newex 318 369 30 196617 line~;
#P message 318 346 72 196617 0 \, 2000 2000;
#P newex 318 394 58 196617 play~ buflp;
#P hidden message 318 137 45 196617 set buflp;
#P hidden newex 318 117 45 196617 loadbang;
#P user waveform~ 318 157 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 54 197 55 196617 vasp.* 0.5;
#P newex 54 219 61 196617 vasp.update;
#P message 54 154 54 196617 vasp buflp;
#P newex 536 394 94 196617 buffer~ buflp 2000;
#P newex 54 175 55 196617 vasp.noise;
#P comment 46 60 136 196617 vasp low pass filter (FIR);
#P comment 46 36 89 196622 vasp.flp;
#P comment 114 155 99 196617 generate white noise;
#P comment 46 75 225 196617 first argument: cutoff frequency in period length;
#P comment 155 247 36 196617 cutoff;
#P comment 46 105 185 196617 right inlet: cutoff and q-factor (list);
#P connect 8 0 6 0;
#P connect 6 0 10 0;
#P connect 10 0 9 0;
#P connect 22 0 21 0;
#P connect 21 0 23 0;
#P fasten 25 0 21 1 160 303 114 303;
#P connect 26 0 25 0;
#P connect 27 0 25 1;
#P hidden connect 12 0 13 0;
#P hidden connect 20 0 11 0;
#P hidden connect 13 0 11 0;
#P connect 15 0 16 0;
#P connect 16 0 14 0;
#P connect 14 0 17 0;
#P fasten 19 0 17 0 282 416 323 416;
#P fasten 18 0 17 0 214 416 323 416;
#P connect 14 0 17 1;
#P connect 31 0 30 0;
#P pop;
|
