]> git.donarmstrong.com Git - lilypond.git/blob - Documentation/snippets/new/lyrics-old-spacing-settings.ly
42cc85dc8a7bb3ba7c6231e78341f26dbbd19850
[lilypond.git] / Documentation / snippets / new / lyrics-old-spacing-settings.ly
1 \version "2.13.47"
2
3 \header {
4   lsrtags = "vocal-music"
5   texidoc = "
6 The vertical spacing engine changed for version 2.14.  This can
7 cause lyrics to be spaced differently.  It is possible to set
8 properties for @code{Lyric} and @code{Staff} contexts to get the
9 spacing engine to behave as it did in version 2.12.
10 "
11 }
12
13 global = {
14   \key d \major
15   \time 3/4
16 }
17
18 sopMusic = \relative c' {
19   % VERSE ONE
20   fis4 fis fis | \break
21   fis4. e8 e4
22 }
23
24 altoMusic = \relative c' {
25   % VERSE ONE
26   d4 d d |
27   d4. b8 b4 |
28 }
29
30 tenorMusic = \relative c' {
31   a4 a a |
32   b4. g8 g4 |
33 }
34
35 bassMusic = \relative c {
36   d4 d d |
37   g,4. g8 g4 |
38 }
39
40 words = \lyricmode {
41   Great is Thy faith- ful- ness,
42 }
43
44 \score {
45   \new ChoirStaff <<
46     \new Lyrics = sopranos
47     \new Staff = women <<
48       \new Voice = "sopranos" {
49         \voiceOne
50         \global \sopMusic
51       }
52       \new Voice = "altos" {
53         \voiceTwo
54         \global \altoMusic
55       }
56     >>
57     \new Lyrics = "altos"
58     \new Lyrics = "tenors"
59     \new Staff = men <<
60       \clef bass
61       \new Voice = "tenors" {
62         \voiceOne
63         \global \tenorMusic
64       }
65       \new Voice = "basses" {
66         \voiceTwo  \global \bassMusic
67       }
68     >>
69     \new Lyrics = basses
70     \context Lyrics = sopranos \lyricsto sopranos \words
71     \context Lyrics = altos \lyricsto altos \words
72     \context Lyrics = tenors \lyricsto tenors \words
73     \context Lyrics = basses \lyricsto basses \words
74   >>
75   \layout {
76     \context {
77       \Lyrics
78       \override VerticalAxisGroup #'staff-affinity = ##f
79       \override VerticalAxisGroup #'staff-staff-spacing =
80         #'((basic-distance . 0)
81            (minimum-distance . 2)
82            (padding . 2))
83     }
84     \context {
85       \Staff
86       \override VerticalAxisGroup #'staff-staff-spacing =
87         #'((basic-distance . 0)
88            (minimum-distance . 2)
89            (padding . 2))
90     }
91   }
92 }
93