#N canvas 248 75 742 582 12;
#X obj 514 36 loadbang;
#X obj 122 230 bng 25 250 50 0 empty empty Escolher_Sample -45 -12
2 20 -4032 -1 -1;
#X obj 156 273 nbx 6 19 0 100 0 0 empty sr Sample_Rate_em_KHz 1 -13
1 15 -4034 -91543 -1 44.1 256;
#N canvas 302 166 981 475 sampler 0;
#X obj 163 -65 cnv 15 100 60 empty empty empty 20 12 0 14 -233017 -66577
0;
#X obj 370 48 /;
#X obj 370 91 * 1000;
#X obj 170 -26 nbx 8 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-203904 -1 -1 0 256;
#X obj 370 72 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-232576 -1 -1 0 256;
#X obj 370 115 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-204786 -1 -1 0 256;
#X text 428 67 Número de Amostras dividido pelo Sample Rate do Arquivo
dá o tamanho do arquivo em segundos;
#X obj 261 245 line~;
#X msg 261 222 0 \, \$1 \$2;
#X obj 261 162 float;
#X obj 170 96 metro;
#X obj 170 76 tgl 15 0 empty empty empty 0 -6 0 10 -155649 -262130
-1 0 1;
#X text 41 132 Sample Size;
#X text 32 96 sample em Miliseg;
#X text 13 78 Bangs a cada Loop do;
#X msg 170 47 1;
#X obj 169 -97 inlet;
#X obj 261 320 outlet~;
#X obj 369 -96 inlet;
#X obj 401 24 * 1000;
#X obj 261 271 tabread4~ \$0-sampler;
#X obj 144 -94 bng 15 250 50 0 empty empty empty 0 -6 0 10 -262130
-1 -1;
#X text 469 24 Sample Rate do Arquivo (entrada é em Khz \, por isso
multiplicamos por 1000).;
#X text 385 187 Lista (Número de Amostras do Sample e sua duração em
ms);
#X text 425 218 A cada Loop \, o line~ recebe duas mensagens. A primeira
(Zero) leva o [line~] imediatamente ao zero. A segunda é uma lista
com Número de amostras e tempo em Milisegundos. Com esses dados o line~
gera um fluxo de números crescentes que serve de índices para o [tabread4~].
;
#N canvas 0 22 450 300 (subpatch) 0;
#X coords 0 1 100 -1 615 95 1;
#X restore 242 212 graph;
#X obj 245 101 f;
#X obj 370 24 f;
#X obj 94 -96 inlet;
#X obj 369 -51 t b f;
#X obj 170 -3 trigger bang float;
#N canvas 54 51 783 393 openpanel 0;
#X obj 152 254 soundfiler;
#X obj 152 84 openpanel;
#X symbolatom 152 112 80 0 0 0 - - -;
#X obj 152 199 pack symbol symbol;
#X text 57 83 ABRE ARQUIVO;
#X text 37 169 de Arquivo e;
#X text 54 185 Tabela;
#X text 10 153 Cria lista com nome;
#X obj 275 172 symbol \$0-sampler;
#X text 243 261 Soundfile recebe a mensagem "Resize + (nome do arquivo)
+ (nome da tabela)" e joga o arquivo de som na tabela ao mesmo tempo
em que redimensiona a tabela para o tamanho do arquivo! O Outlet dá
o tamanho da tabela em número de amostras.;
#X obj 152 283 outlet;
#X obj 152 51 inlet;
#X obj 152 144 trigger symbol bang;
#X msg 152 226 read -maxsize 1e+09 -resize \$1 \$2;
#X connect 0 0 10 0;
#X connect 1 0 2 0;
#X connect 2 0 12 0;
#X connect 3 0 13 0;
#X connect 8 0 3 1;
#X connect 11 0 1 0;
#X connect 12 0 3 0;
#X connect 12 1 8 0;
#X connect 13 0 0 0;
#X restore 169 -56 pd openpanel;
#X obj 293 136 nbx 6 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10
-203904 -1 -1 0 256;
#X text 427 111 Tamanho do Sample em ms (milisegundos);
#X obj 261 188 pack float float;
#X obj 170 123 t b b;
#X connect 1 0 4 0;
#X connect 2 0 5 0;
#X connect 3 0 30 0;
#X connect 4 0 2 0;
#X connect 5 0 26 1;
#X connect 5 0 34 1;
#X connect 7 0 20 0;
#X connect 8 0 7 0;
#X connect 9 0 34 0;
#X connect 10 0 35 0;
#X connect 11 0 10 0;
#X connect 15 0 11 0;
#X connect 16 0 31 0;
#X connect 18 0 29 0;
#X connect 19 0 1 1;
#X connect 20 0 17 0;
#X connect 21 0 31 0;
#X connect 26 0 10 1;
#X connect 27 0 1 0;
#X connect 28 0 15 0;
#X connect 29 0 27 0;
#X connect 29 1 19 0;
#X connect 30 0 15 0;
#X connect 30 1 27 0;
#X connect 30 1 32 0;
#X connect 31 0 3 0;
#X connect 32 0 9 1;
#X connect 34 0 8 0;
#X connect 35 0 9 0;
#X connect 35 1 26 0;
#X restore 89 304 pd sampler;
#X obj 203 350 cnv 15 397 148 empty empty empty 20 12 0 14 -233017
-66577 0;
#N canvas 0 22 454 304 (subpatch) 0;
#X array \$0-sampler 1.63332e+06 float 4;
#X coords 0 1 1.63332e+06 -1 400 150 1;
#X restore 202 350 graph;
#X text 45 86 Esse patch é um sampler em loop \, mas também podemos
mudar o pitch e o tempo do sample ao ajustar o sample rate do nosso
sampler. Um sample rate menor que o do aquivo o tocará mais lento e
mais grave \, enquanto que um maior o toca mais rápido e mais agudo.
;
#X obj 81 336 dac~;
#X obj 31 27 cnv 15 315 40 empty empty Sampler-Looper: 20 12 0 24 -262144
-66577 0;
#X obj 89 274 bng 15 250 50 0 empty empty empty 17 7 0 10 -204800 -1
-1;
#X text 59 253 restart;
#X msg 514 60 \; pd dsp 1 \; sr 44.1;
#X connect 0 0 11 0;
#X connect 1 0 3 1;
#X connect 2 0 3 2;
#X connect 3 0 7 0;
#X connect 3 0 7 1;
#X connect 9 0 3 0;
