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 Voici comment graver la plupart, sinon tous les symboles que
18 LilyPond prend en charge en matière de musique ancienne.
21 doctitlefr
= "Gravure de musique ancienne"
24 Shown here are many (all?) of the symbols that are included in
25 LilyPond's support for ancient notation.
30 doctitle
= "Ancient fonts"
33 upperStaff
= \new VaticanaStaff
= "upperStaff" <<
34 \context VaticanaVoice
<<
37 \override NoteHead
#'style
= #'vaticana
.punctum
42 \override NoteHead
#'style
= #'vaticana
.inclinatum
47 \override NoteHead
#'style
= #'vaticana
.quilisma
51 \override NoteHead
#'style
= #'vaticana
.plica
53 \override NoteHead
#'style
= #'vaticana
.reverse
.plica
58 \override NoteHead
#'style
= #'vaticana
.punctum
.cavum
60 \override NoteHead
#'style
= #'vaticana
.lpes
62 \override NoteHead
#'style
= #'vaticana
.upes
64 \override NoteHead
#'style
= #'vaticana
.vupes
66 \override NoteHead
#'style
= #'vaticana
.linea
.punctum
67 \once \override Staff
.BarLine
#'bar-size
= #2.0 \bar "|"
71 \override NoteHead
#'style
= #'vaticana
.epiphonus
73 \override NoteHead
#'style
= #'vaticana
.cephalicus
76 \override Staff
.KeySignature
#'glyph-name-alist
= #alteration-medicaea-glyph-name-alist
77 \override Staff
.Accidental
#'glyph-name-alist
= #alteration-medicaea-glyph-name-alist
78 \override Staff
.Custos
#'style
= #'medicaea
79 \override NoteHead
#'style
= #'medicaea
.punctum
87 \override NoteHead
#'style
= #'medicaea
.inclinatum
89 \override NoteHead
#'style
= #'medicaea
.virga
96 \override NoteHead
#'style
= #'medicaea
.rvirga
99 \override Staff
.KeySignature
#'glyph-name-alist
= #alteration-hufnagel-glyph-name-alist
100 \override Staff
.Accidental
#'glyph-name-alist
= #alteration-hufnagel-glyph-name-alist
101 \override Staff
.Custos
#'style
= #'hufnagel
102 \override NoteHead
#'style
= #'hufnagel
.punctum
110 \override NoteHead
#'style
= #'hufnagel
.lpes
112 \override NoteHead
#'style
= #'hufnagel
.virga
118 \clef "hufnagel-do-fa"
119 \override NoteHead
#'style
= #'hufnagel
.punctum
120 es! des ces
des! es! fes
!
130 lowerStaff
= \new MensuralStaff
= "lowerStaff" <<
131 \context MensuralVoice
<<
135 cis'1 d'\breve gis'\breve e'\breve \
[ e'\longa fis'\longa \
]
136 \set Staff
.forceClef
= ##t
137 \clef "neomensural-c2"
142 \
[ g\breve dis''\longa \
]
143 b\breve \
[ a\longa d\longa \
]
150 \set Staff
.forceClef
= ##t
159 \override NoteHead
#'style
= #'mensural
160 \override Rest
#'style
= #'mensural
162 c8 b, c16 b, c32 b, c64 b, c64 b,
163 d8 e d16 e d32 e d64 e d64 e
165 \set Staff
.forceClef
= ##t
175 \set Staff
.forceClef
= ##t
181 \
[ bes'!\longa a'!\longa c''!\longa \
]
182 e'1 d' c' d' \bar "|"
186 bes'!\longa fis'!1 as'!1 ges'!\longa % lig
187 \set Staff
.forceClef
= ##t
192 \set Staff
.forceClef
= ##t
197 bes'! as'! gis'! fis'!
198 \set Staff
.forceClef
= ##t
200 es'! des'! cis'!1 \bar "||"
207 line-thickness
= #(/ staff-space
5.0)
217 line-width
= 17.25\cm
224 \override NoteHead
#'style
= #'neomensural
225 \override Rest
#'style
= #'neomensural
226 \override Stem
#'flag-style
= #'mensural
227 \override Stem
#'thickness
= #1.0
231 \revert BarLine
#'transparent
232 \override KeySignature
#'glyph-name-alist
= #alteration-mensural-glyph-name-alist
233 clefGlyph
= #"clefs.petrucci.c2"
237 \revert BarLine
#'transparent
238 \override StaffSymbol
#'thickness
= #2.0
239 \override KeySignature
#'glyph-name-alist
= #alteration-vaticana-glyph-name-alist
240 \override Custos
#'neutral-position
= #4