-
Notifications
You must be signed in to change notification settings - Fork 4
/
+chebyshev~-help.pd
148 lines (148 loc) · 4.05 KB
/
+chebyshev~-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
#N canvas 300 96 672 528 12;
#X text 12 9 +chebyshev~;
#X obj 232 204 cnv 15 400 250 empty empty empty 20 12 0 14 -233017
-66577 0;
#X floatatom 443 383 5 -60 0 0 - - -;
#X floatatom 494 383 5 -60 0 0 - - -;
#X floatatom 544 383 5 -60 0 0 - - -;
#X floatatom 288 383 5 -60 0 0 - - -;
#X floatatom 340 383 5 -60 0 0 - - -;
#X floatatom 391 383 5 -60 0 0 - - -;
#X obj 391 419 s cheb;
#X msg 288 401 p1 \$1;
#X msg 340 401 p2 \$1;
#X msg 391 401 p3 \$1;
#X msg 443 401 p4 \$1;
#X msg 494 401 p5 \$1;
#X msg 544 401 p7 \$1;
#X obj 288 241 vsl 15 128 -60 0 0 0 empty p1 empty 0 -9 0 10 -162280
-1 -1 0 1;
#X obj 340 240 vsl 15 128 -60 0 0 0 empty p empty 0 -9 0 10 -162280
-1 -1 0 1;
#X obj 391 240 vsl 15 128 -60 0 0 0 empty p empty 0 -9 0 10 -162280
-1 -1 0 1;
#X obj 443 240 vsl 15 128 -60 0 0 0 empty p empty 0 -9 0 10 -162280
-1 -1 0 1;
#X obj 494 240 vsl 15 128 -60 0 0 0 empty p empty 0 -9 0 10 -162280
-1 -1 0 1;
#X obj 544 240 vsl 15 128 -60 0 0 0 empty p empty 0 -9 0 10 -162280
-1 -1 12700 1;
#X text 236 133 Master Volume (dB);
#X obj 14 236 +chebyshev~;
#X obj 41 202 r cheb;
#X text 244 207 Polynomial Controls (-60 to 0 dB per harmonic);
#N canvas 163 110 339 360 init 0;
#X obj 74 25 loadbang;
#X msg 74 258 \; pd dsp 1;
#X obj 124 225 s p1;
#X msg 153 147 -60;
#X obj 153 172 s p;
#X msg 170 92 70;
#X obj 74 48 t b b b b;
#X obj 170 117 s cheb-vol-set;
#X msg 124 200 0;
#X connect 0 0 6 0;
#X connect 3 0 4 0;
#X connect 5 0 7 0;
#X connect 6 0 1 0;
#X connect 6 1 8 0;
#X connect 6 2 3 0;
#X connect 6 3 5 0;
#X connect 8 0 2 0;
#X restore 572 471 pd init;
#X obj 14 32 cnv 15 500 60 empty empty empty 20 12 0 14 -228856 -66577
0;
#X text 24 32 a distortion unit which uses various low-order chebyshev
polynomials to add even or odd harmonic distortion. Harmonics added
using corresponding polynomial (ie. p3 adds 3rd harmonic).;
#X obj 14 127 bng 15 250 50 0 cheb-openfile empty open-sound-file 17
7 0 12 -4034 -1 -1;
#N canvas 187 59 254 370 output 0;
#X obj 89 280 dac~;
#X obj 110 141 dbtorms;
#X obj 89 233 *~;
#X obj 89 66 inlet~;
#X msg 110 164 \$1 50;
#X obj 110 187 line~;
#X obj 110 118 r cheb-vol;
#X connect 1 0 4 0;
#X connect 2 0 0 0;
#X connect 2 0 0 1;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 5 0 2 1;
#X connect 6 0 1 0;
#X restore 14 270 pd output;
#N canvas 135 177 664 511 sf-player 0;
#N canvas 0 22 450 300 (subpatch) 0;
#X array cheb-soundfile 113088 float 2;
#X coords 0 1 113088 -1 200 140 1;
#X restore 32 31 graph;
#X obj 286 33 openpanel;
#X obj 286 96 soundfiler;
#X obj 286 181 phasor~ 0.5;
#X obj 286 208 *~;
#X obj 72 289 /;
#X obj 72 242 t b f;
#X obj 72 265 samplerate~;
#X obj 286 463 dac~;
#X obj 306 272 outlet~;
#X msg 307 366 \$1 50;
#X obj 307 389 line~;
#X obj 286 420 *~;
#X obj 307 343 dbtorms;
#X obj 286 11 r cheb-openfile;
#X msg 286 64 read -resize -maxsize 2e+06 \$1 cheb-soundfile;
#X obj 286 121 s cheb-filelength;
#X obj 286 156 r cheb-phasorfreq;
#X obj 328 208 r cheb-filelength;
#X obj 286 232 tabread4~ cheb-soundfile;
#X obj 307 320 r cheb-vol;
#X obj 72 219 r cheb-filelength;
#X obj 72 316 s cheb-phasorfreq;
#X connect 1 0 15 0;
#X connect 2 0 16 0;
#X connect 3 0 4 0;
#X connect 4 0 19 0;
#X connect 5 0 22 0;
#X connect 6 0 7 0;
#X connect 6 1 5 1;
#X connect 7 0 5 0;
#X connect 10 0 11 0;
#X connect 11 0 12 1;
#X connect 12 0 8 0;
#X connect 12 0 8 1;
#X connect 13 0 10 0;
#X connect 14 0 1 0;
#X connect 15 0 2 0;
#X connect 17 0 3 0;
#X connect 18 0 4 1;
#X connect 19 0 9 0;
#X connect 19 0 12 0;
#X connect 20 0 13 0;
#X connect 21 0 6 0;
#X restore 14 157 pd sf-player;
#X obj 235 156 hsl 128 15 0 127 0 0 cheb-vol cheb-vol-set empty -2
-8 0 10 -228856 -1 -1 6400 1;
#X floatatom 375 156 5 0 0 0 - cheb-vol -;
#X connect 2 0 12 0;
#X connect 3 0 13 0;
#X connect 4 0 14 0;
#X connect 5 0 9 0;
#X connect 6 0 10 0;
#X connect 7 0 11 0;
#X connect 9 0 8 0;
#X connect 10 0 8 0;
#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 5 0;
#X connect 16 0 6 0;
#X connect 17 0 7 0;
#X connect 18 0 2 0;
#X connect 19 0 3 0;
#X connect 20 0 4 0;
#X connect 22 0 29 0;
#X connect 23 0 22 0;
#X connect 30 0 22 0;