%% LilyPond file generated by Denemo version 1.1.9

%%http://www.gnu.org/software/denemo/

\version "2.18.0"

DenemoGlobalTranspose = #(define-music-function (parser location arg)(ly:music?) #{\transpose c c #arg #})
AutoBarline = {}
AutoEndMovementBarline = \bar "|."

\defineBarLine ":|]-RepeatEndFirstTime" #'(":|]" "" "")

\defineBarLine ":|]-RepeatEnd" #'(":|]" "|" "")

\defineBarLine "[|:-RepeatStart" #'("||" "[|:" "")

\defineBarLine "||-Double" #'("||" "|" "")

\defineBarLine "|-Single" #'("|" "|" "")

\defineBarLine "|" #'("|" "|" "|")
BarRepeatEndFirstTime = \bar ":|]-RepeatEndFirstTime"
BarRepeatEnd = \bar ":|]-RepeatEnd"
BarRepeatStart = \bar "[|:-RepeatStart"
BarDouble = \bar "||-Double"
BarSingle = \bar "|-Single"

       
#(define ((bars-per-line-engraver bar-list) context)
  (let* ((working-copy bar-list)
         (total (1+ (car working-copy))))
    `((acknowledgers
       (paper-column-interface
        . ,(lambda (engraver grob source-engraver)
             (let ((internal-bar (ly:context-property context 'internalBarNumber)))
               (if (and (pair? working-copy)
                        (= (remainder internal-bar total) 0)
                        (eq? #t (ly:grob-property grob 'non-musical)))
                   (begin
                     (set! (ly:grob-property grob 'line-break-permission) 'force)
                     (if (null? (cdr working-copy))
                         (set! working-copy bar-list)
                         (begin
                           (set! working-copy (cdr working-copy))))
                           (set! total (+ total (car working-copy))))))))))))
\layout {
   \context {
      \Score
      %use the line below to insist on your layout
      %\override NonMusicalPaperColumn.line-break-permission = ##f
      \consists #(bars-per-line-engraver '( 4))}}                             
                          
 CompactChordSymbols = {
        <c f bes d'>^\markup\scale #'(0.4 . 0.6) \bold {9 \scale #'(0.8 . 1) sus} 
        <c b>^\markup \bold\scale #'(.3 . .4) \override #'(thickness . 0.5)  {\triangle ##f} 
        <c d g>^\markup\scale #'(0.4 . 0.6) \bold { 9  \scale #'(0.8 . 1)  sus2 } 
        <c f g>^\markup\scale #'(0.4 . 0.6) \bold { 9  \scale #'(0.8 . 1)  sus4 } 
        <c ees bes>^\markup\scale #'(0.4 . 0.6) \bold {-7} 
        <c e gis>^\markup\scale #'(0.4 . 0.6) \bold {+} 
        %<c es ges bes>^\markup\scale #'(0.5 . 0.7) \bold {ø} 
        <c ees ges bes>^\markup\scale #'(0.5 . 0.7) \bold {ø} 

        <c ees ges>^\markup\scale #'(0.5 . 0.6) \bold {\hspace #0 o} 
        <c e g b>^\markup\scale #'(.3 . .4) \bold \override #'(thickness . .5)  { \triangle ##f } 
        <c b a'>^\markup \bold \override #'(thickness . .5)  { \scale #'(.3 . .4) \triangle ##f \scale #'(0.4 . 0.6) 13 } 
}

                         
                          
                          
                          

% The music follows

MvmntIVoiceI = {
         \time 4/4<>-\tweak #'extra-offset #'(-4.0 . -4.0) -\tweak baseline-skip #2.0   ^\markup\scale #'(1.5 . 1.8)\column{\line\large{\bold 4}\line\large{\bold 4}} \BarSingle c'1\AutoBarline
         <c' ees' g'>\AutoBarline
         <c' bes'>\AutoBarline
         <c' a'>\AutoBarline
%5
         <c' ees' bes'>\AutoBarline
         <c' ees' a'>\AutoBarline
         <c' ees' ges' bes'>\AutoBarline
         <c' f' bes' d''>\AutoBarline
         <c' b'>\AutoBarline
%10
         <c' d''>\AutoBarline
         <c' b' a''>\AutoBarline
         <c' f' g'>\AutoBarline
         <c' d' g'> \key d \major\AutoBarline
         cis'\AutoBarline
%15
         <cis' e' gis'>\AutoBarline
         <cis' b'>\AutoBarline
         <cis' ais'>\AutoBarline
         <cis' e' b'>\AutoBarline
         <cis' e' ais'>\AutoBarline
%20
         <cis' e' g' b'>\AutoBarline
         <cis' fis' b' dis''>\AutoBarline
         <cis' bis'>\AutoBarline
         <cis' dis''>\AutoBarline
         <cis' bis' ais''>\AutoBarline
%25
         <cis' fis' gis'>\AutoBarline
         <cis' dis' gis'> \key bes \major\AutoBarline
         bes\AutoBarline
         <bes des' f'>\AutoBarline
         <bes aes'>\AutoBarline
%30
         <bes g'>\AutoBarline
         <bes des' aes'>\AutoBarline
         <bes des' g'>\AutoBarline
         <bes des' fes' aes'>\AutoBarline
         <bes ees' aes' c''>\AutoBarline
%35
         <bes a'>\AutoBarline
         <bes c''>\AutoBarline
         <bes a' g''>\AutoBarline
         <bes ees' f'>\AutoBarline
         <bes c' f'> \AutoEndMovementBarline
}



\addQuote "Unnamed Mvmnt 1" \MvmntIVoiceI



%Default Score Layout
\header{DenemoLayoutName = "Default Score Layout"}

\header {
tagline = \markup {"/home/rshann/AllChords.denemo" on \simple #(strftime "%x" (localtime (current-time)))}

}
\layout {indent = 0}
#(set-default-paper-size "a4")
#(set-global-staff-size 7)
\paper {

#(set! paper-alist (cons '("custom-size" . (cons (* 5 cm) (* 8.1 cm))) paper-alist))
#(set-paper-size "custom-size")
system-system-spacing =
#'((basic-distance . 2)
(minimum-distance . 2)
(padding . 2))

page-limit-inter-system-space = ##t
page-limit-inter-system-space-factor = 1.2
}

\score { %Start of Movement
 <<

<< \set Score.proportionalNotationDuration = #(ly:make-moment 1/4)

<< 
<< \override Score.BarNumber.break-visibility = #end-of-line-invisible
                \set Score.barNumberVisibility = #(every-nth-bar-number-visible 10000) 
<<  \new ChordNames \with {chordNameExceptions = #(sequential-music-to-chord-exceptions CompactChordSymbols #t)                \consists "Bar_engraver"
                 \consists "Script_engraver"
                 \consists "Text_engraver"
                 \consists "Multi_measure_rest_engraver"
                 %\override ChordName.font-size=#12
                 \override ChordName.Y-extent = ##f
                 \override ChordName.extra-spacing-width=#'(+inf.0 . -inf.0)
                 \override ChordName.extra-offset = #'(0 . -2)
                 \override BarLine.bar-extent = #'(-3.5 . 3.5)
                 \override BarLine #'hair-thickness = #1.2     
                 \numericTimeSignature 
            }
                                 

 \MvmntIVoiceI
>>
>>
>>
>>
>>

\layout {

\context {
        \Score
        chordCompactScale = #'(2.5 . 2.0)
        } \set noChordSymbol = \markup \smaller \bold  "/"
}

} %End of Movement