#N struct 1287template float x array 1287arrayvals 1287arraytemplate
;
#N struct 1287arraytemplate float x;
#N canvas 260 24 721 668 10;
#N canvas 0 16 999 675 1287data 0;
#X scalar 1287template 0 \; 0 \; \;;
#X coords 0 0 192 16 192 16 1;
#X restore 4 18 pd \$0data;
#N canvas 183 252 599 314 1287template 0;
#X obj 17 53 struct \$0template float x array \$0arrayvals \$0arraytemplate
;
#X obj 17 74 print;
#X obj 17 30 plot -x x(0:189)(0:189) \$0arrayvals 0 0 0 0 0;
#X connect 0 0 1 0;
#X restore 236 36 pd \$0template;
#N canvas 435 201 450 300 1287arraytemplate 0;
#X obj 24 65 print;
#X obj 24 43 struct \$0arraytemplate float x;
#X obj 24 22 filledpolygon 333 333 1 0 2 2 2 2 6 0 6 0 14;
#X connect 1 0 0 0;
#X restore 236 13 pd \$0arraytemplate;
#N canvas 0 0 439 363 initarray 0;
#X obj 163 211 pointer;
#X text 186 35 click here to re-initialize;
#X msg 300 176 \; \$1 clear;
#X obj 163 96 \$0;
#X msg 163 188 traverse \$1 \, bang;
#X obj 163 119 makefilename pd-%ddata;
#X obj 35 251 append \$0template x;
#X msg 35 219 0;
#X obj 133 12 loadbang;
#X obj 133 72 t b b b;
#X obj 68 114 outlet;
#X obj 163 140 t s s;
#X obj 77 9 inlet;
#X connect 0 0 6 1;
#X connect 3 0 5 0;
#X connect 4 0 0 0;
#X connect 5 0 11 0;
#X connect 7 0 6 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 9 1 7 0;
#X connect 9 2 3 0;
#X connect 11 0 4 0;
#X connect 11 1 2 0;
#X connect 12 0 9 0;
#X restore 415 69 pd initarray;
#X obj 415 182 pointer;
#X obj 453 253 setsize \$0template \$0arrayvals;
#X msg 415 159 traverse \$1 \, next;
#X obj 415 115 \$0;
#X obj 415 138 makefilename pd-%ddata;
#X obj 415 91 delay 10;
#X obj 357 391 inlet;
#X text 20 391 this is how long you want the envelope to take.;
#X text 414 7 args: [name] [number of points];
#X obj 415 391 t p p;
#X obj 453 229 1;
#N canvas 343 66 484 592 envgen 0;
#X obj 102 260 element \$0template \$0arrayvals;
#X obj 171 400 *;
#X obj 102 145 f;
#X obj 130 145 + 1;
#X msg 102 95 0;
#X obj 171 469 t b f;
#X obj 242 538 delay;
#X obj 242 559 s \$0-loop;
#X obj 23 102 r \$0-loop;
#X obj 102 238 spigot;
#X obj 171 358 - 3;
#X obj 171 378 / 186;
#X obj 171 422 t f f;
#X obj 171 446 -;
#X obj 175 154 getsize \$0template \$0arrayvals;
#X obj 102 3 inlet;
#X obj 307 235 inlet;
#X obj 102 30 t b f b;
#X obj 175 132 pointer;
#X msg 175 109 traverse \$1 \, next;
#X obj 175 65 \$0;
#X obj 175 88 makefilename pd-%ddata;
#X msg 222 421 0;
#X obj 168 239 select 0;
#X text 333 319 redraw;
#X obj 102 281 t p p;
#X obj 102 314 get \$0arraytemplate x;
#X obj 290 339 set \$0arraytemplate x;
#X obj 102 169 t f f f;
#X obj 171 492 f;
#X obj 170 576 outlet;
#X obj 170 536 - 1;
#X obj 111 487 *;
#X obj 175 175 t f f;
#X obj 132 213 <= 1;
#X obj 170 555 +;
#X obj 221 377 r \$0-beatsize;
#X obj 171 512 select 0;
#X connect 0 0 25 0;
#X connect 1 0 12 0;
#X connect 2 0 3 0;
#X connect 2 0 28 0;
#X connect 3 0 2 1;
#X connect 4 0 2 0;
#X connect 5 0 6 0;
#X connect 5 0 29 0;
#X connect 5 1 6 1;
#X connect 6 0 7 0;
#X connect 8 0 2 0;
#X connect 9 0 0 0;
#X connect 10 0 11 0;
#X connect 11 0 1 0;
#X connect 12 0 13 1;
#X connect 12 1 13 0;
#X connect 13 0 5 0;
#X connect 14 0 33 0;
#X connect 15 0 17 0;
#X connect 16 0 0 1;
#X connect 17 0 4 0;
#X connect 17 1 32 0;
#X connect 17 2 20 0;
#X connect 18 0 14 0;
#X connect 19 0 18 0;
#X connect 20 0 21 0;
#X connect 21 0 19 0;
#X connect 22 0 13 1;
#X connect 23 0 22 0;
#X connect 25 0 26 0;
#X connect 25 1 27 1;
#X connect 26 0 10 0;
#X connect 26 0 27 0;
#X connect 28 0 9 0;
#X connect 28 1 34 0;
#X connect 28 2 29 1;
#X connect 29 0 37 0;
#X connect 31 0 35 0;
#X connect 32 0 35 1;
#X connect 33 0 34 1;
#X connect 33 1 32 1;
#X connect 34 0 9 1;
#X connect 34 0 23 0;
#X connect 35 0 30 0;
#X connect 36 0 1 1;
#X connect 37 1 31 0;
#X restore 357 416 pd envgen;
#X obj 456 329 element \$0template \$0arrayvals;
#X msg 456 306 0;
#X obj 415 206 t p p b p;
#N canvas 212 221 507 438 save 0;
#X obj 7 394 sssad/sssad \$1;
#X obj 57 11 r SSSAD_SAVE;
#X obj 76 239 element \$0template \$0arrayvals;
#X obj 76 217 f;
#X obj 104 217 + 1;
#X obj 76 194 until;
#X msg 113 172 0;
#X obj 53 333 list prepend;
#X obj 146 333 t l;
#X obj 30 362 list;
#X obj 57 36 t b b b b;
#X obj 281 217 inlet;
#X obj 76 127 pointer;
#X msg 76 104 traverse \$1 \, next;
#X obj 76 60 \$0;
#X obj 76 83 makefilename pd-%ddata;
#X obj 76 148 getsize \$0template \$0arrayvals;
#X obj 7 415 outlet;
#X obj 76 260 get \$0arraytemplate x;
#X connect 0 0 17 0;
#X connect 1 0 10 0;
#X connect 2 0 18 0;
#X connect 3 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 3 1;
#X connect 5 0 3 0;
#X connect 6 0 3 1;
#X connect 7 0 8 0;
#X connect 7 0 9 1;
#X connect 8 0 7 1;
#X connect 9 0 0 1;
#X connect 10 0 9 0;
#X connect 10 1 14 0;
#X connect 10 2 6 0;
#X connect 10 3 7 1;
#X connect 11 0 2 1;
#X connect 12 0 16 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 15 0 13 0;
#X connect 16 0 5 0;
#X connect 18 0 7 0;
#X restore 445 416 pd save;
#N canvas 64 35 650 643 load 0;
#X obj 21 6 inlet;
#X obj 21 65 until;
#X obj 21 103 list append;
#X obj 120 148 bang;
#X obj 361 235 pointer;
#X obj 156 305 setsize \$0template \$0arrayvals;
#X msg 361 212 traverse \$1 \, next;
#X obj 361 168 \$0;
#X obj 361 191 makefilename pd-%ddata;
#X msg 172 126 0;
#X obj 156 232 f;
#X obj 185 232 + 1;
#X obj 21 32 t b l b b;
#X obj 183 342 element \$0template \$0arrayvals;
#X obj 156 258 t f f;
#X obj 186 281 + 1;
#X obj 27 389 set \$0arraytemplate x;
#X obj 21 148 list split 1;
#X obj 49 174 t f b;
#X connect 0 0 12 0;
#X connect 1 0 2 0;
#X connect 2 0 17 0;
#X connect 3 0 1 1;
#X connect 4 0 5 1;
#X connect 4 0 13 1;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 9 0 10 1;
#X connect 10 0 11 0;
#X connect 10 0 14 0;
#X connect 11 0 10 1;
#X connect 12 0 1 0;
#X connect 12 1 2 1;
#X connect 12 2 9 0;
#X connect 12 3 7 0;
#X connect 13 0 16 1;
#X connect 14 0 13 0;
#X connect 14 1 15 0;
#X connect 15 0 5 0;
#X connect 17 0 18 0;
#X connect 17 1 2 1;
#X connect 17 2 3 0;
#X connect 18 0 16 0;
#X connect 18 1 10 0;
#X restore 445 440 pd load;
#X msg 415 48 bang;
#X msg 314 330 0;
#X obj 5 19 cnv 15 190 15 empty empty empty 20 12 0 14 -260818 -66577
0;
#X obj 314 356 set \$0arraytemplate x;
#X obj 434 282 t b b p;
#X obj 357 440 outlet;
#X obj 285 441 s \$1/tick;
#X obj 107 2 nbx 4 14 0 20000 0 0 \$0-beatsize \$0-beatsize beatsize
42 8 0 8 -260818 -1 -1 4000 256;
#X obj 25 92 s-connect \$1/beatsize \$0-beatsize;
#X obj 597 44 inlet;
#X obj 597 67 list;
#X msg 597 89 \; \$1 \$2 \;;
#X connect 3 0 9 0;
#X connect 4 0 18 0;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 9 0 7 0;
#X connect 10 0 15 0;
#X connect 13 0 15 1;
#X connect 13 1 19 0;
#X connect 14 0 5 0;
#X connect 15 0 26 0;
#X connect 15 0 27 0;
#X connect 16 0 24 1;
#X connect 17 0 16 0;
#X connect 18 0 13 0;
#X connect 18 1 25 0;
#X connect 18 2 14 0;
#X connect 18 3 5 1;
#X connect 19 0 20 0;
#X connect 21 0 3 0;
#X connect 22 0 24 0;
#X connect 25 0 22 0;
#X connect 25 1 17 0;
#X connect 25 2 16 1;
#X connect 30 0 31 0;
#X connect 31 0 32 0;
#X coords 0 -1 1 1 200 40 1 0 0;