forked from macumbista/vectorsynthesis
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathvs-operator.pd
180 lines (180 loc) · 3.94 KB
/
vs-operator.pd
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
178
179
180
#N canvas 61 57 1113 717 10;
#X obj 334 580 outlet~;
#X obj 400 43 inlet~ scale;
#X obj 334 543 *~;
#X obj 75 212 cos~;
#X obj 193 212 *~ -1;
#X obj 193 241 +~ 1;
#X obj 193 271 min~;
#X obj 193 300 *~ -4;
#X obj 193 327 +~ 1;
#X obj 25 496 *~;
#X obj 75 496 *~;
#X obj 193 497 *~;
#X obj 334 211 expr~ if($v1<0.5 \, 1 \, -1);
#X obj 334 497 *~;
#X obj 25 212 *~ 2;
#X obj 25 241 -~ 1;
#X text 142 644 [email protected];
#X obj 624 543 *~;
#X obj 624 580 outlet~;
#X obj 624 463 /~ 2;
#X obj 624 498 +~ 0.5;
#X text 335 607 Bipolar;
#X text 624 604 Unipolar;
#X obj 25 43 inlet~ phasor;
#X obj 25 153 wrap~;
#X text 142 587 Derek Holzer;
#X obj 25 118 *~;
#X obj 25 67 +~;
#X obj 115 43 inlet~ harmonic;
#X obj 215 43 inlet~ phase;
#X obj 423 324 samphold~;
#X obj 503 324 samphold~;
#X obj 503 296 noise~;
#X obj 315 43 inlet shape;
#X obj 423 497 *~;
#X obj 503 497 *~;
#X obj 423 274 expr~ ($v1 * 2)-1;
#X text 22 546 0 = SAW;
#X text 22 566 1 = SIN;
#X text 22 586 2 = TRI;
#X text 22 606 3 = SQR;
#X text 22 626 4 = STEP;
#X text 22 646 5 = RAND;
#X obj 315 69 select 0 1 2 3 4 5;
#X msg 315 92 0;
#X msg 327 111 1;
#X msg 355 132 0;
#X msg 367 151 1;
#X msg 365 92 0;
#X msg 377 111 1;
#X msg 405 132 0;
#X msg 417 151 1;
#X msg 405 92 0;
#X msg 417 111 1;
#X msg 445 132 0;
#X msg 457 151 1;
#X text 142 616 Helsinki May 2019;
#X obj 595 335 +~ 1;
#X obj 423 414 *~;
#X obj 423 444 +~;
#X obj 75 153 wrap~;
#X obj 25 86 wrap~;
#X obj 734 580 outlet~;
#X text 734 604 Blanking;
#X obj 490 43 inlet blanking;
#X obj 733 542 expr~ ($v1>$v2)&($v1<(1-$v2));
#X obj 490 68 sig~;
#X obj 586 263 expr~ 1/($v1-1);
#X msg 503 247 seed \$1;
#X obj 503 192 loadbang;
#X obj 503 221 f \$0;
#X connect 1 0 2 1;
#X connect 1 0 17 1;
#X connect 2 0 0 0;
#X connect 3 0 10 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 11 0;
#X connect 9 0 2 0;
#X connect 9 0 19 0;
#X connect 10 0 2 0;
#X connect 10 0 19 0;
#X connect 11 0 2 0;
#X connect 11 0 19 0;
#X connect 12 0 13 0;
#X connect 13 0 2 0;
#X connect 13 0 19 0;
#X connect 14 0 15 0;
#X connect 15 0 9 0;
#X connect 17 0 18 0;
#X connect 19 0 20 0;
#X connect 20 0 17 0;
#X connect 23 0 27 0;
#X connect 24 0 4 0;
#X connect 24 0 6 1;
#X connect 24 0 3 0;
#X connect 24 0 12 0;
#X connect 24 0 14 0;
#X connect 24 0 65 0;
#X connect 26 0 60 0;
#X connect 26 0 24 0;
#X connect 27 0 61 0;
#X connect 28 0 26 1;
#X connect 28 0 67 0;
#X connect 29 0 27 1;
#X connect 30 0 58 0;
#X connect 31 0 35 0;
#X connect 32 0 31 0;
#X connect 33 0 43 0;
#X connect 34 0 2 0;
#X connect 34 0 19 0;
#X connect 35 0 2 0;
#X connect 35 0 19 0;
#X connect 36 0 30 0;
#X connect 43 0 44 0;
#X connect 43 0 45 0;
#X connect 43 1 46 0;
#X connect 43 1 47 0;
#X connect 43 2 48 0;
#X connect 43 2 49 0;
#X connect 43 3 50 0;
#X connect 43 3 51 0;
#X connect 43 4 52 0;
#X connect 43 4 53 0;
#X connect 43 5 54 0;
#X connect 43 5 55 0;
#X connect 44 0 10 1;
#X connect 44 0 35 1;
#X connect 44 0 34 1;
#X connect 44 0 13 1;
#X connect 44 0 11 1;
#X connect 45 0 9 1;
#X connect 46 0 9 1;
#X connect 46 0 35 1;
#X connect 46 0 34 1;
#X connect 46 0 13 1;
#X connect 46 0 11 1;
#X connect 47 0 10 1;
#X connect 48 0 9 1;
#X connect 48 0 10 1;
#X connect 48 0 35 1;
#X connect 48 0 34 1;
#X connect 48 0 13 1;
#X connect 49 0 11 1;
#X connect 50 0 9 1;
#X connect 50 0 11 1;
#X connect 50 0 10 1;
#X connect 50 0 35 1;
#X connect 50 0 34 1;
#X connect 51 0 13 1;
#X connect 52 0 9 1;
#X connect 52 0 13 1;
#X connect 52 0 11 1;
#X connect 52 0 10 1;
#X connect 52 0 35 1;
#X connect 53 0 34 1;
#X connect 54 0 9 1;
#X connect 54 0 34 1;
#X connect 54 0 13 1;
#X connect 54 0 11 1;
#X connect 54 0 10 1;
#X connect 55 0 35 1;
#X connect 57 0 58 1;
#X connect 58 0 59 0;
#X connect 59 0 34 0;
#X connect 60 0 31 1;
#X connect 60 0 30 1;
#X connect 61 0 26 0;
#X connect 61 0 36 0;
#X connect 64 0 66 0;
#X connect 65 0 62 0;
#X connect 66 0 65 1;
#X connect 67 0 57 0;
#X connect 67 0 59 1;
#X connect 68 0 32 0;
#X connect 69 0 70 0;
#X connect 70 0 68 0;