]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/manual/editorial-headword.ly
Inspirational headwords from Trevor B, thanks!
[lilypond.git] / input / manual / editorial-headword.ly
diff --git a/input/manual/editorial-headword.ly b/input/manual/editorial-headword.ly
new file mode 100644 (file)
index 0000000..12d7fa8
--- /dev/null
@@ -0,0 +1,119 @@
+\version "2.11.34"
+\include "english.ly"
+
+% NR 1.7 Editorial annotations
+
+% Beethoven, Op. 31, No. 3
+% Piano sonata 18, Movt II, Scherzo
+% Measures 9 - 14
+
+\paper {
+  #(define dump-extents #t)
+  indent = 0\mm
+  ragged-right = ##t
+  line-width = 16\cm
+  force-assignment = #""
+  line-width = #(- line-width (* mm  3.000000))
+}
+
+\layout { }
+
+\new PianoStaff <<
+
+   % RH Staff
+   \new Staff {
+      \clef treble
+      \key af \major
+      \time 2/4
+      \set Staff.fingeringOrientations = #'(up up)
+      \set Score.currentBarNumber = #9
+      \partial 8
+      <af''-4 c''>8 \staccato
+      |
+      \set doubleSlurs = ##t
+      <bf''-5 df''-2>4 (
+      <af''-4 c''>8 \staccato )
+      \noBeam
+      c''8-5 \staccato \pp
+      |
+      \set doubleSlurs = ##f
+      bf'8.. (
+      af'32-1
+      g'8-2 ) \staccato
+      f'8-3 \staccato
+      |
+      e'4-2
+      r8
+      \once \override Script #'script-priority = #-100
+      \afterGrace
+         f'8 ( \trill ^ \markup { \finger "3-5-3-5" }
+         { e'16-2 [ f'16-3 ] }
+      |
+      g'8..-5
+      f'32
+      e'8-3 ) \staccato
+      d'8-2 \staccato
+      |
+      c'4-3
+      r8
+      r16.
+      c'32-3 \pp
+      |
+      c'8-2
+      r16.
+      c'32
+      c'8
+      r16.
+      c'32
+      |
+      c'8
+   }
+   
+   % LH Staff
+   \new Staff {
+      \key af \major
+      \clef treble
+      \override Fingering #'direction = #down
+      \set Staff.fingeringOrientations = #'(down down)
+      \partial 8
+      <af' af>8 \staccato
+      \set doubleSlurs = ##t
+      <g'-2 ef'-3>4 (
+      <af' af>8 ) \staccato
+      \noBeam
+      \clef bass
+      c'8-1 \staccato
+      |
+      \set doubleSlurs = ##f
+      bf8.. (
+      af32
+      g8-1 ) \staccato
+      f8 \staccato
+      |
+      e4-3
+      r8
+      \afterGrace
+         f8 ( \trill _ \markup { \finger "2-1" }
+         { e16-3 [ f16 ] }
+      |
+      g8..-1
+      f32
+      e8-3 ) \staccato
+      d8-2 \staccato
+      |
+      c4-3
+      r8
+      r16.
+      c32-3
+      |
+      c8-2
+      r16.
+      c32
+      c8
+      r16.
+      c32
+      |
+      c8
+   }
+
+>>