%
% Lead vocal
%
-
LeadVox = \relative c''
{
\set Voice.autoBeaming = ##f
b4. e,8 fs4 g | % 17
a2. g4 | % 18
a2. d4 | % 19
-
+
d2. d8 [ d ] | % 20
d4 g, a b | % 21
c2. c8 [ c ] | % 22
%
% Chord names
%
-
Chords = \chordmode
{
-%Bah, can't we set this globally?
-% \popChords
-
g1 | % 1
d2:sus4 d | % 2
%
% Chord rhythms
%
-
-% Use a RhythmicStaff on the chords instead of this?
-% It almost works, but not quite. Doesn't collapse chords above to single notes...
-
StaffC = \relative c
{
\set Voice.autoBeaming = ##f
-% \set Staff.instrumentName = #"Rhythm"
- \override Staff.TimeSignature #'style = #'()
+ \numericTimeSignature
\time 4/4
\override NoteHead #'style = #'slash
+ \teeny
c4 c c c | % 1
c4 c c c | % 2
\score
{
<<
+ \context Staff
<<
- \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
+ \new Voice = "lead" \LeadVox
\new Lyrics \lyricsto "lead" \LeadVoxText
>>
- \new ChoirStaff = "Rhythm"
+ \new ChoirStaff
<<
- \new ChordNames = "chords" \Chords
- \new RhythmicStaff = "chordRhythm" \StaffC
+ \new ChordNames \Chords
+ \new RhythmicStaff \StaffC
>>
\set Score.skipBars = ##t
\layout
{
\context { \Staff \RemoveEmptyStaves }
-% ragged-last-bottom = ##t
-% ragged-last = ##t
}
}
{
#(define fonts (make-pango-font-tree
"Times New Roman"
- "DomCasual BT"
+ "JazzText"
"Luxi Mono"
(/ staffSize 20)))
+
+% Don't spread staves vertically across last page (default: t)
+% ragged-last-bottom = ##f
+% Don't spread staves vertically across the page (default: f)
+% ragged-bottom = ##t
+% Allow partial line for last stave (default: f)
+ ragged-last = ##t
+
+% To find out what's eating the space at the top...
+% annotate-spacing = ##t
}
+