small tidy up
[0xa:adriangierakowskis-expr_ep.git] / winter_solstice.pd
1 #N canvas 558 173 323 214 10;
2 #X obj 13 139 dac~;
3 #N canvas 0 0 627 329 struct 0;
4 #X obj 174 218 expr~ floor($v1*8 \, 0);
5 #X obj 183 127 s~ phrase_freq;
6 #X obj 174 243 s~ phrase_count;
7 #X obj 85 218 s~ phrase_sig;
8 #X obj 85 63 s~ MAX-BAR;
9 #X obj 111 127 r~ MAX-BAR;
10 #X obj 85 127 /~;
11 #X obj 85 169 phasor~;
12 #X obj 85 82 sig~ 0.36;
13 #X obj 183 108 /~ 16;
14 #X obj 85 194 expr~ fmod($v1*$v2 \, 1);
15 #X obj 215 150 r~ MAX-BAR;
16 #X obj 215 175 /~ 8;
17 #X obj 343 215 s~ note_count;
18 #X obj 478 167 r~ MAX-BAR;
19 #X obj 344 188 expr~ floor($v1*$v2 \, 0);
20 #X msg 361 121 0;
21 #X obj 85 43 sig~ 73;
22 #X msg 203 41 \; pd dsp 1;
23 #X obj 203 16 loadbang;
24 #X obj 439 239 snapshot~;
25 #X obj 439 217 bang~;
26 #X obj 439 267 outlet;
27 #X obj 362 88 r RESET;
28 #X obj 311 34 inlet;
29 #X msg 405 128 0.4;
30 #X connect 0 0 2 0;
31 #X connect 5 0 6 1;
32 #X connect 6 0 7 0;
33 #X connect 7 0 10 0;
34 #X connect 7 0 15 0;
35 #X connect 7 0 20 0;
36 #X connect 8 0 6 0;
37 #X connect 8 0 9 0;
38 #X connect 9 0 1 0;
39 #X connect 10 0 3 0;
40 #X connect 10 0 0 0;
41 #X connect 11 0 12 0;
42 #X connect 12 0 10 1;
43 #X connect 14 0 15 1;
44 #X connect 15 0 13 0;
45 #X connect 16 0 7 1;
46 #X connect 17 0 4 0;
47 #X connect 19 0 18 0;
48 #X connect 20 0 22 0;
49 #X connect 21 0 20 0;
50 #X connect 23 0 16 0;
51 #X connect 24 0 16 0;
52 #X connect 25 0 7 1;
53 #X restore 13 44 pd struct;
54 #X obj 16 65 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
55 -1 -1 11836 1;
56 #N canvas 102 519 315 245 synths 0;
57 #N canvas 268 90 966 724 v2 0;
58 #X obj 43 22 sig~ 0;
59 #X obj 44 176 +~;
60 #X obj 45 214 mtof~;
61 #X obj 45 277 phasor~;
62 #X obj 60 132 expr~ $v1%4;
63 #X obj 60 83 expr~ floor($v1*8 \, 0);
64 #X obj 230 132 expr~ if($v1>3 \, 11 \, 5);
65 #X obj 60 153 expr~ if($v1==0 \, 0 \, if($v1==1 \, 7 \, if($v1==2 \,
66 $v2 \, $v3)) );
67 #X obj 45 256 *~ 1.01;
68 #X obj 44 196 +~ 48;
69 #X obj 45 235 lop~ 2;
70 #X obj 400 133 expr~ if($v1> 3 \, 4 \, -1);
71 #X obj 60 61 expr~ fmod($v1+$v2 \, 1);
72 #X obj 190 42 *~ 4;
73 #X obj 44 699 outlet~;
74 #X obj 189 18 r~ phrase_freq;
75 #X obj 60 41 r~ phrase_sig;
76 #X obj 59 534 expr~ fmod($v1*$v2 \, 1);
77 #X obj 191 290 *~;
78 #X obj 207 270 expr~ pow($v1 \, 2);
79 #X obj 192 191 expr~ (cos($v1*3.14159265*2)*0.5)+0.5;
80 #X obj 206 249 expr~ abs((abs($v1-0.5)*2)-1);
81 #X obj 205 229 expr~ fmod($v1*2 \, 1);
82 #X obj 192 210 *~ 5;
83 #X obj 192 171 expr~ fmod($v1*4 \, 1);
84 #X obj 45 559 expr~ if($v1>$v2 \, 1 \, 0);
85 #X obj 45 675 *~;
86 #X obj 60 655 lop~ 0.5;
87 #X obj 189 515 *~;
88 #X obj 203 493 expr~ if($v1>30&&$v1<64 \, $v2 \, 1);
89 #X obj 280 28 r~ note_count;
90 #X obj 390 433 expr~ floor($v1*16 \, 0)+$v2;
91 #X obj 730 394 expr~ if($v1<8 \, 1 \, 0);
92 #X obj 542 414 expr~ if($v1>30&&$v1<64 \, 1 \, $v2);
93 #X obj 391 473 expr~ if(!($v1%$v2) \, 8 \, 1);
94 #X obj 190 332 +~;
95 #X obj 60 634 expr~ if($v1>7&&$v1<68 \, 1 \, 0);
96 #X obj 390 342 expr~ fmod($v1*8 \, 1);
97 #X obj 730 376 expr~ floor($v1*16 \, 0);
98 #X obj 543 453 expr~ if($v1>51&&$v1<64 \, 8 \, 16);
99 #X obj 206 312 expr~ if($v1>51&&$v1<64 \, 3 \, 2);
100 #X obj 74 581 sig~ 0.2;
101 #X obj 44 609 expr~ $v1-($v2/2);
102 #X obj 45 581 *~;
103 #X connect 0 0 1 0;
104 #X connect 1 0 9 0;
105 #X connect 2 0 10 0;
106 #X connect 3 0 17 0;
107 #X connect 3 0 25 0;
108 #X connect 4 0 7 0;
109 #X connect 5 0 4 0;
110 #X connect 5 0 6 0;
111 #X connect 5 0 11 0;
112 #X connect 6 0 7 1;
113 #X connect 7 0 1 1;
114 #X connect 8 0 3 0;
115 #X connect 9 0 2 0;
116 #X connect 10 0 8 0;
117 #X connect 11 0 7 2;
118 #X connect 12 0 5 0;
119 #X connect 12 0 24 0;
120 #X connect 12 0 22 0;
121 #X connect 13 0 12 1;
122 #X connect 15 0 13 0;
123 #X connect 16 0 12 0;
124 #X connect 16 0 37 0;
125 #X connect 17 0 25 1;
126 #X connect 18 0 35 0;
127 #X connect 19 0 18 1;
128 #X connect 20 0 23 0;
129 #X connect 21 0 19 0;
130 #X connect 22 0 21 0;
131 #X connect 23 0 18 0;
132 #X connect 24 0 20 0;
133 #X connect 25 0 43 0;
134 #X connect 26 0 14 0;
135 #X connect 27 0 26 1;
136 #X connect 28 0 17 1;
137 #X connect 29 0 28 1;
138 #X connect 30 0 29 0;
139 #X connect 30 0 33 0;
140 #X connect 30 0 36 0;
141 #X connect 30 0 39 0;
142 #X connect 30 0 40 0;
143 #X connect 31 0 34 0;
144 #X connect 32 0 33 1;
145 #X connect 33 0 31 1;
146 #X connect 34 0 29 1;
147 #X connect 35 0 28 0;
148 #X connect 36 0 27 0;
149 #X connect 37 0 31 0;
150 #X connect 37 0 38 0;
151 #X connect 38 0 32 0;
152 #X connect 39 0 34 1;
153 #X connect 40 0 35 1;
154 #X connect 41 0 42 1;
155 #X connect 41 0 43 1;
156 #X connect 42 0 26 0;
157 #X connect 43 0 42 0;
158 #X restore 62 41 pd v2;
159 #N canvas 305 35 943 581 v3 0;
160 #X obj 18 18 sig~ 0;
161 #X obj 19 173 +~;
162 #X obj 20 211 mtof~;
163 #X obj 20 274 phasor~;
164 #X obj 34 118 expr~ $v1%4;
165 #X obj 33 89 expr~ floor($v1*8 \, 0);
166 #X obj 20 253 *~ 1.01;
167 #X obj 20 232 lop~ 2;
168 #X obj 33 67 expr~ fmod($v1+$v2 \, 1);
169 #X obj 19 193 +~ 60;
170 #X obj 162 47 *~ 3;
171 #X obj 205 127 expr~ if($v1>3 \, 4 \, 4);
172 #X obj 381 128 expr~ if($v1> 3 \, 7 \, 12);
173 #X obj 35 149 expr~ if($v1==0 \, 7 \, if($v1==1 \, 0 \, if($v1==2 \,
174 $v2 \, $v3)) );
175 #X obj 19 546 outlet~;
176 #X obj 162 24 r~ phrase_freq;
177 #X obj 33 44 r~ phrase_sig;
178 #X obj 155 382 expr~ fmod($v1*$v2 \, 1);
179 #X obj 285 314 +~ 2;
180 #X obj 285 293 *~;
181 #X obj 301 271 expr~ pow($v1 \, 2);
182 #X obj 286 190 expr~ (cos($v1*3.14159265*2)*0.5)+0.5;
183 #X obj 300 250 expr~ abs((abs($v1-0.5)*2)-1);
184 #X obj 299 230 expr~ fmod($v1*2 \, 1);
185 #X obj 286 209 *~ 5;
186 #X obj 286 171 expr~ fmod($v1*4 \, 1);
187 #X obj 19 402 expr~ if($v1>$v2 \, 1 \, 0);
188 #X obj 20 526 *~;
189 #X obj 35 504 lop~ 0.5;
190 #X obj 284 353 *~;
191 #X obj 488 314 expr~ if($v1 \, $v2 \, 1);
192 #X obj 488 237 expr~ floor($v1*32 \, 0);
193 #X obj 300 333 expr~ if($v1>23&&$v1<64 \, $v2 \, 1);
194 #X obj 488 255 expr~ if(!($v1%$v2) \, 1 \, 0);
195 #X obj 262 24 r~ note_count;
196 #X obj 35 482 expr~ if($v1>15&&$v1<70 \, 1 \, 0);
197 #X obj 610 276 expr~ floor($v1*128 \, 0);
198 #X obj 610 294 expr~ if(!($v1%2) \, 4 \, 1);
199 #X obj 640 237 expr~ if($v1>47&&$v1<64 \, 2 \, 4);
200 #X obj 117 441 sig~ 0.2;
201 #X obj 19 461 expr~ $v1-($v2/2);
202 #X obj 18 425 *~;
203 #X connect 0 0 1 0;
204 #X connect 1 0 9 0;
205 #X connect 2 0 7 0;
206 #X connect 3 0 17 0;
207 #X connect 3 0 26 0;
208 #X connect 4 0 13 0;
209 #X connect 5 0 4 0;
210 #X connect 5 0 11 0;
211 #X connect 5 0 12 0;
212 #X connect 6 0 3 0;
213 #X connect 7 0 6 0;
214 #X connect 8 0 5 0;
215 #X connect 8 0 25 0;
216 #X connect 8 0 23 0;
217 #X connect 9 0 2 0;
218 #X connect 10 0 8 1;
219 #X connect 11 0 13 1;
220 #X connect 12 0 13 2;
221 #X connect 13 0 1 1;
222 #X connect 15 0 10 0;
223 #X connect 16 0 8 0;
224 #X connect 16 0 31 0;
225 #X connect 16 0 36 0;
226 #X connect 17 0 26 1;
227 #X connect 18 0 29 0;
228 #X connect 19 0 18 0;
229 #X connect 20 0 19 1;
230 #X connect 21 0 24 0;
231 #X connect 22 0 20 0;
232 #X connect 23 0 22 0;
233 #X connect 24 0 19 0;
234 #X connect 25 0 21 0;
235 #X connect 26 0 41 0;
236 #X connect 27 0 14 0;
237 #X connect 28 0 27 1;
238 #X connect 29 0 17 1;
239 #X connect 30 0 32 1;
240 #X connect 31 0 33 0;
241 #X connect 32 0 29 1;
242 #X connect 33 0 30 0;
243 #X connect 34 0 32 0;
244 #X connect 34 0 35 0;
245 #X connect 34 0 38 0;
246 #X connect 35 0 28 0;
247 #X connect 36 0 37 0;
248 #X connect 37 0 30 1;
249 #X connect 38 0 33 1;
250 #X connect 39 0 40 1;
251 #X connect 39 0 41 1;
252 #X connect 40 0 27 0;
253 #X connect 41 0 40 0;
254 #X restore 100 42 pd v3;
255 #N canvas 247 0 948 732 v1 0;
256 #X obj 58 19 sig~ 0;
257 #X obj 59 243 +~;
258 #X obj 60 281 mtof~;
259 #X obj 63 363 phasor~;
260 #X obj 75 69 expr~ floor($v1*8 \, 0);
261 #X obj 74 185 expr~ $v1%4;
262 #X obj 245 185 expr~ if($v1> 3 \, -1 \, 7);
263 #X obj 415 185 expr~ if($v1> 3 \, 0 \, 4);
264 #X obj 75 207 expr~ if($v1==0 \, 0 \, if($v1==1 \, 2 \, if($v1==2 \,
265 $v2 \, $v3)) );
266 #X obj 83 243 s~ base;
267 #X obj 60 263 +~ 36;
268 #X obj 323 322 lop~ 2;
269 #X obj 197 578 expr~ fmod($v1*$v2 \, 1);
270 #X obj 62 602 expr~ if($v1>$v2 \, 1 \, 0);
271 #X obj 327 480 +~ 2;
272 #X obj 327 459 *~;
273 #X obj 363 458 expr~ pow($v1 \, 2);
274 #X obj 62 674 outlet~;
275 #X obj 76 41 r~ phrase_sig;
276 #X obj 329 385 expr~ (cos($v1*3.14159265*2)*0.5)+0.5;
277 #X obj 362 437 expr~ abs((abs($v1-0.5)*2)-1);
278 #X obj 361 417 expr~ fmod($v1*2 \, 1);
279 #X obj 328 415 *~ 5;
280 #X obj 329 364 expr~ fmod($v1*4 \, 1);
281 #X obj 214 69 expr~ fmod($v1*8 \, 1);
282 #X obj 327 559 *~;
283 #X obj 341 534 expr~ if($v1>38&&$v1<64 \, $v2 \, 1);
284 #X obj 531 491 expr~ floor($v1*$v2 \, 0);
285 #X obj 531 470 expr~ fmod($v1+(1/8.0) \, 1);
286 #X obj 343 38 r~ note_count;
287 #X obj 151 324 *~;
288 #X obj 63 344 expr~ if($v1==72 \, $v2 \, if($v1==0 \, $v3 \, $v4))
289 ;
290 #X obj 238 323 *~;
291 #X obj 252 297 expr~ -pow(2 \, -(2*10)*$v1)+1;
292 #X obj 165 275 expr~ pow(abs($v1-1) \, 1);
293 #X obj 667 425 expr~ if($v1>55&&$v1<64 \, 16 \, 8);
294 #X obj 531 514 expr~ if(!($v1%$v2) \, $v3 \, 1);
295 #X obj 695 493 expr~ if($v1>55&&$v1<64 \, 32 \, 16);
296 #X obj 614 450 expr~ if($v1>55&&$v1<64 \, 4 \, 8);
297 #X obj 160 621 sig~ 0.2;
298 #X obj 62 625 *~;
299 #X obj 62 648 expr~ $v1-($v2/2);
300 #X connect 0 0 1 0;
301 #X connect 1 0 9 0;
302 #X connect 1 0 10 0;
303 #X connect 2 0 11 0;
304 #X connect 2 0 30 0;
305 #X connect 2 0 32 0;
306 #X connect 3 0 13 0;
307 #X connect 3 0 12 0;
308 #X connect 4 0 5 0;
309 #X connect 4 0 6 0;
310 #X connect 4 0 7 0;
311 #X connect 5 0 8 0;
312 #X connect 6 0 8 1;
313 #X connect 7 0 8 2;
314 #X connect 8 0 1 1;
315 #X connect 10 0 2 0;
316 #X connect 11 0 31 3;
317 #X connect 12 0 13 1;
318 #X connect 13 0 40 0;
319 #X connect 14 0 25 0;
320 #X connect 15 0 14 0;
321 #X connect 16 0 15 1;
322 #X connect 18 0 4 0;
323 #X connect 18 0 21 0;
324 #X connect 18 0 23 0;
325 #X connect 18 0 24 0;
326 #X connect 19 0 22 0;
327 #X connect 20 0 16 0;
328 #X connect 21 0 20 0;
329 #X connect 22 0 15 0;
330 #X connect 23 0 19 0;
331 #X connect 24 0 28 0;
332 #X connect 24 0 33 0;
333 #X connect 24 0 34 0;
334 #X connect 25 0 12 1;
335 #X connect 26 0 25 1;
336 #X connect 27 0 36 0;
337 #X connect 28 0 27 0;
338 #X connect 29 0 26 0;
339 #X connect 29 0 31 0;
340 #X connect 29 0 35 0;
341 #X connect 29 0 37 0;
342 #X connect 29 0 38 0;
343 #X connect 30 0 31 1;
344 #X connect 31 0 3 0;
345 #X connect 32 0 31 2;
346 #X connect 33 0 32 1;
347 #X connect 34 0 30 1;
348 #X connect 35 0 27 1;
349 #X connect 36 0 26 1;
350 #X connect 37 0 36 2;
351 #X connect 38 0 36 1;
352 #X connect 39 0 40 1;
353 #X connect 39 0 41 1;
354 #X connect 40 0 41 0;
355 #X connect 41 0 17 0;
356 #X restore 25 40 pd v1;
357 #N canvas 0 0 798 712 v4 0;
358 #X obj 28 25 sig~ 0;
359 #X obj 29 193 +~;
360 #X obj 29 233 mtof~;
361 #X obj 29 364 phasor~;
362 #X obj 191 92 expr~ floor($v1*8 \, 0);
363 #X obj 29 254 lop~ 2;
364 #X obj 74 69 expr~ fmod($v1+$v2 \, 1);
365 #X obj 27 673 outlet~;
366 #X obj 203 25 r~ phrase_freq;
367 #X obj 75 25 r~ phrase_sig;
368 #X obj 163 362 expr~ (cos($v1*3.14159265*2)*0.5)+0.5;
369 #X obj 28 542 expr~ if($v1>$v2 \, 1 \, 0);
370 #X obj 27 654 *~;
371 #X obj 162 519 *~;
372 #X obj 367 459 expr~ if($v1 \, $v2 \, 1);
373 #X obj 178 478 expr~ if($v1>23&&$v1<64 \, $v2 \, 1);
374 #X obj 367 403 expr~ if(!($v1%$v2) \, 1 \, 0);
375 #X obj 295 25 r~ note_count;
376 #X obj 405 112 sig~ 7;
377 #X obj 234 112 sig~ 0;
378 #X obj 362 112 sig~ 5;
379 #X obj 320 112 sig~ 4;
380 #X obj 536 112 sig~ 12;
381 #X obj 191 132 expr~ if($v1==0 \, $v2 \, if($v1==1 \, $v3 \, if($v1==2
382 \, $v4 \, if($v1==3 \, $v5 \, if($v1==4 \, $v6 \, if($v1==5 \, $v7
383 \, if($v1==6 \, $v8 \, $v9)))))));
384 #X obj 277 112 sig~ 9;
385 #X obj 492 112 sig~ 4;
386 #X obj 449 112 sig~ 0;
387 #X obj 44 294 expr~ (cos($v1*3.14159265*2)*0.5)+0.5;
388 #X obj 29 344 +~;
389 #X obj 45 321 expr~ $v1*$v2;
390 #X obj 45 273 expr~ fmod($v1*128 \, 1);
391 #X obj 163 343 expr~ fmod($v1*256 \, 1);
392 #X obj 163 381 expr~ ($v1*0.1)+0.1;
393 #X obj 488 421 expr~ floor($v1*128 \, 0);
394 #X obj 519 384 expr~ if($v1>47&&$v1<64 \, 2 \, 2);
395 #X obj 366 382 expr~ floor($v1*16 \, 0);
396 #X obj 178 499 lop~ 500;
397 #X obj 489 440 expr~ if(!($v1%2) \, 0.1 \, 1);
398 #X obj 202 48 *~ 0;
399 #X obj 130 321 sig~ 15;
400 #X obj 29 213 +~ 84;
401 #X obj 43 613 expr~ if($v1>55&&$v1<72 \, 1 \, 0);
402 #X obj 43 634 lop~ 0.5;
403 #X obj 45 175 expr~ if($v1>70 \, 12 \, $v2);
404 #X obj 125 567 sig~ 0.2;
405 #X obj 27 593 expr~ $v1-($v2/2);
406 #X obj 28 563 *~;
407 #X connect 0 0 1 0;
408 #X connect 1 0 40 0;
409 #X connect 2 0 5 0;
410 #X connect 3 0 11 0;
411 #X connect 4 0 23 0;
412 #X connect 5 0 28 0;
413 #X connect 6 0 4 0;
414 #X connect 6 0 30 0;
415 #X connect 6 0 31 0;
416 #X connect 8 0 38 0;
417 #X connect 9 0 6 0;
418 #X connect 9 0 33 0;
419 #X connect 9 0 35 0;
420 #X connect 10 0 32 0;
421 #X connect 11 0 46 0;
422 #X connect 12 0 7 0;
423 #X connect 13 0 11 1;
424 #X connect 14 0 15 1;
425 #X connect 15 0 36 0;
426 #X connect 16 0 14 0;
427 #X connect 17 0 15 0;
428 #X connect 17 0 34 0;
429 #X connect 17 0 41 0;
430 #X connect 17 0 43 0;
431 #X connect 18 0 23 5;
432 #X connect 19 0 23 1;
433 #X connect 20 0 23 4;
434 #X connect 21 0 23 3;
435 #X connect 22 0 23 8;
436 #X connect 23 0 43 1;
437 #X connect 24 0 23 2;
438 #X connect 25 0 23 7;
439 #X connect 26 0 23 6;
440 #X connect 27 0 29 0;
441 #X connect 28 0 3 0;
442 #X connect 29 0 28 1;
443 #X connect 30 0 27 0;
444 #X connect 31 0 10 0;
445 #X connect 32 0 13 0;
446 #X connect 33 0 37 0;
447 #X connect 34 0 16 1;
448 #X connect 35 0 16 0;
449 #X connect 36 0 13 1;
450 #X connect 37 0 14 1;
451 #X connect 38 0 6 1;
452 #X connect 39 0 29 1;
453 #X connect 40 0 2 0;
454 #X connect 41 0 42 0;
455 #X connect 42 0 12 1;
456 #X connect 43 0 1 1;
457 #X connect 44 0 45 1;
458 #X connect 44 0 46 1;
459 #X connect 45 0 12 0;
460 #X connect 46 0 45 0;
461 #X restore 138 42 pd v4;
462 #X obj 25 101 s~ snd;
463 #X connect 0 0 4 0;
464 #X connect 1 0 4 0;
465 #X connect 2 0 4 0;
466 #X connect 3 0 4 0;
467 #X restore 13 89 pd synths;
468 #N canvas 534 432 470 298 rec 0;
469 #X obj 54 42 r~ snd;
470 #X obj 55 159 writesf~ 2;
471 #X msg 174 84 open \$1;
472 #X obj 174 39 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
473 -1;
474 #X obj 270 58 t b b;
475 #X msg 270 86 start;
476 #X obj 297 112 s RESET;
477 #X obj 336 43 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
478 -1;
479 #X msg 343 76 stop;
480 #X obj 270 30 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
481 -1;
482 #X obj 300 39 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
483 -1;
484 #X obj 174 60 savepanel;
485 #X connect 0 0 1 0;
486 #X connect 0 0 1 1;
487 #X connect 2 0 1 0;
488 #X connect 3 0 11 0;
489 #X connect 4 0 5 0;
490 #X connect 4 1 6 0;
491 #X connect 5 0 1 0;
492 #X connect 7 0 6 0;
493 #X connect 8 0 1 0;
494 #X connect 9 0 4 0;
495 #X connect 10 0 6 0;
496 #X connect 11 0 2 0;
497 #X restore 73 44 pd rec;
498 #X obj 13 20 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
499 -1;
500 #X obj 13 116 r~ snd;
501 #X connect 1 0 2 0;
502 #X connect 5 0 1 0;
503 #X connect 6 0 0 0;
504 #X connect 6 0 0 1;