File:Chopin Op.10 No.1.PNG

Summary[edit]

LilyPond source

The musical notation in this image was rendered by LilyPond, a free-software engraving program. Here is a listing of the LilyPond source used to create this file.

\version "2.12.0"

global = {
	\time 4/4
	\key c \major
}

tempoTextAlignment = \once \override TextScript #'extra-offset = #'( -3.7 . 10.5) 
tempoText = ^\markup { \large \bold { Allegro } \small { { \note #"4" #1 = 176 }.  } }

upper = \relative c'' {
	\global
	\clef treble
	\change Staff = "Staff_pfLower" \tempoTextAlignment c,16\rest\tempoText \stemUp \once \override TextScript #'extra-offset = #'( -3 . 4.5)  c,^\markup { \italic { legato } } g' c \change Staff = "Staff_pfUpper" e_> c g' c \stemDown e^> c g' c \ottava #1 \set Staff.ottavation = #"8" e^> c g' c |
	e^> c g c, \ottava #0 e^> c g c, e^> c g c, \stemUp e_> c \change Staff = "Staff_pfLower" g c, |
}

lower = \relative c' {
	\global
	\clef bass
	\override TieColumn #'tie-configuration = #'((-2.8 . -1) (-10 . -1)) <c, c,>1~ |
	<c c,> |
}

dynamics = {
	\overrideProperty #"Score.NonMusicalPaperColumn" #'line-break-system-details #'((alignment-offsets . (0 -4.5 -10 -18)))
  \override DynamicTextSpanner #'dash-period = #-1.0
	s1\f |
} 

pedal = {
	s32 s\sustainOn s16 s8 s2. |
	s2. s8. s64 s\sustainOff s32 |
}

\score {
  \new PianoStaff = "PianoStaff_pf" <<
    \new Staff = "Staff_pfUpper" \upper
    \new Dynamics = "Dynamics_pf" \dynamics
    \new Staff = "Staff_pfLower" << \lower >>
    \new Dynamics = "pedal" \pedal
  >>

  \layout {
    % define Dynamics context
    \context {
      \type "Engraver_group"
      \name Dynamics
      \alias Voice
      \consists "Output_property_engraver"
      \consists "Piano_pedal_engraver"
      \consists "Script_engraver"
      \consists "New_dynamic_engraver"
      \consists "Dynamic_align_engraver"
      \consists "Text_engraver"
      \consists "Skip_event_swallow_translator"
      \consists "Axis_group_engraver"

      pedalSustainStrings = #'("Ped." "*Ped." "*")
      pedalUnaCordaStrings = #'("una corda" "" "tre corde")
      \override DynamicLineSpanner #'Y-offset = #0
      \override TextScript #'font-shape = #'italic
      \override VerticalAxisGroup #'minimum-Y-extent = #'(-1 . 1)
    }
    % modify PianoStaff context to accept Dynamics context
    \context {
      \PianoStaff
      \accepts Dynamics
    }
	line-width = #250
  ragged-right-last = ##f
  }
}

\score {
  \new PianoStaff = "PianoStaff_pf" <<
    \new Staff = "Staff_pfUpper" << \global \upper \dynamics \pedal >>
    \new Staff = "Staff_pfLower" << \global \lower \dynamics \pedal >>
  >>
  \midi { 
    \context {
           \Score
           tempoWholesPerMinute = #(ly:make-moment 128 4)    
    }   
  }
}

Licensing[edit]

I, the copyright holder of this work, release this work into the public domain. This applies worldwide. In some countries this may not be legally possible; if so: I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.