input/new/orchestra-choir-and-piano-template.ly

   1 \version "2.12.0"
   2 \header {
   3   lsrtags = "template"
   4   texidoc = "
   5 This template demonstrates the use of nested @code{StaffGroup}
   6 and @code{GrandStaff} contexts to sub-group instruments of the same
   7 type together, and the use of @code{\transpose} for transposing
   8 instuments so that all the music can be entered in the same key of
   9 C.
  10 "
  11   doctitle = "Orchestra, choir and piano template"
  12 }
  13
  14 fluteMusic    = \relative c' { c1 d }
  15 saxMusic      = \transpose bes c' { \key c \major \relative c' { c1 d } }
  16 oboeMusic     = \relative c' { c1 d }
  17 clarinetMusic = \transpose a c' { \key c \major \relative c' { c1 d } }
  18 bassoonMusic  = \transpose a c' { \key c \major \relative c { c1 d } }
  19 trumpetMusic  = \transpose bes c' { \key c \major \relative c' { c1 d } }
  20 tromboneMusic = \relative c { c1 d }
  21 hornOneMusic  = \transpose f c' { \key c \major \relative { c1 d } }
  22 hornTwoMusic  = \transpose f c' { \key c \major \relative c { c1 d } }
  23 sopranoMusic  = \relative c'' { c1 d }
  24 sopranoLyrics = \lyricmode { Sop -- ra }
  25 altoOneMusic  = \relative c' { c1 d }
  26 altoOneLyrics = \lyricmode { A -- one }
  27 altoTwoMusic  = \relative c' { c1 d }
  28 altoTwoLyrics = \lyricmode { A -- two }
  29 tenorMusic    = \relative c' { c1 d }
  30 tenorLyrics   = \lyricmode { Ten -- or }
  31 pianoRHMusic  = \relative c' { c1 d }
  32 pianoLHMusic  = \relative c { c1 d }
  33
  34 \score {
  35   <<  % Start full staff group
  36     \new StaffGroup <<  % Woodwinds
  37       \new Staff {  % Flute
  38         \set Staff.instrumentName = "Flute"
  39         \fluteMusic
  40       }
  41       \new StaffGroup <<
  42         \new Staff {  % Bb Sax
  43           \set Staff.instrumentName = \markup { \concat {"B" \flat} "Sax" }
  44           \saxMusic
  45         }
  46         \new Staff {  % Oboe
  47           \set Staff.instrumentName = "Oboe"
  48           \oboeMusic
  49          }
  50         \new Staff {  % Clarinet in A
  51           \set Staff.instrumentName = "Clarinet"
  52           \clarinetMusic
  53         }
  54       >>
  55       \new Staff {  % Bassoon
  56         \set Staff.instrumentName = "Bassoon"
  57         \clef bass
  58         \bassoonMusic
  59       }
  60     >>
  61     \new StaffGroup <<  % Start Brass group
  62       \new Staff {  % Trumpet
  63         \set Staff.instrumentName = "Trumpet"
  64         \trumpetMusic
  65       }
  66       \new Staff {  % Trombone
  67         \set Staff.instrumentName = "Trombone"
  68         \clef bass
  69         \tromboneMusic
  70       }
  71       \new GrandStaff << % Horns need a GrandStaff (same instrument)
  72         \new Staff {  % Horn 1
  73           \set Staff.instrumentName = "Horn 1"
  74           \hornOneMusic
  75         }
  76         \new Staff {  % Horn 2
  77           \set Staff.instrumentName = "Horn 2"
  78           \clef bass
  79           \hornTwoMusic
  80         }
  81       >>
  82     >>  % End Brass group
  83     \new ChoirStaff <<
  84       \new Staff {
  85         \set Staff.instrumentName = "S"
  86         \new Voice = "soprano"
  87         \sopranoMusic
  88       }
  89       \new Lyrics \lyricsto "soprano" { \sopranoLyrics }
  90       \new GrandStaff \with { \accepts Lyrics } <<
  91         \new Staff  {
  92           \set Staff.instrumentName = "A1"
  93           \new Voice = "altoOne"
  94           \altoOneMusic
  95         }
  96         \new Lyrics \lyricsto "altoOne" { \altoOneLyrics }
  97         \new Staff {
  98           \set Staff.instrumentName = "A2"
  99           \new Voice = "altoTwo"
 100           \altoTwoMusic
 101         }
 102         \new Lyrics \lyricsto "altoTwo" { \altoTwoLyrics }
 103       >>
 104       \new Staff {
 105         \set Staff.instrumentName = "T"
 106         \clef "treble_8"
 107         \new Voice = "tenor"
 108         \tenorMusic
 109       }
 110       \new Lyrics \lyricsto "tenor" { \tenorLyrics }
 111     >>  % End ChoirStaff
 112     \new PianoStaff \with { \consists Instrument_name_engraver } <<
 113       \set PianoStaff.instrumentName = "Piano"
 114       \new Staff { \pianoRHMusic }
 115       \new Staff {
 116         \clef bass
 117         \pianoLHMusic
 118       }
 119     >>  % End PianoStaff
 120   >>  % End full staff group
 121 }
 122