]> Shamusworld >> Repos - music/blobdiff - no-higher-calling.ly
New charts "How Great Thou Art" and "In The Garden".
[music] / no-higher-calling.ly
old mode 100755 (executable)
new mode 100644 (file)
index aba36b6..88df9c2
@@ -1,8 +1,8 @@
-\version "2.16.0"\r
+\version "2.19.0"\r
 \include "pop-chords.ly"\r
 \include "english.ly"\r
 \r
-% Good sizes are 16, 18, & 20\r
+% Good sizes are 16, 18, & 20 (11, 13, 14, 23, 26)\r
 staffSize = #20\r
 #(set-default-paper-size "letter")\r
 #(set-global-staff-size staffSize)\r
@@ -10,139 +10,156 @@ staffSize = #20
 \r
 \header\r
 {\r
-%Let's bump up the title size and switch to the chord font. :-)\r
-\r
        title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "No Higher Calling" }\r
 %      composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }\r
        arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }\r
-       tagline  = "Engraved by JLH and Lilypond 2.8.8"\r
+       tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))\r
 }\r
 \r
 \r
 %\r
-% Lead vocal\r
+% Song's structure\r
 %\r
-\r
-LeadVox = \relative c'\r
+Global =\r
 {\r
-%      \set Voice.autoBeaming = ##f\r
-%      \set Staff.instrumentName = #"Lead vox"\r
        \clef G\r
        \key bf \major\r
-       \override Staff.TimeSignature #'style = #'()\r
+       \numericTimeSignature\r
        \time 4/4\r
-\override Score.SpacingSpanner #'average-spacing-wishes = ##f\r
 \r
        \repeat volta 2\r
        {\r
                % Intro\r
 \r
-\once \override Score.RehearsalMark #'self-alignment-X = #left\r
-\mark \markup { \small "Light half-time feel" }\r
+               \once \override Score.RehearsalMark #'self-alignment-X = #left\r
+               \mark \markup { \small "Light half-time feel" }\r
 \r
-               s1 |   % 1\r
-               s1 |   % 2\r
-               s1 |   % 3\r
-               s1 |   % 4\r
+               s1*4 |   % 1-4\r
        }\r
 \r
        % Verse\r
 \r
-\mark \markup { \override #'(font-family . sans) { \box { A } } }\r
-\r
-       f2. d8 f |   % 5\r
-       a2 bf4. g8 ~ |   % 6\r
-       g2. f8 ef |   % 7\r
-       d2 c4. ( d8 ) |   % 8\r
-       d2 r4 d8 f |   % 9\r
-       a2 bf4. g8 ~ |   % 10\r
-       g2. g4 |   % 11\r
-       gf2 f4. f8 ~ |   % 12\r
-       f2. f4 |   % 13\r
-       gf2 af4. ( bf8 ) |   % 14\r
-       bf1 ~ |   % 15\r
-       bf2 r |   % 16\r
+       \mark \markup { \override #'(font-family . sans) { \box { A } } }\r
+       s1*12 |   % 5-16\r
 \r
        \repeat volta 2\r
        {\r
                % Verse\r
 \r
-\mark \markup { \override #'(font-family . sans) { \box { B } } }\r
-\r
-               f2. d8 f |   % 17\r
-               a2 bf4. g8 ~ |   % 18\r
-               g2. f8 ef |   % 19\r
-               d2 c4. ( d8 ) |   % 20\r
-               d2 r4 d8 f |   % 21\r
-               a2 bf4. g8 ~ |   % 22\r
-               g2. g4 |   % 23\r
-               gf2 f4. f8 ~ |   % 24\r
-               f2. f4 |   % 25\r
-               gf2 af4. ( bf8 ) |   % 26\r
-               bf1 ~ |   % 27\r
-               bf2. <bf d,>8 <a c,> \bar "||"   % 28\r
+               \mark \markup { \override #'(font-family . sans) { \box { B } } }\r
+               s1*12 \bar "||"   % 17-28\r
 \r
                % Chorus\r
 \r
-\once \override Score.RehearsalMark #'self-alignment-X = #left\r
-\mark \markup { \override #'(font-family . sans) { \box { C } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }\r
-\r
-               <g bf,>2. <a c,>8 <bf d,> |   % 29\r
-               <bf d,>4. ( <a c,>8 ) <a c,>2 |   % 30\r
-               <a c,>2. <bf d,>8 <c f,> |   % 31\r
-               <c f,>4. ( <bf d,>8 ) <bf d,>4 <bf d,>8 <a c,> |   % 32\r
-               <g bf,>2. <g bf,>4 |   % 33\r
-               <g bf,>4 <f a,>8 <f a,> ~ <f a,> <ef g,>4 <f bf,>8 ~ |   % 34\r
-               <f bf,>1 |   % 35\r
-               r2 r4 <f d>8 <g ef> |   % 36\r
-               <g ef>2. <a c,>8 <bf d,> |   % 37\r
-               <bf d,>4. <a c,>8 ~ <a c,>4. <a c,>8 |   % 38\r
-               <a c,>2. <bf d,>8 <c ef,> |   % 39\r
-               <c ef,>4. <bf d,>8 ~ <bf d,>4 bf |   % 40\r
-               bf2. bf4 |   % 41\r
-               bf4 a8 g ~ g a ~ a4 |   % 42\r
-\once \override Score.RehearsalMark #'self-alignment-X = #right\r
-\mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }\r
+               \once \override Score.RehearsalMark #'self-alignment-X = #left\r
+               \mark \markup { \override #'(font-family . sans) { \box { C } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }\r
+\r
+               s1*14 |   % 29-42\r
+               \once \override Score.RehearsalMark #'self-alignment-X = #right\r
+               \mark \markup { \italic { to Coda } \hspace #1.0 \musicglyph #"scripts.coda" }\r
        }\r
        \alternative\r
        {\r
                {\r
-                       \voiceTwo\r
-                       bf1 |   % 43\r
-                       \oneVoice\r
-                       s1 |   % 44\r
-                       s1 |   % 45\r
-                       s1 |   % 46\r
+                       s1*4 |   % 43-46\r
                }\r
                {\r
-                       bf1 |   % 47\r
+                       s1 |   % 47\r
                }\r
        }\r
 \r
-       r2 r4 <f d>8 <g ef> \bar "||"   % 48\r
+       s1 \bar "||"   % 48\r
 \r
-\once \override Score.RehearsalMark #'self-alignment-X = #right\r
-\mark \markup { \italic { D.S. al Coda } }\r
+       \once \override Score.RehearsalMark #'self-alignment-X = #right\r
+       \mark \markup { \italic { D.S. al Coda } }\r
 \r
        % Coda\r
 \r
-\stopStaff s1 \startStaff |\r
+\stopStaff s1 \startStaff\r
 \set Score.currentBarNumber = #49\r
 \r
-\once \override Score.RehearsalMark #'self-alignment-X = #left\r
-\mark \markup { { \musicglyph #"scripts.coda" } "Coda" }\r
+       \once \override Score.RehearsalMark #'self-alignment-X = #left\r
+       \mark \markup { { \musicglyph #"scripts.coda" } "Coda" }\r
+\r
+       s1*9 \bar "|."   % 49-57\r
+}\r
+\r
+\r
+%\r
+% Lead vocal\r
+%\r
+LeadVox = \relative c'\r
+{\r
+       % Intro\r
+\r
+       s1 |   % 1\r
+       s1 |   % 2\r
+       s1 |   % 3\r
+       s1 |   % 4\r
+\r
+       % Verse\r
+\r
+       f2. d8 f |   % 5\r
+       a2 bf4. g8 ~ |   % 6\r
+       g2. f8 ef |   % 7\r
+       d2 c4. ( d8 ) |   % 8\r
+       d2 r4 d8 f |   % 9\r
+       a2 bf4. g8 ~ |   % 10\r
+       g2. g4 |   % 11\r
+       gf2 f4. f8 ~ |   % 12\r
+       f2. f4 |   % 13\r
+       gf2 af4. ( bf8 ) |   % 14\r
+       bf1 ~ |   % 15\r
+       bf2 r |   % 16\r
+\r
+       % Verse\r
+\r
+       f2. d8 f |   % 17\r
+       a2 bf4. g8 ~ |   % 18\r
+       g2. f8 ef |   % 19\r
+       d2 c4. ( d8 ) |   % 20\r
+       d2 r4 d8 f |   % 21\r
+       a2 bf4. g8 ~ |   % 22\r
+       g2. g4 |   % 23\r
+       gf2 f4. f8 ~ |   % 24\r
+       f2. f4 |   % 25\r
+       gf2 af4. ( bf8 ) |   % 26\r
+       bf1 ~ |   % 27\r
+       bf2. <bf d,>8 <a c,> \bar "||"   % 28\r
+\r
+       % Chorus\r
+\r
+       <g bf,>2. <a c,>8 <bf d,> |   % 29\r
+       <bf d,>4. ( <a c,>8 ) <a c,>2 |   % 30\r
+       <a c,>2. <bf d,>8 <c f,> |   % 31\r
+       <c f,>4. ( <bf d,>8 ) <bf d,>4 <bf d,>8 <a c,> |   % 32\r
+       <g bf,>2. <g bf,>4 |   % 33\r
+       <g bf,>4 <f a,>8 <f a,> ~ <f a,> <ef g,>4 <f bf,>8 ~ |   % 34\r
+       <f bf,>1 |   % 35\r
+       r2 r4 <f d>8 <g ef> |   % 36\r
+       <g ef>2. <a c,>8 <bf d,> |   % 37\r
+       <bf d,>4. <a c,>8 ~ <a c,>4. <a c,>8 |   % 38\r
+       <a c,>2. <bf d,>8 <c ef,> |   % 39\r
+       <c ef,>4. <bf d,>8 ~ <bf d,>4 bf |   % 40\r
+       bf2. bf4 |   % 41\r
+       bf4 a8 g ~ g a ~ a4 |   % 42\r
+\r
+       \voiceTwo bf1 \oneVoice |   % 43\r
+       s1*3 |   % 44-46\r
+\r
+       bf1 |   % 47\r
+\r
+       r2 r4 <f d>8 <g ef> |   % 48\r
+\r
+       % Coda\r
+\r
+       s1 % extra bar for coda\r
 \r
        bf2 s |   % 49\r
-       s1 |   % 50\r
-       s1 |   % 51\r
-       s1 |   % 52\r
-       s1 |   % 53\r
-       s1 |   % 54\r
-       s1 |   % 55\r
-       s1 |   % 56\r
-       s1 \bar "|."   % 57\r
+       s1*8 |   % 50-57\r
 }\r
 \r
+\r
 LeadVoxText = \lyricmode\r
 {\r
        Down at your feet, O Lord, _\r
@@ -173,12 +190,6 @@ LeadVoxText = \lyricmode
 \r
 Riffs = \relative c'\r
 {\r
-       \clef G\r
-       \key bf \major\r
-       \override Staff.TimeSignature #'style = #'()\r
-       \time 4/4\r
-\override Score.SpacingSpanner #'average-spacing-wishes = ##f\r
-\r
        \tiny\r
        r2 r8 d f bf |   % 1\r
        bf4. af8 ~ af4. af8 |   % 2\r
@@ -187,9 +198,7 @@ Riffs = \relative c'
 \r
        s1*38 |   % 5-42\r
 \r
-       \voiceOne\r
-       r2 r8 d f bf |   % 43\r
-       \oneVoice\r
+       \voiceOne r2 r8 d f bf \oneVoice |   % 43\r
        bf4. af8 ~ af4. af8 |   % 44\r
        af4. g8 ~ g4. f8 |   % 45\r
        f1 |   % 46\r
@@ -204,28 +213,21 @@ Riffs = \relative c'
        bf4. af8 ~ af4. af8 |   % 54\r
        af4. g8 ~ g4. f8 |   % 55\r
        f1 |   % 56\r
-       r1-\fermata \bar "|."   % 57\r
+       r1-\fermata |   % 57\r
 }\r
 \r
 \r
 %\r
 % Chord names\r
 %\r
-\r
 Chords = \chordmode\r
 {\r
-%Bah, can't we set this globally?\r
-%      \popChords\r
-\r
-       \repeat volta 2\r
-       {\r
-               % Intro\r
+       % Intro\r
 \r
-               bf1 |   % 1\r
-               af4.:6.9 af8:sus2 s2 |   % 2\r
-               af4./ef ef8 s2 |   % 3\r
-               f2:sus4 f |   % 4\r
-       }\r
+       bf1 |   % 1\r
+       af4.:6.9 af8:sus2 s2 |   % 2\r
+       af4./ef ef8 s2 |   % 3\r
+       f2:sus4 f |   % 4\r
 \r
        % Verse\r
 \r
@@ -242,52 +244,44 @@ Chords = \chordmode
        bf1:sus2 |   % 15\r
        bf2 ef/f |   % 16\r
 \r
-       \repeat volta 2\r
-       {\r
-               % Verse\r
-\r
-               bf1 |   % 17\r
-               f2/d bf/d |   % 18\r
-               ef1 |   % 19\r
-               bf2/f f |   % 20\r
-               bf1 |   % 21\r
-               f2/g g:m7 |   % 22\r
-               ef1 |   % 23\r
-               ef2:m af:sus2 |   % 24\r
-               bf1 |   % 25\r
-               gf2:6 af:sus2 |   % 26\r
-               bf1 |   % 27\r
-               bf1:sus2/d |   % 28\r
-\r
-               % Chorus\r
+       % Verse\r
 \r
-               ef1 |   % 29\r
-               g2:m7 f |   % 30\r
-               d1:m7 |   % 31\r
-               f2/g g:m7 |   % 32\r
-               c1:m7 |   % 33\r
-               ef2/f f |   % 34\r
-               bf1 |   % 35\r
-               bf1/d |   % 36\r
-               ef1 |   % 37\r
-               g2:m7 f |   % 38\r
-               d1:7/fs |   % 39\r
-               c2:m/g g:m7 |   % 40\r
-               ef1 |   % 41\r
-               bf4./f ef4/f f4. |   % 42\r
-       }\r
-       \alternative\r
-       {\r
-               {\r
-                       bf1 |   % 43\r
-                       af4.:6.9 af8:sus2 s2 |   % 44\r
-                       af4./ef ef8 s2 |   % 45\r
-                       f2:sus4 f |   % 46\r
-               }\r
-               {\r
-                       bf1 |   % 47\r
-               }\r
-       }\r
+       bf1 |   % 17\r
+       f2/d bf/d |   % 18\r
+       ef1 |   % 19\r
+       bf2/f f |   % 20\r
+       bf1 |   % 21\r
+       f2/g g:m7 |   % 22\r
+       ef1 |   % 23\r
+       ef2:m af:sus2 |   % 24\r
+       bf1 |   % 25\r
+       gf2:6 af:sus2 |   % 26\r
+       bf1 |   % 27\r
+       bf1:sus2/d |   % 28\r
+\r
+       % Chorus\r
+\r
+       ef1 |   % 29\r
+       g2:m7 f |   % 30\r
+       d1:m7 |   % 31\r
+       f2/g g:m7 |   % 32\r
+       c1:m7 |   % 33\r
+       ef2/f f |   % 34\r
+       bf1 |   % 35\r
+       bf1/d |   % 36\r
+       ef1 |   % 37\r
+       g2:m7 f |   % 38\r
+       d1:7/fs |   % 39\r
+       c2:m/g g:m7 |   % 40\r
+       ef1 |   % 41\r
+       bf4./f ef4/f f4. |   % 42\r
+\r
+       bf1 |   % 43\r
+       af4.:6.9 af8:sus2 s2 |   % 44\r
+       af4./ef ef8 s2 |   % 45\r
+       f2:sus4 f |   % 46\r
+\r
+       bf1 |   % 47\r
 \r
        bf1:sus2/d |   % 48\r
 \r
@@ -310,27 +304,18 @@ s1
 %\r
 % Chord rhythms\r
 %\r
-\r
-% Use a RhythmicStaff on the chords instead of this?\r
-% It almost works, but not quite. Doesn't collapse chords above to single notes...\r
-\r
 StaffC = \relative c\r
 {\r
-%      \set Voice.autoBeaming = ##f\r
-%      \set Staff.instrumentName = #"Rhythm"\r
-       \override Staff.TimeSignature #'style = #'()\r
-       \time 4/4\r
+       \numericTimeSignature\r
        \override NoteHead #'style = #'slash\r
+       \teeny\r
 \r
-       \repeat volta 2\r
-       {\r
-               % Intro\r
+       % Intro\r
 \r
-               c4 c c c |   % 1\r
-               c4. c8 ~ c2 |   % 2\r
-               c4. c8 ~ c2 |   % 3\r
-               c4 c c c |   % 4\r
-       }\r
+       c4 c c c |   % 1\r
+       c4. c8 ~ c2 |   % 2\r
+       c4. c8 ~ c2 |   % 3\r
+       c4 c c c |   % 4\r
 \r
        % Verse\r
 \r
@@ -347,59 +332,50 @@ StaffC = \relative c
        c4 c c c |   % 15\r
        c4 c c c |   % 16\r
 \r
-       \repeat volta 2\r
-       {\r
-               % Verse\r
-\r
-               c4 c c c |   % 17\r
-               c4 c c c |   % 18\r
-               c4 c c c |   % 19\r
-               c4 c c c |   % 20\r
-               c4 c c c |   % 21\r
-               c4 c c c |   % 22\r
-               c4 c c c |   % 23\r
-               c4 c c c |   % 24\r
-               c4 c c c |   % 25\r
-               c4 c c c |   % 26\r
-               c4 c c c |   % 27\r
-               c4 c c c \bar "||"   % 28\r
-\r
-               % Chorus\r
-\r
-               c4 c c c |   % 29\r
-               c4 c c c |   % 30\r
-               c4 c c c |   % 31\r
-               c4 c c c |   % 32\r
-               c4 c c c |   % 33\r
-               c4 c c c |   % 34\r
-               c4 c c c |   % 35\r
-               c4 c c c |   % 36\r
-               c4 c c c |   % 37\r
-               c4 c c c |   % 38\r
-               c4 c c c |   % 39\r
-               c4 c c c |   % 40\r
-               c4 c c c |   % 41\r
-               c4. c8 ~ c c4. |   % 42\r
-       }\r
-       \alternative\r
-       {\r
-               {\r
-                       c4 c c c |   % 43\r
-                       c4. c8 ~ c2 |   % 44\r
-                       c4. c8 ~ c2 |   % 45\r
-                       c4 c c c |   % 46\r
-               }\r
-               {\r
-                       c4 c c c |   % 47\r
-               }\r
-       }\r
+       % Verse\r
 \r
-       c4 c c c \bar "||"   % 48\r
+       c4 c c c |   % 17\r
+       c4 c c c |   % 18\r
+       c4 c c c |   % 19\r
+       c4 c c c |   % 20\r
+       c4 c c c |   % 21\r
+       c4 c c c |   % 22\r
+       c4 c c c |   % 23\r
+       c4 c c c |   % 24\r
+       c4 c c c |   % 25\r
+       c4 c c c |   % 26\r
+       c4 c c c |   % 27\r
+       c4 c c c \bar "||"   % 28\r
+\r
+       % Chorus\r
+\r
+       c4 c c c |   % 29\r
+       c4 c c c |   % 30\r
+       c4 c c c |   % 31\r
+       c4 c c c |   % 32\r
+       c4 c c c |   % 33\r
+       c4 c c c |   % 34\r
+       c4 c c c |   % 35\r
+       c4 c c c |   % 36\r
+       c4 c c c |   % 37\r
+       c4 c c c |   % 38\r
+       c4 c c c |   % 39\r
+       c4 c c c |   % 40\r
+       c4 c c c |   % 41\r
+       c4. c8 ~ c c4. |   % 42\r
+\r
+       c4 c c c |   % 43\r
+       c4. c8 ~ c2 |   % 44\r
+       c4. c8 ~ c2 |   % 45\r
+       c4 c c c |   % 46\r
+\r
+       c4 c c c |   % 47\r
+\r
+       c4 c c c |   % 48\r
 \r
        % Coda\r
 \r
 \stopStaff s1 \startStaff |\r
-\set Score.currentBarNumber = #49\r
 \r
        c4 c c c |   % 49\r
        c4. c8 ~ c2 |   % 50\r
@@ -409,7 +385,7 @@ StaffC = \relative c
        c4. c8 ~ c2 |   % 54\r
        c4. c8 ~ c2 |   % 55\r
        c4 c c c |   % 56\r
-       c1-\fermata \bar "|."   % 57\r
+       c1-\fermata |   % 57\r
 }\r
 \r
 \r
@@ -428,38 +404,43 @@ Dynamics =
 \score\r
 {\r
        <<\r
+               \Global         % The "roadmap" that everything else depends on\r
+\r
+               \context Staff\r
                <<\r
-%                      \new Staff = leadStaff { \new Voice = "lead" \LeadVox }\r
-                       \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }\r
+                       \new Voice = "lead" \LeadVox\r
+                       \new Voice = "riffs" \Riffs\r
                        \new Lyrics \lyricsto "lead" \LeadVoxText\r
                >>\r
 \r
-               \new ChoirStaff = "Rhythm"\r
+               \new ChoirStaff\r
                <<\r
-                       \new ChordNames = "chords" \Chords\r
-                       \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>\r
+                       \new ChordNames \Chords\r
+                       \new RhythmicStaff << \StaffC \Dynamics >>\r
                >>\r
 \r
                \set Score.skipBars = ##t\r
                \set Score.melismaBusyProperties = #'()\r
        >>\r
-\r
-       \layout\r
-       {\r
-%              \context { \Staff \RemoveEmptyStaves }\r
-%              ragged-last-bottom = ##t\r
-               ragged-last = ##t\r
-       }\r
 }\r
 \r
 \r
 \paper\r
 {\r
-  #(define fonts (make-pango-font-tree\r
-    "Times New Roman"\r
-    "DomCasual BT"\r
-    "Luxi Mono"\r
-    (/ staffSize 20)))\r
-\r
-%  top-margin = -0.25 \in\r
+       #(define fonts (make-pango-font-tree\r
+               "Times New Roman"\r
+               "LilyJAZZText"\r
+               "Luxi Mono"\r
+               (/ staffSize 20)))\r
+\r
+% Don't spread staves vertically across last page (default: t)\r
+%      ragged-last-bottom = ##f\r
+% Don't spread staves vertically across the page (default: f)\r
+%      ragged-bottom = ##t\r
+% Allow partial line for last stave (default: f)\r
+       ragged-last = ##t\r
+\r
+% To find out what's eating the space at the top...\r
+%      annotate-spacing = ##t\r
 }\r
+\r