/
stereofile.pd
73 lines (73 loc) · 2.04 KB
/
stereofile.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
#N canvas 523 110 495 343 12;
#X obj 63 20 loadbang;
#N canvas 311 93 794 494 makeReadMsg 0;
#X obj 70 42 inlet;
#X text 129 42 list table path start numframes;
#X obj 324 124 unpack s s 0 0;
#X obj 419 149 select -1, f 26;
#X obj 69 174 r \$0-hasNumFrames;
#X obj 244 174 r \$0-hasntNumFrames;
#X obj 419 174 f \$0;
#X msg 419 199 \; \$1-hasNumFrames 0 \; \$1-hasntNumFrames 1;
#X obj 598 199 f \$0;
#X msg 598 224 \; \$1-hasNumFrames 1 \; \$1-hasntNumFrames 0;
#X obj 30 199 spigot;
#X obj 205 199 spigot;
#X obj 103 431 outlet;
#X msg 598 174 bang;
#X msg 205 279 read -resize -skip \$3 \$2 \$1_LEFT \$1_RIGHT;
#X msg 30 333 read -resize -skip \$3 -maxsize \$4 \$2 \$1_LEFT \$1_RIGHT;
#X obj 419 304 unpack s s;
#X obj 419 333 select symbol;
#X msg 419 358 0;
#X msg 507 358 1;
#X text 549 333 [pack s s] second element is 'symbol' if the input had only one element: hence no path given \, and 'read' message should not go through, f 30;
#X obj 70 67 t l l l l;
#X obj 103 406 spigot;
#X connect 0 0 21 0;
#X connect 2 3 3 0;
#X connect 3 0 6 0;
#X connect 3 1 13 0;
#X connect 4 0 10 1;
#X connect 5 0 11 1;
#X connect 6 0 7 0;
#X connect 8 0 9 0;
#X connect 10 0 15 0;
#X connect 11 0 14 0;
#X connect 13 0 8 0;
#X connect 14 0 22 0;
#X connect 15 0 22 0;
#X connect 16 1 17 0;
#X connect 17 0 18 0;
#X connect 17 1 19 0;
#X connect 18 0 22 1;
#X connect 19 0 22 1;
#X connect 21 0 10 0;
#X connect 21 1 11 0;
#X connect 21 2 2 0;
#X connect 21 3 16 0;
#X connect 22 0 12 0;
#X restore 63 199 pd makeReadMsg;
#X obj 63 258 soundfiler2, f 17;
#X obj 63 143 t l l;
#X obj 179 199 unpack s;
#X obj 165 45 list prepend \$1;
#X obj 165 20 inlet;
#X text 212 20 list path start numframes;
#X msg 63 45 args 0;
#X obj 63 70 pdcontrol;
#X obj 63 118 pack s s 0 -1;
#X obj 219 258 array define \$1_LEFT;
#X obj 219 283 array define \$1_RIGHT;
#X obj 63 283 outlet;
#X connect 0 0 8 0;
#X connect 1 0 2 0;
#X connect 2 0 13 0;
#X connect 3 0 1 0;
#X connect 3 1 4 0;
#X connect 4 0 2 1;
#X connect 5 0 10 0;
#X connect 6 0 5 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 3 0;