Custom clef and incipit spacing for Gregorian chant: Difference between revisions
m I added categories. |
mNo edit summary |
||
| Line 5: | Line 5: | ||
<lilypond version="2.24.4"> | <lilypond version="2.24.4"> | ||
incipitMusic = \relative c { | incipitMusic = \relative c { | ||
\override Staff.StaffSymbol.line-count = #4 | \override Staff.StaffSymbol.line-count = #4 | ||
\clef "vaticana-do3" | \clef "vaticana-do3" | ||
\override NoteHead.style = #'vaticana.punctum | \override NoteHead.style = #'vaticana.punctum | ||
c1 | c1 | ||
% The following line helps with spacing between the first two neumes: | % The following line helps with spacing between the first two neumes: | ||
\hideNotes c \unHideNotes | \hideNotes c \unHideNotes | ||
e | e | ||
% The following line helps with spacing between the second neume and the end of the visible four-line staff: | % The following line helps with spacing between the second neume | ||
\hideNotes e \unHideNotes | % and the end of the visible four-line staff: | ||
\hideNotes e \unHideNotes | |||
% The following line effectively prints white space between the incipit and the modern five-line staff: | |||
\stopStaff \hideNotes g a | % The following line effectively prints white space between | ||
% the incipit and the modern five-line staff: | |||
\stopStaff \hideNotes g a | |||
} | } | ||
| Line 25: | Line 27: | ||
chant = \relative c' { | chant = \relative c' { | ||
\cadenzaOn | \cadenzaOn | ||
c4 e g\ictus a g2 | c4 e g\ictus a g2 | ||
} | } | ||
verba = \lyricmode { | verba = \lyricmode { | ||
Sál -- ve, Re -- gí -- na, | Sál -- ve, Re -- gí -- na, | ||
} | } | ||
\score { | \score { | ||
\new Staff \with { | \new Staff \with { | ||
\incipit | \incipit \incipitMusic | ||
instrumentName = "" | |||
} | } << | ||
\new Voice = "melody" \chant | \new Voice = "melody" \chant | ||
\new Lyrics = "text" \lyricsto melody \verba | \new Lyrics = "text" \lyricsto melody \verba | ||
>> | >> | ||
\layout { | \layout { | ||
\context { | \context { | ||
| Line 47: | Line 49: | ||
\remove Time_signature_engraver | \remove Time_signature_engraver | ||
% The following line reduces the horizontal space between the "vaticana-do3" clef and the first neume (c1): | % The following line reduces the horizontal space between | ||
\override Clef.space-alist.first-note = #'(minimum-fixed-space . 1.0) | % the "vaticana-do3" clef and the first neume (c1): | ||
\override Clef.space-alist.first-note | |||
= #'(minimum-fixed-space . 1.0) | |||
} | } | ||
\context { | \context { | ||
| Line 59: | Line 63: | ||
} | } | ||
} | } | ||
}</lilypond> | } | ||
</lilypond> | |||
[[Category:Ancient notation]] | [[Category:Ancient notation]] | ||