lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: How to remove all notes and only show Chords and Lyrics?


From: Kieren MacMillan
Subject: Re: How to remove all notes and only show Chords and Lyrics?
Date: Tue, 10 Dec 2019 12:11:56 -0500

Hi Dominic,

> Hi Jaap,
> this is really great!

I agree!

> Now I have the problem that in *some* lines the chords are very far away from 
> the lyrics
> whereas in most lines, they are positioned very well.
> 
> Do you have any idea what's the reason for this and how I could solve it?

There were two issues: the basic- and minimum-distances as set, and the page 
height. The following modified snippet fixes both (I think?).

%%%  SNIPPET BEGINS
\version "2.18.2"

\paper {
    indent = 0
    paper-height = 120\in
    ragged-right = ##t
    system-system-spacing = #'((basic-distance . 6) (minimum-distance . 6) 
                                  (padding . 2.5) (stretchability . 0))
    score-system-spacing.padding = #12
}

lyricsbreak = \tag #'lyricsheet { \bar "" \break }

verseOne = \lyricmode {
    \set stanza = "1. "
    Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy 
eirmod \lyricsbreak
    tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. 
\lyricsbreak
    At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd 
\lyricsbreak
    gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. 
\lyricsbreak
}

verseTwo = \lyricmode {
    \set stanza = "2. "
    Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy 
eirmod \lyricsbreak
    tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. 
\lyricsbreak
    At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd 
\lyricsbreak
    gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. 
\lyricsbreak
}


harmonies = {
    \chordmode { \set majorSevenSymbol = \markup { "maj7" }
                 s4 f2 c bes2 g:m7 f d:m g:m c f c bes g:m7 f d:m % p.1 
                 g:m c f c bes g:m7 f d:m g:m c f c bes g:m7 f d:m c4 f 
    }
}

melody = \relative c'' {
    \key f \major
    \time 4/4
    \partial 4
    \autoBeamOff
    
    a8 bes | c8. bes16 a bes c8~ c4 a8 bes | c4 c16 c d8~ d f, f g |
    a4 f8 g a4 bes8 a | a g16 g~ g f g8~ g4 a8 bes16 c~ |
    c4 a16 bes8 c16~ c4 r8 a16 bes | c4 c8 c16 d~ d8 f, f g | a4 r8 f16 g a4 
bes16 a8.
    
    % p.2:
    f8 g~ g4 r a8 bes | c bes a16 bes8. c4 r8 a16 bes | c8 c c c d f, r f16 g |
    a4 r8 f16 g a4 bes16 a f f | g2 r8. f16 a8 bes | c4 r8 a16 bes c8. a16 a8 
bes16 c~ |
    c16 c c8~ c16 c d8 r8. f,16 f8 g | \time 6/4 
    a8. g16 f8 g a16 a8. a16 bes8. a8 g f4 | R1. | \time 4/4
    r2 r4 a8 bes | c c a16 bes8 c16~ c4 r8 a16 bes |
    \bar "|."            
}

\layout {
    \context {
        \ChordNames
        \override ChordName.font-name = #"Alegreya Medium"
        \override VerticalAxisGroup.staff-affinity = #DOWN
        \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
        #'((basic-distance . 1) (minimum-distance . 1) (padding . 1) 
(stretchability . 0))
    }
    \context {
        \Lyrics
        \override LyricText.font-name = #"Alegreya"
        \override VerticalAxisGroup.staff-affinity = #UP
        \override VerticalAxisGroup.nonstaff-relatedstaff-spacing =
        #'((basic-distance . 1) (minimum-distance . 1) (padding . 1) 
(stretchability . 0))
    }
}


\score {
    <<
        \new ChordNames \harmonies
        \new RhythmicStaff {
            \new NullVoice \melody
            \addlyrics { \verseOne \verseTwo }
        }
    >>
    
    \layout {
        \set RhythmicStaff.explicitKeySignatureVisibility = #all-invisible
        \set Staff.printKeyCancellation = ##f
        \context { 
            \RhythmicStaff
            \remove "Time_signature_engraver"
            \remove "Bar_number_engraver"
            \remove "Bar_engraver"
            \override Clef.break-visibility = #all-invisible
            \override StaffSymbol.line-count = #'0
        }
    }
}
%%%  SNIPPET ENDS

Note that I also removed all the custom contexts from my version (which may be 
inferior, ultimately, to this one!).

What remains to fix (IMO) is the mid-lyrics gaps. I’ll look into what’s causing 
those and report back if I fix it.

Hope this helps!
Kieren.


________________________________

Kieren MacMillan, composer (he/him/his)
‣ website: www.kierenmacmillan.info
‣ email: address@hidden




reply via email to

[Prev in Thread] Current Thread [Next in Thread]