/
samm~-help.pd
200 lines (200 loc) · 5.19 KB
/
samm~-help.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
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
#N canvas 123 26 555 539 10;
#X obj 42 295 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 78 80 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 42 254 click2bang~;
#X obj 134 313 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 134 282 click2bang~;
#X obj 245 339 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 245 290 click2bang~;
#X obj 78 103 impulse~;
#X obj 116 467 *~ 0.1;
#X obj 116 497 dac~;
#X floatatom 320 454 5 0 0 0 - - -, f 5;
#N canvas 547 354 816 547 toner 0;
#X obj 211 218 adsr~;
#X obj 94 286 *~;
#X obj 94 178 osc~ 590;
#X obj 210 154 loadbang;
#X obj 115 347 outlet~;
#X obj 169 100 inlet~;
#X msg 211 191 2 50 50 50;
#X connect 0 0 1 1;
#X connect 1 0 4 0;
#X connect 2 0 1 0;
#X connect 3 0 6 0;
#X connect 5 0 0 0;
#X connect 6 0 0 0;
#X restore 180 394 pd toner;
#N canvas 547 354 820 551 toner 0;
#X obj 211 218 adsr~;
#X obj 94 286 *~;
#X obj 210 154 loadbang;
#X obj 115 347 outlet~;
#X obj 169 100 inlet~;
#X obj 94 178 osc~ 630;
#X msg 211 191 2 50 50 50;
#X connect 0 0 1 1;
#X connect 1 0 3 0;
#X connect 2 0 6 0;
#X connect 4 0 0 0;
#X connect 5 0 1 0;
#X connect 6 0 0 0;
#X restore 244 394 pd toner;
#N canvas 547 354 828 559 toner 0;
#X obj 211 218 adsr~;
#X obj 94 286 *~;
#X obj 210 154 loadbang;
#X obj 115 347 outlet~;
#X obj 169 100 inlet~;
#X msg 211 191 2 50 50 50;
#X obj 94 178 osc~ 670;
#X connect 0 0 1 1;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 1 0;
#X restore 374 393 pd toner;
#N canvas 452 295 832 563 toner 0;
#X obj 211 218 adsr~;
#X obj 94 286 *~;
#X obj 210 154 loadbang;
#X obj 115 347 outlet~;
#X obj 169 100 inlet~;
#X msg 211 191 2 50 50 50;
#X obj 94 178 osc~ 470;
#X connect 0 0 1 1;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 1 0;
#X restore 116 394 pd toner;
#N canvas 547 354 828 559 toner 0;
#X obj 211 218 adsr~;
#X obj 94 286 *~;
#X obj 210 154 loadbang;
#X obj 115 347 outlet~;
#X obj 169 100 inlet~;
#X msg 211 191 2 50 50 50;
#X obj 94 178 osc~ 830;
#X connect 0 0 1 1;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 1 0;
#X restore 436 393 pd toner;
#X obj 140 183 samm~ 20 5 7 11 13 19 1;
#N canvas 460 303 824 555 toner 0;
#X obj 211 218 adsr~;
#X obj 94 286 *~;
#X obj 210 154 loadbang;
#X obj 115 347 outlet~;
#X obj 169 100 inlet~;
#X msg 211 191 2 50 50 50;
#X obj 94 179 osc~ 511;
#X connect 0 0 1 1;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 1 0;
#X restore 309 393 pd toner;
#X obj 163 362 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 163 313 click2bang~;
#X obj 345 372 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 345 310 click2bang~;
#X obj 441 340 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 441 291 click2bang~;
#X obj 140 153 r samm-msgs;
#N canvas 0 22 574 436 operation 0;
#X obj 127 186 s samm-msgs;
#X msg 109 134 tempo \$1;
#X floatatom 109 105 5 0 0 0 - - -, f 5;
#X msg 109 79 20;
#X msg 215 112 arm;
#X msg 253 115 resume;
#X msg 313 115 pause;
#X msg 34 107 beatinfo;
#X msg 250 210 mute \$1;
#X obj 251 174 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 0 0;
#X connect 7 0 0 0;
#X connect 8 0 0 0;
#X connect 9 0 8 0;
#X restore 375 98 pd operation;
#X obj 323 448 hsl 80 8 0 0.25 0 0 empty empty gain -2 -8 0 8 -141498
-1 -1 1200 1;
#X text 312 187 args: tempo \, [beat subdivisions]*;
#N canvas 639 436 544 322 specs 0;
#X obj 48 283 s samm-msgs;
#X msg 90 71 divbeats 1 19 13 11 7 5;
#X msg 102 116 msbeats 250 450 333 1600 777 630;
#X msg 48 30 beats 0.1 0.2 0.333 0.25 0.4 0.5;
#X msg 98 162 ratiobeats 1 12 1 16 1 9 1 7 3 32 5.5 11;
#X text 46 9 specify each tempo with its time interval in beats;
#X text 91 53 specify each tempo as a subdivision of a beat (quarter
note);
#X text 108 96 specify each tempo with time interval in ms.;
#X text 107 142 specify each tempo as a ratio (relative to a whole
note);
#X msg 106 205 sampbeats 44100 22050 11025 88200 6677 9313;
#X text 131 185 specify each tempo in samples;
#X msg 157 243 beatinfo;
#X text 155 227 diagnostics;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 0 0;
#X connect 4 0 0 0;
#X connect 9 0 0 0;
#X connect 11 0 0 0;
#X restore 375 123 pd specs;
#X text 99 80 reinit timer;
#X obj 9 12 cnv 15 160 25 empty empty LyonPotpourri 20 12 1 18 -260097
-204786 0;
#X text 11 46 samm~ - sample accurate multiple metronomes;
#X connect 1 0 7 0;
#X connect 2 0 0 0;
#X connect 4 0 3 0;
#X connect 6 0 5 0;
#X connect 7 0 16 0;
#X connect 8 0 9 0;
#X connect 8 0 9 1;
#X connect 10 0 8 1;
#X connect 11 0 8 0;
#X connect 12 0 8 0;
#X connect 13 0 8 0;
#X connect 14 0 8 0;
#X connect 15 0 8 0;
#X connect 16 0 2 0;
#X connect 16 0 14 0;
#X connect 16 1 4 0;
#X connect 16 1 11 0;
#X connect 16 2 12 0;
#X connect 16 2 19 0;
#X connect 16 3 17 0;
#X connect 16 3 6 0;
#X connect 16 4 13 0;
#X connect 16 4 21 0;
#X connect 16 5 15 0;
#X connect 16 5 23 0;
#X connect 17 0 8 0;
#X connect 19 0 18 0;
#X connect 21 0 20 0;
#X connect 23 0 22 0;
#X connect 24 0 16 0;
#X connect 26 0 10 0;