forked from lantertronics/b700ish
-
Notifications
You must be signed in to change notification settings - Fork 0
/
b700ish_patches.scd
229 lines (215 loc) · 8.02 KB
/
b700ish_patches.scd
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
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
// Patch file for b700ish -- b700ish runs this to set up the patch library
// Aaron Lanterman, October 21, 2020
~instruments = Array.new;
~instrumentNames = Array.new;
// initial patch
~instrumentNames = ~instrumentNames.add("Initial");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,10,0,0,10,0,0,10,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1,1,1,1]; ~gdenominators = [1,1,1,1];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([0],[1])";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno] = "Env([0],[1])";
~genvstr[~idx4eno] = "Env([0],[1])";
~genvstr[~idx5eno] = "Env([0],[1])";
~genvstr[~idx6eno] = "Env([0],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~filteno] = "Env([0],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
// phased gong
~instrumentNames = ~instrumentNames.add("Phased Gong");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1,3.5,1,3.5]; ~gdenominators = [1,1,2,2];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([0,10,0],[0.147,20],[-10,1.5])";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno]= "Env([10],[1])";
~genvstr[~idx4eno] = "Env([10],[10])";
~genvstr[~idx5eno] = "Env([0],[1])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,0.038,1,1.5,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,0.592,0,0.873+0.592,10,1)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("80s Electric Piano");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1,14,1,1]; ~gdenominators = [1,1,1,1];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env.adsr(0,5,0,0.1,4+(~vel*1.8),0)";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env.adsr(0,6,0,0.1,5+(~vel*2.5),0)";
~genvstr[~idx5eno] = "Env([0],[1])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,5,0,0.1,8+(~vel*2),0)";
~genvstr[~levelBeno] = "Env.adsr(0,7,0.5,0.1,8+(~vel*2),0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("Lately Bass");
~instruments = ~instruments.add({
~gconfig = 4;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1,1,1,1]; ~gdenominators = [2,2,2,1];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([0],[1])";
~genvstr[~idx2eno] = "Env.adsr(0,3,0,0.1,7.3,0)";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env.adsr(0,0.1,0,0.1,7.5,0)";
~genvstr[~idx5eno]= "Env.adsr(0,3,0,0.1,8.1,0)";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,0,1,0.1,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,0,1,0.1,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("FB-01 Bass");
~instruments = ~instruments.add({
~gconfig = 6;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1,1,3,0.5]; ~gdenominators = [2,2,2,2];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env.adsr(0,2,0,1,7.4+~vel*(1.1),0)";
~genvstr[~idx2eno] = "Env.adsr(0,4,0.75,1,5+(~vel*2.8),0)";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env.adsr(0,7,0.8,1,5.9,0)";
~genvstr[~idx5eno]= "Env([0],[1])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,10,1,1,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,10,1,1,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("ROM Bass 1");
~instruments = ~instruments.add({
~gconfig = 6;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [0.5,0.5,5,0.5]; ~gdenominators = [1,1,1,1];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env.adsr(0,1,0,1,4+(~vel*4.8),0)";
~genvstr[~idx2eno] = "Env.adsr(0,2,0,1,5.5+(~vel*1.5),0)";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env.adsr(0,8,0,1,8.0,0)";
~genvstr[~idx5eno]= "Env([0],[1])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,10,1,1,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,10,1,1,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("Experiment 1");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1,1,1,1]; ~gdenominators = [1,3,1,1];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([0,8.33,8.06,7],[1/6,1/6,2],[0,0,0])";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env([8],[10])";
~genvstr[~idx5eno] = "Env([0],[1])";
~genvstr[~idx6eno] = "Env([0],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("Experiment 2");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 4; ~gwsBselect = 5;
~gnumerators = [1,1,1,1]; ~gdenominators = [1,5,1,1];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([0,8.33,8.06,7],[1/6,1/6,2],[0,0,0])";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env([10],[1])";
~genvstr[~idx5eno]= "Env([8],[10])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("Experiment 3");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 4; ~gwsBselect = 5;
~gnumerators = [1,1,1,1]; ~gdenominators = [1,2,1,2];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([0,8.33,8.06,7],[1/6,1/6,2],[0,0,0])";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno] = "Env([10],[1])";
~genvstr[~idx4eno] = "Env([10],[1])";
~genvstr[~idx5eno]= "Env([8],[10])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,0,1,0,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("Strange Sweeps");
~instruments = ~instruments.add({
~gconfig = 0;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 5; ~gwsBselect = 6;
~gnumerators = [1,1,1,1]; ~gdenominators = [1,2,1,4];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env([5,8,5,8,5,8,5,8],1.5*[1,1,1,1,1,1,10])";
~genvstr[~idx2eno] = "Env([10,0,10],[4,4])";
~genvstr[~idx3eno] = "Env([5,10,5,10,5,10,5,10],[1.5,1.5,1,1,1.5,1.5,10])";
~genvstr[~idx4eno] = "Env([5,8,5,8,5,8,5,8],1.8*[1,1,1,1,1,1,10])";
~genvstr[~idx5eno] = "Env([10,0,10],[4,4])";
~genvstr[~idx6eno] = "Env([5,10,5,10,5,10,5,10],[1,1.5,1.5,1,1.5,1.5,1])";
~genvstr[~levelAeno] = "Env.adsr(0.1,0,1,0,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0.1,0,1,0,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});
~instrumentNames = ~instrumentNames.add("Tubular Bells");
~instruments = ~instruments.add({
~gconfig = 1;
~goffsets = [0,0,0,0,0,0,0,0,0,0];
~gcf = 0.5;
~gwsAselect = 0; ~gwsBselect = 0;
~gnumerators = [1.003,7.035,0.995,6.98]; ~gdenominators = [1,2,1,2];
~genvstr = Array.fill(~numberEnvs);
~genvstr[~idx1eno] = "Env.adsr(0,5,0,5,7.5,0)";
~genvstr[~idx2eno] = "Env([0],[1])";
~genvstr[~idx3eno]= "Env([10],[1])";
~genvstr[~idx4eno] = "Env.adsr(0,5,0,5,7.8,0)";
~genvstr[~idx5eno] = "Env([0],[1])";
~genvstr[~idx6eno] = "Env([10],[1])";
~genvstr[~levelAeno] = "Env.adsr(0,5,0,5,10,0)";
~genvstr[~levelBeno] = "Env.adsr(0,5,0,5,10,0)";
~genvstr[~filteno] = "Env([10],[1])";
~genvstr[~reseno] = "Env([0],[1])";
});