blob: b5b65b661da677402414e8ea5535083fc12a56fc (
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
|
max v2;
#N vpatcher 132 131 841 556;
#P message 429 357 129 196617 vasp buf*cosc3 buf*cosc4;
#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 429 378 78 196617 p clear_buffers;
#P comment 193 195 114 196617 multiply the ramp with a complex sine wave;
#P newex 56 173 61 196617 vasp.update;
#P message 56 127 129 196617 vasp buf*cosc3 buf*cosc4;
#P newex 56 148 55 196617 vasp.bevel;
#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 366 54 49 196617 p wfkeys;
#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 connect 9 0 3 0;
#P fasten 2 0 3 0 73 115 54 115 54 145 75 145;
#P connect 3 0 10 0;
#P connect 9 1 3 1;
#P connect 7 0 6 0;
#P fasten 8 0 6 0 314 169 248 169;
#P pop;
#P newobj 53 378 109 196617 p Hz_to_period_length;
#P comment 567 229 119 196617 *imaginary part of cosc;
#P message 56 198 129 196617 vasp buf*cosc3 buf*cosc4;
#P hidden message 366 221 72 196617 set buf*cosc4;
#P user waveform~ 367 246 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 559 378 119 196617 buffer~ buf*cosc4 2000;
#P hidden message 366 94 72 196617 set buf*cosc3;
#P hidden newex 366 75 45 196617 loadbang;
#P user waveform~ 366 112 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 56 246 55 196617 vasp.* 0.5;
#P newex 56 271 61 196617 vasp.update;
#P newex 559 357 119 196617 buffer~ buf*cosc3 2000;
#P comment 45 79 316 196617 argument/right inlet: frequency in period length in samples;
#P newex 56 222 92 196617 vasp.*cosc 44100;
#P comment 45 64 293 196617 multiplies a complex buffer content with a complex sine wave;
#P comment 45 41 89 196622 vasp.*cosc;
#P comment 192 128 137 196617 generate a ramp from 0 to 1;
#P comment 575 96 108 196617 *real part of the cosc;
#P connect 20 0 19 0;
#P connect 19 0 21 0;
#P connect 15 0 4 0;
#P connect 4 0 8 0;
#P connect 8 0 7 0;
#P hidden connect 10 0 11 0;
#P hidden connect 18 0 9 0;
#P hidden connect 11 0 9 0;
#P hidden fasten 10 0 14 0 371 82 371 82;
#P hidden fasten 14 0 13 0 371 237 372 237;
#P hidden connect 18 0 13 0;
#P connect 24 0 23 0;
#P pop;
|
