Am 29. März 2006, 19:07 Uhr (-0500) schrieb Geoff Horton:
> 
> I would apply the \tag functionality; see section 8.2.8 in the manual.

Thanks, that worked. There remains the problem of the missing quarter
rest at the downbeat of bar 1 in the piano reduction. Can somebody
point me to the docs on how to make the rest explicitly visible?

--
Orm
\version "2.8.0"

% Titel und Fußzeile:

\header {
%     title = \markup { \column {"Choral" " "} }
%     composer = "J. S. Bach"
    tagline = "gesetzt mit LilyPond"
}

% Einstellungen für alle Stimmen:

global = {
  \key f \minor  % Tonart
  \time 4/4      % Metrum
%  \partial 4     % Auftakt 1 Viertelnote
}

%Musik:

SopranNoten = \relative c'' {
  \tag #'piano \stemUp 
   c2 des | c2. f4~ | f4 bes, es2 
}

AltNoten = \relative c' {
  \tag #'piano \stemDown 
   r4 f2 bes4~ | bes4 as8 g as4 g8 f | g2. \stemDown as8 g f4
}

TenorNoten = \relative c' {
  \tag #'piano \stemUp
r1 r r r
}

BassNoten = \relative c {
  \tag #'piano \stemDown 
r1 r r r
}


\score {

% Die oberen vier Einzelsysteme:

    <<
      \context ChoirStaff
      <<
        \new Staff {
          \clef soprano
%      \clef G
      \set Staff.instrument = \markup { "Sopran" \hspace #2 }
      \context Voice =
      sopranos { << \global \removeWithTag #'piano \SopranNoten >> }
    }

    \new Staff {
      \set Staff.instrument = \markup { "Alt" \hspace #2 }
      \clef alto
%      \clef G
      \context Voice =
      altos {  << \global \removeWithTag #'piano \AltNoten >> }
    }

    \new Staff {
      \set Staff.instrument = \markup { "Tenor" \hspace #2 }
      \clef tenor
%      \clef "G_8"
      \context Voice =
      tenors { <<\global \removeWithTag #'piano \TenorNoten >> }
    }

    \new Staff {
      \set Staff.instrument = \markup { "Bass" \hspace #2 }
      \clef bass
      \context Voice =
      basses { <<\global \removeWithTag #'piano \BassNoten >> }
    }

  >>

%% Das Klaviersystem mit den zusammengefassten Stimmen:

       \new PianoStaff
       <<
         \new Staff <<
           \set PianoStaff.instrument = \markup { "Klavier" \hspace #2 }
           \set Staff.printPartCombineTexts = ##f
           \partcombine
           << \global \SopranNoten >>
           << \global \AltNoten >>
         >>
         \new Staff <<
           \clef bass
           \set Staff.printPartCombineTexts = ##f
           \partcombine
           << \global \TenorNoten >>
           << \global \BassNoten >>
         >>
       >>
>>

% Definition des Layouts
    \layout {
      raggedright = ##t
      \context {
% a little smaller so lyrics
% can be closer to the staff
        \Staff
        minimumVerticalExtent = #'(-3 . 3)
  }
}
  \midi {
    \tempo 4 = 94
  }
}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to