-
Notifications
You must be signed in to change notification settings - Fork 0
/
noise_tennis.pd
58 lines (58 loc) · 1.54 KB
/
noise_tennis.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
#N canvas 391 94 829 652 10;
#X obj 17 13 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 1
;
#X msg 17 35 \; pd dsp \$1;
#X obj 173 235 readsf~ 2;
#X obj 173 308 dac~ 1 2;
#X obj 236 267 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 118 175 start;
#X msg 91 200 stop;
#X obj 173 71 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 173 93 openpanel;
#X msg 173 138 open \$1;
#X obj 325 33 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 325 55 openpanel;
#N canvas 0 22 450 300 (subpatch) 0;
#X array channelR 36000 float 2;
#X coords 0 1 36000 -1 200 140 1;
#X restore 621 202 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array channelL 36000 float 2;
#X coords 0 1 36000 -1 200 140 1;
#X restore 621 40 graph;
#X msg 325 87 read -resize \$1 channelL channelR;
#X obj 325 119 soundfiler;
#X floatatom 428 162 5 0 0 0 - - -;
#X obj 428 184 s sampleSize;
#X obj 325 213 expr 11025 / $f1;
#X obj 325 256 phasor~;
#X obj 325 292 *~;
#X obj 327 474 dac~ 1 2;
#X obj 379 256 r sampleSize;
#X obj 249 362 tabread4~ channelL;
#X obj 366 362 tabread4~ channelR;
#X connect 0 0 1 0;
#X connect 2 0 3 0;
#X connect 2 1 3 1;
#X connect 2 2 4 0;
#X connect 5 0 2 0;
#X connect 6 0 2 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 2 0;
#X connect 10 0 11 0;
#X connect 11 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 15 0 18 0;
#X connect 16 0 17 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 20 0 23 0;
#X connect 20 0 24 0;
#X connect 22 0 20 1;
#X connect 23 0 21 0;
#X connect 24 0 21 1;