Documentation/snippets/vocal-ensemble-template-with-automatic-piano-reduction.ly

   1 %% DO NOT EDIT this file manually; it is automatically
   2 %% generated from LSR http://lsr.dsi.unimi.it
   3 %% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
   4 %% and then run scripts/auxiliar/makelsr.py
   5 %%
   6 %% This file is in the public domain.
   7 \version "2.16.0"
   8
   9 \header {
  10   lsrtags = "automatic-notation, keyboards, template, vocal-music"
  11
  12   texidoc = "
  13 This template adds an automatic piano reduction to the standard SATB
  14 vocal score demonstrated in @qq{Vocal ensemble template}. This
  15 demonstrates one of the strengths of LilyPond – you can use a music
  16 definition more than once. If any changes are made to the vocal notes
  17 (say, @code{tenorMusic}), then the changes will also apply to the piano
  18 reduction.
  19
  20 "
  21   doctitle = "Vocal ensemble template with automatic piano reduction"
  22 } % begin verbatim
  23
  24
  25 \paper {
  26   top-system-spacing #'basic-distance = #10
  27   score-system-spacing #'basic-distance = #20
  28   system-system-spacing #'basic-distance = #20
  29   last-bottom-spacing #'basic-distance = #10
  30 }
  31
  32 global = {
  33   \key c \major
  34   \time 4/4
  35 }
  36
  37 sopMusic = \relative c'' {
  38   c4 c c8[( b)] c4
  39 }
  40 sopWords = \lyricmode {
  41   hi hi hi hi
  42 }
  43
  44 altoMusic = \relative c' {
  45   e4 f d e
  46 }
  47 altoWords =\lyricmode {
  48   ha ha ha ha
  49 }
  50
  51 tenorMusic = \relative c' {
  52   g4 a f g
  53 }
  54 tenorWords = \lyricmode {
  55   hu hu hu hu
  56 }
  57
  58 bassMusic = \relative c {
  59   c4 c g c
  60 }
  61 bassWords = \lyricmode {
  62   ho ho ho ho
  63 }
  64
  65 \score {
  66   <<
  67     \new ChoirStaff <<
  68       \new Lyrics = "sopranos" \with {
  69         % This is needed for lyrics above a staff
  70         \override VerticalAxisGroup #'staff-affinity = #DOWN
  71       }
  72       \new Staff = "women" <<
  73         \new Voice = "sopranos" { \voiceOne << \global \sopMusic >> }
  74         \new Voice = "altos" { \voiceTwo << \global \altoMusic >> }
  75       >>
  76       \new Lyrics = "altos"
  77       \new Lyrics = "tenors" \with {
  78         % This is needed for lyrics above a staff
  79         \override VerticalAxisGroup #'staff-affinity = #DOWN
  80       }
  81
  82       \new Staff = "men" <<
  83         \clef bass
  84         \new Voice = "tenors" { \voiceOne << \global \tenorMusic >> }
  85         \new Voice = "basses" { \voiceTwo << \global \bassMusic >> }
  86       >>
  87       \new Lyrics = "basses"
  88       \context Lyrics = "sopranos" \lyricsto "sopranos" \sopWords
  89       \context Lyrics = "altos" \lyricsto "altos" \altoWords
  90       \context Lyrics = "tenors" \lyricsto "tenors" \tenorWords
  91       \context Lyrics = "basses" \lyricsto "basses" \bassWords
  92     >>
  93     \new PianoStaff <<
  94       \new Staff <<
  95         \set Staff.printPartCombineTexts = ##f
  96         \partcombine
  97         << \global \sopMusic >>
  98         << \global \altoMusic >>
  99       >>
 100       \new Staff <<
 101         \clef bass
 102         \set Staff.printPartCombineTexts = ##f
 103         \partcombine
 104         << \global \tenorMusic >>
 105         << \global \bassMusic >>
 106       >>
 107     >>
 108   >>
 109 }