Documentation/snippets/anglican-psalm-template.ly

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