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