blob: e22266f0bd309b8ee66c778170b7f1d8376a0077 (
plain)
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
|
#N canvas 768 40 466 316 10;
#N canvas 0 22 466 316 pvharm-block 0;
#X obj 22 81 pvharm~ 0 3000 4 1;
#X obj 22 130 outlet~;
#X obj 22 20 inlet~;
#X obj 22 156 block~ 256;
#X obj 62 41 inlet;
#X obj 102 41 inlet;
#X obj 143 41 inlet;
#X obj 216 65 inlet;
#X text 32 106 args: lowfreq \, highfreq \, overlap \, window-factor
;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 4 0 0 1;
#X connect 5 0 0 2;
#X connect 6 0 0 3;
#X connect 7 0 0 0;
#X restore 70 134 pd pvharm-block;
#X obj 70 200 dac~;
#X obj 70 177 *~ 0.1;
#X obj 70 53 phasor~ 300;
#X floatatom 95 80 5 0 0 1 transpose1 - -;
#X floatatom 120 97 5 0 0 1 transpose2 - -;
#X floatatom 145 114 5 0 0 1 synth-threshold - -;
#N canvas 587 239 474 324 messages 0;
#X obj 61 259 outlet;
#X msg 61 121 highfreq \$1;
#X floatatom 61 100 5 0 0 0 - - -;
#X floatatom 118 168 5 0 0 0 - - -;
#X msg 118 189 lowfreq \$1;
#X obj 165 228 fftease-system;
#X obj 64 72 hsl 128 15 500 5000 0 0 empty empty empty -2 -6 0 8 -184257
-1 -1 3500 1;
#X obj 121 144 hsl 128 15 0 450 0 0 empty empty empty -2 -6 0 8 -184257
-1 -1 5700 1;
#X text 29 37 synthesis frequency boundaries;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 0 0;
#X connect 6 0 2 0;
#X connect 7 0 3 0;
#X restore 292 118 pd messages;
#X obj 13 136 *~ 0.3;
#X msg 163 206 \; pd dsp \$1;
#X obj 110 155 hsl 128 15 0 0.2 0 0 empty empty empty -2 -6 0 8 -184257
-1 -1 3500 1;
#X obj 163 180 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
1;
#X floatatom 70 30 5 0 0 0 - - -;
#X text 18 254 pvharm~ provides basic harmonizing with two transpositions
of the input internally calculated and mixed to the output;
#N canvas 578 326 1043 702 init 0;
#X obj 56 175 outlet;
#X obj 104 171 outlet;
#X obj 157 173 outlet;
#X obj 230 177 outlet;
#X obj 179 21 loadbang;
#X msg 179 43 165 1.25 1.5 0.01;
#X obj 179 64 unpack f f f f;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 6 0 0 0;
#X connect 6 1 1 0;
#X connect 6 2 2 0;
#X connect 6 3 3 0;
#X restore 369 -6 pd init;
#X text 244 156 gain;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 2 0 1 1;
#X connect 3 0 0 0;
#X connect 3 0 8 0;
#X connect 4 0 0 1;
#X connect 5 0 0 2;
#X connect 6 0 0 3;
#X connect 7 0 0 4;
#X connect 8 0 2 0;
#X connect 10 0 2 1;
#X connect 11 0 9 0;
#X connect 12 0 3 0;
#X connect 14 0 12 0;
#X connect 14 1 4 0;
#X connect 14 2 5 0;
#X connect 14 3 6 0;
|
