New charts "How Great Thou Art" and "In The Garden".

[music] / creation-song.ly

diff --git a/creation-song.ly b/creation-song.ly
index 058afd7051f25ad3606cfb429868cb3641b84043..64f1691cb85e5d74b8095971f046fa25b8b4e530 100644 (file)
--- a/creation-song.ly
+++ b/creation-song.ly
@@ -12,14 +12,12 @@ staffSize = #16
 
 \header
 {
-%Let's bump up the title size and switch to the chord font. :-)
-
        title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Creation Song (Glory to the Lamb)" }
-%      composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
+       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Fernando Ortega" }
        arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "Arr. John Wierick/Ed Smart" }
        tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
 % Let's try a chord dictionary
-       subtitle = \markup { \center-column { G2 \fret-diagram-terse #"x;x;x;7;8;10;" } "     " \center-column { F2 \fret-diagram-terse #"x;x;x;5;6;8;" } }
+       subtitle = \markup { \center-column { \fret-diagram-terse #"x;x;x;7;8;10;" \override #'(font-family . sans) G2 } "     " \center-column { \fret-diagram-terse #"x;x;x;5;6;8;" \override #'(font-family . sans) F2 } }
 }
 
 % Useful tweak abbreviations (hn = harmony note)
@@ -37,7 +35,7 @@ hn = #(define-music-function (parser location arg) (ly:music?)
 Global =
 {
        \key g \major
-       \override Staff.TimeSignature #'style = #'()
+       \numericTimeSignature
        \time 6/4
 
        % Intro
@@ -120,7 +118,6 @@ Global =
 LeadVox = \relative c'
 {
        \clef G
-       \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 
        % Intro
 
@@ -251,6 +248,7 @@ LeadVox = \relative c'
        s1. |   % 100
 }
 
+
 LeadVoxText = \lyricmode
 {
        He wraps him -- self in light
@@ -294,6 +292,7 @@ DescantText = \lyricmode
        _ _ and e -- ver and e -- ver _
 }
 
+
 %
 % Riffs
 %
@@ -471,8 +470,9 @@ Chords = \chordmode
 
 Rhythm =
 {
-       \override Staff.TimeSignature #'style = #'()
+       \numericTimeSignature
        \override NoteHead #'style = #'slash
+       \teeny
 
        % Intro
 
@@ -538,7 +538,7 @@ Rhythm =
        c4 c c c c c |   % 51
        c4 c c c c c |   % 52
 
-       s1. % for Coda spacing
+       \stopStaff s1. \startStaff % for Coda spacing
 
        % Coda
 
@@ -643,7 +643,7 @@ Dynamics =
 \score
 {
        <<
-               \Global                                         % The "roadmap" that everything else depends on
+               \Global         % The "roadmap" that everything else depends on
 
                \context Staff
                <<
@@ -671,7 +671,7 @@ Dynamics =
 {
        #(define fonts (make-pango-font-tree
                "Times New Roman"
-               "DomCasual BT"
+               "JazzText"
                "Luxi Mono"
                (/ staffSize 20)))
 
@@ -684,6 +684,5 @@ Dynamics =
 
 % 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)
 }
+