input/regression/lyrics-multi-stanza.ly

   1
   2 \version "1.3.117";
   3 \include "english.ly"
   4
   5 \header{
   6 texidoc="
   7 Multiple stanzas
   8
   9  Tests a number of features:
  10  * Lyric_phrasing_engraver
  11  * Stanza_number_engraver
  12  * Automatic melismata on beamed notes
  13
  14 ";
  15
  16     title = "Crowned with Honour";
  17     composer = "Oliver Holden (1765-1844)";
  18     poet = "Thomas Kelly (1769-1855)";
  19 }
  20
  21 allup =  \notes{
  22         \stemUp
  23         \slurUp
  24         \tieUp
  25         \property Voice.DynamicLineSpanner \override #'direction = #1
  26         \autoBeamOff
  27 }
  28
  29 alldown =  \notes{
  30         \stemDown
  31         \slurDown
  32         \tieDown
  33         \property Voice.DynamicLineSpanner \override #'direction = #-1
  34         \autoBeamOff
  35 }
  36
  37 Global =   \notes{
  38         \key g \major;
  39         \time 4/4;
  40         \partial 4;
  41 }
  42
  43 Soprano =  \notes \relative c' {
  44         \allup
  45         d4 | g g b b a g a b a g b a g( a )g % modified to test melisma align right
  46
  47         [a8 b] | b4 % modified to test melisma align left
  48          a g b [d16 d c8] [b a] b4 % modified to test beam melisma
  49 %       a4 | b a g b [d8 \melisma c] \melismaEnd [b \melisma a] \melismaEnd b4
  50
  51         d d2 d e d4( cs8 ~ )cs d2.
  52
  53         b4 | d b g b [a8  g]  [a b]  a4
  54 %       b4 | d b g b [a8 \melisma g] \melismaEnd [a \melisma b] \melismaEnd a4
  55
  56         g d'2 c b4.( c8 )a4 a g2.
  57 }
  58 Alto =  \notes \relative c'{
  59         \alldown
  60         d4 | d d g g fs g fs g fs e g fs d2.
  61         d4 | g d b g' [b8 a] [g fs] g4 fs g2 a g fs4( e8 )g fs2.
  62         d4 | g g d g [fs8 e] [fs g] fs4 g f2 e d4.( d8 )d4 fs4 d2.
  63 }
  64 Tenor =  \notes \relative c{
  65         \allup
  66         d4 | b' b d d c  b c  d c  b d c  b2.
  67         a4 | b a g b  [d8 c] [b a] b4 a  b2 c b  a   a2.
  68         g4 | b d b d [c8  b] [c  d]  c4 b g2 g g4.( a8 [fs )a] c4 b2.
  69 }
  70 Bass =  \notes \relative c{
  71         \alldown
  72         d4 | g g g g d d d g d e d d g,2.
  73         d'4 | g d b g' [b8 a] [g fs] g4 d g2 fs e a d,2.
  74         g4 | g g g g d d d e b2 c d2. d4 g,2.
  75 }
  76
  77 TheLyrics =   \lyrics <
  78         {
  79             \context LyricsVoice = "Soprano-1"
  80             \property LyricsVoice .stanza = "1:"
  81             \property LyricsVoice .stz = "(1)"
  82                  The4 head    that once was crowned with thorns
  83                  Is   crowned with glo -- ry  now;
  84                  A roy -- al di -- a -- dem a -- dorns
  85                  The might -- y Vic -- tor's  brow.
  86                  A roy -- al di -- a -- dem a -- dorns
  87                  The might -- y Vic -- tor's  brow.
  88         }
  89         {
  90             \context LyricsVoice = "Soprano-2"
  91             \property LyricsVoice .stanza = "2:"
  92             \property LyricsVoice .stz = "(2)"
  93                  The4 high -- est place that heav'n af -- fords
  94                  Is His by sov -- 'reign  right;
  95                  The King of kings, the Lord of lords,
  96                  He reigns in glo -- ry  bright,
  97                  The King of kings, the Lord of lords,
  98                  He reigns in glo -- ry  bright.
  99         }
 100         {
 101             \context LyricsVoice = "Soprano-3"
 102             \property LyricsVoice .stanza = "3:"
 103             \property LyricsVoice .stz = "(3)"
 104                  The joy of all who dwell a -- bove,
 105                  The joy of saints be --  low,
 106                  To4 whom He man -- i -- fests His love,
 107                  And grants His name to  know,
 108                  To4 whom He man -- i -- fests His love,
 109                  And grants His name to4  know.
 110         }
 111 >
 112
 113
 114 \score{
 115   \context ChoirStaff
 116     \notes
 117     <
 118       \property Score.barNumberScriptPadding = #10.0
 119       \context Staff = "treblestaff"{
 120         <
 121           \context Voice = "Soprano" { }
 122           \context Voice = "Alto" { }
 123         >
 124       }
 125       \context Lyrics = mainlyrics { }
 126       \context Staff = "treblestaff"{
 127         <
 128           \Global
 129           \addlyrics { \context Voice = "Soprano" \Soprano }
 130             { \context Lyrics = mainlyrics \TheLyrics }
 131           \context Voice = "Alto"  \Alto
 132         >
 133         \bar "|.";
 134       }
 135       \context Staff = "bassstaff"{
 136         \clef "bass";
 137         <
 138           \context Voice = "Tenor" { \Tenor }
 139           \context Voice = "Bass"  { \Bass }
 140         >
 141         \bar "|.";
 142       }
 143     >
 144
 145    \paper {
 146       \translator{
 147         \VoiceContext
 148         automaticMelismata = ##t;
 149         noAutoBeaming = ##t;
 150         \remove   "Auto_beam_engraver";
 151       }
 152
 153    }
 154 }