Re: Horizontal line between hymn verses

[Valentin Petzel]

I’ve also corrected the syntax of Lyrics (it is \new Lyrics \lyricsto ..., not 
\lyricsto ... \new Lyrics).
%%% MIGHT AS WELL PUT THIS INTO AN INCLUDE FILE
#(define dashlength 10)
#(define dashindent 2)
#(define dashthickness 0.17)

\layout {
  \context {
    \type "Engraver_group"
    \name "LineSep"

    \consists "Bar_engraver"
    \consists "Clef_engraver"
    \consists "Axis_group_engraver"

    \defaultchild "NullVoice"
    \accepts "CueVoice"
    \accepts "NullVoice"
    \accepts "Voice"

    \override VerticalAxisGroup.staff-affinity = #CENTER
    clefPosition = 4.8
    \override Clef.X-offset = #dashindent
    \override Clef.X-extent = #'(0 . 0)
    \override Clef.stencil = #(lambda (grob) (make-line-stencil dashthickness 0 0 dashlength 0))
    \override VerticalAxisGroup.nonstaff-nonstaff-spacing = #'((basic-distance . 0)
                                                               (minimum-distance . 0)
                                                               (padding . 0.5))
  }
  \context {
    \Score
    \accepts LineSep
  }
}

adjustLyricsAboveSeparator = \with {
  \override VerticalAxisGroup.nonstaff-nonstaff-spacing = #'((basic-distance . 0)
                                                             (minimum-distance . 0)
                                                             (padding . 0.5))
}
%%%


\header {
   title = ""
   subtitle = ""
   fsHymnal = ""
   fsHymnNumber = ""
   fsTextCredit = \markup { \wordwrap { Text credits go here. } }
   note = ""
}

StanzaOne = \lyricmode {
  \set stanza = "1"  
  This is an ex -- am -- ple
}

StanzaTwo = \lyricmode {
  \set stanza = "2"
  to show -- case the lyr -- ics
}

StanzaThree = \lyricmode {
  \set stanza = "3"
  dash __ _ se -- pa -- ra -- tion
}

StanzaFour = \lyricmode {
  \set stanza = "4" 
  mech -- _ an -- _ _ nics
}

DescantLyrics = \lyricmode {
  \set stanza = ""

}

% delete the following two variables if they will not be used
FinalRefrainLyrics = \lyricmode {

}

FinalRefrainDescantLyrics = \lyricmode {

}

%add variables from the Reponse text template here


\language "english"

hasChords     = ##f
hasDescant    = ##f

\header{
   fsTuneCredit = \markup { \wordwrap { Tune credits go here. } }
}

keyTime = {
    \time 4/4
    \numericTimeSignature
    \key c \major
    \partial 4
}

Soprano = \relative c' {
  \voiceOne
  \keyTime
    \repeat unfold 5 a' \break a'
  | 
 \bar "|."
}


Alto = \relative c' {
  \voiceTwo
  \keyTime
    
  | 
 \bar "|."
}

Tenor = \relative c {
  \voiceOne
  \keyTime
    
  | 
 \bar "|."
}

Bass = \relative c {
  \voiceTwo
  \keyTime
    
  | 
 \bar "|."
}



% delete the following if not being used
Chords = \relative c' {
  \chords {
  
    }
  }

Descant = \relative c'' {
  \keyTime
}

%
% Full score, with vocal markup
%
#(use-modules (guile-user))
\include "definitions.ly"


chordMarkup = {
%    \Chords 
%    \AccompChords
}

%{descantMarkup = {
    \new Staff \with
    { \override NoteHead #'font-size = #-2
      \override Stem #'font-size = #-2
      \override Rest #'font-size = #-2
      \override Accidental #'font-size = #-2
      \override Clef #'font-size = #-3
      \override KeySignature #'font-size = #-3
      \override TimeSignature #'font-size = #-3
      \override StaffSymbol #'staff-space = #(magstep -3)
    }
    <<
      \clef "treble"
      \new Voice = "DescantVoice" \Descant
      \lyricsto DescantVoice \new Lyrics = "DescantLyrics" \DescantLyrics
    >>
} %}

\score 
{
  <<
    $(if hasDescant descantMarkup)

    $(if hasChords chordMarkup)

    \new Staff 
    <<
      \clef "treble"
      \new Voice = "SopranoVoice" \Soprano 
      \new Voice = "AltoVoice" \Alto 
%      \new Lyrics = "SopranoResponse" \with { alignAboveContext = "staff" } { \lyricsto "SopranoVoice" { \SopranoResponse } }
%      \lyricsto AltoVoice \new Lyrics = "AltoResponse" \AltoResponse
      \new Lyrics \lyricsto SopranoVoice \StanzaOne
      \new Lyrics \with \adjustLyricsAboveSeparator \lyricsto SopranoVoice \StanzaTwo
      \new LineSep { #(skip-of-length Soprano) }
      \new Lyrics \lyricsto SopranoVoice \StanzaThree
      \new Lyrics \lyricsto SopranoVoice \StanzaFour
    >>
    \new Staff 
    <<
      \clef "bass"
      \new Voice = "TenorVoice" \Tenor 
      \new Voice = "BassVoice" \Bass 
%      \new Lyrics \with { alignAboveContext = "staff" } { \lyricsto TenorVoice  \TenorResponse }
%      \lyricsto BassVoice \new Lyrics \BassResponse
    >>
%    \Keyboard 
  >>
}

signature.asc
Description: This is a digitally signed message part.