Diferencia entre revisiones de «Teoría musical/Fundamentos de la Teoría Musical/Introducción a las escalas»
Contenido eliminado Contenido añadido
Línea 156:
tono
6.5 0 translate
semitono"
}
d e f g a b c
\bar "|."
}</score>
La forma más sencilla de comprender las escalas diatónicas es visualizando la secuencia de notas de do a do en un teclado. Vemos esto a continuación:
<score>\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 {
\vspace #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
.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"
}
| |||