Skip to content

Commit 7bf635b

Browse files
michaelpacemichaelpace
committed
lot of new patches and changes to existing patches
1 parent 0a1d7b2 commit 7bf635b

27 files changed

+2815
-786
lines changed

‎.swp

12 KB
Binary file not shown.

‎centsdetuner.pd

+61
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,61 @@
1+
#N canvas 92 130 659 464 12;
2+
#X obj 167 111 ftom;
3+
#X floatatom 167 135 10 0 0 0 - - - 0;
4+
#X floatatom 199 206 10 0 0 0 - - - 0;
5+
#X obj 199 182 * 100;
6+
#X floatatom 199 253 5 0 0 0 - - - 0;
7+
#X obj 199 229 % 100;
8+
#X obj 167 158 t f f;
9+
#X obj 167 182 i;
10+
#X floatatom 167 253 5 0 0 0 - - - 0;
11+
#X obj 199 300 / 100;
12+
#X floatatom 199 324 5 0 0 0 - - - 0;
13+
#X obj 167 347 +, f 5;
14+
#X obj 167 371 mtof;
15+
#X floatatom 167 395 10 0 0 0 - - - 0;
16+
#X obj 199 276 +, f 18;
17+
#X obj 290 40 inlet;
18+
#X obj 167 418 outlet;
19+
#X obj 167 40 inlet;
20+
#X obj 290 111 t b f;
21+
#X obj 167 87 f;
22+
#X floatatom 167 64 5 0 0 0 - - - 0;
23+
#X text 167 11 freq;
24+
#X text 260 15 cents to detune;
25+
#X obj 322 208 *;
26+
#X obj 425 43 inlet;
27+
#X obj 425 67 clip 0 1;
28+
#X obj 425 91 t b f;
29+
#X floatatom 290 64 5 0 0 0 - - - 0;
30+
#X obj 290 87 f;
31+
#X text 396 15 percentage to apply the detune;
32+
#X text 221 421 freq;
33+
#X connect 0 0 1 0;
34+
#X connect 1 0 6 0;
35+
#X connect 2 0 5 0;
36+
#X connect 3 0 2 0;
37+
#X connect 4 0 14 0;
38+
#X connect 5 0 4 0;
39+
#X connect 6 0 7 0;
40+
#X connect 6 1 3 0;
41+
#X connect 7 0 8 0;
42+
#X connect 8 0 11 0;
43+
#X connect 9 0 10 0;
44+
#X connect 10 0 11 1;
45+
#X connect 11 0 12 0;
46+
#X connect 12 0 13 0;
47+
#X connect 13 0 16 0;
48+
#X connect 14 0 9 0;
49+
#X connect 15 0 27 0;
50+
#X connect 17 0 20 0;
51+
#X connect 18 0 19 0;
52+
#X connect 18 1 23 0;
53+
#X connect 19 0 0 0;
54+
#X connect 20 0 19 0;
55+
#X connect 23 0 14 1;
56+
#X connect 24 0 25 0;
57+
#X connect 25 0 26 0;
58+
#X connect 26 0 28 0;
59+
#X connect 26 1 23 1;
60+
#X connect 27 0 28 0;
61+
#X connect 28 0 18 0;

‎graph~.pd

+12
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,12 @@
1+
#N canvas 92 130 450 300 12;
2+
#X obj 280 40 table \$0-graph;
3+
#X obj 73 86 loadbang;
4+
#X obj 73 110 tgl 15 0 empty empty empty 17 7 0 10 #fcfcfc #000000
5+
#000000 0 1;
6+
#X obj 73 134 metro 100;
7+
#X obj 73 158 tabwrite~ \$0-graph;
8+
#X obj 171 65 inlet~;
9+
#X connect 1 0 2 0;
10+
#X connect 2 0 3 0;
11+
#X connect 3 0 4 0;
12+
#X connect 5 0 4 0;

‎harmonicsdetuner.pd

+62
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,62 @@
1+
#N canvas 445 168 678 577 12;
2+
#X floatatom 161 505 10 0 0 0 - - - 0;
3+
#X obj 290 40 inlet;
4+
#X obj 161 528 outlet;
5+
#X obj 161 40 inlet;
6+
#X obj 290 245 t b f;
7+
#X obj 161 313 f;
8+
#X floatatom 161 64 5 0 0 0 - - - 0;
9+
#X text 161 11 freq;
10+
#X obj 425 43 inlet;
11+
#X obj 425 91 clip 0 1;
12+
#X obj 425 115 t b f;
13+
#X floatatom 290 88 5 0 0 0 - - - 0;
14+
#X obj 290 221 f;
15+
#X text 411 16 percentage to apply the detune;
16+
#X text 215 531 freq;
17+
#X obj 214 361 *;
18+
#X text 260 15 harmonic multiplier;
19+
#X obj 290 64 deff \$1 1;
20+
#X obj 425 67 deff \$2 1;
21+
#X obj 161 337 t f f, f 8;
22+
#X floatatom 161 386 5 0 0 0 - - - 0;
23+
#X floatatom 214 386 5 0 0 0 - - - 0;
24+
#X obj 457 301 t f f, f 10;
25+
#X obj 457 325 oneminus;
26+
#X floatatom 457 349 5 0 0 0 - - - 0;
27+
#X floatatom 524 349 5 0 0 0 - - - 0;
28+
#X obj 161 434 *;
29+
#X obj 214 434 *;
30+
#X floatatom 161 458 5 0 0 0 - - - 0;
31+
#X floatatom 214 458 5 0 0 0 - - - 0;
32+
#X obj 161 481 +, f 8;
33+
#X connect 0 0 2 0;
34+
#X connect 1 0 17 0;
35+
#X connect 3 0 6 0;
36+
#X connect 4 0 5 0;
37+
#X connect 4 1 15 1;
38+
#X connect 5 0 19 0;
39+
#X connect 6 0 5 0;
40+
#X connect 8 0 18 0;
41+
#X connect 9 0 10 0;
42+
#X connect 10 0 12 0;
43+
#X connect 10 1 22 0;
44+
#X connect 11 0 12 0;
45+
#X connect 12 0 4 0;
46+
#X connect 15 0 21 0;
47+
#X connect 17 0 11 0;
48+
#X connect 18 0 9 0;
49+
#X connect 19 0 20 0;
50+
#X connect 19 1 15 0;
51+
#X connect 20 0 26 0;
52+
#X connect 21 0 27 0;
53+
#X connect 22 0 23 0;
54+
#X connect 22 1 25 0;
55+
#X connect 23 0 24 0;
56+
#X connect 24 0 26 1;
57+
#X connect 25 0 27 1;
58+
#X connect 26 0 28 0;
59+
#X connect 27 0 29 0;
60+
#X connect 28 0 30 0;
61+
#X connect 29 0 30 1;
62+
#X connect 30 0 0 0;

‎kick~.impl.pd

+81
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,81 @@
1+
#N canvas 348 252 1037 502 12;
2+
#X obj 37 446 outlet~;
3+
#X obj 37 259 pow~, f 31;
4+
#X obj 37 283 *~, f 41;
5+
#X obj 387 273 ramp~;
6+
#X obj 37 347 osc~;
7+
#X obj 172 39 inlet;
8+
#X obj 260 229 ramp~;
9+
#X obj 829 138 print UNKNOWN_PARAMETER;
10+
#X obj 37 225 ahdsr~, f 25;
11+
#X obj 172 93 s \$0-frequency;
12+
#X obj 388 245 r \$0-frequency;
13+
#X obj 297 112 s \$0-attack;
14+
#X obj 68 200 r \$0-attack;
15+
#X obj 420 112 s \$0-decay;
16+
#X obj 546 111 s \$0-shape;
17+
#X obj 158 200 r \$0-decay;
18+
#X obj 249 199 r \$0-shape;
19+
#X obj 420 88 scaled 0 1 1 800;
20+
#X obj 37 307 +~, f 50;
21+
#X obj 660 146 s \$0-range;
22+
#X obj 338 237 ramp~;
23+
#X obj 339 209 r \$0-range;
24+
#X obj 671 86 easeincubic;
25+
#X obj 37 371 *~, f 103;
26+
#X obj 686 302 ahdsr~, f 42;
27+
#X obj 20 179 r \$0-bang;
28+
#X obj 666 267 r \$0-bang;
29+
#X obj 742 270 r \$0-attack;
30+
#X obj 832 270 r \$0-decay;
31+
#X obj 297 88 scaled 0 1 5 100;
32+
#X obj 546 87 scaled 0 1 1 20;
33+
#X obj 172 63 route frequency attack decay shape range velocity, f
34+
107;
35+
#X obj 799 87 clip 0 1;
36+
#X obj 844 198 s \$0-velocity;
37+
#X obj 134 400 r \$0-velocity;
38+
#X obj 37 395 *~;
39+
#X obj 788 172 t b f;
40+
#X obj 765 204 s \$0-bang;
41+
#X text 18 10 /// TRIGGERS WHEN VELOCITY IS SET;
42+
#X obj 134 424 sig~;
43+
#X obj 665 113 scaled 0 1 0 2000;
44+
#X connect 1 0 2 0;
45+
#X connect 2 0 18 0;
46+
#X connect 3 0 18 1;
47+
#X connect 4 0 23 0;
48+
#X connect 5 0 31 0;
49+
#X connect 6 0 1 1;
50+
#X connect 8 0 1 0;
51+
#X connect 10 0 3 0;
52+
#X connect 12 0 8 1;
53+
#X connect 15 0 8 3;
54+
#X connect 16 0 6 0;
55+
#X connect 17 0 13 0;
56+
#X connect 18 0 4 0;
57+
#X connect 20 0 2 1;
58+
#X connect 21 0 20 0;
59+
#X connect 22 0 40 0;
60+
#X connect 23 0 35 0;
61+
#X connect 24 0 23 1;
62+
#X connect 25 0 8 0;
63+
#X connect 26 0 24 0;
64+
#X connect 27 0 24 1;
65+
#X connect 28 0 24 3;
66+
#X connect 29 0 11 0;
67+
#X connect 30 0 14 0;
68+
#X connect 31 0 9 0;
69+
#X connect 31 1 29 0;
70+
#X connect 31 2 17 0;
71+
#X connect 31 3 30 0;
72+
#X connect 31 4 22 0;
73+
#X connect 31 5 32 0;
74+
#X connect 31 6 7 0;
75+
#X connect 32 0 36 0;
76+
#X connect 34 0 39 0;
77+
#X connect 35 0 0 0;
78+
#X connect 36 0 37 0;
79+
#X connect 36 1 33 0;
80+
#X connect 39 0 35 1;
81+
#X connect 40 0 19 0;

‎kick~.params.pd

+25
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,25 @@
1+
#N canvas 121 159 645 481 12;
2+
#X obj 2 25 mspparam frequency 0 400;
3+
#X obj 2 81 mspparam attack;
4+
#X obj 2 100 mspparam decay;
5+
#X obj 2 119 mspparam shape;
6+
#X obj 2 44 mspparam range;
7+
#X obj 2 355 outlet;
8+
#X obj 2 157 mspparam velocity;
9+
#X obj 181 201 inlet;
10+
#X obj 181 225 route frequency range attack decay shape velocity;
11+
#X text 111 3 ----- kick :) -----;
12+
#X connect 0 0 5 0;
13+
#X connect 1 0 5 0;
14+
#X connect 2 0 5 0;
15+
#X connect 3 0 5 0;
16+
#X connect 4 0 5 0;
17+
#X connect 6 0 5 0;
18+
#X connect 7 0 8 0;
19+
#X connect 8 0 0 0;
20+
#X connect 8 1 4 0;
21+
#X connect 8 2 1 0;
22+
#X connect 8 3 2 0;
23+
#X connect 8 4 3 0;
24+
#X connect 8 5 6 0;
25+
#X coords 0 -1 1 1 351 175 2 1 1;

‎kick~.pd

+9-84
Original file line numberDiff line numberDiff line change
@@ -1,84 +1,9 @@
1-
#N canvas 0 25 1027 747 12;
2-
#X obj 37 159 line~;
3-
#X obj 37 515 cos~;
4-
#X obj 37 493 -~ 0.25;
5-
#X text 83 160 ramp from 0 to 1;
6-
#X text 77 669 filter out the click;
7-
#X obj 37 36 inlet;
8-
#X obj 37 87 t b b;
9-
#X msg 69 111 0;
10-
#X obj 174 38 inlet;
11-
#X obj 174 62 deff \$1 200;
12-
#X obj 37 135 pack f f, f 20;
13-
#X msg 37 111 1;
14-
#X obj 438 30 inlet;
15-
#X obj 38 346 *~;
16-
#X obj 641 33 inlet;
17-
#X obj 641 57 deff \$3 1000;
18-
#X obj 37 669 lop~;
19-
#X obj 37 712 outlet~;
20-
#X text 37 15 bang;
21-
#X text 118 15 \$1 duration in ms (linked w/ pitch);
22-
#X text 382 10 \$2 pitch (linked w/ duration);
23-
#X text 625 9 \$3 lop cutoff;
24-
#X obj 37 233 sqrt~;
25-
#X text 96 437 feed the sqrt ramp into a sine waveshaper (which is
26-
a cosine object with offset of -0.5pi on the input (recall that [cos~]
27-
multiplies its input by 2pi)). this will limit it from -1 to 1 instead
28-
of 0 to the scaled-up value. having scaled it up to 20 (by default)
29-
means that we will go around the unit circle 20 times faster than we
30-
would have otherwise. so \, the scaling-up is effectively affecting
31-
frequency \, not amplitude \, since it comes before this [cos~] (which
32-
is behaving like a sine b/c of the offset). if it came after \, it'd
33-
make it 20 times louder. recall that as you trace angles from pointing
34-
right counter-clockwise around a unit circle \, sin reports the y value
35-
(and cos reports the x value).;
36-
#X obj 438 54 deff \$2 20;
37-
#X floatatom 704 157 5 0 0 0 - - -;
38-
#X text 745 158 duration;
39-
#X floatatom 704 177 5 0 0 0 - - -;
40-
#X text 745 178 pitch;
41-
#X floatatom 704 197 5 0 0 0 - - -;
42-
#X text 744 198 lop cutoff;
43-
#X text 84 192 give it an exponential (or something? logarithmic?)
44-
shape instead of linear. we are still going from 0 to 1 \, just quickly
45-
from 0 to ~0.4 \, and then more slowly from there to 1 this shape means
46-
that we will be oscillating quickly between 1 and -1 in the sine waveshaper
47-
below at first \, and then we'll slow down. basically \, the slope
48-
of this line — steep at first \, and then levelling off — is what
49-
gives the kick the descending pitch envelope.;
50-
#X text 75 328 scale that up. now going from 0 to 20 (by default) instead
51-
of 0 to 1 this means that we'll pump out 20 complete sine wavelengths
52-
\, but with fluctuating rate (due to the [sqrt~] above). if we didn't
53-
have the [sqrt~] \, this would multiplier in conjunction with the duration
54-
ms would determine constant pitch (e.g. \, 20 wavelengths in 200ms
55-
would be 100hz).;
56-
#X obj 438 102 line~;
57-
#X msg 438 78 \$1 100;
58-
#X connect 0 0 22 0;
59-
#X connect 1 0 16 0;
60-
#X connect 2 0 1 0;
61-
#X connect 5 0 6 0;
62-
#X connect 6 0 11 0;
63-
#X connect 6 1 7 0;
64-
#X connect 7 0 0 0;
65-
#X connect 8 0 9 0;
66-
#X connect 9 0 10 1;
67-
#X connect 9 0 25 0;
68-
#X connect 10 0 0 0;
69-
#X connect 11 0 10 0;
70-
#X connect 12 0 24 0;
71-
#X connect 13 0 2 0;
72-
#X connect 14 0 15 0;
73-
#X connect 15 0 16 1;
74-
#X connect 15 0 29 0;
75-
#X connect 16 0 17 0;
76-
#X connect 22 0 13 0;
77-
#X connect 24 0 27 0;
78-
#X connect 24 0 34 0;
79-
#X connect 25 0 10 1;
80-
#X connect 27 0 34 0;
81-
#X connect 29 0 16 1;
82-
#X connect 33 0 13 1;
83-
#X connect 34 0 33 0;
84-
#X coords 0 -1 1 1 120 80 1 700 140;
1+
#N canvas 0 38 1512 884 12;
2+
#X obj 1 1 kick~.params;
3+
#X obj 467 163 inlet;
4+
#X obj 62 258 kick~.impl;
5+
#X obj 62 282 outlet~;
6+
#X connect 0 0 2 0;
7+
#X connect 1 0 0 0;
8+
#X connect 2 0 3 0;
9+
#X coords 0 -1 1 1 351 175 2 1 1;

‎levelsig~.pd

+12
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,12 @@
1+
#N canvas 821 401 601 387 12;
2+
#X obj 1 1 level~;
3+
#X obj 58 62 loadbang;
4+
#X msg 58 86 1;
5+
#X obj 58 110 sig~;
6+
#X obj 1 24 outlet~;
7+
#X text 178 47 /// LIKE [level~] \, BUT DOESN'T HAVE AN INLET;
8+
#X connect 0 0 4 0;
9+
#X connect 1 0 2 0;
10+
#X connect 2 0 3 0;
11+
#X connect 3 0 0 0;
12+
#X coords 0 -1 1 1 134 18 2 1 1;

‎level~.pd

+40
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,40 @@
1+
#N canvas 150 188 613 449 12;
2+
#X obj 291 265 *~;
3+
#X obj 1 1 msphsl 0 1;
4+
#X obj 291 289 outlet~;
5+
#X obj 291 241 inlet~;
6+
#X obj 191 216 ramp~;
7+
#X obj 375 224 loadbang;
8+
#X obj 375 248 f \$1;
9+
#X obj 117 1 tgl 18 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000
10+
0 1;
11+
#X obj 210 21 sel 0 1;
12+
#X msg 210 45 0;
13+
#X obj 257 55 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000
14+
#000000;
15+
#X obj 191 186 f;
16+
#X obj 60 131 spigot;
17+
#X obj 33 60 t f f;
18+
#X obj 116 23 t f f;
19+
#X obj 360 55 loadbang;
20+
#X msg 360 79 1;
21+
#X connect 0 0 2 0;
22+
#X connect 1 0 13 0;
23+
#X connect 3 0 0 0;
24+
#X connect 4 0 0 1;
25+
#X connect 5 0 6 0;
26+
#X connect 6 0 1 0;
27+
#X connect 7 0 14 0;
28+
#X connect 8 0 9 0;
29+
#X connect 8 1 10 0;
30+
#X connect 9 0 4 0;
31+
#X connect 10 0 11 0;
32+
#X connect 11 0 4 0;
33+
#X connect 12 0 4 0;
34+
#X connect 13 0 12 0;
35+
#X connect 13 1 11 1;
36+
#X connect 14 0 12 1;
37+
#X connect 14 1 8 0;
38+
#X connect 15 0 16 0;
39+
#X connect 16 0 7 0;
40+
#X coords 0 -1 1 1 134 18 2 1 1;

0 commit comments

Comments
 (0)