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