\version "2.12" #(ly:set-option 'point-and-click #f) #(set-global-staff-size 16) #(define-markup-command (vspace layout props amount) (number?) "This produces a invisible object taking vertical space." (if (> amount 0) (ly:make-stencil "" (cons -1 1) (cons 0 amount)) (ly:make-stencil "" (cons -1 1) (cons amount amount)))) chorus = \markup { \fontsize #1 \italic "Chorus:" } %% Function to put chord names over the "additional lyrics" lyrics #(define-markup-command (lwc layout props lyric chord) (string? string?) (interpret-markup layout props (markup #:override '(baseline-skip . 3.25) #:override '(direction . 1) (#:dir-column (lyric #:override '(font-name . "Geneva") #:override '(font-size . 1) chord))))) muDSeven = \markup \override #'(font-name . "Geneva") \override #'(font-size . 1) \concat { D \lower #1 \fontsize #-2 7 } lyrX = #(define-music-function (parser location saX) (number?) #{ \once \override LyricText #'self-alignment-X = $saX #}) chExceptionMusic = { 1-\markup { \lower #1 \fontsize #-2 "7" } } chExceptions = #( append ( sequential-music-to-chord-exceptions chExceptionMusic #t) ignatzekExceptions) #(set-global-staff-size 15) %% universal paper and titling definitions \paper { paper-width = 8.5\in paper-height = 11\in top-margin = 0.5\in bottom-margin = 0.4\in line-width = 7\in indent = 1\in page-top-space = 0\in head-separation = 0\in after-title-space = 1\in print-all-headers = ##t ragged-bottom = ##t ragged-bottom-last = ##t scoreTitleMarkup = \markup \null bookTitleMarkup = \markup { \column { \override #'(baseline-skip . 4) \column \override #'(font-series . medium) { \fill-line { \fontsize #8 \fromproperty #'header:title } \fill-line \override #'(baseline-skip . 2.7) { "" \center-column { \fontsize #0.5 { "Words & Music in" "PUBLIC DOMAIN" } } } } } } } \header { tagline = ##f } \layout { %% Score \context { \Score % basics, including spacing \override PaperColumn #'keep-inside-line = ##t \override SpacingSpanner #'base-shortest-duration = #(ly:make-moment 1 12) \override VerticalAxisGroup #'remove-first = ##t % BarLine \override BarLine #'space-alist #'next-note = #'(semi-fixed-space . 1.2) % BarNumber \override BarNumber #'transparent = ##t % Beams \override Beam #'damping = #2 % Chords chordNameExceptions = #chExceptions % Lyrics lyricMelismaAlignment = #-0.9 } %% Voice \context { \Voice \consists "Melody_engraver" \override Stem #'neutral-direction = #1 } %% Lyrics \context { \Lyrics \override LyricExtender #'left-padding = #0.5 \override LyricSpace #'minimum-distance = #1 %% default = 0.45 \override VerticalAxisGroup #'minimum-Y-extent = #'(-2 . 1) } %% ChordNames \context { \ChordNames \override ChordName #'font-size = #1 \override ChordName #'extra-offset = #'(0 . -0.5) \override ChordName #'font-name = #"Geneva" } }