-% Still need hairpins, directions, dynamics, etc...
-
-\version "2.16.0"
+\version "2.19.0"
\include "pop-chords.ly"
\include "english.ly"
-% Good sizes are 16, 18, & 20, 24
+% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)
staffSize = #20
#(set-default-paper-size "letter")
#(set-global-staff-size staffSize)
\header
{
-%Let's bump up the title size and switch to the chord font. :-)
-
title = \markup { \override #'(font-family . sans) \fontsize #3.5 "The Apostle’s Creed" }
composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Ed Smart" }
% arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
Global =
{
\key bf \major
- \override Staff.TimeSignature #'style = #'()
+ \numericTimeSignature
\time 4/4
% Intro
%
% Lead vocal
%
-
LeadVox = \relative c'
{
-% \set Voice.autoBeaming = ##f
-% \set Staff.instrument = #"Lead vox"
- \clef G
-\override Score.SpacingSpanner #'average-spacing-wishes = ##f
-
% Intro
- r1 | % 1
- r1 | % 2
- r1 | % 3
- r1 | % 4
+ r1*4 | % 1-4
% Part I
f1-\fermata | % 45
}
+
LeadVoxText = \lyricmode
{
We be -- lieve _ in God, _
%
% Riffs
%
-
Riffs = \relative c''
{
%{
%
% Chord names
%
-
Chords = \chordmode
{
% Intro
%
% Chord rhythms
%
-
Rhythm = \relative c
{
-% \set Voice.autoBeaming = ##f
-% \set Staff.instrument = #"Rhythm"
- \override Staff.TimeSignature #'style = #'()
- \time 4/4
+ \numericTimeSignature
\override NoteHead #'style = #'slash
-\tiny
+ \teeny
% Intro
\score
{
<<
+ \Global % The "roadmap" that everything else depends on
\set Score.skipBars = ##t
\set Score.melismaBusyProperties = #'()
-% \new ChoirStaff
- <<
- \new ChordNames \Chords
-% C edition
-% \new ChordNames \transpose bf c \Chords
- \new RhythmicStaff << \Rhythm \Dynamics >>
- >>
-
- \new Staff
+ \context Staff
<<
- \Global % The "roadmap" that everything else depends on
\new Voice = "lead" \LeadVox
% C edition
% \new Voice = "lead" \transpose bf c' \LeadVox
\new Voice \Riffs
\new Lyrics \lyricsto "lead" \LeadVoxText
>>
+
+ \new ChoirStaff
+ <<
+ \new ChordNames \Chords
+% C edition
+% \new ChordNames \transpose bf c \Chords
+ \new RhythmicStaff << \Rhythm \Dynamics >>
+ >>
>>
}
{
#(define fonts (make-pango-font-tree
"Times New Roman"
- "DomCasual BT"
+ "LilyJAZZText"
"Luxi Mono"
(/ staffSize 20)))
% To find out what's eating the space at the top...
% annotate-spacing = ##t
-%let's try this: [It works! Huzzah!]
- obsolete-page-top-space = 0 top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
}
+