1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
2 %% This file is in the public domain.
6 lsrtags
= "ancient-notation"
9 Aquí se muestran muchos (¿o quizá todos?) de los símbolos que
10 están contemplados por la capacidad de LilyPond para la música
14 doctitlees
= "Tipografía de música antigua"
17 Shown here are many (all?) of the symbols that are included in
18 LilyPond's support for ancient notation.
23 doctitle
= "Ancient fonts"
26 upperStaff
= \new VaticanaStaff
= "upperStaff" <<
27 \context VaticanaVoice
<<
30 \override NoteHead
#'style
= #'vaticana
.punctum
35 \override NoteHead
#'style
= #'vaticana
.inclinatum
40 \override NoteHead
#'style
= #'vaticana
.quilisma
44 \override NoteHead
#'style
= #'vaticana
.plica
46 \override NoteHead
#'style
= #'vaticana
.reverse
.plica
51 \override NoteHead
#'style
= #'vaticana
.punctum
.cavum
53 \override NoteHead
#'style
= #'vaticana
.lpes
55 \override NoteHead
#'style
= #'vaticana
.upes
57 \override NoteHead
#'style
= #'vaticana
.vupes
59 \override NoteHead
#'style
= #'vaticana
.linea
.punctum
60 \once \override Staff
.BarLine
#'bar-size
= #2.0 \bar "|"
64 \override NoteHead
#'style
= #'vaticana
.epiphonus
66 \override NoteHead
#'style
= #'vaticana
.cephalicus
69 \override Staff
.KeySignature
#'glyph-name-alist
= #alteration-medicaea-glyph-name-alist
70 \override Staff
.Accidental
#'glyph-name-alist
= #alteration-medicaea-glyph-name-alist
71 \override Staff
.Custos
#'style
= #'medicaea
72 \override NoteHead
#'style
= #'medicaea
.punctum
80 \override NoteHead
#'style
= #'medicaea
.inclinatum
82 \override NoteHead
#'style
= #'medicaea
.virga
89 \override NoteHead
#'style
= #'medicaea
.rvirga
92 \override Staff
.KeySignature
#'glyph-name-alist
= #alteration-hufnagel-glyph-name-alist
93 \override Staff
.Accidental
#'glyph-name-alist
= #alteration-hufnagel-glyph-name-alist
94 \override Staff
.Custos
#'style
= #'hufnagel
95 \override NoteHead
#'style
= #'hufnagel
.punctum
103 \override NoteHead
#'style
= #'hufnagel
.lpes
105 \override NoteHead
#'style
= #'hufnagel
.virga
111 \clef "hufnagel-do-fa"
112 \override NoteHead
#'style
= #'hufnagel
.punctum
113 es! des ces
des! es! fes
!
123 lowerStaff
= \new MensuralStaff
= "lowerStaff" <<
124 \context MensuralVoice
<<
128 cis'1 d'\breve gis'\breve e'\breve \
[ e'\longa fis'\longa \
]
129 \set Staff
.forceClef
= ##t
130 \clef "neomensural-c2"
135 \
[ g\breve dis''\longa \
]
136 b\breve \
[ a\longa d\longa \
]
143 \set Staff
.forceClef
= ##t
152 \override NoteHead
#'style
= #'mensural
153 \override Rest
#'style
= #'mensural
155 c8 b, c16 b, c32 b, c64 b, c64 b,
156 d8 e d16 e d32 e d64 e d64 e
158 \set Staff
.forceClef
= ##t
168 \set Staff
.forceClef
= ##t
174 \
[ bes'!\longa a'!\longa c''!\longa \
]
175 e'1 d' c' d' \bar "|"
179 bes'!\longa fis'!1 as'!1 ges'!\longa % lig
180 \set Staff
.forceClef
= ##t
185 \set Staff
.forceClef
= ##t
190 bes'! as'! gis'! fis'!
191 \set Staff
.forceClef
= ##t
193 es'! des'! cis'!1 \bar "||"
200 line-thickness
= #(/ staff-space
5.0)
210 line-width
= 17.25\cm
217 \override NoteHead
#'style
= #'neomensural
218 \override Rest
#'style
= #'neomensural
219 \override Stem
#'flag-style
= #'mensural
220 \override Stem
#'thickness
= #1.0
224 \revert BarLine
#'transparent
225 \override KeySignature
#'glyph-name-alist
= #alteration-mensural-glyph-name-alist
226 clefGlyph
= #"clefs.petrucci.c2"
230 \revert BarLine
#'transparent
231 \override StaffSymbol
#'thickness
= #2.0
232 \override KeySignature
#'glyph-name-alist
= #alteration-vaticana-glyph-name-alist
233 \override Custos
#'neutral-position
= #4