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"
25 upperStaff = \new VaticanaStaff = "upperStaff" <<
26 \context VaticanaVoice <<
29 \override NoteHead #'style = #'vaticana.punctum
34 \override NoteHead #'style = #'vaticana.inclinatum
39 \override NoteHead #'style = #'vaticana.quilisma
43 \override NoteHead #'style = #'vaticana.plica
45 \override NoteHead #'style = #'vaticana.reverse.plica
50 \override NoteHead #'style = #'vaticana.punctum.cavum
52 \override NoteHead #'style = #'vaticana.lpes
54 \override NoteHead #'style = #'vaticana.upes
56 \override NoteHead #'style = #'vaticana.vupes
58 \override NoteHead #'style = #'vaticana.linea.punctum
59 \once \override Staff.BarLine #'bar-size = #2.0 \bar "|"
63 \override NoteHead #'style = #'vaticana.epiphonus
65 \override NoteHead #'style = #'vaticana.cephalicus
68 \override Staff.KeySignature #'glyph-name-alist = #alteration-medicaea-glyph-name-alist
69 \override Staff.Accidental #'glyph-name-alist = #alteration-medicaea-glyph-name-alist
70 \override Staff.Custos #'style = #'medicaea
71 \override NoteHead #'style = #'medicaea.punctum
79 \override NoteHead #'style = #'medicaea.inclinatum
81 \override NoteHead #'style = #'medicaea.virga
88 \override NoteHead #'style = #'medicaea.rvirga
91 \override Staff.KeySignature #'glyph-name-alist = #alteration-hufnagel-glyph-name-alist
92 \override Staff.Accidental #'glyph-name-alist = #alteration-hufnagel-glyph-name-alist
93 \override Staff.Custos #'style = #'hufnagel
94 \override NoteHead #'style = #'hufnagel.punctum
102 \override NoteHead #'style = #'hufnagel.lpes
104 \override NoteHead #'style = #'hufnagel.virga
110 \clef "hufnagel-do-fa"
111 \override NoteHead #'style = #'hufnagel.punctum
112 es! des ces des! es! fes!
122 lowerStaff = \new MensuralStaff = "lowerStaff" <<
123 \context MensuralVoice <<
127 cis'1 d'\breve gis'\breve e'\breve \[ e'\longa fis'\longa \]
128 \set Staff.forceClef = ##t
129 \clef "neomensural-c2"
134 \[ g\breve dis''\longa \]
135 b\breve \[ a\longa d\longa \]
142 \set Staff.forceClef = ##t
151 \override NoteHead #'style = #'mensural
152 \override Rest #'style = #'mensural
154 c8 b, c16 b, c32 b, c64 b, c64 b,
155 d8 e d16 e d32 e d64 e d64 e
157 \set Staff.forceClef = ##t
167 \set Staff.forceClef = ##t
173 \[ bes'!\longa a'!\longa c''!\longa \]
174 e'1 d' c' d' \bar "|"
178 bes'!\longa fis'!1 as'!1 ges'!\longa % lig
179 \set Staff.forceClef = ##t
184 \set Staff.forceClef = ##t
189 bes'! as'! gis'! fis'!
190 \set Staff.forceClef = ##t
192 es'! des'! cis'!1 \bar "||"
199 line-thickness = #(/ staff-space 5.0)
209 line-width = 17.25\cm
216 \override NoteHead #'style = #'neomensural
217 \override Rest #'style = #'neomensural
218 \override Stem #'flag-style = #'mensural
219 \override Stem #'thickness = #1.0
223 \revert BarLine #'transparent
224 \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
225 clefGlyph = #"clefs.petrucci.c2"
229 \revert BarLine #'transparent
230 \override StaffSymbol #'thickness = #2.0
231 \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
232 \override Custos #'neutral-position = #4