blob: 0d5f208b8b785e6e65821af08967bf8bd7fe4971 (
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
|
#N canvas 236 558 603 436 10;
#X obj 25 136 dac~;
#N canvas 0 22 470 320 rich-harmonic-source 0;
#X obj 127 232 outlet~;
#X obj 127 125 phasor~ 100;
#X obj 212 126 phasor~ 125;
#X obj 296 125 phasor~ 150;
#X obj 127 183 *~ 0.3;
#X floatatom 127 67 5 0 0 0 - - -;
#X obj 212 99 * 1.25;
#X obj 296 100 * 1.5;
#X obj 130 34 hsl 128 15 60 600 0 0 empty empty empty -2 -6 0 8 -154413
-1 -1 6350 1;
#X msg 127 11 330;
#X obj 127 -18 loadbang;
#X connect 1 0 4 0;
#X connect 2 0 4 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 6 0;
#X connect 5 0 1 0;
#X connect 5 0 7 0;
#X connect 6 0 2 0;
#X connect 7 0 3 0;
#X connect 8 0 5 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X restore 25 23 pd rich-harmonic-source;
#N canvas 473 320 623 326 vocal-source 0;
#X obj 31 194 soundfiler;
#X obj 31 160 openpanel;
#N canvas 0 22 450 300 graph1 0;
#X array xsyn-sound1 4e+06 float 2;
#X coords 0 1 4e+06 -1 200 140 1;
#X restore 237 13 graph;
#X msg 31 131 bang;
#X obj 227 284 outlet~;
#X msg 227 244 bang;
#X obj 348 228 spigot;
#X obj 385 205 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
1;
#X text 63 132 open the sound;
#X text 133 244 then play it;
#X text 304 190 loop if you like;
#X obj 227 268 tabplay~ xsyn-sound1;
#X msg 31 177 read -resize \$1 xsyn-sound1;
#X connect 1 0 12 0;
#X connect 3 0 1 0;
#X connect 5 0 11 0;
#X connect 6 0 5 0;
#X connect 7 0 6 1;
#X connect 11 0 4 0;
#X connect 11 1 6 0;
#X connect 12 0 0 0;
#X restore 68 46 pd vocal-source;
#X msg 34 242 \; pd dsp \$1;
#X obj 34 221 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#N canvas 172 351 466 316 xsyn-block 0;
#X obj 161 178 outlet~;
#X obj 161 49 inlet~;
#X obj 283 102 inlet;
#X obj 161 213 block~ 256;
#X obj 205 72 inlet~;
#X obj 161 132 xsyn~ 4;
#X connect 1 0 5 0;
#X connect 2 0 5 0;
#X connect 4 0 5 1;
#X connect 5 0 0 0;
#X restore 25 88 pd xsyn-block;
#X obj 111 68 fftease-system;
#X text 34 284 xsyn~ filters the first input with the second input
\, creating a spectral cross synthesis effect.;
#X connect 1 0 5 0;
#X connect 2 0 5 1;
#X connect 4 0 3 0;
#X connect 5 0 0 0;
#X connect 5 0 0 1;
#X connect 6 0 5 2;
|