Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: aee5112e27
Fetching contributors…

Cannot retrieve contributors at this time

1689 lines (1688 sloc) 43.295 kb
#N canvas 0 25 1255 658 10;
#X declare -lib iemmatrix;
#X declare -lib iem_tab;
#X obj 290 421 hsl 50 10 0 1 0 0 \$0-end \$0-end-r empty -2 -8 0 10
-182874 -1 -1 0 1;
#X obj 195 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC3-S \$0-seqC3-R empty
0 -8 0 12 -33289 -203904 -1 0 256;
#X obj 133 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC1-S \$0-seqC1-R empty
0 -8 0 12 -33289 -203904 -1 0 256;
#X obj 164 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC2-S \$0-seqC2-R empty
0 -8 0 12 -33289 -203904 -1 0 256;
#X obj 102 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC0-S \$0-seqC0-R empty
0 -8 0 12 -16662 -203904 -1 0 256;
#X obj 319 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC7-S \$0-seqC7-R empty
0 -8 0 12 -33289 -203904 -1 0 256;
#X obj 257 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC5-S \$0-seqC5-R empty
0 -8 0 12 -33289 -203904 -1 0 256;
#X obj 288 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC6-S \$0-seqC6-R empty
0 -8 0 12 -33289 -203904 -1 0 256;
#X obj 226 102 nbx 2 12 -1e+37 1e+37 0 0 \$0-seqC4-S \$0-seqC4-R empty
0 -8 0 12 -16662 -203904 -1 0 256;
#X obj 1167 2 bng 15 250 50 0 \$0-configure empty empty 17 7 0 10 -99865
-203904 -1;
#X obj 1104 23 r \$0-configure;
#X obj 102 117 cnv 15 245 15 empty \$0-presetcanvas espelho.nvl 0 7
0 8 -73396 -262144 0;
#X obj 1188 -32 bng 15 250 50 0 \$0-open empty empty 17 7 0 10 -99865
-203904 -1;
#X obj 1106 -30 cnv 12 80 12 empty empty edit_wav-file: 0 7 1 11 -33289
-262144 0;
#X obj 1104 69 s pd-\$0-configure_guts;
#N canvas 568 475 143 159 \$0-configure_guts 0;
#X obj -23 26 bng 15 250 50 0 \$0-sequencer_btn empty sequencer 17
7 0 10 -262144 -1 -1;
#X text -25 3 hack-me:;
#X obj -23 43 bng 15 250 50 0 \$0-preset_guts_btn empty presets 17
7 0 10 -262144 -1 -1;
#X obj -23 60 bng 15 250 50 0 \$0-play_segments_btn empty player~ 17
7 0 10 -262144 -1 -1;
#X obj -23 77 bng 15 250 50 0 \$0-pitch_guts_btn empty pitch 17 7 0
10 -262144 -1 -1;
#X obj -23 94 bng 15 250 50 0 \$0-controls_btn empty controls 17 7
0 10 -262144 -1 -1;
#X obj -23 111 bng 15 250 50 0 \$0-pattern_mtx_btn empty pattern 17
7 0 10 -262144 -1 -1;
#X restore 1105 -57 pd \$0-configure_guts;
#X msg 1104 46 vis 1;
#N canvas 738 366 450 300 \$0-pitch_guts 0;
#X symbolatom 53 50 10 0 0 0 - #0-defaultpitch -;
#X obj 54 90 s \$0-defaultpitchlabel;
#X msg 55 70 label \$1;
#X msg 122 67 label_font 1 \$1;
#X floatatom 127 46 5 0 0 0 - - -;
#X obj 294 62 outlet;
#X obj 294 32 r \$0-defaultpitchnote;
#X obj 36 183 bng 20 250 50 0 \$0-pitch_guts_btn empty pitch 25 7 0
15 -262144 -1 -1;
#X text 37 163 patch dsp~;
#X text 46 12 atalho para escrever;
#X text 47 26 no display do pitch;
#X text 293 11 nota atual;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 3 0 1 0;
#X connect 4 0 3 0;
#X connect 6 0 5 0;
#X restore 349 334 pd \$0-pitch_guts;
#N canvas 176 74 938 612 \$0-sequencer_guts 0;
#X obj 120 410 int;
#X obj 156 410 int;
#X obj 192 410 int;
#X obj 226 410 int;
#X obj 261 410 int;
#X obj 297 410 int;
#X obj 333 410 int;
#X obj 367 410 int;
#X obj 114 323 sel 0 1 2 3 4 5 6 7;
#X obj 382 381 r \$0-seqC7-S;
#X obj 382 357 r \$0-seqC6-S;
#X obj 382 337 r \$0-seqC5-S;
#X obj 381 229 r \$0-seqC0-S;
#X obj 382 250 r \$0-seqC1-S;
#X obj 382 270 r \$0-seqC2-S;
#X obj 382 294 r \$0-seqC3-S;
#X obj 382 316 r \$0-seqC4-S;
#X obj 114 303 r \$0-seqcursor-S;
#X obj 343 -15 bng 15 250 50 0 empty \$0-random random -20 -5 0 10
-262144 -1 -1;
#X obj 405 -14 bng 15 250 50 0 empty \$0-> > 0 -5 0 15 -262144 -1 -1
;
#X obj 480 -15 bng 15 250 50 0 empty \$0-< < 0 -5 0 15 -262144 -1 -1
;
#X obj 566 -13 bng 12 250 50 0 empty \$0-seqzero zero -15 -5 0 10 -262144
-1 -1;
#X obj 51 143 metro 145;
#X floatatom 108 176 5 1 16 2 div #0-div -;
#N canvas 226 330 450 300 counter 0;
#X obj 61 34 inlet;
#X obj 73 154 f 0;
#X obj 74 190 + 1;
#X msg 85 118 0;
#X obj 51 256 outlet;
#X obj 54 76 route reset;
#X msg 23 119 bang;
#X obj 171 30 inlet;
#X obj 108 154 mod;
#X floatatom 159 188 5 0 0 0 - - -;
#X connect 0 0 5 0;
#X connect 1 0 2 0;
#X connect 1 0 4 0;
#X connect 2 0 8 0;
#X connect 3 0 1 1;
#X connect 5 0 3 0;
#X connect 5 1 6 0;
#X connect 6 0 1 0;
#X connect 7 0 8 1;
#X connect 8 0 1 1;
#X connect 8 0 9 0;
#X restore 51 196 pd counter;
#X obj 245 1 s \$0-rdn;
#X text 242 -16 fator random;
#X floatatom 245 -31 5 0 0 0 - #0-randomfactor -;
#X obj 640 28 s \$0-seqC7-R;
#X obj 112 276 s \$0-seqcursor-R;
#X obj 50 123 tgl 15 0 empty \$0-seqtoggle-S empty 17 7 0 10 -262144
-1 -1 0 1;
#X obj 595 49 s \$0-seqC6-R;
#X obj 551 70 s \$0-seqC5-R;
#X obj 507 91 s \$0-seqC4-R;
#X obj 463 31 s \$0-seqC3-R;
#X obj 419 52 s \$0-seqC2-R;
#X obj 375 72 s \$0-seqC1-R;
#X obj 331 94 s \$0-seqC0-R;
#X obj 115 -59 r \$0-tmode-S;
#X floatatom 115 116 5 0 0 0 - - -;
#X floatatom 75 -6 5 0 0 2 ntempo #0-ntempo-S -;
#X obj 24 -17 + 1;
#X obj 47 24 *;
#X obj 49 55 f;
#X obj 111 23 t b;
#X msg 183 197 reset;
#X obj 183 166 sel 1;
#N canvas 0 0 450 300 divdisplay 0;
#X obj 94 33 inlet;
#X obj 95 63 sel 0 1 2 3;
#X obj 115 173 s \$0-tmode-R;
#X msg 124 89 label /2;
#X msg 124 107 label /4;
#X msg 142 126 label /8;
#X msg 146 148 label /16;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 1 1 4 0;
#X connect 1 2 5 0;
#X connect 1 3 6 0;
#X connect 3 0 2 0;
#X connect 4 0 2 0;
#X connect 5 0 2 0;
#X connect 6 0 2 0;
#X restore 145 -22 pd divdisplay;
#X obj 28 250 outlet;
#X obj 231 146 r \$0-syncreset;
#X msg 747 385 color -1.03061e+07 -1 -1;
#X obj 758 461 s \$0-playercnv;
#X msg 788 429 color \$1;
#X floatatom 795 411 5 0 0 0 - - -;
#N canvas 12 81 450 300 convertbpm2ms 0;
#X obj 140 62 inlet;
#X obj 140 122 /;
#X obj 140 148 * 60;
#X msg 140 99 1000 \$1;
#X obj 139 201 outlet;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 1 0;
#X restore 89 83 pd convertbpm2ms;
#X obj 206 522 s \$0-play;
#X obj 266 522 s \$0-slice;
#X obj 209 492 t b f;
#X text 745 363 cores do display sequencer;
#N canvas 219 302 826 437 unpack_nbx 0;
#X obj 40 388 outlet;
#X obj 41 175 random 8;
#X obj 94 388 outlet;
#X obj 95 175 random 8;
#X obj 149 388 outlet;
#X obj 150 175 random 8;
#X obj 203 388 outlet;
#X obj 204 175 random 8;
#X obj 258 388 outlet;
#X obj 259 175 random 8;
#X obj 312 388 outlet;
#X obj 313 175 random 8;
#X obj 367 388 outlet;
#X obj 368 175 random 8;
#X obj 421 388 outlet;
#X obj 422 175 random 8;
#X obj 215 45 t b b b b b b b b;
#X obj 215 23 inlet;
#X obj 379 21 inlet;
#X msg 378 38 0 1 2 3 4 5 6 7;
#X obj 373 78 unpack f f f f f f f f;
#X obj 489 18 inlet;
#X obj 602 19 inlet;
#X msg 603 42 0 0 0 0 0 0 0 0;
#X msg 489 40 7 6 5 4 3 2 1 0;
#X obj 733 42 inlet;
#X obj 41 60 r \$0-rdn;
#X connect 1 0 0 0;
#X connect 3 0 2 0;
#X connect 5 0 4 0;
#X connect 7 0 6 0;
#X connect 9 0 8 0;
#X connect 11 0 10 0;
#X connect 13 0 12 0;
#X connect 15 0 14 0;
#X connect 16 0 1 0;
#X connect 16 1 3 0;
#X connect 16 2 5 0;
#X connect 16 3 7 0;
#X connect 16 4 9 0;
#X connect 16 5 11 0;
#X connect 16 6 13 0;
#X connect 16 7 15 0;
#X connect 17 0 16 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 20 0 0 0;
#X connect 20 1 2 0;
#X connect 20 2 4 0;
#X connect 20 3 6 0;
#X connect 20 4 8 0;
#X connect 20 5 10 0;
#X connect 20 6 12 0;
#X connect 20 7 14 0;
#X connect 21 0 24 0;
#X connect 22 0 23 0;
#X connect 23 0 20 0;
#X connect 24 0 20 0;
#X connect 25 0 20 0;
#X connect 26 0 15 1;
#X connect 26 0 13 1;
#X connect 26 0 11 1;
#X connect 26 0 7 1;
#X connect 26 0 5 1;
#X connect 26 0 3 1;
#X connect 26 0 1 1;
#X connect 26 0 9 1;
#X restore 331 5 pd unpack_nbx ---------------------------------------
;
#N canvas 11 58 924 676 \$0-patterns_mtx 0;
#X obj -65 387 mtx_row 10 8;
#X obj -237 589 mtx_print;
#X obj -268 433 bng 15 250 50 0 empty empty print 17 7 0 10 -262144
-1 -1;
#X obj -89 533 mtx 10 8;
#X obj -89 563 route matrix;
#X obj -114 589 prepend matrix;
#X msg -89 202 row \$1;
#X obj -15 594 outlet;
#X obj 4 360 f;
#X obj -40 267 t b b;
#X obj -57 299 list;
#X floatatom 26 382 5 0 0 0 - - -;
#X obj 234 203 r \$0-seqC7-S;
#X obj 226 182 r \$0-seqC6-S;
#X obj 215 163 r \$0-seqC5-S;
#X obj 148 48 r \$0-seqC0-S;
#X obj 159 71 r \$0-seqC1-S;
#X obj 173 94 r \$0-seqC2-S;
#X obj 189 117 r \$0-seqC3-S;
#X obj 211 139 r \$0-seqC4-S;
#X obj 115 222 pack f f f f f f f f;
#X obj 88 55 t b b;
#X text 121 245 guardando o pattern na mtx;
#X obj -373 295 mtx_zeros 10 8;
#X obj -371 276 bng 15 250 50 0 empty empty zera 17 7 0 10 -262144
-1 -1;
#X obj -8 43 t f f;
#X obj -235 569 spigot;
#X obj -203 544 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
0 1;
#X obj -239 185 r \$0-restore-pattern;
#X obj 235 472 pack s s;
#X obj 252 390 path;
#X obj 252 369 t b s;
#X obj 226 442 mergefilename;
#X msg 235 516 write \$1;
#X obj 375 540 s \$0-pattern_mtx;
#X msg 226 419 \$1 presets/patterns/;
#X obj 235 492 mergefilename;
#X msg -186 223 read \$1;
#X obj -239 206 tosymbol;
#X obj 252 348 makefilename %s.ptn;
#X obj -372 254 r \$0-clearmtx;
#X obj -186 268 mtx 10 8;
#X obj -224 245 b;
#X obj 88 3 r \$0-save;
#X obj 375 487 mergefilename;
#X msg 375 465 presets/patterns/ \$1;
#X obj -242 464 t b b;
#X msg -207 510 1;
#X obj 375 512 tosymbol;
#X floatatom -9 16 5 0 16 2 pattern #0-pattern -;
#X obj 252 323 r \$0-presetname_mtx;
#X obj -346 24 import iemmatrix;
#X text 380 415 formata caminho ate;
#X text 383 429 matriz em disco;
#X text 383 441 para restaurar depois;
#X text 251 303 prepara escrita da matriz a ser gravada em disco;
#X text -241 164 restaura matriz do disco;
#X connect 0 0 3 0;
#X connect 2 0 46 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 7 0;
#X connect 5 0 26 0;
#X connect 6 0 3 0;
#X connect 8 0 11 0;
#X connect 8 0 0 1;
#X connect 9 0 10 0;
#X connect 9 1 8 0;
#X connect 10 0 0 0;
#X connect 12 0 20 7;
#X connect 13 0 20 6;
#X connect 14 0 20 5;
#X connect 15 0 20 0;
#X connect 16 0 20 1;
#X connect 17 0 20 2;
#X connect 18 0 20 3;
#X connect 19 0 20 4;
#X connect 20 0 10 1;
#X connect 21 0 9 0;
#X connect 21 1 20 0;
#X connect 23 0 0 0;
#X connect 24 0 23 0;
#X connect 25 0 6 0;
#X connect 25 1 8 1;
#X connect 26 0 1 0;
#X connect 27 0 26 1;
#X connect 28 0 38 0;
#X connect 29 0 36 0;
#X connect 30 0 35 0;
#X connect 31 0 30 0;
#X connect 31 1 29 1;
#X connect 32 0 29 0;
#X connect 33 0 3 0;
#X connect 35 0 32 0;
#X connect 36 0 33 0;
#X connect 37 0 3 0;
#X connect 37 0 41 0;
#X connect 37 0 42 0;
#X connect 38 0 37 0;
#X connect 39 0 31 0;
#X connect 39 0 45 0;
#X connect 40 0 24 0;
#X connect 41 0 0 0;
#X connect 42 0 41 0;
#X connect 43 0 21 0;
#X connect 44 0 48 0;
#X connect 45 0 44 0;
#X connect 46 0 3 0;
#X connect 46 1 47 0;
#X connect 47 0 27 0;
#X connect 48 0 34 0;
#X connect 49 0 25 0;
#X connect 50 0 39 0;
#X restore 718 -30 pd \$0-patterns_mtx;
#X obj 66 465 r \$0-sliceinlet;
#X text 63 449 sinal do inlet;
#X connect 0 0 57 0;
#X connect 1 0 57 0;
#X connect 2 0 57 0;
#X connect 3 0 57 0;
#X connect 4 0 57 0;
#X connect 5 0 57 0;
#X connect 6 0 57 0;
#X connect 7 0 57 0;
#X connect 8 0 0 0;
#X connect 8 1 1 0;
#X connect 8 2 2 0;
#X connect 8 3 3 0;
#X connect 8 4 4 0;
#X connect 8 5 5 0;
#X connect 8 6 6 0;
#X connect 8 7 7 0;
#X connect 9 0 7 1;
#X connect 10 0 6 1;
#X connect 11 0 5 1;
#X connect 12 0 0 1;
#X connect 13 0 1 1;
#X connect 14 0 2 1;
#X connect 15 0 3 1;
#X connect 16 0 4 1;
#X connect 17 0 8 0;
#X connect 18 0 59 0;
#X connect 19 0 59 1;
#X connect 20 0 59 2;
#X connect 21 0 59 3;
#X connect 22 0 24 0;
#X connect 23 0 24 1;
#X connect 24 0 29 0;
#X connect 24 0 48 0;
#X connect 27 0 25 0;
#X connect 30 0 22 0;
#X connect 30 0 46 0;
#X connect 38 0 41 0;
#X connect 38 0 44 0;
#X connect 38 0 47 0;
#X connect 39 0 22 1;
#X connect 40 0 42 1;
#X connect 41 0 42 0;
#X connect 42 0 43 1;
#X connect 43 0 54 0;
#X connect 44 0 43 0;
#X connect 45 0 24 0;
#X connect 46 0 45 0;
#X connect 49 0 45 0;
#X connect 50 0 51 0;
#X connect 52 0 51 0;
#X connect 53 0 52 0;
#X connect 54 0 39 0;
#X connect 57 0 55 0;
#X connect 57 1 56 0;
#X connect 59 0 37 0;
#X connect 59 1 36 0;
#X connect 59 2 35 0;
#X connect 59 3 34 0;
#X connect 59 4 33 0;
#X connect 59 5 32 0;
#X connect 59 6 31 0;
#X connect 59 7 28 0;
#X connect 60 0 59 4;
#X connect 61 0 57 0;
#X restore 84 375 pd \$0-sequencer_guts;
#N canvas 0 142 1268 658 \$0-play_segments 0;
#X obj 627 391 soundfiler;
#X obj 139 26 openpanel;
#X obj 627 344 pack s \$0;
#X obj 923 93 s \$0-selectarea;
#X msg 627 369 read -resize \$1 \$2-L \$2-R;
#X obj 1050 154 * 800;
#X obj 916 51 loadbang;
#X obj 1048 217 s \$0-selectarea;
#X obj 112 295 s \$0-selectarea;
#X msg 110 272 label \$1;
#X obj 111 251 makefilename %d;
#X obj 1049 134 r \$0-start;
#X obj 370 177 tabplay~ \$0-L;
#X obj 419 108 r \$0-len;
#X obj 374 156 pack 0 0;
#X obj 362 66 f;
#X obj 377 41 r \$0-start;
#X obj 362 89 *;
#X obj 390 65 r \$0-samples;
#X obj 420 133 *;
#X obj 446 132 t b f;
#X obj 362 18 r \$0-play;
#X obj 626 412 s \$0-samples;
#X obj 112 229 r \$0-slice;
#X obj 407 196 tabplay~ \$0-R;
#X obj 207 131 s \$0-filename;
#X obj 627 298 r \$0-filename;
#X obj 139 -132 r \$0-open;
#X obj 313 -163 loadbang;
#X obj 727 424 s \$0-slices-start;
#X obj 835 423 s \$0-slices-end;
#X msg 726 401 const 0;
#X obj 682 466 s \$0-slice-1s-r;
#X msg 684 444 0;
#X obj 782 466 s \$0-slice-10s-r;
#X obj 627 319 t a b b;
#X obj 371 286 *~;
#X obj 408 287 *~;
#X obj 418 231 vline~;
#X msg 500 168 0 5 \, 1 5 5;
#X obj 360 109 t f b;
#X obj 361 133 pipe 5;
#X text 153 -150 abre wav;
#X text 609 269 recebe caminho arq. wav;
#X text 112 211 display numero do trecho;
#X text 611 282 valido para 1 uso do arq.;
#X obj 519 -105 -;
#X obj 517 51 s \$0-selectarea;
#X msg 519 -35 vis_size \$1 148;
#X obj 572 -150 r \$0-start;
#X obj 518 -130 r \$0-end;
#X obj 572 -130 t b f;
#X obj 519 -57 max 1;
#X obj 520 -79 * 800;
#X obj 561 -79 s \$0-len;
#X obj 651 85 s \$0-cnvtable;
#X text 656 65 fundo_da_tabela;
#X obj 654 -16 loadbang;
#X msg 592 23 color -1.2573e+07 -1 -1.59465e+07;
#X msg 651 5 color -1.42133e+07 -1 -1;
#X text 616 -79 tamanho do segmento;
#X obj 10 362 tab_copy \$0-L \$0-R;
#X obj 10 342 r \$0-mono2stereo;
#X obj 6 460 import iem_tab;
#X text 353 0 toca segmentos;
#X text 18 442 tab_copy depende iem_tab;
#X text 880 -159 a Matt Davey's patch;
#X text 884 -144 (thanks for sharing);
#X text 862 -173 segment player based in;
#X floatatom 1119 137 5 0 0 0 - - -;
#X msg 1148 196 label \$1;
#X symbolatom 1146 178 10 0 0 0 - - -;
#X msg 1118 157 label_font 0 \$1;
#X obj 855 -34 s \$0-L;
#X msg 857 -57 normalize 1;
#X obj 897 -35 s \$0-R;
#X obj 858 -79 r \$0-normalize;
#X obj 1050 176 + 104;
#X msg 1048 195 pos \$1 116;
#X msg 919 71 pos 104 116 \, vis_size 15 148 \, label navalha;
#X obj 352 423 outlet~;
#X obj 406 426 outlet~;
#X obj 199 -84 path;
#X obj 199 -37 mergefilename /;
#X obj 139 3 symbol;
#X msg 199 -60 \$1 samples;
#X obj 160 -58 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#N canvas 60 119 852 620 pathsplit 0;
#X obj 99 36 inlet;
#X obj 63 371 outlet;
#X obj 225 352 outlet;
#X obj 101 179 splitfilename;
#X text 191 181 iem lib;
#X obj 374 43 inlet;
#X msg 346 143 separator \$1;
#X obj 148 78 route bang;
#X obj 548 156 loadbang;
#X obj 548 186 dollarg;
#X obj 345 88 symbol;
#X msg 9 331 symbol /;
#X obj 13 286 sel symbol;
#X msg 64 257 symbol;
#X obj 208 311 sel symbol;
#X obj 210 265 t a b;
#X msg 259 282 symbol;
#X obj 130 131 tosymbol;
#X text 502 31 based on [file.path.split] - pdmtl;
#X connect 0 0 7 0;
#X connect 3 0 12 0;
#X connect 3 1 15 0;
#X connect 5 0 10 0;
#X connect 6 0 3 0;
#X connect 7 1 17 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X connect 11 0 1 0;
#X connect 12 0 11 0;
#X connect 12 1 1 0;
#X connect 13 0 12 1;
#X connect 14 0 2 0;
#X connect 14 1 2 0;
#X connect 15 0 14 0;
#X connect 15 1 16 0;
#X connect 16 0 14 1;
#X connect 17 0 3 0;
#X restore 139 47 pd pathsplit;
#X obj 208 91 mergefilename;
#X msg 208 68 samples/ \$1;
#N canvas 90 246 800 493 \$0-pitch_guts 0;
#X obj 86 29 inlet~;
#X obj 152 31 inlet~;
#X obj 87 263 outlet~;
#X obj 138 263 outlet~;
#X obj 395 95 r \$0-pshift;
#X obj 287 313 fiddle~;
#N canvas 18 109 664 495 nomesnotas 0;
#X obj 80 47 inlet;
#X obj 79 436 outlet;
#X obj 58 182 % 12;
#X obj 136 202 sel 0 1 2 3 4 5 6 7 8 9 10 11;
#X obj 59 303 t a;
#X msg 58 260 Do;
#X msg 89 260 Do_sustenido;
#X msg 174 262 Re;
#X msg 207 262 Re_sustenido;
#X msg 292 263 Mi;
#X msg 321 264 Fa;
#X msg 349 264 Fa_sustenido;
#X msg 441 263 Sol;
#X msg 473 265 Sol_sustenido;
#X msg 565 268 La;
#X msg 600 271 Si_bemol;
#X msg 666 269 Si;
#X obj 233 129 / 12;
#X obj 226 153 int;
#X obj 187 410 - 1;
#X obj 190 436 outlet;
#X connect 0 0 2 0;
#X connect 0 0 17 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 3 1 6 0;
#X connect 3 2 7 0;
#X connect 3 3 8 0;
#X connect 3 4 9 0;
#X connect 3 5 10 0;
#X connect 3 6 11 0;
#X connect 3 7 12 0;
#X connect 3 8 13 0;
#X connect 3 9 14 0;
#X connect 3 10 15 0;
#X connect 3 11 16 0;
#X connect 4 0 1 0;
#X connect 5 0 4 0;
#X connect 6 0 4 0;
#X connect 7 0 4 0;
#X connect 8 0 4 0;
#X connect 9 0 4 0;
#X connect 10 0 4 0;
#X connect 11 0 4 0;
#X connect 12 0 4 0;
#X connect 13 0 4 0;
#X connect 14 0 4 0;
#X connect 15 0 4 0;
#X connect 16 0 4 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X restore 287 337 pd nomesnotas;
#X obj 233 433 s \$0-defaultpitchlabel;
#X msg 233 408 label \$1;
#X obj 296 391 tosymbol;
#X obj 287 359 sprintf %s-%d;
#X obj 127 361 s \$0-defaultpitchnote;
#X obj 272 93 r \$0-pitchdisplay-S;
#X obj 395 124 s \$0-pitchdisplay-R;
#X obj 271 114 - 12;
#N canvas 417 25 721 670 pitchshift~ 0;
#X obj 39 564 hip~ 5;
#X obj 104 430 *~;
#X obj 212 361 line~;
#X obj 212 335 pack 0 200;
#X obj 39 214 exp;
#X floatatom 39 240 0 0 0 0 - - -;
#X obj 39 330 /;
#X obj 166 260 * 0.001;
#X obj 39 481 cos~;
#X obj 39 508 *~;
#X obj 39 537 +~;
#X obj 126 388 wrap~;
#X obj 271 431 *~;
#X obj 208 491 cos~;
#X obj 208 518 *~;
#X obj 166 287 t b f;
#X floatatom 39 356 0 0 0 0 - - -;
#X obj 39 383 phasor~ 0;
#X obj 126 361 +~ 0.5;
#X obj 39 429 -~ 0.5;
#X obj 39 455 *~ 0.5;
#X obj 208 430 -~ 0.5;
#X obj 208 463 *~ 0.5;
#X obj 39 267 - 1;
#X obj 39 188 * 0.05776;
#X obj 39 293 * -1;
#X text 88 133 <-- transposition;
#X text 126 148 (halpn_lftones);
#X text 106 248 speed;
#X text 105 262 change;
#X text 74 323 tape head;
#X text 75 336 rotation speed;
#X obj -159 130 inlet~;
#X obj 38 617 outlet~;
#X obj 39 132 inlet;
#X text -65 62 ARGUMENT 1 : max window and delay time in msec;
#X obj 277 157 loadbang;
#X text -63 27 PITCH SHIFTER (RIPPED FROM THE PD HELP FILES) see 3.audio.examples/G09.pitchshift.pd
;
#X obj 281 186 f 10;
#X obj 281 214 clip 1 1e+07;
#X obj -159 162 delwrite~ \$0-delayL 10;
#X obj 104 483 vd~ \$0-delayL;
#X obj 270 493 vd~ \$0-delayL;
#X connect 0 0 33 0;
#X connect 1 0 41 0;
#X connect 2 0 1 1;
#X connect 2 0 12 1;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 5 0 23 0;
#X connect 6 0 16 0;
#X connect 7 0 15 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 0 0;
#X connect 11 0 12 0;
#X connect 11 0 21 0;
#X connect 12 0 42 0;
#X connect 13 0 14 0;
#X connect 14 0 10 1;
#X connect 15 0 6 0;
#X connect 15 1 6 1;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X connect 17 0 19 0;
#X connect 17 0 18 0;
#X connect 18 0 11 0;
#X connect 19 0 20 0;
#X connect 20 0 8 0;
#X connect 21 0 22 0;
#X connect 22 0 13 0;
#X connect 23 0 25 0;
#X connect 24 0 4 0;
#X connect 25 0 6 0;
#X connect 32 0 40 0;
#X connect 34 0 24 0;
#X connect 36 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 3 0;
#X connect 39 0 7 0;
#X connect 41 0 9 1;
#X connect 42 0 14 1;
#X restore 86 164 pd pitchshift~;
#N canvas 145 43 698 499 pitchshift~ 0;
#X obj 39 564 hip~ 5;
#X obj 104 430 *~;
#X obj 212 361 line~;
#X obj 212 335 pack 0 200;
#X obj 39 214 exp;
#X floatatom 39 240 0 0 0 0 - - -;
#X obj 39 330 /;
#X obj 166 260 * 0.001;
#X obj 39 481 cos~;
#X obj 39 508 *~;
#X obj 39 537 +~;
#X obj 126 388 wrap~;
#X obj 271 431 *~;
#X obj 208 491 cos~;
#X obj 208 518 *~;
#X obj 166 287 t b f;
#X floatatom 39 356 0 0 0 0 - - -;
#X obj 39 383 phasor~ 0;
#X obj 126 361 +~ 0.5;
#X obj 39 429 -~ 0.5;
#X obj 39 455 *~ 0.5;
#X obj 208 430 -~ 0.5;
#X obj 208 463 *~ 0.5;
#X obj 39 267 - 1;
#X obj 39 188 * 0.05776;
#X obj 39 293 * -1;
#X text 88 133 <-- transposition;
#X text 126 148 (halpn_lftones);
#X text 106 248 speed;
#X text 105 262 change;
#X text 74 323 tape head;
#X text 75 336 rotation speed;
#X obj -159 130 inlet~;
#X obj 38 617 outlet~;
#X obj 39 132 inlet;
#X text -65 62 ARGUMENT 1 : max window and delay time in msec;
#X obj 277 157 loadbang;
#X text -63 27 PITCH SHIFTER (RIPPED FROM THE PD HELP FILES) see 3.audio.examples/G09.pitchshift.pd
;
#X obj 281 186 f 10;
#X obj 281 214 clip 1 1e+07;
#X obj -159 162 delwrite~ \$0-delayR 10;
#X obj 270 493 vd~ \$0-delayR;
#X obj 104 482 vd~ \$0-delayR;
#X connect 0 0 33 0;
#X connect 1 0 42 0;
#X connect 2 0 1 1;
#X connect 2 0 12 1;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 5 0 23 0;
#X connect 6 0 16 0;
#X connect 7 0 15 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 0 0;
#X connect 11 0 12 0;
#X connect 11 0 21 0;
#X connect 12 0 41 0;
#X connect 13 0 14 0;
#X connect 14 0 10 1;
#X connect 15 0 6 0;
#X connect 15 1 6 1;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X connect 17 0 19 0;
#X connect 17 0 18 0;
#X connect 18 0 11 0;
#X connect 19 0 20 0;
#X connect 20 0 8 0;
#X connect 21 0 22 0;
#X connect 22 0 13 0;
#X connect 23 0 25 0;
#X connect 24 0 4 0;
#X connect 25 0 6 0;
#X connect 32 0 40 0;
#X connect 34 0 24 0;
#X connect 36 0 38 0;
#X connect 38 0 39 0;
#X connect 39 0 3 0;
#X connect 39 0 7 0;
#X connect 41 0 14 1;
#X connect 42 0 9 1;
#X restore 177 164 pd pitchshift~;
#X obj 273 289 +~;
#X connect 0 0 15 0;
#X connect 1 0 16 0;
#X connect 4 0 13 0;
#X connect 5 0 6 0;
#X connect 5 0 11 0;
#X connect 6 0 10 0;
#X connect 6 1 10 1;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X connect 12 0 14 0;
#X connect 14 0 16 1;
#X connect 14 0 15 1;
#X connect 15 0 2 0;
#X connect 15 0 17 0;
#X connect 16 0 3 0;
#X connect 16 0 17 1;
#X connect 17 0 5 0;
#X restore 362 316 pd \$0-pitch_guts;
#X obj 208 111 tosymbol;
#X text 1050 114 testes area de selecao;
#X obj 482 329 r \$0-vol;
#X obj 375 392 *~ 0.5;
#X obj 425 394 *~ 0.5;
#X obj 234 34 r \$0-wavfile;
#X connect 0 0 22 0;
#X connect 1 0 87 0;
#X connect 2 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 77 0;
#X connect 6 0 79 0;
#X connect 9 0 8 0;
#X connect 10 0 9 0;
#X connect 11 0 5 0;
#X connect 12 0 36 0;
#X connect 13 0 19 0;
#X connect 14 0 12 0;
#X connect 14 0 24 0;
#X connect 15 0 17 0;
#X connect 16 0 15 1;
#X connect 17 0 40 0;
#X connect 18 0 17 1;
#X connect 18 0 20 0;
#X connect 19 0 14 1;
#X connect 20 0 19 0;
#X connect 20 1 19 1;
#X connect 21 0 15 0;
#X connect 23 0 10 0;
#X connect 24 0 37 0;
#X connect 26 0 35 0;
#X connect 27 0 84 0;
#X connect 28 0 82 0;
#X connect 31 0 29 0;
#X connect 31 0 30 0;
#X connect 33 0 32 0;
#X connect 33 0 34 0;
#X connect 35 0 2 0;
#X connect 35 1 33 0;
#X connect 35 2 31 0;
#X connect 36 0 90 0;
#X connect 37 0 90 1;
#X connect 38 0 36 1;
#X connect 38 0 37 1;
#X connect 39 0 38 0;
#X connect 40 0 41 0;
#X connect 40 1 39 0;
#X connect 41 0 14 0;
#X connect 46 0 53 0;
#X connect 46 0 54 0;
#X connect 48 0 47 0;
#X connect 49 0 51 0;
#X connect 50 0 46 0;
#X connect 51 0 46 0;
#X connect 51 1 46 1;
#X connect 52 0 48 0;
#X connect 53 0 52 0;
#X connect 57 0 58 0;
#X connect 57 0 59 0;
#X connect 58 0 47 0;
#X connect 59 0 55 0;
#X connect 62 0 61 0;
#X connect 69 0 72 0;
#X connect 70 0 7 0;
#X connect 71 0 70 0;
#X connect 72 0 7 0;
#X connect 74 0 73 0;
#X connect 74 0 75 0;
#X connect 76 0 74 0;
#X connect 77 0 78 0;
#X connect 78 0 7 0;
#X connect 79 0 3 0;
#X connect 82 0 85 0;
#X connect 83 0 84 1;
#X connect 84 0 1 0;
#X connect 85 0 83 0;
#X connect 86 0 82 0;
#X connect 87 1 89 0;
#X connect 88 0 91 0;
#X connect 89 0 88 0;
#X connect 90 0 94 0;
#X connect 90 1 95 0;
#X connect 91 0 25 0;
#X connect 93 0 94 1;
#X connect 93 0 95 1;
#X connect 94 0 80 0;
#X connect 95 0 81 0;
#X connect 96 0 89 0;
#X restore 427 448 pd \$0-play_segments;
#N canvas 6 53 1268 686 \$0-preset_guts 0;
#X obj 550 604 s \$0-restore;
#X obj 635 424 r \$0-debug;
#X obj 660 40 s \$0-debug;
#X obj 659 21 bng 15 250 50 0 empty empty debug 17 7 0 10 -262144 -1
-1;
#X text 627 587 start/end;
#X obj 326 412 r \$0-presetname_load;
#X obj 98 331 deny enter_text_here------;
#X obj 773 7 r \$0-presetname_load;
#X obj 852 78 s \$0-presetcanvas;
#X msg 853 55 label \$1;
#X obj 660 208 prepend add;
#X msg 633 490 clear;
#X msg 497 293 write \$1;
#X obj 469 559 route filename;
#N canvas 123 78 1024 661 datasaving 0;
#X obj 242 242 symbol;
#X obj 275 145 r \$0-filename;
#X obj 108 219 f;
#X obj 135 221 + 1;
#X obj 108 197 until;
#X msg 146 191 0;
#X obj 108 166 t f b;
#X obj 108 242 t f f;
#X obj 108 277 tabread \$0-slices-end;
#X obj 94 85 r \$0-savetomsg;
#X text 87 65 formata a mensagem do preset;
#X msg 109 145 32;
#X obj 122 512 outlet;
#X msg 267 270 filename \$1;
#X obj 5 247 f;
#X obj 32 249 + 1;
#X obj 5 225 until;
#X msg 41 215 0;
#X obj 5 194 t f b;
#X obj 5 270 t f f;
#X obj 38 351 pack 0 0;
#X msg 6 173 32;
#X obj 5 305 tabread \$0-slices-start;
#X msg -8 406 start \$2 \$1;
#X msg 111 379 end \$2 \$1;
#X obj 109 322 pack 0 0;
#X text 14 -97 a Matt Davey's patch;
#X text 18 -82 (thanks for sharing);
#X text -4 -112 data formatting and persistence based in;
#X obj 413 215 r \$0-pattern_mtx;
#X obj 92 105 t b b b b;
#X msg 383 277 pattern \$1;
#X obj 380 249 symbol;
#X msg 24 54 set \$1;
#X obj 24 32 r \$0-simetria;
#X connect 0 0 13 0;
#X connect 1 0 0 1;
#X connect 2 0 3 0;
#X connect 2 0 7 0;
#X connect 3 0 2 1;
#X connect 4 0 2 0;
#X connect 5 0 2 1;
#X connect 6 0 4 0;
#X connect 6 1 5 0;
#X connect 7 0 8 0;
#X connect 7 1 25 1;
#X connect 8 0 25 0;
#X connect 9 0 30 0;
#X connect 11 0 6 0;
#X connect 13 0 12 0;
#X connect 14 0 15 0;
#X connect 14 0 19 0;
#X connect 15 0 14 1;
#X connect 16 0 14 0;
#X connect 17 0 14 1;
#X connect 18 0 16 0;
#X connect 18 1 17 0;
#X connect 19 0 22 0;
#X connect 19 1 20 1;
#X connect 20 0 23 0;
#X connect 21 0 18 0;
#X connect 22 0 20 0;
#X connect 23 0 12 0;
#X connect 24 0 12 0;
#X connect 25 0 24 0;
#X connect 29 0 32 1;
#X connect 30 0 21 0;
#X connect 30 1 11 0;
#X connect 30 2 0 0;
#X connect 30 3 32 0;
#X connect 31 0 12 0;
#X connect 32 0 31 0;
#X connect 33 0 21 0;
#X connect 33 0 11 0;
#X connect 34 0 33 0;
#X restore 660 182 pd datasaving;
#X obj 446 615 s \$0-filename;
#X obj 128 644 s \$0-savetomsg;
#X obj 633 469 r \$0-cleartxt;
#X obj 27 645 s \$0-presetname;
#X obj 530 249 r \$0-presetname;
#X obj 497 271 symbol;
#X obj 462 248 delay 1000;
#X obj 462 225 bang;
#X obj 142 79 path;
#X obj 102 539 pack s s;
#X obj 99 440 path;
#X obj 98 373 makefilename %s.nvl;
#X obj 99 419 t b s;
#X obj 181 56 tosymbol;
#X obj 182 18 loadbang;
#X msg 181 37 enter_text_here------;
#X obj 33 210 s \$0-presetname_load;
#X obj 33 136 openpanel;
#X obj 916 425 s \$0-presetcnv;
#X msg 916 402 color -1.11691e+07 -1 -1;
#X obj 917 378 loadbang;
#X msg 634 444 print;
#X obj 34 87 r \$0-preset_btn;
#X obj 98 308 r \$0-presetname_save-S;
#X obj 181 77 s \$0-presetname_save-R;
#N canvas 54 119 852 620 pathsplit 0;
#X obj 99 36 inlet;
#X obj 63 371 outlet;
#X obj 225 352 outlet;
#X obj 101 179 splitfilename;
#X text 191 181 iem lib;
#X obj 374 43 inlet;
#X msg 346 143 separator \$1;
#X obj 148 78 route bang;
#X obj 548 156 loadbang;
#X obj 548 186 dollarg;
#X obj 345 88 symbol;
#X msg 9 331 symbol /;
#X obj 13 286 sel symbol;
#X msg 64 257 symbol;
#X obj 208 311 sel symbol;
#X obj 210 265 t a b;
#X msg 259 282 symbol;
#X obj 130 131 tosymbol;
#X text 502 31 based on [file.path.split] - pdmtl;
#X connect 0 0 7 0;
#X connect 3 0 12 0;
#X connect 3 1 15 0;
#X connect 5 0 10 0;
#X connect 6 0 3 0;
#X connect 7 1 17 0;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 6 0;
#X connect 11 0 1 0;
#X connect 12 0 11 0;
#X connect 12 1 1 0;
#X connect 13 0 12 1;
#X connect 14 0 2 0;
#X connect 14 1 2 0;
#X connect 15 0 14 0;
#X connect 15 1 16 0;
#X connect 16 0 14 1;
#X connect 17 0 3 0;
#X restore 778 30 pd pathsplit;
#N canvas 84 218 553 521 txtflush 0;
#X obj 115 200 textfile;
#X msg 155 162 rewind;
#X obj 115 160 until;
#X obj 115 109 t b a;
#X msg 227 146 0;
#X obj 190 235 f;
#X obj 113 66 list prepend read;
#X obj 113 87 list trim;
#X obj 115 131 t b b b b;
#X obj 112 43 list append cr;
#X text 270 259 outputs the amount of lines when finished;
#X text 149 285 all lines of a file \, one after an other.;
#N canvas 6 53 450 300 f+1 0;
#X obj 141 241 + 1;
#X obj 110 241 f;
#X obj 110 195 inlet;
#X obj 110 276 outlet;
#X obj 154 195 inlet;
#X connect 0 0 1 1;
#X connect 1 0 0 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X connect 4 0 1 1;
#X restore 205 191 pd f+1;
#X text 152 20 filename. output of lines starts instantly;
#X obj 190 259 outlet;
#X obj 100 284 outlet;
#X obj 111 21 inlet;
#X obj 267 83 inlet;
#X text 99 319 based on [readlines] Martin Schied 2009 \, (cc) share
alike;
#X connect 0 0 15 0;
#X connect 0 1 2 1;
#X connect 0 1 5 0;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 2 0 12 0;
#X connect 3 0 8 0;
#X connect 3 1 0 0;
#X connect 4 0 12 0;
#X connect 5 0 14 0;
#X connect 6 0 7 0;
#X connect 7 0 3 0;
#X connect 8 0 2 0;
#X connect 8 1 1 0;
#X connect 8 2 4 0;
#X connect 9 0 6 0;
#X connect 12 0 5 1;
#X connect 16 0 9 0;
#X connect 17 0 0 0;
#X restore 470 533 pd txtflush;
#X obj 38 115 symbol;
#X msg 142 103 \$1 presets;
#X msg 11 35 symbol presets/espelho.nvl;
#X obj 77 169 inlet;
#N canvas 72 361 450 300 datarestore 0;
#X obj 41 119 table \$0-slices-start 100;
#X obj 41 139 table \$0-slices-end 100;
#X text 44 99 memoria das seleções;
#X obj 44 -29 r \$0-restore;
#X obj 44 79 s \$0-slices-start;
#X obj 89 44 s \$0-slices-end;
#X text 40 -47 restaurando slices (on load);
#N canvas 6 53 1071 605 updatede_slices 0;
#X obj 165 302 s \$0-slices-start;
#X obj 165 280 pack 0 0;
#X obj 165 257 f;
#X obj 166 217 t b f;
#X obj 273 279 pack 0 0;
#X obj 273 256 f;
#X obj 274 216 t b f;
#X obj 273 303 s \$0-slices-end;
#X obj 71 165 r \$0-slice;
#X obj 90 358 tabread \$0-slices-start;
#X obj 71 189 t f f f;
#X obj 91 382 s \$0-start-r;
#X obj 71 412 tabread \$0-slices-end;
#X obj 72 436 s \$0-end-r;
#X obj 400 152 f;
#X obj 427 152 f;
#X obj 413 115 r \$0-start;
#X obj 481 114 r \$0-end;
#X obj 481 66 t b b;
#X obj 381 189 f;
#X obj 406 189 f;
#X obj 361 -114 r \$0-save;
#X obj 382 212 s \$0-start-r;
#X obj 464 212 s \$0-end-r;
#X obj 205 168 r \$0-start;
#X obj 315 161 r \$0-end;
#X obj 168 192 f;
#X obj 271 191 f;
#X obj 353 2 t b b b b;
#X msg 406 -48 1;
#X msg 433 -48 0;
#X obj 430 -13 s \$0-spigot;
#X obj 361 -88 t b b b b;
#X text 43 148 update do slice;
#X text 136 440 restaura o slider;
#X text 175 383 restaura o slider;
#X text 367 303 escreve o techo na tabela;
#X text 427 -113 acionado ao crregar novo nome;
#X obj 667 17 until;
#X obj 669 44 f;
#X obj 696 39 + 1;
#X obj 705 17 sel 0;
#X obj 698 56 mod 8;
#X obj 708 99 serialize 8;
#X obj 705 125 list-math / 8;
#X obj 829 38 /;
#X obj 707 -36 t b f f f b f;
#X msg 829 18 1;
#X obj 750 161 list-math +;
#X obj 610 193 s \$0-slices-start;
#X obj 758 225 s \$0-slices-end;
#X obj 608 173 prepend 0;
#X obj 756 197 prepend 0;
#X obj 707 -61 r \$0-simetria;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 3 1 1 1;
#X connect 4 0 7 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 6 1 4 1;
#X connect 8 0 10 0;
#X connect 9 0 11 0;
#X connect 10 0 12 0;
#X connect 10 1 9 0;
#X connect 10 2 5 1;
#X connect 10 2 2 1;
#X connect 12 0 13 0;
#X connect 14 0 19 1;
#X connect 15 0 20 1;
#X connect 16 0 14 1;
#X connect 17 0 15 1;
#X connect 18 0 14 0;
#X connect 18 1 15 0;
#X connect 19 0 22 0;
#X connect 20 0 23 0;
#X connect 21 0 32 0;
#X connect 24 0 26 1;
#X connect 25 0 27 1;
#X connect 26 0 3 0;
#X connect 27 0 6 0;
#X connect 28 0 26 0;
#X connect 28 1 27 0;
#X connect 28 2 19 0;
#X connect 28 3 20 0;
#X connect 29 0 31 0;
#X connect 30 0 31 0;
#X connect 32 0 29 0;
#X connect 32 1 28 0;
#X connect 32 2 30 0;
#X connect 32 3 18 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 39 0 43 0;
#X connect 40 0 42 0;
#X connect 41 0 38 1;
#X connect 42 0 39 1;
#X connect 42 0 41 0;
#X connect 43 0 44 0;
#X connect 44 0 48 0;
#X connect 44 0 51 0;
#X connect 45 0 48 1;
#X connect 46 0 38 0;
#X connect 46 1 42 1;
#X connect 46 2 43 1;
#X connect 46 3 44 1;
#X connect 46 4 47 0;
#X connect 46 5 45 1;
#X connect 47 0 45 0;
#X connect 48 0 52 0;
#X connect 51 0 49 0;
#X connect 52 0 50 0;
#X connect 53 0 46 0;
#X restore 42 185 pd updatede_slices;
#X obj 44 -9 route start end pattern;
#X obj 134 20 s \$0-restore-pattern;
#X connect 3 0 8 0;
#X connect 8 0 4 0;
#X connect 8 1 5 0;
#X connect 8 2 9 0;
#X restore 659 159 pd datarestore;
#X text 555 622 pd datarestore;
#X text 632 601 pattern;
#X text 420 635 pd \$0-play_segments;
#X obj 102 561 mergefilename;
#X obj 142 126 mergefilename;
#X obj 39 489 mergefilename;
#X msg 37 466 \$1 presets/;
#X obj 421 485 s \$0-clearmtx;
#X obj 325 432 t s b b;
#X obj 409 449 s \$0-cleartxt;
#X obj 254 621 s \$0-cleartxt;
#X obj 575 41 bng 15 250 50 0 \$0-pattern_mtx_btn empty pattern 17
7 0 10 -262144 -1 -1;
#X text 575 23 matrix;
#X obj 446 590 tosymbol;
#X obj 99 394 pipe s 1000;
#X obj 229 371 s \$0-presetname_mtx;
#X obj 102 586 t s b b;
#X connect 1 0 36 0;
#X connect 3 0 2 0;
#X connect 5 0 55 0;
#X connect 6 0 26 0;
#X connect 6 0 62 0;
#X connect 7 0 40 0;
#X connect 9 0 8 0;
#X connect 10 0 22 0;
#X connect 10 0 41 1;
#X connect 11 0 41 1;
#X connect 12 0 41 1;
#X connect 13 0 60 0;
#X connect 13 1 0 0;
#X connect 14 0 10 0;
#X connect 17 0 11 0;
#X connect 19 0 20 1;
#X connect 20 0 12 0;
#X connect 21 0 20 0;
#X connect 22 0 21 0;
#X connect 23 0 43 0;
#X connect 24 0 50 0;
#X connect 25 0 53 0;
#X connect 26 0 61 0;
#X connect 27 0 25 0;
#X connect 27 1 24 1;
#X connect 28 0 39 0;
#X connect 29 0 30 0;
#X connect 29 0 23 0;
#X connect 29 0 44 0;
#X connect 30 0 28 0;
#X connect 32 0 31 0;
#X connect 34 0 33 0;
#X connect 35 0 34 0;
#X connect 36 0 41 1;
#X connect 37 0 42 0;
#X connect 38 0 6 0;
#X connect 40 1 9 0;
#X connect 41 0 13 0;
#X connect 42 0 32 0;
#X connect 43 0 51 0;
#X connect 44 0 31 0;
#X connect 45 0 31 0;
#X connect 50 0 63 0;
#X connect 51 0 42 1;
#X connect 52 0 24 0;
#X connect 53 0 52 0;
#X connect 55 0 41 0;
#X connect 55 1 54 0;
#X connect 55 2 56 0;
#X connect 60 0 15 0;
#X connect 61 0 27 0;
#X connect 63 0 18 0;
#X connect 63 1 16 0;
#X connect 63 2 57 0;
#X restore 527 37 pd \$0-preset_guts;
#X obj 1104 165 r \$0-sequencer_btn;
#X msg 1104 119 vis 1;
#X msg 1104 188 vis 1;
#X obj 1104 210 s pd-\$0-sequencer_guts;
#X obj 427 475 outlet~;
#X obj 539 473 outlet~;
#X obj 95 -27 inlet;
#X obj 84 473 outlet;
#X obj 548 -96 inlet;
#X obj 533 -7 tosymbol;
#X obj 349 471 outlet;
#X obj 304 471 outlet;
#X obj 84 446 pack f f f f;
#X obj 355 34 b;
#X obj 1104 141 s pd-\$0-preset_guts;
#X msg 1104 261 vis 1;
#X obj 1104 234 r \$0-play_segments_btn;
#X obj 1104 284 s pd-\$0-play_segments;
#X obj 13 -83 tgl 15 0 empty \$0-keyctrl-S empty 17 7 0 10 -262144
-1 -1 0 1;
#N canvas 539 315 450 300 \$0-controls 0;
#N canvas 71 325 1097 385 ascii 0;
#X msg 40 133 0;
#X msg 69 133 1;
#X obj 158 303 outlet;
#X msg 97 135 2;
#X msg 158 135 4;
#X msg 190 134 5;
#X msg 222 136 6;
#X msg 253 137 7;
#X msg 125 134 3;
#X obj 77 102 sel 113 119 101 114 116 121 117 105 111 112;
#X obj 347 102 sel 97 115 100 102 103 104 106 107 108;
#X text 506 83 asdfg;
#X text 287 85 qwerty;
#X msg 306 147 8;
#X msg 335 147 9;
#X msg 363 149 10;
#X msg 391 148 11;
#X msg 423 149 12;
#X msg 456 148 13;
#X msg 488 150 14;
#X msg 518 152 15;
#X obj 627 0 s \$0-enterR;
#X obj 28 260 sel 32;
#X text 21 282 barra;
#X obj 627 -19 sel 83;
#X text 644 -36 shift+s;
#X msg 908 134 0;
#X msg 934 130 1;
#X msg 963 131 2;
#X msg 967 157 3;
#X msg 876 133 -1;
#X msg 848 132 -2;
#X msg 819 131 -3;
#X msg 792 130 -4;
#X msg 996 158 4;
#X text 896 79 zxcvb;
#X obj 890 184 + 12;
#X obj 821 93 sel 122 120 99 118 98 110 109 44 46;
#X obj 691 263 outlet;
#X obj 885 223 outlet;
#X text 674 -18 STORE PRESET @ buffer;
#X text 626 16 isto nao salva em disco! - apenas em buffer;
#X obj 79 -58 inlet;
#X text 954 71 pitch;
#X text 388 80 slices;
#X text 172 84 slices;
#X obj 546 163 sel 49 50 51 52 53 54 55 56 57 48;
#X msg 747 212 9;
#X msg 777 214 10;
#X text 695 144 patterns;
#X msg 504 208 1;
#X msg 533 208 2;
#X msg 561 210 3;
#X msg 589 210 4;
#X msg 621 211 5;
#X msg 652 209 6;
#X msg 688 211 7;
#X msg 716 213 8;
#X connect 0 0 2 0;
#X connect 1 0 2 0;
#X connect 3 0 2 0;
#X connect 4 0 2 0;
#X connect 5 0 2 0;
#X connect 6 0 2 0;
#X connect 7 0 2 0;
#X connect 8 0 2 0;
#X connect 9 0 0 0;
#X connect 9 1 1 0;
#X connect 9 2 3 0;
#X connect 9 3 8 0;
#X connect 9 4 4 0;
#X connect 9 5 5 0;
#X connect 9 6 6 0;
#X connect 9 7 7 0;
#X connect 10 0 13 0;
#X connect 10 1 14 0;
#X connect 10 2 15 0;
#X connect 10 3 16 0;
#X connect 10 4 17 0;
#X connect 10 5 18 0;
#X connect 10 6 19 0;
#X connect 10 7 20 0;
#X connect 13 0 2 0;
#X connect 14 0 2 0;
#X connect 15 0 2 0;
#X connect 16 0 2 0;
#X connect 17 0 2 0;
#X connect 18 0 2 0;
#X connect 19 0 2 0;
#X connect 20 0 2 0;
#X connect 22 0 2 0;
#X connect 24 0 21 0;
#X connect 26 0 36 0;
#X connect 27 0 36 0;
#X connect 28 0 36 0;
#X connect 29 0 36 0;
#X connect 30 0 36 0;
#X connect 31 0 36 0;
#X connect 32 0 36 0;
#X connect 33 0 36 0;
#X connect 34 0 36 0;
#X connect 36 0 39 0;
#X connect 37 0 33 0;
#X connect 37 1 32 0;
#X connect 37 2 31 0;
#X connect 37 3 30 0;
#X connect 37 4 26 0;
#X connect 37 5 27 0;
#X connect 37 6 28 0;
#X connect 37 7 29 0;
#X connect 37 8 34 0;
#X connect 42 0 9 0;
#X connect 42 0 22 0;
#X connect 42 0 10 0;
#X connect 42 0 37 0;
#X connect 42 0 46 0;
#X connect 42 0 24 0;
#X connect 46 0 50 0;
#X connect 46 1 51 0;
#X connect 46 2 52 0;
#X connect 46 3 53 0;
#X connect 46 4 54 0;
#X connect 46 5 55 0;
#X connect 46 6 56 0;
#X connect 46 7 57 0;
#X connect 46 8 47 0;
#X connect 46 9 48 0;
#X connect 47 0 38 0;
#X connect 48 0 38 0;
#X connect 50 0 38 0;
#X connect 51 0 38 0;
#X connect 52 0 38 0;
#X connect 53 0 38 0;
#X connect 54 0 38 0;
#X connect 55 0 38 0;
#X connect 56 0 38 0;
#X connect 57 0 38 0;
#X restore 124 13 pd ascii;
#X obj 43 227 s \$0-play;
#X obj 43 203 t b;
#X obj 179 -33 inlet;
#X obj 105 226 s \$0-slice;
#X obj 49 163 t b f;
#X obj 125 -31 key;
#X obj 171 55 s \$0-pitchdisplay-S;
#X obj 146 84 s \$0-pattern;
#X obj 125 -9 spigot;
#X connect 0 0 5 0;
#X connect 0 1 8 0;
#X connect 0 2 7 0;
#X connect 2 0 1 0;
#X connect 3 0 9 1;
#X connect 5 0 2 0;
#X connect 5 1 4 0;
#X connect 6 0 9 0;
#X connect 9 0 0 0;
#X restore 13 -62 pd \$0-controls;
#N canvas 145 165 519 219 \$0-from_master 0;
#X obj 304 -58 inlet;
#X obj 90 17 sel 1;
#X obj 94 93 s \$0-seqtoggle-R;
#X msg 92 44 label Slave;
#X obj 175 12 r \$0-seqtoggle-S;
#X msg 174 32 label Master;
#X obj 243 64 sel 0;
#X msg 245 85 label off;
#X obj 317 -33 unpack f f f f;
#X obj -23 17 s \$0-seqcursor-R;
#X obj 373 0 outlet;
#X obj 428 0 outlet;
#X connect 0 0 8 0;
#X connect 1 0 3 0;
#X connect 3 0 2 0;
#X connect 4 0 5 0;
#X connect 4 0 6 0;
#X connect 5 0 2 0;
#X connect 6 0 7 0;
#X connect 7 0 2 0;
#X connect 8 0 9 0;
#X connect 8 1 6 0;
#X connect 8 1 1 0;
#X connect 8 2 10 0;
#X connect 8 3 11 0;
#X restore 94 40 pd \$0-from_master;
#X text 46 424 to_slave;
#X text 10 -47 controles de entrada humana;
#X msg 1104 336 vis 1;
#X obj 1104 358 s pd-\$0-pitch_guts;
#X obj 1104 307 r \$0-pitch_guts_btn;
#X msg 1104 418 vis 1;
#X obj 1104 389 r \$0-controls_btn;
#X obj 1104 439 s pd-\$0-controls;
#X msg 1104 498 vis 1;
#X obj 1104 520 s pd-\$0-patterns_mtx;
#X obj 1104 473 r \$0-pattern_mtx_btn;
#X obj 1104 92 r \$0-preset_guts_btn;
#X obj 95 13 spigot 1;
#X obj 140 -13 == 0;
#X obj 497 -5 + 12;
#X obj 670 149 s \$0-ntempo-R;
#X obj 677 99 unpack f f;
#X obj 750 80 t b f;
#X obj 956 136 s \$0-seqtoggle-R;
#X obj 528 18 makefilename presets/%s;
#X obj 957 113 s \$0-sliceinlet;
#X text 651 -94 atalho para entrada de controles externos;
#X text 1102 -15 abertura das janelas;
#X text 1108 -1 "hack-me";
#X text 426 429 engine dsp~ segmentos;
#X obj 961 63 s \$0-mono2stereo;
#X obj 964 39 s \$0-normalize;
#X obj 203 40 table \$0-R;
#X obj 203 20 table \$0-L;
#X obj 290 410 hsl 50 10 0 1 0 0 \$0-start \$0-start-r empty -2 -8
0 10 -182874 -1 -1 0 1;
#X obj 234 120 hradio 8 1 0 8 \$0-seqcursor-S \$0-seqcursor-R empty
0 -8 0 10 -228856 -58253 -1 0;
#X obj 520 167 s \$0-presetcanvas;
#X obj 522 104 random 65536;
#X obj 523 128 * -255;
#X msg 517 147 color \$1 0 0;
#X obj 526 84 t b;
#X obj 278 441 pack f f f;
#X obj 259 410 t b;
#X obj 300 119 tgl 10 0 \$0-seqtoggle-S \$0-seqtoggle-R Master 12 5
1 8 -2635 -21579 -262144 0 1;
#X obj 204 117 nbx 3 12 -1e+37 1e+37 0 1 \$0-ntempo-S \$0-ntempo-R
empty 0 -8 0 8 -1 -262144 -1 120 256;
#X obj 590 -5 s \$0-pattern;
#X obj 780 112 s \$0-randomfactor;
#X obj 779 135 s \$0-random;
#X obj 775 172 s \$0-div;
#X obj 959 89 s \$0-vol;
#X obj 402 20 s \$0-pitchdisplay-S;
#X obj 794 82 s \$0-keyctrl-S;
#X obj 378 154 s \$0-tmode-S;
#X obj 378 96 int;
#X msg 394 71 2;
#X obj 394 50 loadbang;
#X obj 426 95 s \$0-div;
#X msg 426 70 8;
#X obj 968 14 s \$0-simetria;
#X obj 673 174 s \$0-tmode-R;
#X obj 363 -21 r \$0-tmode-R;
#X obj 971 -7 s \$0-wavfile;
#X obj 548 -76 route pitch preset pattern tempo div random key seq
slice vol mono2x normalize simetria wav;
#X obj 954 -35 tosymbol;
#X obj 870 365 s \$0-presetcanvas;
#X obj 872 302 random 65536;
#X obj 873 326 * -255;
#X msg 867 345 color \$1 0 0;
#X obj 951 230 t b s;
#X msg 999 276 label \$1;
#X connect 0 0 78 2;
#X connect 10 0 16 0;
#X connect 16 0 14 0;
#X connect 17 0 31 0;
#X connect 18 0 33 0;
#X connect 18 0 78 0;
#X connect 19 0 25 0;
#X connect 19 1 26 0;
#X connect 21 0 23 0;
#X connect 22 0 35 0;
#X connect 23 0 24 0;
#X connect 27 0 54 0;
#X connect 29 0 99 0;
#X connect 30 0 61 0;
#X connect 30 0 77 0;
#X connect 33 0 28 0;
#X connect 34 0 90 0;
#X connect 36 0 38 0;
#X connect 37 0 36 0;
#X connect 39 0 40 0;
#X connect 41 0 81 0;
#X connect 41 1 90 0;
#X connect 44 0 45 0;
#X connect 46 0 44 0;
#X connect 47 0 49 0;
#X connect 48 0 47 0;
#X connect 50 0 51 0;
#X connect 52 0 50 0;
#X connect 53 0 22 0;
#X connect 54 0 41 0;
#X connect 55 0 54 1;
#X connect 56 0 87 0;
#X connect 58 0 57 0;
#X connect 58 1 96 0;
#X connect 59 0 84 0;
#X connect 59 1 83 0;
#X connect 61 0 20 0;
#X connect 71 0 79 0;
#X connect 71 0 78 1;
#X connect 74 0 75 0;
#X connect 75 0 76 0;
#X connect 76 0 73 0;
#X connect 77 0 74 0;
#X connect 78 0 32 0;
#X connect 79 0 78 0;
#X connect 80 0 33 1;
#X connect 80 0 55 0;
#X connect 81 0 33 2;
#X connect 81 0 34 0;
#X connect 90 0 33 3;
#X connect 90 0 89 0;
#X connect 91 0 90 1;
#X connect 92 0 91 0;
#X connect 92 0 94 0;
#X connect 94 0 93 0;
#X connect 97 0 90 0;
#X connect 99 0 56 0;
#X connect 99 1 30 0;
#X connect 99 2 82 0;
#X connect 99 3 58 0;
#X connect 99 4 85 0;
#X connect 99 5 59 0;
#X connect 99 6 88 0;
#X connect 99 7 60 0;
#X connect 99 8 62 0;
#X connect 99 9 86 0;
#X connect 99 10 67 0;
#X connect 99 11 68 0;
#X connect 99 12 95 0;
#X connect 99 13 100 0;
#X connect 100 0 98 0;
#X connect 100 0 105 0;
#X connect 102 0 103 0;
#X connect 103 0 104 0;
#X connect 104 0 101 0;
#X connect 105 0 102 0;
#X connect 105 1 106 0;
#X connect 106 0 101 0;
#X coords 0 -1 1 1 250 35 2 100 100;
Jump to Line
Something went wrong with that request. Please try again.