You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

172 lines
4.4 KiB
Plaintext

#N canvas 532 58 416 260 10;
#N canvas 574 438 727 460 score 0;
#X restore 48 22 pd score;
#X text 115 21 <- click to open;
#N canvas 1413 61 440 186 template 0;
#X text 66 11 now with an array;
#X obj 39 45 struct template float x float y array sequence template-element
array delay delay-element;
#X obj 38 83 plot sequence 339 10 10 100 10;
#X obj 38 113 plot delay 393 10 10 100 10;
#X restore 51 84 pd template;
#N canvas 1565 316 333 80 template-element 0;
#X obj 48 27 struct template-element float y;
#X restore 51 106 pd template-element;
#N canvas 70 363 945 488 init 0;
#X obj 94 18 inlet;
#X msg 195 27 \; pd-score clear;
#X obj 94 38 t b b b;
#X obj 224 102 pointer;
#X msg 224 82 traverse pd-score \, bang;
#X msg 94 106 100 100;
#X obj 94 128 append template x y;
#X obj 94 154 t b b p;
#X obj 125 239 setsize template sequence;
#X obj 191 339 element template sequence;
#X obj 63 312 unpack;
#X msg 123 218 50;
#X obj 63 365 set template-element y;
#X msg 63 284 0 10 \, -10 15 \, -30 20 \, 50 30 \, 0 40 \, 10 45 \,
0 50;
#X obj 485 239 setsize template delay;
#X obj 551 339 element template delay;
#X obj 424 400 set delay-element x y;
#X obj 423 317 unpack f f f;
#X msg 485 217 10;
#X msg 423 284 0 0 1 \, -10 -10 2 \, -30 -30 3 \, 50 50 4 \, 0 0 5
\, 10 10 6 \, 0 0 7;
#X obj 33 81 s b;
#X connect 0 0 2 0;
#X connect 2 0 5 0;
#X connect 2 0 20 0;
#X connect 2 1 4 0;
#X connect 2 2 1 0;
#X connect 3 0 6 2;
#X connect 4 0 3 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 13 0;
#X connect 7 0 19 0;
#X connect 7 1 11 0;
#X connect 7 1 18 0;
#X connect 7 2 8 1;
#X connect 7 2 9 1;
#X connect 7 2 14 1;
#X connect 7 2 15 1;
#X connect 9 0 12 1;
#X connect 10 0 12 0;
#X connect 10 1 9 0;
#X connect 11 0 8 0;
#X connect 13 0 10 0;
#X connect 15 0 16 2;
#X connect 17 0 16 0;
#X connect 17 1 16 1;
#X connect 17 2 15 0;
#X connect 18 0 14 0;
#X connect 19 0 17 0;
#X restore 52 188 pd init;
#X msg 52 162 bang;
#N canvas 1112 97 477 841 synth 0;
#X obj 47 590 osc~;
#X obj 272 323 pointer;
#X msg 272 295 traverse pd-score \, next;
#X obj 100 375 element template sequence;
#X floatatom 115 430 5 0 0 0 - - -, f 5;
#X obj 100 400 get template-element y;
#X obj 131 125 + 1;
#X obj 100 125 i;
#X msg 142 175 0;
#X floatatom 50 188 5 0 0 0 - - -, f 5;
#X obj 142 154 sel 49;
#X obj 100 36 inlet;
#X obj 47 493 mtof;
#X obj 49 776 dac~;
#X obj 47 470 abs;
#X obj 104 611 line~;
#X obj 47 630 *~;
#X obj 47 515 t b f;
#X obj 160 37 inlet;
#X obj 100 87 metro 200;
#X obj 262 444 / 10;
#X obj 262 464 i;
#X floatatom 262 558 5 0 0 0 - - -, f 5;
#X obj 262 507 element template delay;
#X obj 262 532 get delay-element x y;
#X floatatom 420 557 5 0 0 0 - - -, f 5;
#X floatatom 271 488 5 0 0 0 - - -, f 5;
#X obj 322 714 table del;
#X obj 48 681 +~;
#X obj 262 631 line~;
#X obj 262 656 delread4~ fb;
#X obj 185 741 delwrite~ fb 4000;
#X obj 49 706 *~ 0.5;
#X obj 385 586 abs;
#X obj 131 556 f;
#X floatatom 193 585 5 0 0 0 - - -, f 5;
#X msg 131 585 0 \$1;
#X obj 131 507 b;
#X msg 99 473 1 2;
#X obj 131 528 del 2;
#X obj 385 564 * 4;
#X msg 262 607 \$1 1000;
#X obj 288 237 r b;
#X connect 0 0 16 0;
#X connect 1 0 3 1;
#X connect 1 0 23 1;
#X connect 2 0 1 0;
#X connect 3 0 5 0;
#X connect 5 0 4 0;
#X connect 5 0 14 0;
#X connect 6 0 7 1;
#X connect 7 0 6 0;
#X connect 7 0 9 0;
#X connect 7 0 10 0;
#X connect 7 0 3 0;
#X connect 7 0 20 0;
#X connect 8 0 7 1;
#X connect 10 0 8 0;
#X connect 11 0 19 0;
#X connect 12 0 17 0;
#X connect 14 0 12 0;
#X connect 15 0 16 1;
#X connect 16 0 28 0;
#X connect 17 0 38 0;
#X connect 17 1 0 0;
#X connect 18 0 19 1;
#X connect 19 0 7 0;
#X connect 20 0 21 0;
#X connect 21 0 23 0;
#X connect 21 0 26 0;
#X connect 22 0 41 0;
#X connect 23 0 24 0;
#X connect 24 0 22 0;
#X connect 24 1 25 0;
#X connect 24 1 40 0;
#X connect 28 0 32 0;
#X connect 29 0 30 0;
#X connect 30 0 28 1;
#X connect 32 0 13 0;
#X connect 32 0 13 1;
#X connect 32 0 31 0;
#X connect 33 0 34 1;
#X connect 34 0 36 0;
#X connect 34 0 35 0;
#X connect 36 0 15 0;
#X connect 37 0 39 0;
#X connect 38 0 15 0;
#X connect 38 0 37 0;
#X connect 39 0 34 0;
#X connect 40 0 33 0;
#X connect 41 0 29 0;
#X connect 42 0 2 0;
#X restore 269 187 pd synth;
#X obj 269 158 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X floatatom 322 160 5 0 0 0 - - -, f 5;
#N canvas 1570 501 337 84 delay-element 0;
#X obj 33 30 struct delay-element float x float y;
#X restore 51 127 pd delay-element;
#X connect 5 0 4 0;
#X connect 7 0 6 0;
#X connect 8 0 6 1;