#N canvas 0 29 1280 771 10; #X obj 110 485 * 440; #X obj 110 99 hradio 15 1 1 20 empty empty indice_do_harmonico_ou_numero_de_passos_na_escala 0 -30 0 10 -262144 -1 -1 0; #X floatatom 110 379 8 0 0 1 intervalo - -, f 8; #X obj 110 462 mux; #X floatatom 323 329 8 0 0 0 Base - -, f 8; #X msg 344 259 2; #X msg 365 283 1.5; #X obj 386 304 expr pow(2 \, 1.0/12); #X floatatom 117 441 8 0 0 1 intervalo_transposto - -, f 8; #X obj 128 125 tgl 15 0 empty empty Equivalencia_de_oitava 17 7 0 10 -262144 -1 -1 0 1; #X text 112 80 0; #X text 202 80 6; #X text 290 80 12; #X text 379 80 18; #X obj 149 150 vradio 15 1 1 4 empty empty empty 0 -8 0 10 -262144 -1 -1 1; #X text 169 163 ciclo de oitavas; #X text 169 178 ciclo de quintas; #X text 169 193 semitons; #X obj 323 210 route 0 1 2; #X text 169 147 serie harmonica; #X msg 323 235 1; #X obj 110 355 expr if($f2==1 \, $f1 \, pow($f2 \, $f1)) \;; #X floatatom 110 508 8 0 0 1 Frequencia_(Hz) - -, f 8; #X text 394 402 traz intervalo para [1 \, 2]; #X text 172 80 4; #X text 187 80 5; #X text 233 80 8; #X text 349 80 16; #X floatatom 380 441 5 0 0 1 numero_de_oitavas - -, f 5; #X obj 117 402 expr $f1/pow(2 \, (int(ln($f1)/ln(2)))) \; (int(ln($f1)/ln(2))) ; #X obj 286 591 *~ 0.5; #X obj 218 659 multiplex~; #X obj 218 631 tgl 15 0 empty empty Clique_aqui_para_tocar_a_nota_memorizada 17 7 0 10 -262144 -1 -1 0 1; #X floatatom 286 547 8 0 0 0 - - -, f 8; #X obj 286 523 f; #X obj 286 503 bng 15 250 50 0 empty empty Clique_aqui_para_memorizar_a_nota 17 7 0 10 -262144 -1 -1; #X obj 286 569 phasor~ 440; #X obj 110 529 osc~; #X obj 111 731 dac~; #X obj 110 696 *~; #X obj 147 696 *~; #X obj 130 569 hsl 80 15 0.01 1 1 0 empty empty Volume -2 -8 0 10 -262144 -1 -1 7000 1; #X obj 127 642 vline~; #X msg 127 603 \$1 50; #X text 375 356 k se base==1 base^k c.c.; #X connect 0 0 22 0; #X connect 1 0 21 0; #X connect 2 0 3 0; #X connect 3 0 0 0; #X connect 4 0 21 1; #X connect 5 0 4 0; #X connect 6 0 4 0; #X connect 7 0 4 0; #X connect 8 0 3 1; #X connect 9 0 3 2; #X connect 14 0 18 0; #X connect 18 0 20 0; #X connect 18 1 5 0; #X connect 18 2 6 0; #X connect 18 3 7 0; #X connect 20 0 4 0; #X connect 21 0 2 0; #X connect 21 0 29 0; #X connect 22 0 34 1; #X connect 22 0 37 0; #X connect 29 0 8 0; #X connect 29 1 28 0; #X connect 30 0 31 1; #X connect 31 0 40 0; #X connect 32 0 31 0; #X connect 33 0 36 0; #X connect 34 0 33 0; #X connect 35 0 34 0; #X connect 36 0 30 0; #X connect 37 0 39 0; #X connect 39 0 38 0; #X connect 40 0 38 1; #X connect 41 0 43 0; #X connect 42 0 39 1; #X connect 42 0 40 1; #X connect 43 0 42 0;