Magnitudes y Cualidades del Sonido

El siguiente patch es una potente herramienta para que el alumnado relaciones diversas magnitudes físicas de las ondas con cualidades de los sonidos. Se pone de manifiesto la relación entre amplitud, la frecuencia y la longitud de onda con intensidad, tono, timbre, etc.

El patch muestra la onda resultante de la suma de las ondas que intervienen, el espectro de frecuencias. y diversos parámetros. Asimismo, el alumnado puede escuchar el resultado, por lo que tiene todos los recursos para asimilar los conceptos de una manera divertida y poder manipular a tiempo real.

Se incluyen también tomas reales de instrumentos reales (saxofón tenor y alto y trompeta) en una nota concreta, con objeto de mostrar la diferencia entre un tono puro, y un sonido complejo, compuesto por la suma de muchas frecuencias, pero cuyo tono principal o afinación es igual al tono puro.

Para este patch se necesitan 3 archivos adicionales que están aquí.

#N canvas 311 33 773 821 10;

#X text 36 -2 comment;

#X obj -1 1 cnv 15 420 80 empty empty Magnitudes_y_cualidades 20 12

0 14 -228992 -66577 0;

#X obj 451 12 cnv 15 310 800 empty empty empty 20 12 0 14 -262130 -66577

0;

#N canvas 0 22 450 300 (subpatch) 0;

#X array onda 882 float 0;

#X coords 0 5 882 -5 200 130 1;

#X restore 503 45 graph;

#N canvas 0 22 450 300 (subpatch) 0;

#X array Espectro 128 float 0;

#X coords 0 4300 127 -43 257 130 1;

#X restore 471 255 graph;

#X text 714 103 0;

#X text 732 374 0;

#X text 734 248 1;

#X text 731 311 0.5;

#X text 708 165 -5;

#X text 516 174 ---- 0.02 segundos ----;

#N canvas 0 22 450 300 (subpatch) 0;

#X array Espectro2 256 float 0;

#X coords 0 4300 255 -43 257 130 1;

#X restore 467 429 graph;

#N canvas 0 22 450 300 (subpatch) 0;

#X array Espectro3 512 float 0;

#X coords 0 4300 511 -43 257 130 1;

#X restore 468 596 graph;

#X text 478 386 50;

#X text 468 559 50;

#X text 511 386 250;

#X text 558 385 500;

#X text 504 559 500;

#X text 615 385 800;

#X text 473 728 250;

#X text 655 385 1K;

#X text 689 385 1.2K;

#X text 554 560 1K;

#X text 596 560 1.5K;

#X text 504 728 1K;

#X text 527 728 1.5K;

#X text 647 559 2K;

#X text 689 560 2.5K;

#X text 571 727 2.5K;

#X text 621 728 3.6K;

#X text 661 728 4.4K;

#X text 698 727 5.25K;

#X text 692 24 Amplitud;

#X text 707 235 Amplitud;

#X text 698 408 Amplitud;

#X text 712 39 5;

#X text 706 575 Amplitud;

#X text 581 15 ONDA;

#X obj 212 89 cnv 15 140 120 empty empty empty 20 12 0 14 -261682 -66577

0;

#X obj 219 130 bng 15 250 50 0 playsaxo empty Saxo2 17 7 0 10 -262144

-1 -1;

#X obj 276 122 bng 15 250 50 0 stopsaxo empty stop 17 7 0 10 -262144

-1 -1;

#X obj 219 110 bng 15 250 50 0 playsaxo2 empty Saxo1 17 7 0 10 -262144

-1 -1;

#X obj 218 149 bng 15 250 50 0 playtrompeta empty Trompeta 17 7 0 10

-262144 -1 -1;

#X text 221 91 SONIDOS REALES;

#X obj 1 89 cnv 15 200 400 empty empty empty 20 12 0 14 -261682 -66577

0;

#N canvas 75 83 562 569 fft 0;

#X obj 19 62 inlet~;

#X obj 85 214 inlet;

#X obj 19 92 rfft~;

#X obj 19 125 *~;

#X obj 50 125 *~;

#X obj 19 155 sqrt~;

#X obj 19 181 biquad~ 0 0 0 0 1;

#X obj 144 131 samplerate~;

#X obj 143 106 bng 18 250 50 0 empty empty empty 0 -6 0 8 -262144 -1

-1;

#X floatatom 144 178 5 0 0 0 - - -;

#X obj 144 84 loadbang;

#X obj 159 41 hsl 60 15 50 1000 0 0 empty tonopuro Frecuencia_Tono_Puro

-2 7 0 10 -262144 -1 -1 0 1;

#X obj 152 201 s fund;

#X obj 145 153 / 256;

#X obj 76 234 tabwrite~ Espectro;

#X obj 75 255 tabwrite~ Espectro2;

#X obj 76 276 tabwrite~ Espectro3;

#X obj 44 274 *~ 1;

#X obj 226 107 expr 340/$f1;

#X obj 168 62 hsl 60 15 1000 5000 0 0 empty tonopurok Frecuencia_Tono_Puro

-2 7 0 10 -262144 -1 -1 0 1;

#X floatatom 226 86 5 0 0 0 - freq -;

#X floatatom 226 129 5 0 0 0 - - longonda;

#X floatatom 237 269 5 0 0 0 - - longonda2;

#X floatatom 235 219 5 0 0 0 - - freq2;

#X obj 236 240 expr 340/$f1;

#X floatatom 238 369 5 0 0 0 - - longonda3;

#X floatatom 236 319 5 0 0 0 - - freq3;

#X obj 240 343 expr 340/$f1;

#X obj 237 196 * 2;

#X obj 238 292 * 2;

#X floatatom 220 174 8 0 0 0 - - periodo;

#X obj 220 151 expr 1000/$f1;

#X obj 31 307 block~ 4096 1;

#X connect 0 0 2 0;

#X connect 1 0 14 0;

#X connect 1 0 15 0;

#X connect 1 0 16 0;

#X connect 2 0 3 0;

#X connect 2 0 3 1;

#X connect 2 1 4 0;

#X connect 2 1 4 1;

#X connect 3 0 5 0;

#X connect 4 0 5 0;

#X connect 5 0 6 0;

#X connect 6 0 14 0;

#X connect 6 0 15 0;

#X connect 6 0 17 0;

#X connect 7 0 13 0;

#X connect 8 0 7 0;

#X connect 9 0 12 0;

#X connect 10 0 8 0;

#X connect 11 0 12 0;

#X connect 13 0 9 0;

#X connect 17 0 16 0;

#X connect 18 0 21 0;

#X connect 19 0 12 0;

#X connect 20 0 18 0;

#X connect 20 0 28 0;

#X connect 20 0 31 0;

#X connect 24 0 22 0;

#X connect 27 0 25 0;

#X connect 28 0 23 0;

#X connect 28 0 24 0;

#X connect 28 0 29 0;

#X connect 29 0 26 0;

#X connect 29 0 27 0;

#X connect 31 0 30 0;

#X restore 28 423 pd fft;

#X obj 6 286 osc~;

#X obj 20 214 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

;

#X obj 8 308 *~;

#X obj 39 287 osc~;

#X obj 43 214 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

;

#X obj 41 309 *~;

#X obj 39 264 * 2;

#X obj 70 287 osc~;

#X obj 66 214 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

;

#X obj 72 309 *~;

#X obj 103 287 osc~;

#X obj 90 214 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1

;

#X obj 105 309 *~;

#X obj 135 287 osc~;

#X obj 115 214 tgl 18 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0

1;

#X obj 137 309 *~;

#X obj 6 263 * 1;

#X obj 70 264 * 3;

#X obj 103 264 * 4;

#X obj 135 264 * 5;

#X obj 29 400 *~ 1;

#X text 207 329 <-- Pulsa para obtener gr·ficas;

#X obj 163 331 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0

1;

#X obj 116 353 metro 150;

#N canvas 543 57 897 755 instrum 0;

#X obj 70 94 bng 15 250 50 0 empty playsaxo play 17 7 0 10 -262144

-1 -1;

#X msg 69 114 bang;

#X msg 74 143 1;

#X msg 126 144 0;

#X obj 125 93 bng 15 250 50 0 empty stopsaxo stop 17 7 0 10 -262144

-1 -1;

#X obj 18 190 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;

#X obj 6 48 env~;

#X obj 69 67 spigot;

#X obj 107 41 tgl 15 0 empty empty loop_on/off 17 7 0 10 -262144 -1

-1 1 1;

#X obj 6 72 - 100;

#X obj 69 43 r a;

#X obj 92 203 readsf~ 1;

#X msg 61 166 open saxo.aif;

#X obj 151 230 s a;

#X obj 121 233 hsl 60 15 0 50 0 0 empty volsaxo empty -2 -8 0 10 -262144

-1 -1 0 1;

#X obj 90 282 outlet~;

#X obj 107 12 loadbang;

#X obj 253 99 bng 15 250 50 0 empty playsaxo2 play 17 7 0 10 -262144

-1 -1;

#X msg 252 119 bang;

#X msg 257 148 1;

#X msg 309 149 0;

#X obj 187 104 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;

#X obj 189 53 env~;

#X obj 252 72 spigot;

#X obj 290 46 tgl 15 0 empty empty loop_on/off 17 7 0 10 -262144 -1

-1 1 1;

#X obj 189 77 - 100;

#X obj 275 208 readsf~ 1;

#X obj 287 236 hsl 60 15 0 10 0 0 empty volsaxo empty -2 -8 0 10 -262144

-1 -1 0 1;

#X obj 273 287 outlet~;

#X obj 290 17 loadbang;

#X msg 245 171 open saxo2.aif;

#X obj 360 233 s b;

#X obj 252 48 r b;

#X obj 273 261 *~ 30;

#X obj 459 96 bng 15 250 50 0 empty playtrompeta play 17 7 0 10 -262144

-1 -1;

#X msg 458 115 bang;

#X msg 463 144 1;

#X msg 515 145 0;

#X obj 393 100 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;

#X obj 395 49 env~;

#X obj 458 68 spigot;

#X obj 496 42 tgl 15 0 empty empty loop_on/off 17 7 0 10 -262144 -1

-1 1 1;

#X obj 395 73 - 100;

#X obj 481 204 readsf~ 1;

#X obj 493 232 hsl 60 15 0 10 0 0 empty volsaxo empty -2 -8 0 10 -262144

-1 -1 0 1;

#X obj 479 283 outlet~;

#X obj 496 13 loadbang;

#X obj 479 257 *~ 30;

#X obj 458 44 r c;

#X obj 566 229 s c;

#X msg 451 167 open trompeta.aif;

#X obj 90 257 *~ 20;

#X floatatom 16 132 5 0 0 0 - - vum;

#X floatatom 274 362 5 0 0 0 - - -;

#X obj 274 336 fiddle~;

#X obj 274 385 mtof;

#X floatatom 273 434 5 0 0 0 - - tonofun;

#X obj 273 411 int;

#X connect 0 0 1 0;

#X connect 0 0 20 0;

#X connect 0 0 37 0;

#X connect 1 0 12 0;

#X connect 1 0 2 0;

#X connect 2 0 11 0;

#X connect 3 0 11 0;

#X connect 4 0 3 0;

#X connect 4 0 20 0;

#X connect 4 0 37 0;

#X connect 6 0 9 0;

#X connect 7 0 0 0;

#X connect 8 0 7 1;

#X connect 9 0 5 0;

#X connect 9 0 52 0;

#X connect 10 0 7 0;

#X connect 11 0 6 0;

#X connect 11 0 51 0;

#X connect 11 0 54 0;

#X connect 11 1 13 0;

#X connect 12 0 11 0;

#X connect 14 0 51 1;

#X connect 16 0 8 0;

#X connect 17 0 18 0;

#X connect 17 0 3 0;

#X connect 17 0 37 0;

#X connect 18 0 30 0;

#X connect 18 0 19 0;

#X connect 19 0 26 0;

#X connect 20 0 26 0;

#X connect 22 0 25 0;

#X connect 23 0 17 0;

#X connect 24 0 23 1;

#X connect 25 0 21 0;

#X connect 26 0 22 0;

#X connect 26 0 33 0;

#X connect 26 0 54 0;

#X connect 26 1 31 0;

#X connect 27 0 33 1;

#X connect 29 0 24 0;

#X connect 30 0 26 0;

#X connect 32 0 23 0;

#X connect 33 0 28 0;

#X connect 34 0 35 0;

#X connect 34 0 20 0;

#X connect 34 0 3 0;

#X connect 35 0 50 0;

#X connect 35 0 36 0;

#X connect 36 0 43 0;

#X connect 37 0 43 0;

#X connect 39 0 42 0;

#X connect 40 0 34 0;

#X connect 41 0 40 1;

#X connect 42 0 38 0;

#X connect 43 0 39 0;

#X connect 43 0 47 0;

#X connect 43 0 54 0;

#X connect 43 1 49 0;

#X connect 44 0 47 1;

#X connect 46 0 41 0;

#X connect 47 0 45 0;

#X connect 48 0 40 0;

#X connect 50 0 43 0;

#X connect 51 0 15 0;

#X connect 53 0 55 0;

#X connect 54 0 53 0;

#X connect 55 0 57 0;

#X connect 57 0 56 0;

#X restore 4 330 pd instrum;

#X obj 184 331 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144

-1 -1;

#X obj 66 240 r fund;

#X floatatom 19 155 6 0 0 0 - - freq;

#X obj 112 378 tabwrite~ onda;

#X text 134 213 <-- On/Off de cada armÛnico (octavas) del tono puro

;

#X text 18 91 TONO PURO;

#X text 137 120 Frecuencia;

#X obj 210 239 cnv 15 240 80 empty empty empty 20 12 0 14 -261682 -66577

0;

#X floatatom 320 258 6 0 0 2 - longonda -;

#X obj 19 131 int;

#X obj 22 111 hsl 100 15 50 1000 0 0 tonopuro empty 50-1000Hz 5 8 0

10 -203904 -1 -1 0 1;

#X obj 22 132 hsl 100 15 1000 5000 0 0 tonopurok empty 1000-5000Hz

5 8 0 10 -232576 -1 -1 0 1;

#X text 64 155 Hz;

#X text 362 258 metros;

#X text 455 385 Hz;

#X text 452 559 Hz;

#X text 453 727 Hz;

#X obj 264 360 vu 25 120 vume empty -1 -8 0 10 -66577 -1 1 0;

#X text 18 24 Magnitudes fÌsicas de las ondas longitudinales: Amplitud

\, tono \, frecuencia \, longitud de onda. Cualidades de los sonidos:

Intensidad \, frecuencia \, timbre.;

#X floatatom 319 278 6 0 0 2 - longonda2 -;

#X text 362 278 metros;

#X floatatom 320 300 6 0 0 2 - longonda3 -;

#X text 362 300 metros;

#X floatatom 223 258 6 0 0 0 - freq -;

#X text 215 239 La longitud de una onda de frecuencia;

#X floatatom 222 278 6 0 0 0 - freq2 -;

#X floatatom 222 299 6 0 0 0 - freq3 -;

#X text 267 257 Hz mide;

#X text 266 277 Hz mide;

#X text 266 299 Hz mide;

#X floatatom 74 183 5 0 0 0 - periodo -;

#X text 24 183 PerÌodo;

#X text 112 182 milisegundos;

#X floatatom 289 186 5 0 0 0 - tonofun -;

#X text 215 168 Frecuencia del tono;

#X text 326 186 Hz;

#X text 214 186 fundamental;

#X obj 229 360 vsl 25 120 0 1 0 0 volger empty empty 0 -9 0 10 -232576

-1 -1 0 1;

#X obj 396 359 vsl 25 120 0 200 0 0 empty intensidad empty 0 -9 0 10

-204800 -1 -1 0 1;

#X text 378 488 Intensidad;

#X text 226 486 Volumen (dB);

#X text 215 474 0;

#X text 215 350 1;

#X text 381 472 0;

#X text 499 218 ESPECTRO DE FRECUENCIAS DE LA ONDA;

#X text 546 234 (TIMBRE DEL SONIDO);

#N canvas 0 22 450 300 vol 0;

#X obj 81 121 env~;

#X obj 80 143 - 100;

#X floatatom 80 164 5 0 0 0 - - vume;

#X obj 42 41 inlet~;

#X obj 77 79 *~;

#X obj 92 17 vsl 8 30 0 1 0 0 empty volger empty 0 -9 0 10 -262144

-1 -1 0 1;

#X obj 41 121 env~;

#X floatatom 43 141 5 0 0 0 - - intensidad;

#X obj 116 119 hip~ 5;

#X obj 119 145 dac~;

#X connect 0 0 1 0;

#X connect 1 0 2 0;

#X connect 3 0 4 0;

#X connect 3 0 6 0;

#X connect 4 0 0 0;

#X connect 4 0 8 0;

#X connect 5 0 4 1;

#X connect 6 0 7 0;

#X connect 8 0 9 0;

#X connect 8 0 9 1;

#X restore 29 442 pd vol;

#X obj 359 131 pddp/dsp;

#X text 355 108 iniciar audio;

#X text 356 91 Pulsa aquÌ para;

#X text 381 348 2;

#X text 380 409 1;

#X obj 6 641 cnv 15 400 100 empty empty Diseñado_por: 20 12 0 12 -261682

-66577 0;

#X text 21 687 CoordinaciÛn: David MartÌn LeÛn.;

#X text 21 702 Componentes: Herminio LÛpez Gonz·lez \, Maximino LÛpez

Fern·ndez \, Francisco Azogil M·rquez.;

#X text 22 660 Grupo de Trabajo HU2GT014. IES Diego MacÌas. CreaciÛn

de herramientas did·cticas con Pure Data. Curso 2011-2012.;

#X connect 46 0 48 0;

#X connect 47 0 48 1;

#X connect 48 0 66 0;

#X connect 49 0 51 0;

#X connect 50 0 51 1;

#X connect 51 0 66 0;

#X connect 52 0 49 0;

#X connect 53 0 55 0;

#X connect 54 0 55 1;

#X connect 55 0 66 0;

#X connect 56 0 58 0;

#X connect 57 0 58 1;

#X connect 58 0 66 0;

#X connect 59 0 61 0;

#X connect 60 0 61 1;

#X connect 61 0 66 0;

#X connect 62 0 46 0;

#X connect 63 0 53 0;

#X connect 64 0 56 0;

#X connect 65 0 59 0;

#X connect 66 0 45 0;

#X connect 66 0 74 0;

#X connect 66 0 117 0;

#X connect 68 0 69 0;

#X connect 69 0 45 1;

#X connect 69 0 74 0;

#X connect 70 0 66 0;

#X connect 70 1 66 0;

#X connect 70 2 66 0;

#X connect 71 0 45 1;

#X connect 71 0 74 0;

#X connect 72 0 62 0;

#X connect 72 0 52 0;

#X connect 72 0 63 0;

#X connect 72 0 64 0;

#X connect 72 0 65 0;

#X connect 80 0 73 0;

#X connect 81 0 80 0;

#X connect 82 0 80 0;