1 tplarson 1.1 #N canvas 1 52 1265 635 10;
2 #X msg 269 98 65536;
3 #X msg 262 75 131072;
4 #X obj 245 32 loadbang;
5 #X msg 273 126 32768;
6 #X obj 27 87 set-directory;
7 #X obj 27 50 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1 -1
8 ;
9 #X obj 28 112 s data-dir;
10 #X msg 29 150 \; pd dsp 1;
11 #X msg 29 196 \; pd dsp 0;
12 #X obj 234 162 s block-size;
13 #X msg 341 69 50;
14 #X obj 341 101 s window-ramp;
15 #X msg 153 83 ../data, f 10;
16 #X obj 360 133 window-gen;
17 #X obj 207 220 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
18 -1 -1;
19 #X obj 150 221 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
20 -1 -1;
21 #X obj 150 286 s cadence;
22 tplarson 1.1 #X msg 150 248 60;
23 #X msg 207 248 45;
24 #X obj 132 190 s filestem;
25 #X msg 150 122 mdi;
26 #X msg 165 147 hmi;
27 #X msg 261 193 262144;
28 #X obj 344 220 s fileblank;
29 #X msg 344 165 average.modes;
30 #X floatatom 655 481 5 0 0 0 - - -, f 5;
31 #X floatatom 466 353 5 0 0 0 - - -, f 5;
32 #X obj 565 275 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
33 -1 -1;
34 #X floatatom 576 323 5 0 0 0 - - -, f 5;
35 #X floatatom 608 342 5 0 0 0 - - -, f 5;
36 #X floatatom 642 361 5 0 0 0 - - -, f 5;
37 #X obj 757 334 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
38 1;
39 #X msg 721 442 set \$1;
|
40 tplarson 1.2 #X msg 721 478 1010-output;
|
41 tplarson 1.1 #X text 453 331 day number;
42 #X text 620 319 l;
43 #X text 648 339 n;
44 #X text 684 358 m;
45 #X obj 689 641 dac~ 1 2;
46 #X obj 690 586 audio_safety~;
47 #X obj 512 446 *~;
48 #X obj 368 319 * 0.01;
49 #X obj 368 293 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786
50 -1 -1 0 256;
51 #X text 368 275 volume (0-100);
52 #X text 555 257 start;
53 #X text 781 332 on/off;
54 #X obj 24 373 nbx 10 20 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
55 -204786 -1 -1 8000 256;
56 #X msg 24 345 44100;
57 #X text 130 377 desired SR;
58 #X msg 79 345 22050;
59 #X msg 136 345 11025;
60 #X msg 74 319 8000;
61 #X obj 24 416 s play-SR;
62 tplarson 1.1 #X obj 25 483 nbx 10 20 0 22100 0 0 empty empty empty 0 -8 0 10 -204786
63 -1 -1 0 256;
64 #X text 132 493 2 = 1 octave lower;
65 #X text 132 479 downshift factor;
|
66 tplarson 1.2 #X obj 121 606 * 60;
|
67 tplarson 1.1 #X obj 121 660 /;
68 #X floatatom 156 682 10 0 0 0 - - -, f 10;
|
69 tplarson 1.2 #X obj 121 631 f;
|
70 tplarson 1.1 #X obj 73 661 t b f;
71 #X obj 41 599 sel 0;
72 #X msg 41 626 1;
73 #X floatatom 1028 406 5 0 0 0 - - -, f 5;
74 #X floatatom 880 311 5 0 0 0 - - -, f 5;
75 #X obj 979 233 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
76 -1 -1;
77 #X floatatom 990 281 5 0 0 0 - - -, f 5;
78 #X floatatom 1022 300 5 0 0 0 - - -, f 5;
79 #X floatatom 1056 319 5 0 0 0 - - -, f 5;
80 #X obj 1171 292 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
81 0 1;
82 #X msg 1135 400 set \$1;
|
83 tplarson 1.2 #X msg 1135 436 1030-output;
|
84 tplarson 1.1 #X text 867 289 day number;
85 #X text 1034 277 l;
86 #X text 1062 297 n;
87 #X text 1098 316 m;
88 #X obj 926 404 *~;
89 #X obj 804 251 * 0.01;
90 #X obj 804 225 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786
91 -1 -1 0 256;
92 #X text 804 207 volume (0-100);
93 #X text 969 215 start;
94 #X text 1195 290 on/off;
95 #N canvas 0 50 450 250 (subpatch) 0;
96 #X array sumtest 1 float 2;
97 #X coords 0 1 1 -1 200 140 1;
98 #X restore 954 612 graph;
99 #X msg 819 683 \; sumtest normalize;
100 #X msg 819 643 \; sumtest const 0;
101 #X msg 25 452 2;
102 #X msg 107 452 8;
103 #X msg 66 452 4;
104 #X obj 814 556 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
105 tplarson 1.1 -1 -1;
106 #X obj 929 38 r play-SR;
107 #X obj 799 35 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
108 1;
109 #X obj 667 78 * 0.01;
110 #X obj 667 52 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786
111 -1 -1 0 256;
112 #X text 661 33 volume (0-100);
113 #X obj 667 128 *~;
114 #X obj 665 197 dac~ 1 2;
115 #X obj 666 164 audio_safety~;
116 #X obj 799 75 arbitrarySR sumtest;
117 #X floatatom 458 585 5 0 0 0 - - -, f 5;
118 #X obj 408 552 *;
119 #X floatatom 408 585 5 0 0 0 - - -, f 5;
120 #X obj 408 505 t b f;
121 #X obj 156 712 / 1e+06;
122 #X text 233 680 transposition factor;
123 #X floatatom 610 481 5 0 0 0 - - -, f 5;
124 #X floatatom 1124 545 5 0 0 0 - - -, f 5;
125 #X obj 1074 512 *;
126 tplarson 1.1 #X floatatom 1074 545 5 0 0 0 - - -, f 5;
127 #X obj 1066 466 t b f;
128 #X floatatom 982 406 5 0 0 0 - - -, f 5;
129 #X obj 869 571 modeaddition sumtest;
130 #X msg 360 193 %dd.modes;
|
131 tplarson 1.2 #X obj 266 234 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
132 1;
133 #X obj 266 254 s mswitch;
134 #X obj 511 394 modefilter, f 33;
135 #X obj 925 352 modefilter, f 33;
136 #X obj 25 514 s shiftfactor;
137 #X obj 136 545 r cadence;
138 #X obj 136 571 t b f;
|
139 tplarson 1.1 #X connect 0 0 9 0;
140 #X connect 1 0 9 0;
141 #X connect 2 0 12 0;
142 #X connect 2 0 10 0;
143 #X connect 2 0 20 0;
144 #X connect 2 0 24 0;
145 #X connect 2 0 51 0;
146 #X connect 3 0 9 0;
147 #X connect 4 0 6 0;
148 #X connect 4 1 12 0;
149 #X connect 5 0 4 0;
150 #X connect 10 0 11 0;
151 #X connect 12 0 4 1;
152 #X connect 14 0 18 0;
153 #X connect 14 0 22 0;
154 #X connect 15 0 17 0;
155 #X connect 15 0 1 0;
156 #X connect 17 0 16 0;
157 #X connect 18 0 16 0;
158 #X connect 20 0 19 0;
159 #X connect 20 0 15 0;
160 tplarson 1.1 #X connect 21 0 19 0;
161 #X connect 21 0 14 0;
162 #X connect 22 0 9 0;
163 #X connect 24 0 23 0;
|
164 tplarson 1.2 #X connect 25 0 110 3;
165 #X connect 26 0 114 1;
|
166 tplarson 1.1 #X connect 27 0 31 0;
|
167 tplarson 1.2 #X connect 27 0 114 0;
168 #X connect 28 0 114 2;
169 #X connect 29 0 114 3;
170 #X connect 30 0 114 4;
171 #X connect 31 0 114 6;
|
172 tplarson 1.1 #X connect 32 0 33 0;
173 #X connect 39 0 38 0;
174 #X connect 39 0 38 1;
175 #X connect 40 0 39 0;
176 #X connect 41 0 40 1;
177 #X connect 42 0 41 0;
178 #X connect 46 0 52 0;
|
179 tplarson 1.2 #X connect 46 0 56 0;
|
180 tplarson 1.1 #X connect 47 0 46 0;
181 #X connect 49 0 46 0;
182 #X connect 50 0 46 0;
183 #X connect 51 0 46 0;
|
184 tplarson 1.2 #X connect 53 0 61 0;
185 #X connect 53 0 116 0;
186 #X connect 56 0 59 0;
187 #X connect 57 0 58 0;
188 #X connect 58 0 102 0;
189 #X connect 59 0 57 0;
190 #X connect 60 0 59 0;
191 #X connect 60 1 57 1;
192 #X connect 61 0 62 0;
193 #X connect 61 1 60 0;
194 #X connect 62 0 60 0;
195 #X connect 63 0 110 4;
196 #X connect 64 0 115 1;
197 #X connect 65 0 69 0;
198 #X connect 65 0 115 0;
199 #X connect 66 0 115 2;
200 #X connect 67 0 115 3;
201 #X connect 68 0 115 4;
202 #X connect 69 0 115 6;
203 #X connect 70 0 71 0;
204 #X connect 76 0 39 0;
205 tplarson 1.2 #X connect 77 0 76 1;
206 #X connect 78 0 77 0;
207 #X connect 85 0 53 0;
|
208 tplarson 1.1 #X connect 86 0 53 0;
209 #X connect 87 0 53 0;
|
210 tplarson 1.2 #X connect 88 0 110 0;
211 #X connect 89 0 97 1;
212 #X connect 90 0 97 0;
213 #X connect 91 0 94 1;
214 #X connect 92 0 91 0;
215 #X connect 94 0 96 0;
216 #X connect 96 0 95 0;
217 #X connect 96 0 95 1;
218 #X connect 97 0 94 0;
219 #X connect 99 0 100 0;
220 #X connect 101 0 99 0;
221 #X connect 101 1 99 1;
222 #X connect 102 0 101 0;
223 #X connect 102 0 108 0;
224 #X connect 104 0 99 0;
225 #X connect 106 0 107 0;
226 #X connect 108 0 106 0;
227 #X connect 108 1 106 1;
228 #X connect 109 0 106 0;
229 #X connect 111 0 23 0;
230 #X connect 112 0 113 0;
231 tplarson 1.2 #X connect 114 0 40 0;
232 #X connect 114 1 104 0;
233 #X connect 114 2 25 0;
234 #X connect 114 3 98 0;
235 #X connect 114 4 32 0;
236 #X connect 114 4 110 1;
237 #X connect 115 0 76 0;
238 #X connect 115 1 109 0;
239 #X connect 115 2 63 0;
240 #X connect 115 3 105 0;
241 #X connect 115 4 70 0;
242 #X connect 115 4 110 2;
243 #X connect 117 0 118 0;
244 #X connect 118 0 56 0;
245 #X connect 118 1 56 1;
|
Return to
example_addition.pd
CVS log
Up to [Development] / JSOC / proj / globalhs / sosh