I now know how to do multiple stanzas with a single common section, but I
need the reverse essentially--Single common sections for most of the music,
but 3 "stanzas" near the middle of the piece. Attached is the source code as
it is now without any changes. I tried making changes, but ended up using
several hours and acheived nothing. Thanks for any help you may provide.
Actually, I do have the 3 stanzas here, but not in the proper place. They
should be after the \divisioMinima in the secnd section of notes.

-- 
In Christ,
Michael D
\version "2.12.3"
\include "english.ly"
\include "gregorian.ly"

% XS: necessary, see below
\paper{
  page-count = #1
} 

  \header {
  title = "Eisodikon~Come, let us Worship"
  poet = "Znamenny Chant~Tone 2"
  composer =  "Arranged by Michael Dykes"
     footer = "obs_zn[3].ly"
    ponomarname = "Only-Begotten Son"
    ponomartype = "OwnWork"
    ponomarsubtype = "Arrangement"
    ponomarsource = "Unknown"
    ponomarauthor = "Michael Dykes"
    maintainer = "Michael Dykes"
    maintaineremail = "thedoctor81...@gmail.com"
    lastupdated = "2011/04/10"
    ponomarlang = "en"
    ponomarcomments = ""
    copyright = "This score is part of the Ponomar OpenMusic Project"
    tagline = \markup {
    \override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7)
    \box \center-column {
      \line { \with-url #"http://www.ponomar.net"; \line { www. \hspace #-1.0 ponomar \hspace #-1.0 .net \hspace #0.5 } • Orthodox Liturgical music that is \italic free to download, use, modify and distribute. }
      \line { Typeset using \with-url #"http://www.LilyPond.org"; \line { LilyPond } by \maintainer \hspace #-1.0 . \hspace #0.5 Copyright © 2011. \hspace #0.5 Reference: \footer }
      \line { \teeny \line { Licensed under the Creative Commons Attribution-ShareAlike 3.0 (Unported) License, for details see: \hspace #-0.5 \with-url #"http://creativecommons.org/licenses/by-sa/3.0"; http://creativecommons.org/licenses/by-sa/3.0 } }
    }
  }
}

% #(set-global-staff-size 22)
global = {
  \key f \major
  \revert Score.SpacingSpanner #'packed-spacing
%  \override Staff.NoteHead #'style = #'altdefault
%  \override Staff.TimeSignature #'stencil = ##f
 % \override Staff.BarLine #'stencil = ##f
}
move = { \bar "" \break }

soprano = \relative c'' {
  \global
  % Music follows here.
  g4 g2 g8(f) g(a) bf4 bf \divisioMinima
  bf4 a8(bf) c4(bf a) g8 a bf4(a g1) \divisioMaior
  
  g4 bf a bf \divisioMinima
  bf4^\markup {\bold *} 
  bf c2 c4 bf a g2(f) \divisioMinima
  bf2 bf8(a) g4 bf2 a4 g1 \divisioMaior
  
  g4 a bf bf bf \divisioMinima
  bf4 bf c c c \divisioMinima
  c8(bf a bf) c4 bf2(a4 bf8 a g4) a g\breve \finalis
}


tenor = \relative c' {
  \global
  % Music follows here.
  
}


bass = \relative c {
  \global
  % Music follows here.
  
}


\score {
  \new ChoirStaff <<
    \new Staff \with {
      midiInstrument = "voice oohs"
      instrumentName = \markup \center-column { "S" }
      shortInstrumentName = \markup \center-column { "S" }
    } <<
      \new Voice = "soprano" {\voiceOne \soprano }
      \relative c'' {
	g4 g2 g8(f) g(a) bf4 bf \divisioMinima
	bf4 a8(bf) c4(bf a) g8 a bf4(a g1) \divisioMaior
  
	g4 bf a bf \divisioMinima
	  \set melismaBusyProperties = #'()
	bf4^\markup {\bold *} 
	bf c2 c4 bf a g2(f) \divisioMinima
	  \unset melismaBusyProperties
	bf2 bf8(a) g4 bf2 a4 g1 \divisioMaior
	
	g4 a bf bf bf \divisioMinima
	bf4 bf c c c \divisioMinima
	c8(bf a bf) c4 bf2(a4 bf8 a g4) a g\breve \finalis
      }
      >>
  \new Staff \with {
    midiInstrument = "voice oohs "
    instrumentName = \markup \center-column { "T" "B" }
    shortInstrumentName = \markup \center-column { "T" "B" }
    } <<
     \clef bass
     \new Voice = "tenor" { \voiceOne \tenor }
      \relative c' {
	g4 g2 g8(f) g(a) bf4 bf \divisioMinima
	bf4 a8(bf) c4(bf a) g8 a bf4(a g1) \divisioMaior
	
	bf4 d c d \divisioMinima
	  \set melismaBusyProperties = #'()
	d4 d ef2 ef4 d c c2(a) \divisioMinima
	  \unset melismaBusyProperties
	d2 d8(c) bf4 d2 c4 bf1 \divisioMaior
	
	bf4 c d d d \divisioMinima
	d4 d ef ef ef \divisioMinima
	ef8(d c d) ef4 d2(c4 d8 c d4) c4 bf\breve \finalis
      }
     \new Voice = "bass" { \voiceTwo \bass }
      \relative c {
	g'4 g2 g8(f) g(a) bf4 bf \divisioMinima
	bf4 a8(bf) c4(bf a) g8 a bf4(a g1) \divisioMaior
	
	g4 g g g\divisioMinima
	  \set melismaBusyProperties = #'()
	g4 g f2 f4 f f c2(d) \divisioMinima
	  \unset melismaBusyProperties
	g2 g4 g d2 f4 g1 \divisioMaior
	
	g4 g g g g \divisioMinima
	g4 g f f f \divisioMinima
	f2 f4 g2 d1 <g g,>\breve \finalis
      }
    \new Lyrics \with {
      \override VerticalAxisGroup #'nonstaff-relatedstaff-spacing
     #'minimum-distance = #6
    } \lyricsto "soprano" {
     O come, let __ us __ wor -- ship,
     and fall __ down __ be -- fore Christ; __
  
     O Son of God,
     Who art ri -- sen from the dead, __
     Save us __ who sing to Thee:
     
     Al -- le -- lu -- i -- a,
     Al -- le -- lu -- i -- a,
     Al __ le -- lu __ i -- a!
     }
     \new Lyrics \lyricsto "soprano" {
	Who art won -- drous in Thy saints, __
   }
     \new Lyrics \lyricsto "soprano" {
	Through the prayers of the Theo -- to -- kos, __
  }  >>
>>
  \layout { ragged-last=##t 
   #(layout-set-staff-size 22)
  }
  \midi {
    \context {
      \Score
      tempoWholesPerMinute = #(ly:make-moment 130 4)
    }
  }
}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to