% Created on Tue Feb 08 11:14:06 CET 2011
\version "2.12.3"

#(set-global-staff-size 13)

\header {
        title = "Fantasia in Eb Major" 
        composer = "Pachelbel" 
 tagline = "Guillaume address@hidden Février 2011" 

}

\include "italiano.ly"


staffPiano = \new PianoStaff {
        \set PianoStaff.midiInstrument = #"acoustic grand"
        \set PianoStaff.instrumentName = #"Orgue"
                \time 4/4
                                        \override Score.MetronomeMark #'stencil = ##f
                        \tempo 4 = 100 
                        <<
                \context Staff = "RH" {  % Right hand 
                        \clef treble
                        \key sib \major
                        \relative do' {
                        <<
                        \new Voice {
                                \voiceOne       
                        
                        s1
                        do4. reb8 sib4. mib8 ~
                        mib16 mib re do re8.\trill mib16 re4. fa8
                        sol4 ~ sol16 mib lab8 ~ lab16 lab sol8 \stemDown do8. re16
                        
                        sib4 ~ sib16 sib mib8 ~ mib16 fa do mib re8.\trill re16
                        mib8. fa16 sol re mib sib \stemUp sol lab sib do re, sol fa\trill mib 
                        fa2 ~ fa8 ~ fa32 sol la sib \stemDown la sol fa16 fa'8 ~
                        fa16 sib la sol fa mib re do re32 do re mib fa la, sib do \stemUp re4
                        sib2 ~ sib8 ~ sib32 sib la sol r8 mib'
                        \stemDown re4 do ~ do16 do re la sib4 ~
                        sib8. sib16 \stemUp do sol lab sib lab2
                        fa ~ fa16 fa sol lab sib do fa, sol
                        mi16. fa32 mi re32 do16 ~ \stemDown do'4 ~ do16. re32 mi re do16 fa4 ~
                        fa16 fa sol fa mib!8.\trill re16 mib re do sol \stemUp mib fa sol re 
                        fa2 re4 ~ re16 re sol re
                        do do re mib fa sol lab16. do,32 si8 ~ si32 do si la sol16 sol' do,8 ~
                        do16 do re do sib8. la16 sib8. do16 r sol'8 la16 
                        sib2 sol4 ~ sol16 sib la sol
                        fad2 r32 re mi fad sol la sib do re16 re, sol8 ~
                        sol16 sol la sol fa!8. mi!16 fa8 re \stemDown fa'4\mordent ~ 
                        fa16 sol fa mib re do si la sol re' mib fa mib8.\trill re16
                        \stemUp re'16\rest sol,8. do16\rest fa,8 sol16 si\rest mib,8 mib16 r mib re8
                        r16 sol, do8 r16 re si8 r16 sol do8~ do4
                        
                        
                        
                                
                                        }
                                        
                        \new Voice \relative do' {
                                \voiceTwo
                                        
                        s1*2
                        s2 r8 sib do8. re16 mib4 s2.                  
                        s1*3 s2. r8 fa  ~
                        fa4 mi fa la
                        s1
                        s2
                        do, ~ do8. do16 s2.
                        s1
                        s1
                        s1
                        s1
                        s2. sib8 do
                        re2 ~ re8 do32 sib la sol do4 ~
                        do8 do
                        s2.
                        s1
                        s1
                        mib'8. mib16 re4 do fa,8. sol16
                        mib8. do16 re8. fa16 mib2
                                                
                                        }
                        \new Voice \relative do' {
                        \voiceThree
                        
                        s1*21
                        si8\rest do' si,8\rest \stemDown si'! la,\rest sol' s4
                        \stemNeutral s2. lab4
                                                
                                                
                                        }
                        >>      
                                
                        }
                }
                \context Staff = "LH" {  % Left hand                    
                        \clef bass
                        \key sib \major
                        \relative do {
                                
                        <<      
                        \new Voice {
                        \voiceOne
                        
                        s2 r4 sib' ~ 
                        sib lab ~ lab8 sol16 fa sol4
                        < fa lab >2 sol4 lab
                        sib8. reb16 do4 sib8. sib16 ~ sib sib lab8 ~
                        lab16 lab sol fa sol8. sol16 <fa lab >2
                        sol1
                        la
                        sib ~
                        sib16 sib do re do8. sib32 do re4 do ~
                        do16 do sib8 ~ sib16 sib la8 re4 ~ re16 sib do re
                        do2 s2
                        s4 sib8. la16 sib2 ~
                        sib4. lab16 sol lab4. sol16 fa
                        sol1
                        r16 sol la si do8 sol sol2 ~
                        sol4 fa2 mib4
                        re1
                        s1
                        s4 sib'8.\trill la16 sib2
                        la1
                        sol1 ~
                        sol1
                        s1
                        mib1 ~
                        mib1
                        
                        
                        }
                                
                        \new Voice \relative do {
                        \voiceTwo
                        
                        mib1 ~
                        mib1 ~
                        mib1 ~
                        mib1 ~
                        mib1 ~
                        mib1 ~
                        mib1
                        re
                        sol2 fa2 ~
                        fa1 ~
                        fa2 ~
                        fa16. fa32 mib16 fa do mib reb16.\trill do32
                        reb1
                        do1 ~
                        do1 ~
                        do2 ~ do8 do sib!4\trill 
                        lab2 sol2 ~
                        sol1 ~
                        sol8 ~ sol32 sol' fa mib re16 fa mib16.\trill re32 mib2
                        re1 ~ re2 ~ re4. do8
                        si1
                        do1 ~
                        \stemUp do2 ~ do8. do16 sib8.\trill lab16 
                        sol1
                        lab1 ~
                        \stemDown lab2. ~ lab16 lab sol fa
                        mi1
                        
                        
                        
                        }
                        
                        \new Voice \relative do' {
                        \voiceThree
                        
                        r2 sol
                        s1*15
                        s2 r16 sol la8
                        
                        }
                                
                        >>      
                                
                        }
                }
        >>
}



\score {
        <<
                \staffPiano
        >>
        
        \midi {
        }

  \layout {
  }
}

\paper {
        #(set-default-paper-size "a4")
        top-margin = 20\mm % définit la marge du haut
        left-margin = 13\mm % définit la marge de gauche
        between-system-padding = #5 %interligne

        line-width = 18\cm
        indent = 1\cm
                } 
                
                \markup { Grrr !! }