blob: 2f76a6cc732f471e9fbf00136b7b2ae855aca02b (
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 228 129 899 595;
#P message 466 372 55 196617 vasp bufhp;
#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 466 392 73 196617 p clear_buffer;
#P comment 196 241 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 45 391 109 196617 p Hz_to_period_length;
#P number 195 255 35 9 1 0 1 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P flonum 137 255 45 9 0 0 0 3 0 0 0 221 221 221 222 222 222 0 0 0;
#P newex 137 276 68 196617 pack 0 0;
#P comment 38 88 266 196617 second argument: q-factor from 1 - ° (integer) default 1;
#P newex 45 322 61 196617 vasp.update;
#P message 45 255 55 196617 vasp bufhp;
#P newex 45 301 65 196617 vasp.fhp 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 328 100 49 196617 p wfkeys;
#P message 287 392 27 196617 stop;
#P message 219 392 65 196617 startwindow;
#P newex 328 418 29 196617 dac~;
#P newex 328 366 30 196617 line~;
#P message 328 343 72 196617 0 \, 2000 2000;
#P newex 328 391 60 196617 play~ bufhp;
#P hidden message 328 142 49 196617 set bufhp;
#P hidden newex 328 122 45 196617 loadbang;
#P user waveform~ 328 162 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 45 194 55 196617 vasp.* 0.5;
#P newex 45 216 61 196617 vasp.update;
#P message 45 151 55 196617 vasp bufhp;
#P newex 544 391 95 196617 buffer~ bufhp 2000;
#P newex 45 172 55 196617 vasp.noise;
#P comment 38 58 136 196617 vasp high pass filter (FIR);
#P comment 38 34 89 196622 vasp.fhp;
#P comment 109 152 99 196617 generate white noise;
#P comment 38 73 224 196617 first argument: cutoff frequency in period length;
#P comment 137 241 36 196617 cutoff;
#P comment 38 103 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 142 297 105 297;
#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 292 410 333 410;
#P fasten 18 0 17 0 224 410 333 410;
#P connect 14 0 17 1;
#P connect 31 0 30 0;
#P pop;
|
