Diferencia entre revisiones de «Teoría musical/Fundamentos de la Teoría Musical/Ciclo ascendente de escalas»
Contenido eliminado Contenido añadido
Sin resumen de edición |
|||
Línea 239:
== Segundo paso del ciclo ==
<score><<
\new Staff \with {
\override VerticalAxisGroup #'default-staff-staff-spacing =
#'((basic-distance . .5)
(padding . 15))
} \relative c' {
\override Score.SystemStartBar #'stencil = ##f
\override Staff.TimeSignature #'stencil = ##f
\time 8/1
g'1^\markup \column {
\translate #'(0 . -3)
\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"
\vspace #.5
}
_\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
-13.1 2 moveto
0 -15 1 -18 -26 0 -24.5 -19 rcurveto
5.5 2 moveto
0 -15 1 -18 -24.5 0 -24 -18 rcurveto
[0.5] 1.25 setdash
stroke"
}
a_"2" b_"3" c_"4" d_"5" e_"6" fis_"7" g_"8"
\bar "|."
}
\new Staff \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"
}
_\markup \column {
"1"
\translate #'(0 . 2)
\postscript #"/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"
}
e_"2" fis_"3" g_"4" s s s s
\bar "|."
}
>></score>
<score>\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 "|."
}</score>
== Ejercicios ==
| |||