Ancient fonts: Difference between revisions
Import snippet from LSR |
mNo edit summary |
||
| (3 intermediate revisions by 2 users not shown) | |||
| Line 1: | Line 1: | ||
This snippets shows many of the symbols contained in the Emmentaler font that are used by LilyPond for typesetting ancient notation. | |||
<lilypond version="2.24"> | |||
m = { c1 e f ges cis' \bar "||" } | m = { c1 e f ges cis' \bar "||" } | ||
\markup \with-true-dimensions % work around a cropping issue | |||
\score { | \score { | ||
\new VaticanaVoice { | \new VaticanaVoice { | ||
\ | \clef "vaticana-fa2" | ||
\key es \major | \key es \major | ||
\textMark \markup \rounded-box "Vaticana clefs, custos and note heads" | \textMark \markup \rounded-box "Vaticana clefs, custos and note heads" | ||
\ | |||
<>^"vaticana.punctum" | \override NoteHead.style = #'vaticana.punctum | ||
<>^"vaticana.punctum" \m | |||
\override NoteHead.style = #'vaticana.inclinatum | \override NoteHead.style = #'vaticana.inclinatum | ||
<>^"vaticana.inclinatum" | <>^"vaticana.inclinatum" \m | ||
\override NoteHead.style = #'vaticana.quilisma | \override NoteHead.style = #'vaticana.quilisma | ||
<>^"vaticana.quilisma" | <>^"vaticana.quilisma" \m | ||
\clef "vaticana-fa1" | \clef "vaticana-fa1" | ||
\override NoteHead.style = #'vaticana.plica | \override NoteHead.style = #'vaticana.plica | ||
<>^"vaticana.plica" | <>^"vaticana.plica" \m | ||
\override NoteHead.style = #'vaticana.reverse.plica | \override NoteHead.style = #'vaticana.reverse.plica | ||
<>^"vaticana.reverse.plica" | <>^"vaticana.reverse.plica" \m | ||
\override NoteHead.style = #'vaticana.punctum.cavum | \override NoteHead.style = #'vaticana.punctum.cavum | ||
<>^"vaticana.punctum.cavum" | <>^"vaticana.punctum.cavum" \m | ||
\override NoteHead.style = #'vaticana.lpes | \override NoteHead.style = #'vaticana.lpes | ||
<>^"vaticana.punctum.lpes" | <>^"vaticana.punctum.lpes" \m | ||
\override NoteHead.style = #'vaticana.upes | \override NoteHead.style = #'vaticana.upes | ||
<>^"vaticana.punctum.upes" | <>^"vaticana.punctum.upes" \m | ||
\override NoteHead.style = #'vaticana.vupes | \override NoteHead.style = #'vaticana.vupes | ||
<>^"vaticana.punctum.vupes" | <>^"vaticana.punctum.vupes" \m | ||
\override NoteHead.style = #'vaticana.linea.punctum | \override NoteHead.style = #'vaticana.linea.punctum | ||
<>^"vaticana.punctum.linea" | <>^"vaticana.punctum.linea" \m | ||
\override NoteHead.style = #'vaticana.epiphonus | \override NoteHead.style = #'vaticana.epiphonus | ||
<>^"vaticana.punctum.epiphonus" | <>^"vaticana.punctum.epiphonus" \m | ||
\override NoteHead.style = #'vaticana.cephalicus | \override NoteHead.style = #'vaticana.cephalicus | ||
<>^"vaticana.punctum.cephalicus" | <>^"vaticana.punctum.cephalicus" \m | ||
\break | \break | ||
\textMark \markup \rounded-box "Medicaea clefs, custos and note heads" | \textMark \markup \rounded-box "Medicaea clefs, custos and note heads" | ||
\set VaticanaStaff.alterationGlyphs = | \set VaticanaStaff.alterationGlyphs = | ||
#alteration-medicaea-glyph-name-alist | #alteration-medicaea-glyph-name-alist | ||
\override VaticanaStaff.Custos.style = #'medicaea | \override VaticanaStaff.Custos.style = #'medicaea | ||
\clef "medicaea-fa2" | \clef "medicaea-fa2" | ||
\override NoteHead.style = #'medicaea.punctum | |||
<>^"medicaea.punctum" \m | |||
\clef "medicaea-do2" | \clef "medicaea-do2" | ||
\override NoteHead.style = #'medicaea.inclinatum | \override NoteHead.style = #'medicaea.inclinatum | ||
<>^"medicaea.inclinatum" | <>^"medicaea.inclinatum" \m | ||
\override NoteHead.style = #'medicaea.virga | \override NoteHead.style = #'medicaea.virga | ||
<>^"medicaea.virga" | <>^"medicaea.virga" \m | ||
\clef "medicaea-fa1" | \clef "medicaea-fa1" | ||
\override NoteHead.style = #'medicaea.rvirga | \override NoteHead.style = #'medicaea.rvirga | ||
<>^"medicaea.rvirga" | <>^"medicaea.rvirga" \m | ||
\break | \break | ||
\textMark \markup \rounded-box "Hufnagel clefs, custos and note heads" | \textMark \markup \rounded-box "Hufnagel clefs, custos and note heads" | ||
\set Staff.alterationGlyphs = | \set Staff.alterationGlyphs = | ||
#alteration-hufnagel-glyph-name-alist | #alteration-hufnagel-glyph-name-alist | ||
| Line 99: | Line 81: | ||
\override NoteHead.style = #'hufnagel.punctum | \override NoteHead.style = #'hufnagel.punctum | ||
<>^"hufnagel.punctum" | <>^"hufnagel.punctum" \m | ||
\clef "hufnagel-do2" | \clef "hufnagel-do2" | ||
\override NoteHead.style = #'hufnagel.lpes | |||
<>^"hufnagel.lpes" \m | |||
\clef "hufnagel-do-fa" | \clef "hufnagel-do-fa" | ||
\override NoteHead.style = #'hufnagel.virga | \override NoteHead.style = #'hufnagel.virga | ||
<>^"hufnagel.virga" | <>^"hufnagel.virga" \m | ||
} | } | ||
\layout { | \layout { | ||
\context { | \context { | ||
\Score | \Score | ||
| Line 125: | Line 104: | ||
alterationGlyphs = | alterationGlyphs = | ||
#alteration-vaticana-glyph-name-alist | #alteration-vaticana-glyph-name-alist | ||
} | } | ||
} | } | ||
| Line 134: | Line 109: | ||
</lilypond> | </lilypond> | ||
[[Category:Ancient notation]] | [[Category:Ancient notation]] | ||
[[Category:Symbols and glyphs]] | [[Category:Symbols and glyphs]] | ||
[[Category:Included in the official documentation]] | [[Category:Included in the official documentation]] | ||
[[Category:Snippet]] | |||