Teoría musical/Fundamentos de la Teoría Musical/Escalas diatónicas en modo mayor

De Wikilibros, la colección de libros de texto de contenido libre.
Saltar a: navegación, buscar
← La escritura de la música Escala diatónica Intervalo →
Teoría de la música y armonía


Las escalas diatónicas tienen dos modos (Mayor y menor), ahora veremos las escalas diatónicas en Modo Mayor, o simplemente Escalas Mayores.

Todas las Escalas Mayores tienen la misma estructura, por lo tanto, si comprendemos la estructura de una escala será sencillo repetirla para formar cualquier otra.

Ya conocemos la escala de Do Mayor, cómo hemos señalado esta es la escala que se construye sólo con notas naturales ordenadas en forma ascendente comenzando por el do y terminando con el do una octava superior. La escala de Do Mayor es una escala diatónica en Modo Mayor. Esta es la escala más sencilla y será el punto de partida para estudiar las Escalas Mayores.

A continuación se muestra una escala de Do Mayor en un pentagrama:

\relative c' {
  \override Staff.TimeSignature #'stencil = ##f
  \time 8/1
  c1^\markup {
    \postscript #"/tetracordio {
                    0 0 moveto
                    0 1 rlineto
                    18 0 rlineto
                    0 -1 rlineto
                    stroke
                    /Times-Roman findfont
                    2 scalefont
                    setfont
                    1.5 1.5 moveto
                    show
                  } def
                  1 0 translate
                  (Tetracordio 1) tetracordio
                  24.5 0 translate
                  (Tetracordio 2) tetracordio"
  }
  _\markup \column {
    "1"
    \translate #'(0 . 2)
    \postscript #"/puente {
                    save
                    0 0 moveto
                    0 -1 rlineto
                    5 0 rlineto
                    0 1 rlineto
                    [0.5] 1.25 setdash
                    stroke
                    restore
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    1.5 -4 moveto
                    (T) show
                  } def
                  /tono {
                    0 0 moveto
                    0 -1 rlineto
                    5 0 rlineto
                    0 1 rlineto
                    stroke
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    1.5 -4 moveto
                    (T) show
                  } def
                  /semitono {
                    0 0 moveto
                    1.5 -2 5 -1 5 0 rcurveto
                    stroke
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    1.5 -4 moveto
                    (st) show
                  } def
                  .5 0 translate
                  tono
                  6.25 0 translate
                  tono
                  6.25 0 translate
                  semitono
                  6.25 0 translate
                  puente
                  6.25 0 translate
                  tono
                  6.25 0 translate
                  tono
                  6.25 0 translate
                  semitono"
  }
  d_"2" e_"3" f_"4" g_"5" a_"6" b_"7" c_"8"
  \bar "|."
}

De la imagen anterior podemos extraer la estructura de la escala diatónica en Modo Mayor:

Tetracordio 1 puente Tetracordio 2
Tono Tono semitono Tono Tono Tono semitono

La estructura que acabamos de ver es la base de la teoría musical y es necesario conocerla de memoria. Si tienes problemas para recordarla, puedes ocupar un teclado:

\relative c' {
  \override Staff.TimeSignature #'stencil = ##f
  \time 8/1
  c1^\markup {
       \column {
         \translate #'(6.5 . 0)
         \center-column {"Do Central" \char ##x2193 }
         \with-dimensions #'(0 . 85) #'(0 . 15)
         \postscript #"/whitekey {
                         newpath
                         0 0 moveto
                         5 0 rlineto 0 15 rlineto
                         -5 0 rlineto 0 -15 rlineto
                         closepath
                         stroke
                       } def
                       /whitenotekey {
                         /Times-Roman findfont
                         3 scalefont
                         setfont
                         newpath
                         0 0 moveto
                         5 0 rlineto 0 15 rlineto
                         -5 0 rlineto 0 -15 rlineto
                         dup stringwidth pop
                         2 div
                         2.5 exch sub
                         0 moveto
                         show
                         closepath
                         stroke
                       } def
                       /blackkey {
                         newpath
                         0 5 moveto
                         4 0 rlineto 0 10 rlineto
                         -4 0 rlineto 0 -10 rlineto
                         closepath
                         gsave
                         grestore
                         0 0 0 setrgbcolor
                         fill
                         stroke
                       } def
                       0 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate (Do) whitenotekey
                       5 0 translate (Re) whitenotekey
                       5 0 translate (Mi) whitenotekey
                       5 0 translate (Fa) whitenotekey
                       5 0 translate (Sol) whitenotekey
                       5 0 translate (La) whitenotekey
                       5 0 translate (Si) whitenotekey
                       5 0 translate (Do) whitenotekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       -77 0 translate blackkey
                       10 0 translate blackkey
                       5 0 translate blackkey
                       10 0 translate blackkey
                       5 0 translate blackkey
                       5 0 translate blackkey
                       10 0 translate blackkey
                       5 0 translate blackkey
                       10 0 translate blackkey
                       5 0 translate blackkey
                       5 0 translate blackkey
                       -60 0 translate
                       -0 0 moveto
                       -12 -11 rlineto
                       5 0 moveto
                       -6.5 -10.5 rlineto
                       10 0 moveto
                       -1 -10 rlineto
                       15 0 moveto
                       4.5 -9.5 rlineto
                       20 0 moveto
                       10 -9 rlineto
                       25 0 moveto
                       15 -8.5 rlineto
                       30 0 moveto
                       20.5 -8 rlineto
                       35 0 moveto
                       26.5 -7.5 rlineto
                       stroke"
      \vspace #2
    }
  }
  _\markup \column {
    "1"
    \translate #'(0 . 2)
    \postscript #"/puente {
                    save
                    0 0 moveto
                    0 -1 rlineto
                    10 0 rlineto
                    0 1 rlineto
                    [0.5] 1.25 setdash
                    stroke
                    restore
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    4 -4 moveto
                    (T) show
                  } def
                  /tono {
                    0 0 moveto
                    0 -1 rlineto
                    10 0 rlineto
                    0 1 rlineto
                    stroke
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    4 -4 moveto
                    (T) show
                  } def
                  /semitono {
                    0 0 moveto
                    1.5 -2 10 -1 10 0 rcurveto
                    stroke
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    4 -4 moveto
                    (st) show
                  } def
                  /tetracordio {
                    0 0 moveto
                    0 -1 rlineto
                    31 0 rlineto
                    0 1 rlineto
                    stroke
                    /Times-Roman findfont
                    2 scalefont
                    setfont
                    10 -3.5 moveto
                    show
                  } def
                  .5 0 translate
                  tono
                  10.5 0 translate
                  tono
                  10.5 0 translate
                  semitono
                  10.5 0 translate
                  puente
                  10.5 0 translate
                  tono
                  10.5 0 translate
                  tono
                  10.5 0 translate
                  semitono
                  -63 -5 translate
                  (Tetracordio 1) tetracordio
                  42 0 translate
                  (Tetracordio 2) tetracordio"
  }
  d_"2" e_"3" f_"4" g_"5" a_"6" b_"7" c_"8"
  \bar "|."
}

Ahora construiremos la escala de La Mayor, para esto repetiremos la estructura que hemos aprendido comenzando por la nota La:

\relative c {
  \clef bass
  \override Staff.TimeSignature #'stencil = ##f
  \time 8/1
  a1^\markup {
       \column {
         \translate #'(67 . 0)
         \center-column {"Do Central" \char ##x2193 }
         \with-dimensions #'(0 . 85) #'(0 . 15)
         \postscript #"/text {
                         /string exch def
                         /y exch def
                         /x exch def
                         /Times-Roman findfont
                         3 scalefont
                         setfont
                         0 0 moveto
                         string dup stringwidth pop
                         2 div
                         x exch sub
                         y moveto
                         show
                       } def
                       /whitekey {
                         newpath
                         0 0 moveto
                         5 0 rlineto 0 15 rlineto
                         -5 0 rlineto 0 -15 rlineto
                         closepath
                         stroke
                       } def
                       /whitenotekey {
                         /string exch def
                         newpath
                         0 0 moveto
                         5 0 rlineto 0 15 rlineto
                         -5 0 rlineto 0 -15 rlineto
                         2.5 0 string text
                         closepath
                         stroke
                       } def
                       /blackkey {
                         newpath
                         0 5 moveto
                         4 0 rlineto 0 10 rlineto
                         -4 0 rlineto 0 -10 rlineto
                         closepath
                         gsave
                         grestore
                         0 0 0 setrgbcolor
                         fill
                         stroke
                       } def
                       /blacknotekey {
                         /string1 exch def
                         /string2 exch def 
                         newpath
                         0 5 moveto
                         4 0 rlineto 0 10 rlineto
                         -4 0 rlineto 0 -10 rlineto
                         closepath
                         gsave
                         1 setgray
                         fill
                         grestore
                         2 9 string2 text
                         2 6 string1 text
                         gsave
                         .5 setlinewidth
                         0 setgray
                         stroke
                         grestore
                       } def
                       0 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate (La) whitenotekey
                       5 0 translate (Si) whitenotekey
                       5 0 translate whitekey
                       5 0 translate (Re) whitenotekey
                       5 0 translate (Mi) whitenotekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate (La) whitenotekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       5 0 translate whitekey
                       -77 0 translate blackkey
                       5 0 translate blackkey
                       10 0 translate blackkey
                       5 0 translate blackkey
                       5 0 translate blackkey
                       10 0 translate (Do) (#) blacknotekey
                       5 0 translate blackkey
                       10 0 translate (Fa) (#) blacknotekey
                       5 0 translate (Sol) (#) blacknotekey
                       5 0 translate blackkey
                       10 0 translate blackkey
                       5 0 translate blackkey
                       -50 0 translate
                       0 0 moveto
                       -27 -10.5 rlineto
                       5 0 moveto
                       -21.5 -10 rlineto
                       12 5 moveto
                       -3 -5 -3 -8 -15 -10 -18 -14.5 rcurveto
                       15 0 moveto
                       -10.5 -9 rlineto
                       20 0 moveto
                       -5 -8.5 rlineto
                       27 5 moveto
                       -1.5 -13 rlineto
                       32 5 moveto
                       -5 -3 -5 -5 4 -8 4 -12.5 rcurveto
                       35 0 moveto
                       11.5 -7 rlineto
                       stroke"
      \vspace #2
    }
  }
  _\markup \column {
    "1"
    \translate #'(0 . 2)
    \postscript #"/puente {
                    save
                    0 0 moveto
                    0 -1 rlineto
                    10 0 rlineto
                    0 1 rlineto
                    [0.5] 1.25 setdash
                    stroke
                    restore
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    4 -4 moveto
                    (T) show
                  } def
                  /tono {
                    0 0 moveto
                    0 -1 rlineto
                    10 0 rlineto
                    0 1 rlineto
                    stroke
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    4 -4 moveto
                    (T) show
                  } def
                  /semitono {
                    0 0 moveto
                    1.5 -2 10 -1 10 0 rcurveto
                    stroke
                    /Times-Roman findfont
                    3 scalefont
                    setfont
                    4 -4 moveto
                    (st) show
                  } def
                  /tetracordio {
                    0 0 moveto
                    0 -1 rlineto
                    31 0 rlineto
                    0 1 rlineto
                    stroke
                    /Times-Roman findfont
                    2 scalefont
                    setfont
                    10 -3.5 moveto
                    show
                  } def
                  .5 0 translate
                  tono
                  10.5 0 translate
                  tono
                  10.5 0 translate
                  semitono
                  10.5 0 translate
                  puente
                  10.5 0 translate
                  tono
                  10.5 0 translate
                  tono
                  10.5 0 translate
                  semitono
                  -63 -5 translate
                  (Tetracordio 1) tetracordio
                  42 0 translate
                  (Tetracordio 2) tetracordio"
  }
  b_"2" cis_"3" d_"4" e_"5" fis_"6" gis_"7" a_"8"
  \bar "|."
}

Ejercicios[editar]

Construye las siguientes Escalas Mayores en las llaves pedidas. Numera las notas, marca los tonos y semitonos y los tetracordios:

  1. Escala de Sol Mayor en llave de Fa
  2. Escala de Re Mayor en llave de Sol
  3. Escala de Fa Mayor en llave de Do
Soluciones
1 \relative c {
     \clef bass
     \override Staff.TimeSignature #'stencil = ##f
     \time 8/1
     g1^\markup {
       \postscript #"/tetracordio {
                       0 0 moveto 
                       0 1 rlineto
                       18 0 rlineto
                       0 -1 rlineto
                       stroke
                       /Times-Roman findfont
                       2 scalefont
                       setfont
                       1.5 1.5 moveto
                       show
                     } def
                     1 0 translate
                     (Tetracordio 1) tetracordio
                     24.5 0 translate
                     (Tetracordio 2) tetracordio"
     }
     _\markup \column {
       "1"
       \translate #'(0 . 2)
       \postscript #"/puente {
                       save
                       0 0 moveto
                       0 -1 rlineto
                       5 0 rlineto
                       0 1 rlineto
                       [0.5] 1.25 setdash
                       stroke
                       restore
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (T) show
                     } def
                     /tono {
                       0 0 moveto
                       0 -1 rlineto
                       5 0 rlineto
                       0 1 rlineto
                       stroke
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (T) show
                     } def
                     /semitono {
                       0 0 moveto
                       1.5 -2 5 -1 5 0 rcurveto
                       stroke
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (st) show
                     } def
                     .5 0 translate
                     tono
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     semitono
                     6.25 0 translate
                     puente
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     semitono"
     }
     a_"2" b_"3" c_"4" d_"5" e_"6" fis_"7" g_"8"
     \bar "|."
   }
2 \relative c' {
     \override Staff.TimeSignature #'stencil = ##f
     \time 8/1
     d1^\markup {
       \postscript #"/tetracordio {
                       0 0 moveto 
                       0 1 rlineto
                       18 0 rlineto
                       0 -1 rlineto
                       stroke
                       /Times-Roman findfont
                       2 scalefont
                       setfont
                       1.5 1.5 moveto
                       show
                     } def
                     1 0 translate
                     (Tetracordio 1) tetracordio
                     24.5 0 translate
                     (Tetracordio 2) tetracordio"
     }
     _\markup \column {
       "1"
       \translate #'(0 . 2)
       \postscript #"/puente {
                       save
                       0 0 moveto
                       0 -1 rlineto
                       5 0 rlineto
                       0 1 rlineto
                       [0.5] 1.25 setdash
                       stroke
                       restore
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (T) show
                     } def
                     /tono {
                       0 0 moveto
                       0 -1 rlineto
                       5 0 rlineto
                       0 1 rlineto
                       stroke
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (T) show
                     } def
                     /semitono {
                       0 0 moveto
                       1.5 -2 5 -1 5 0 rcurveto
                       stroke
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (st) show
                     } def
                     .5 0 translate
                     tono
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     semitono
                     6.25 0 translate
                     puente
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     semitono"
     }
     e_"2" fis_"3" g_"4" a_"5" b_"6" cis_"7" d_"8"
     \bar "|."
   }
3 \relative c' {
     \clef alto
     \override Staff.TimeSignature #'stencil = ##f
     \time 8/1
     f,1^\markup {
       \postscript #"/tetracordio {
                       0 0 moveto 
                       0 1 rlineto
                       18 0 rlineto
                       0 -1 rlineto
                       stroke
                       /Times-Roman findfont
                       2 scalefont
                       setfont
                       1.5 1.5 moveto
                       show
                     } def
                     1 0 translate
                     (Tetracordio 1) tetracordio
                     24.5 0 translate
                     (Tetracordio 2) tetracordio"
     }
     _\markup \column {
       "1"
       \translate #'(0 . 2)
       \postscript #"/puente {
                       save
                       0 0 moveto
                       0 -1 rlineto
                       5 0 rlineto
                       0 1 rlineto
                       [0.5] 1.25 setdash
                       stroke
                       restore
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (T) show
                     } def
                     /tono {
                       0 0 moveto
                       0 -1 rlineto
                       5 0 rlineto
                       0 1 rlineto
                       stroke
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (T) show
                     } def
                     /semitono {
                       0 0 moveto
                       1.5 -2 5 -1 5 0 rcurveto
                       stroke
                       /Times-Roman findfont
                       3 scalefont
                       setfont
                       1.5 -4 moveto
                       (st) show
                     } def
                     .5 0 translate
                     tono
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     semitono
                     6.25 0 translate
                     puente
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     tono
                     6.25 0 translate
                     semitono"
     }
     g_"2" a_"3" bes_"4" c_"5" d_"6" e_"7" f_"8"
     \bar "|."
   }