Documentation/snippets/new/chords-headword.ly

   1 \version "2.14.0"
   2 #(set-global-staff-size 15)
   3 \paper {
   4   ragged-right = ##f
   5   line-width = 15\cm
   6   indent = 0\cm
   7 }
   8
   9 \header {
  10   lsrtags = "headwords"
  11   texidoc = ""
  12   doctitle = "headword"
  13 }
  14
  15
  16 theChords = \chordmode {
  17   \time 2/2
  18   f1 | c2 f2 | f1 | c2 f2| %\break
  19   f2 bes2 | f1 | c2:7 f | c1 | \break
  20 }
  21
  22 verseOne = \lyricmode {
  23   \set stanza = #"1."
  24   Fair is the sun - shine,
  25   Fair - er the moon - light
  26   And all the stars __ _  in heav'n a -- bove;
  27 }
  28
  29 verseTwo = \lyricmode {
  30   \set stanza = #"2."
  31   Fair are the mead - ows,
  32   Fair - er the wood - land,
  33   Robed in the flow -- ers of bloom -- ing spring;
  34 }
  35
  36 Soprano = {
  37   \time 2/2
  38   \key f \major
  39   \stemUp
  40   f'2 f'4 f' | g'4 e' f'2 | a'4. a'8 a'4 a' | bes'4 g' a'2 |
  41   c''2 f''4 d'' |  c''2  bes'4  a' | bes'2 a' | g'1 |
  42 }
  43
  44 Alto = {
  45   \key f \major
  46   c'2 c'4 c' | d'4 c' c'2 | f'4. f'8 f'4 fis' | g'4 e' f'2 |
  47   f'2 f'4 f' |  f'2  g'4  f' | e'2 f' | e'1 |
  48 }
  49
  50 Tenor = {
  51   \key f \major
  52   \stemDown
  53   a2 a4 a | bes4 g a2  | c'4. c'8 d'4 d' | d'4 c' c'2 |
  54   a2 d'4 bes | a2 c'4 c' | c'2 c'  | c'1 |
  55 }
  56
  57 Bass = {
  58   \key f \major
  59   f2 f4 f | bes,4 c  f2 | f4. e8 d4 c | bes,4 c f2 |
  60   f2 bes,4 d | f2 e4 f | g2 f | c1 |
  61 }
  62
  63
  64 \score {
  65   <<
  66     \new ChordNames { \theChords }
  67     \context Staff = upper {
  68       \context Voice = sop {
  69         <<
  70           \Soprano
  71           \Alto
  72         >>
  73       }
  74     }
  75     \context Lyrics = "LyrOne" \lyricsto "sop" { \verseOne }
  76     \context Lyrics = "LyrTwo" \lyricsto "sop" { \verseTwo }
  77     \context Staff = lower {
  78       \new Voice {
  79         \clef bass
  80         #(set-accidental-style 'modern-cautionary)
  81         <<
  82           \Tenor
  83           \Bass
  84         >>
  85       }
  86     }
  87   >>
  88
  89   \layout {
  90     indent = 0
  91     \context {
  92       \Score
  93       \remove "Bar_number_engraver"
  94     }
  95     \context {
  96       \Voice
  97       \override StanzaNumber #'padding = #1.8
  98     }
  99   }
 100 }
 101 \paper {  }