Documentation/snippets/new/anglican-psalm-template.ly

   1 \version "2.13.36"
   2
   3 \header {
   4   lsrtags = "vocal-music, template"
   5   texidoc = "
   6 This template shows one way of setting out an Anglican psalm chant. It
   7 also shows how the verses may be added as stand-alone text under the
   8 music.  The two verses are coded in different styles to demonstrate
   9 more possibilities.
  10 "
  11   doctitle = "Anglican psalm template"
  12 }
  13
  14 SopranoMusic = \relative g' {
  15   g1 | c2 b | a1 | \bar "||"
  16   a1 | d2 c | c b | c1 | \bar "||"
  17 }
  18
  19 AltoMusic = \relative c' {
  20   e1 | g2 g | f1 |
  21   f1 | f2 e | d d | e1 |
  22 }
  23
  24 TenorMusic = \relative a {
  25   c1 | c2 c | c1 |
  26   d1 | g,2 g | g g | g1 |
  27 }
  28
  29 BassMusic =  \relative c {
  30   c1 | e2 e | f1 |
  31   d1 | b2 c | g' g | c,1 |
  32 }
  33
  34 global = {
  35   \time 2/2
  36 }
  37
  38 dot = \markup {
  39   \raise #0.7 \musicglyph #"dots.dot"
  40 }
  41
  42 tick = \markup {
  43   \raise #1 \fontsize #-5 \musicglyph #"scripts.rvarcomma"
  44 }
  45
  46 % Use markup to center the chant on the page
  47 \markup {
  48   \fill-line {
  49     \score {  % centered
  50       <<
  51         \new ChoirStaff <<
  52           \new Staff <<
  53             \global
  54             \clef "treble"
  55             \new Voice = "Soprano" <<
  56               \voiceOne
  57               \SopranoMusic
  58             >>
  59             \new Voice = "Alto" <<
  60               \voiceTwo
  61               \AltoMusic
  62             >>
  63           >>
  64           \new Staff <<
  65             \clef "bass"
  66             \global
  67             \new Voice = "Tenor" <<
  68               \voiceOne
  69               \TenorMusic
  70             >>
  71             \new Voice = "Bass" <<
  72               \voiceTwo
  73               \BassMusic
  74             >>
  75           >>
  76         >>
  77       >>
  78       \layout {
  79         \context {
  80           \Score
  81           \override SpacingSpanner
  82           #'base-shortest-duration = #(ly:make-moment 1 2)
  83         }
  84         \context {
  85           \Staff
  86           \remove "Time_signature_engraver"
  87         }
  88       }
  89     }  % End score
  90   }
  91 }  % End markup
  92
  93 \markup {
  94   \fill-line {
  95     \column {
  96       \left-align {
  97         \null \null \null
  98         \line {
  99           \fontsize #5 O
 100           \fontsize #3 come
 101           let us \bold sing | unto \dot the | Lord : let
 102         }
 103         \line {
 104           us heartily
 105           \concat { re \bold joice }
 106           in the | strength of | our
 107         }
 108         \line {
 109           sal | vation.
 110         }
 111         \null
 112         \line {
 113           \hspace #2.5 8. Today if ye will hear his voice *
 114         }
 115         \line {
 116           \concat { \bold hard en }
 117           \tick not your \tick hearts : as in the pro-
 118         }
 119         \line {
 120           vocation * and as in the \bold day of tempt- \tick
 121         }
 122         \line {
 123           -ation \tick in the \tick wilderness.
 124         }
 125       }
 126     }
 127   }
 128 }