#N canvas 354 33 538 446 12;
#X obj 118 229 bng 30 250 50 0 empty empty empty 17 7 0 10 -261682
-1 -1;
#N canvas 797 186 322 336 teste 0;
#X obj 36 155 osc~;
#X obj 36 257 outlet~;
#X obj 36 211 *~;
#X obj 152 151 vline~;
#X obj 36 37 inlet;
#X obj 36 125 vline~;
#X obj 36 68 trigger bang bang;
#X msg 211 122 0 50;
#X obj 211 84 delay 500;
#X msg 36 97 440 \, 880 500;
#X msg 152 111 0.5 50;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 3 0 2 1;
#X connect 4 0 6 0;
#X connect 5 0 0 0;
#X connect 6 0 9 0;
#X connect 6 1 10 0;
#X connect 6 1 8 0;
#X connect 7 0 3 0;
#X connect 8 0 7 0;
#X connect 9 0 5 0;
#X connect 10 0 3 0;
#X restore 118 272 pd teste;
#X obj 118 316 output~;
#N canvas 186 23 825 581 reverb-echo 0;
#X obj 61 25 inlet~;
#X obj 62 524 outlet~;
#X obj 121 524 outlet~;
#X obj 61 128 +~;
#X obj 160 129 -~;
#X obj 61 206 +~;
#X obj 142 205 -~;
#X obj 61 283 +~;
#X obj 124 283 -~;
#X obj 62 367 +~;
#X obj 127 366 -~;
#X obj 62 447 +~;
#X obj 121 447 -~;
#X obj 163 72 delwrite~ \$0-del1 5;
#X obj 163 96 delread~ \$0-del1 5;
#X obj 142 229 delwrite~ \$0-del3 13;
#X obj 142 252 delread~ \$0-del3 13;
#X obj 160 153 delwrite~ \$0-del2 8;
#X obj 160 175 delread~ \$0-del2 8;
#X obj 124 307 delwrite~ \$0-del4 21;
#X obj 124 332 delread~ \$0-del4 21;
#X obj 127 390 delwrite~ \$0-del5 34;
#X obj 127 413 delread~ \$0-del5 34;
#X obj 121 472 delwrite~ \$0-del6 55;
#X obj 121 495 delread~ \$0-del6 55;
#X text 335 284 * Perceba o objeto [-~] e reveja o exemplo em 01.Intro-Audio-Digital/6.Soma.Subtracao/4.Subtacao.Oposicao.Fase
;
#X text 334 199 São seis estágios de delay \, onde temos o sinal de
entrada sendo somado a cada estágio com a saída de delay \, e depois
somado com a mesma saída (porém com a fase invertida*) no próximo estágio.
Isso faz aumentar muito o número de refrações.;
#X text 337 356 A saída é em estéreo \, pois no último estágio temos
ainda uma outra saída de uma cópia atrasada do sinal final.;
#X connect 0 0 3 0;
#X connect 0 0 4 0;
#X connect 0 0 13 0;
#X connect 3 0 5 0;
#X connect 3 0 6 0;
#X connect 4 0 17 0;
#X connect 5 0 7 0;
#X connect 5 0 8 0;
#X connect 6 0 15 0;
#X connect 7 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 19 0;
#X connect 9 0 11 0;
#X connect 9 0 12 0;
#X connect 10 0 21 0;
#X connect 11 0 1 0;
#X connect 12 0 23 0;
#X connect 14 0 3 1;
#X connect 14 0 4 1;
#X connect 16 0 7 1;
#X connect 16 0 8 1;
#X connect 18 0 5 1;
#X connect 18 0 6 1;
#X connect 20 0 9 1;
#X connect 20 0 10 1;
#X connect 22 0 11 1;
#X connect 22 0 12 1;
#X connect 24 0 2 0;
#X restore 296 297 pd reverb-echo;
#X obj 296 217 bng 30 250 50 0 empty empty empty 17 7 0 10 -261682
-1 -1;
#N canvas 797 186 322 336 teste 0;
#X obj 36 155 osc~;
#X obj 36 257 outlet~;
#X obj 36 211 *~;
#X obj 152 151 vline~;
#X obj 36 37 inlet;
#X obj 36 125 vline~;
#X obj 36 68 trigger bang bang;
#X msg 211 122 0 50;
#X obj 211 84 delay 500;
#X msg 36 97 440 \, 880 500;
#X msg 152 111 0.5 50;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X connect 3 0 2 1;
#X connect 4 0 6 0;
#X connect 5 0 0 0;
#X connect 6 0 9 0;
#X connect 6 1 10 0;
#X connect 6 1 8 0;
#X connect 7 0 3 0;
#X connect 8 0 7 0;
#X connect 9 0 5 0;
#X connect 10 0 3 0;
#X restore 296 260 pd teste;
#X obj 296 334 output~;
#X text 69 43 Este é um exemplo simples de reverberador implementado
a partir de uma cadeia de objetos de delay. Abaixo \, à esquerda \,
temos o som de teste sem processamento de reverb-echo \, compare com
o resultado da direita.;
#X text 69 115 A entrada é mono \, mas a saída é em estéreo. Abra o
subpacth [reverb-echo] para entender como funciona a implementação.
O sinal de teste é uma senóide fazendo um breve sweep \, abra também
e confira.;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 2 1;
#X connect 3 0 6 0;
#X connect 3 1 6 1;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
