aboutsummaryrefslogtreecommitdiff
path: root/control/commun-builder.pd
blob: 821004da9cf896e4c2cfdb876e15c151a2a64314 (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
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
#N canvas 355 231 703 585 10;
#X floatatom 33 127 5 0 0 0 - - -;
#N canvas 0 0 690 678 cm 0;
#X obj 0 0 commun /s0 dollar0;
#X obj 250 0 s dollar0-s0;
#X obj 150 0 r dollar0-s0;
#X obj 0 22 commun /s1 dollar0;
#X obj 250 22 s dollar0-s1;
#X obj 150 22 r dollar0-s1;
#X obj 0 44 commun /s2 dollar0;
#X obj 250 44 s dollar0-s2;
#X obj 150 44 r dollar0-s2;
#X obj 0 66 commun /s3 dollar0;
#X obj 250 66 s dollar0-s3;
#X obj 150 66 r dollar0-s3;
#X obj 0 88 commun /s4 dollar0;
#X obj 250 88 s dollar0-s4;
#X obj 150 88 r dollar0-s4;
#X obj 0 110 commun /s5 dollar0;
#X obj 250 110 s dollar0-s5;
#X obj 150 110 r dollar0-s5;
#X obj 0 132 commun /s6 dollar0;
#X obj 250 132 s dollar0-s6;
#X obj 150 132 r dollar0-s6;
#X obj 0 154 commun /s7 dollar0;
#X obj 250 154 s dollar0-s7;
#X obj 150 154 r dollar0-s7;
#X obj 0 176 commun /s8 dollar0;
#X obj 250 176 s dollar0-s8;
#X obj 150 176 r dollar0-s8;
#X obj 0 198 commun /s9 dollar0;
#X obj 250 198 s dollar0-s9;
#X obj 150 198 r dollar0-s9;
#X obj 0 220 commun /s10 dollar0;
#X obj 250 220 s dollar0-s10;
#X obj 150 220 r dollar0-s10;
#X obj 0 242 commun /s11 dollar0;
#X obj 250 242 s dollar0-s11;
#X obj 150 242 r dollar0-s11;
#X obj 0 264 commun /s12 dollar0;
#X obj 250 264 s dollar0-s12;
#X obj 150 264 r dollar0-s12;
#X obj 0 286 commun /s13 dollar0;
#X obj 250 286 s dollar0-s13;
#X obj 150 286 r dollar0-s13;
#X obj 0 308 commun /s14 dollar0;
#X obj 250 308 s dollar0-s14;
#X obj 150 308 r dollar0-s14;
#X obj 0 330 commun /s15 dollar0;
#X obj 250 330 s dollar0-s15;
#X obj 150 330 r dollar0-s15;
#X connect 0 0 1 0;
#X connect 2 0 0 0;
#X connect 3 0 4 0;
#X connect 5 0 3 0;
#X connect 6 0 7 0;
#X connect 8 0 6 0;
#X connect 9 0 10 0;
#X connect 11 0 9 0;
#X connect 12 0 13 0;
#X connect 14 0 12 0;
#X connect 15 0 16 0;
#X connect 17 0 15 0;
#X connect 18 0 19 0;
#X connect 20 0 18 0;
#X connect 21 0 22 0;
#X connect 23 0 21 0;
#X connect 24 0 25 0;
#X connect 26 0 24 0;
#X connect 27 0 28 0;
#X connect 29 0 27 0;
#X connect 30 0 31 0;
#X connect 32 0 30 0;
#X connect 33 0 34 0;
#X connect 35 0 33 0;
#X connect 36 0 37 0;
#X connect 38 0 36 0;
#X connect 39 0 40 0;
#X connect 41 0 39 0;
#X connect 42 0 43 0;
#X connect 44 0 42 0;
#X connect 45 0 46 0;
#X connect 47 0 45 0;
#X restore 461 68 pd cm;
#X obj 62 201 makefilename /s%d;
#X msg 156 110 \; pd-cm clear;
#X obj 22 76 until;
#X obj 36 105 f;
#X obj 67 107 + 1;
#X obj 67 51 t f b b;
#X msg 99 74 -1;
#X obj 87 131 t f f f f;
#X obj 76 282 pack s 0 s 0 0 0;
#X obj 376 226 + 1;
#X obj 404 226 + 2;
#X obj 381 200 * 3;
#X obj 191 201 makefilename dollar0-s%d;
#X msg 65 314 \; pd-cm obj 0 \$2 commun \$1 dollar0 \; pd-cm obj 250
\$2 s \$3 \; pd-cm obj 150 \$2 r \$3 \; pd-cm connect \$4 0 \$5 0 \;
pd-cm connect \$6 0 \$4 0 \;;
#X text 440 44 communs are built here:;
#X text 57 427 Replace 'dollar0' with \$0 in a text editor later.;
#X text 379 172 Connections;
#X text 273 158 send/receives;
#X text 78 182 commun id;
#X obj 135 223 * 22;
#X text 72 227 y-spacing;
#X msg 76 26 16;
#X connect 0 0 9 0;
#X connect 2 0 10 0;
#X connect 4 0 5 0;
#X connect 5 0 6 0;
#X connect 5 0 0 0;
#X connect 6 0 5 1;
#X connect 7 0 4 0;
#X connect 7 1 8 0;
#X connect 7 2 3 0;
#X connect 8 0 6 0;
#X connect 9 0 2 0;
#X connect 9 1 21 0;
#X connect 9 2 14 0;
#X connect 9 3 13 0;
#X connect 10 0 15 0;
#X connect 11 0 10 4;
#X connect 12 0 10 5;
#X connect 13 0 10 3;
#X connect 13 0 12 0;
#X connect 13 0 11 0;
#X connect 14 0 10 2;
#X connect 21 0 10 1;
#X connect 23 0 7 0;