]> git.donarmstrong.com Git - lilypond.git/blob - input/template/satb.ly
Massive changes - see ChangeLog.
[lilypond.git] / input / template / satb.ly
1 #(ly:set-option 'old-relative)
2 \version "1.9.0"
3 \header {
4
5     texidoc = "
6  Example template for a SATB vocal  score.
7
8 }
9
10 sopMusic = \notes  \relative c'' { c4 c c8-[-( b-)-] c4 }
11 sopWords = \lyrics { hi4 hi hi hi  }
12
13 altoMusic = \notes  \relative c' { e4 f d e }
14 altoWords =\lyrics { ha4 ha ha ha }
15
16 tenorMusic = \notes \relative c' { g4 a f g }
17 tenorWords = \lyrics { hu4 hu hu hu }
18
19 bassMusic = \notes \relative c { c4 c g c }
20 bassWords = \lyrics { ho4 ho ho ho }
21
22 \score { \notes
23           \context StaffGroup <
24               \property Score.automaticMelismata = ##t
25           \context Lyrics = sopLyrs { s1 }
26           \context Staff = women { s1 }
27           \context Lyrics = altoLyrs { s1 }
28           \context Lyrics = tenorLyrs { s1 }
29           \context Staff = men {\clef bass s1 }
30           \context Lyrics = bassLyrs { s1 }
31           \addlyrics
32                 \context Staff = women \context Voice = VA { \voiceOne \sopMusic }
33                 \context Lyrics = sopLyrs { \sopWords}
34           \addlyrics
35                 \context Staff = women \context Voice = VB { \voiceTwo \altoMusic }
36                 \context Lyrics = altoLyrs { \altoWords}
37           \addlyrics
38                 \context Staff = men \context Voice = VA { \voiceOne \tenorMusic }
39                 \context Lyrics = tenorLyrs { \tenorWords}
40           \addlyrics
41                 \context Staff = men  \context Voice = VB { \voiceTwo \bassMusic }
42                 \context Lyrics = bassLyrs { \bassWords}
43           
44           >
45   \paper {
46     \translator {
47
48         % a little smaller so lyrics can be closer to the staff. 
49         \StaffContext
50         minimumVerticalExtent = #'(-3 . 3) 
51     }
52   }
53 }