X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fgregorian-scripts.ly;h=feeb4d5009c10bd80593967d5e62292b59133ba5;hb=76d3f50159ef5db6468171e553d64c697620f33b;hp=f34f99573fc7d7fe310abce608b66fdd73c435c1;hpb=eba82770802a246bca4afab7eab1f78e84785214;p=lilypond.git diff --git a/input/test/gregorian-scripts.ly b/input/test/gregorian-scripts.ly index f34f99573f..feeb4d5009 100644 --- a/input/test/gregorian-scripts.ly +++ b/input/test/gregorian-scripts.ly @@ -1,12 +1,15 @@ -\version "2.1.26" +\version "2.7.39" \header { - title = "Gregorian Scripts" texidoc = "@cindex Gregorian Scripts -Gregorian Scripts: +Here is demonstrated a preliminary support of Gregorian Scripts: ictus, circulus, semicirculus, accentus, episem. +"} + +%{ + TODO: augmentum. Syntax: either as bracket (\augmentumInitium, \augmentumFinis), or as head prefix with subsequently collecting all dots and putting them behind the ligature in a vertical row. @@ -19,14 +22,18 @@ FIXME: padding/minimum-distance is fragile. FIXME: episem stops one notehead too early. -"} +%} \include "gregorian-init.ly" +\paper { + line-thickness = \staff-space / 5.0 +} + \score { \context VaticanaVoice { - \override VaticanaScript #'padding = #-0.5 - \notes { + \override Script #'padding = #-0.5 + { a\ictus a\circulus a\semicirculus @@ -40,11 +47,10 @@ FIXME: episem stops one notehead too early. \[ a \episemInitium \pes b \flexa a \episemFinis \] } } - \paper { - linewidth = 70.0 - linethickness = \staffspace / 5.0 + \layout { + line-width = 70.0 width = 60.0 indent = 0.0 - raggedright = ##t + ragged-right = ##t } }