X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fmanual%2Fkeyboard-headword.ly;h=6e453ffcb44f13aaabc2961730210325b433a2be;hb=a7b2af1b6033a5b2e7e93eb7aceb1a4933e3c624;hp=5d19ccb508b503e9d4167469ae220bc1ac427105;hpb=3865ccb7d20f6cb884dc7cb152f35a68756013f4;p=lilypond.git diff --git a/input/manual/keyboard-headword.ly b/input/manual/keyboard-headword.ly index 5d19ccb508..6e453ffcb4 100644 --- a/input/manual/keyboard-headword.ly +++ b/input/manual/keyboard-headword.ly @@ -1,221 +1,245 @@ -\version "2.11.49" +\version "2.11.51" \include "english.ly" #(set-global-staff-size 15) -\paper{ - ragged-right=##t - line-width=17\cm - indent=0\cm +\paper { + line-width = 16\cm + indent = 0\cm +} + +% NR 2.2 Keyboard instruments + +% M. Ravel, Sonatine (1905) +% First movement + +\layout { + \context { + \Score + \remove "Bar_number_engraver" + } + \context { + \Staff + \remove "Time_signature_engraver" + } +} + +fermataLong = \markup { + \override #'(direction . 1) + \override #'(baseline-skip . 2) { + \dir-column { + \musicglyph #"scripts.ufermata" + \text \italic \hcenter long + } + } } \new PianoStaff << \set PianoStaff.connectArpeggios = ##t \new Staff { - \time 2/4 - \key fs \major - << - \new Voice { - \voiceOne - fs''8 ( - ^ \markup \column { - \line \bold { Un peu retenu } - \line \italic { très expressif } } - es''16 - cs''16 - as'4 ) - | - fs''8 ( - es''16 - cs''16 - as'4 ) - | - fs''8 ( - es''16 - cs''16 - as'8 - cs''8 ) - | - } - \new Voice { - \voiceTwo - r8 \ppp - fs'4 ( - es'8 ) - | - r8 - fs'4 ( - es'8 ) - | - r8 - fs'4 ( - es'8 ) - | - } - >> - \clef bass - 4 ( - ^ \markup \bold { Rall. } - \once \override Script #'padding = #2 - 8 ) \fermata - \noBeam - \clef treble - \slurUp - 8 ( \pp - | - 4. ) - ^ \markup \bold { a tempo } - \slurUp - 8 ( - | - 4. ) - << - \new Voice { - \voiceOne - 8 ( - ^ \markup \bold { Rallentando } - | - cs'8 - b16 - cs'16 - d'8 - e'16 - fs'16 - | - 4. ) - s8 - | - r8 - 4 \arpeggio - e''16 ( - ^ \markup \bold { Lent } - fs''16 - | - \stemDown - 2 ) - | - } + \time 2/4 + \key fs \major + << \new Voice { - \voiceTwo - s8 - | - 4 \< - 4 \> - | - s4. \! - \slurUp - \once \override Script #'direction = #up - 8 ( \accent - | - 4. ) - 8 \ppp \> - | - s8 \! - \stemDown - \once \override Script #'direction = #up - #(set-octavation 1) - % \once \override Arpeggio #'extra-offset = #'(-0.25 . - % 0) - 4. \arpeggio \fermata - #(set-octavation 0) - \bar "|." - } - >> - } - \new Staff << - \set Staff.pedalSustainStyle = #'bracket - \key fs \major - \clef bass - \new Voice { \voiceOne - ds'4 \tenuto - cs'4 \tenuto + fs''8 ( ^\markup { + \override #'(baseline-skip . 2.4) \column { + \line \bold { Un peu retenu } + \line \italic { très expressif } + } + } + es''16 + cs''16 + as'4 ) + | + fs''8 ( + es''16 + cs''16 + as'4 ) + | + fs''8 ( + es''16 + cs''16 + as'8 + cs''8 ) + | + } + \new Voice { + \voiceTwo + gs'8\rest \ppp + fs'4 ( + es'8 ) | - ds'4 \tenuto - cs'4 \tenuto + gs'8\rest + fs'4 ( + es'8 ) | - ds'4 \tenuto - cs'4 \tenuto + gs'8\rest + fs'4 ( + es'8 ) | - s8 - \clef treble - 8 [ - \clef bass - 8 \fermata ] - s8 + } + >> + \clef bass + 4 ( ^ \markup \bold { Rall. } + \override Script #'stencil = #(lambda (grob) + ly:script::print (grob-interpret-markup grob fermataLong)) + 8 ) \fermata + \noBeam + \clef treble + \slurUp + \once \override Hairpin #'to-barline = ##f + 8 ( \pp \> + | + 4. \! ) ^\markup \bold { a Tempo } + \slurUp + 8 ^\( \> + | + 4. \! \) + << + \new Voice { + \voiceOne + 8 ( | - r8 - \clef treble - 4 \tenuto - s8 + cs'8 ^\markup \bold { Rallentando } + b16 + cs'16 + d'8 + e'16 + fs'16 | - r8 - \clef treble - 4 \tenuto + 4. ) s8 | - s2 - | r8 - \clef treble - 4 - \clef bass - s8 - | - s8 - \clef treble - 4 \arpeggio - \clef bass - s8 - | - s8 - \clef treble - 4. \arpeggio \fermata + 4 \arpeggio + e''16 ( ^\markup \bold { Lent } + fs''16 | - } - \new Voice { \voiceTwo - ds'8 [ ( - < ds bs >8 - cs'8 - < ds as >8 ] ) - | - ds'8 [ ( - < ds bs >8 - cs'8 - < ds as >8 ] ) - | - ds'8 [ ( - < ds bs >8 - cs'8 - < ds as >8 ] ) + 2 ) | - \once \override Script #'outside-staff-priority = #100 - \once \override TextScript #'outside-staff-priority = #500 - 4. \fermata - _ \markup \italic { ped. } - 8 ( - | - 4. ) \sustainDown - \clef bass - 8 ( \sustainUp - | - 4. ) \sustainDown - \clef bass - 8 ( \sustainUp - | - 4 - 4 + } + \new Voice { + \voiceTwo + s8 | - 4. ) \sustainDown - 8 ( \sustainUp + 4 \< + 4 \> | - 4. ) \sustainDown + s4. \! \slurUp - 8 ( \sustainUp \sustainDown + \once \override Script #'direction = #UP + 8 ( \accent | - 2 ) \sustainUp \sustainDown + 4. ) + \once \override Hairpin #'to-barline = ##f + 8 \ppp \> | - } + s8 \! + \stemDown + \once \override Script #'direction = #UP + #(set-octavation 1) + \voiceOne + \once \override PianoStaff.Arpeggio #'padding = #0.8 + 4. \arpeggio \fermata + #(set-octavation 0) + \bar "|." + } + >> + } + \new Staff << + \set Staff.pedalSustainStyle = #'bracket + \key fs \major + \clef bass + \new Voice { + \voiceOne + ds'4 \tenuto + cs'4 \tenuto + | + ds'4 \tenuto + cs'4 \tenuto + | + ds'4 \tenuto + cs'4 \tenuto + | + s8 + \clef treble + 8 [ + \clef bass + 8 \fermata ] + s8 + | + fs8\rest + \clef treble + 4 \tenuto + s8 + | + fs8\rest + \clef treble + 4 \tenuto + s8 + | + s2 + | + ds8\rest + \clef treble + 4 + \clef bass + s8 + | + s8 + \clef treble + 4 \arpeggio + \clef bass + s8 + | + s8 + \clef treble + 4. \arpeggio \fermata + | + } + \new Voice { + \voiceTwo + ds'8 [ ( + < ds bs >8 + cs'8 + < ds as >8 ] ) + | + ds'8 [ ( + < ds bs >8 + cs'8 + < ds as >8 ] ) + | + ds'8 [ ( + < ds bs >8 + cs'8 + < ds as >8 ] ) + | + \once \override Script #'outside-staff-priority = #100 + \once \override TextScript #'outside-staff-priority = #500 + 4. \fermata _\markup \italic { ped. } + 8 ( + | + 4. ) \sustainOn + \clef bass + 8 \( \sustainOff + | + 4. \) \sustainOn + \clef bass + 8 ( \sustainOff + | + 4 + 4 + | + 4. ) \sustainOn + 8 ( \sustainOff + | + 4. ) \sustainOn + \slurUp + 8 ( \sustainOff \sustainOn + | + 2 ) \sustainOff \sustainOn + | + } >> >> -