-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathconvolver~-help.pd
88 lines (88 loc) · 2.66 KB
/
convolver~-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
#N canvas 555 371 681 515 10;
#N canvas 0 22 450 300 (subpatch) 0;
#X array cdemo_impulse 66162 float 2;
#X coords 0 1 66162 -1 200 140 1;
#X restore 268 41 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array cdemo_source 62079 float 2;
#X coords 0 1 62079 -1 200 140 1;
#X restore 24 89 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array cdemo_dest 131072 float 2;
#X coords 0 1 131072 -1 200 140 1;
#X restore 25 243 graph;
#X obj 269 222 convolver~ cdemo_source cdemo_impulse cdemo_dest;
#X obj 269 241 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 434 427 s convo_demo_msg;
#X obj 269 203 r convo_demo_msg;
#X msg 271 400 convolve;
#X obj 473 65 tabplay~ cdemo_dest;
#X obj 473 139 *~ 0.1;
#X obj 473 161 dac~;
#X obj 473 41 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X floatatom 512 121 5 0 0 0 - - -, f 5;
#X msg 24 397 bang;
#X obj 515 106 hsl 100 12 0 1 0 0 empty empty gain -2 -8 0 8 -261570
-1 -1 0 1;
#X msg 434 398 noiseimp \$1;
#X floatatom 434 380 5 0 0 0 - - -, f 5;
#X msg 526 398 spikeimp \$1;
#X floatatom 526 382 5 0 0 0 - - -, f 5;
#X obj 271 421 s convo_demo_msg;
#X text 288 242 operation completion bang;
#X obj 432 325 soundfiler;
#X obj 432 289 openpanel;
#X msg 432 270 bang;
#X msg 432 307 read -resize \$1 cdemo_impulse;
#X msg 573 155 \; pd dsp \$1;
#X obj 573 131 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X text 430 351 ... or build a synthetic impulse;
#N canvas 715 441 450 300 sound-source 0;
#X obj 104 159 soundfiler;
#X obj 104 120 loadbang;
#X obj 104 88 soundfiler;
#X obj 104 52 openpanel;
#X msg 104 70 read -resize \$1 cdemo_source;
#X obj 104 34 inlet;
#X text 175 122 default sound;
#X obj 44 242 s convo_demo_msg;
#X msg 44 218 noiseimp -5;
#X obj 44 193 loadbang;
#X text 112 195 default impulse;
#X msg 104 141 read -resize sound/voice.wav cdemo_source;
#X connect 1 0 11 0;
#X connect 3 0 4 0;
#X connect 4 0 2 0;
#X connect 5 0 3 0;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
#X connect 11 0 0 0;
#X restore 24 421 pd sound-source;
#X obj 23 8 cnv 15 160 25 empty empty LyonPotpourri 20 12 1 18 -260097
-204786 0;
#X text 22 41 convolver~ - non-real-time convolution;
#X text 64 398 1 find a soundfile to convolve;
#X text 471 271 2 find an impulse response;
#X text 269 380 3 perform convolution;
#X text 492 41 4 play convolution result;
#X connect 3 0 4 0;
#X connect 6 0 3 0;
#X connect 7 0 19 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 0 10 1;
#X connect 11 0 8 0;
#X connect 12 0 9 1;
#X connect 13 0 28 0;
#X connect 14 0 12 0;
#X connect 15 0 5 0;
#X connect 16 0 15 0;
#X connect 17 0 5 0;
#X connect 18 0 17 0;
#X connect 22 0 24 0;
#X connect 23 0 22 0;
#X connect 24 0 21 0;
#X connect 26 0 25 0;