%---------------------------------------------------------------- % _ _ _ _ % | | (_) |_ _ _ __ ___ _ __ __| | % | | | | | | | | '_ \ / _ \| '_ \ / _` | % | |___| | | |_| | |_) | (_) | | | | (_| | % |_____|_|_|\__, | .__/ \___/|_| |_|\__,_| % |___/|_| % % This is a Lilypond source code file. For more information % about the Lilypond music typesetting program, visit % % http://lilypond.org % % The code in this source file is released under % a GPLv3 license. For licensing information visit % % http://www.gnu.org/licenses/quick-guide-gplv3.html % %---------------------------------------------------------------- \version "2.18.0" %\include "showlast.ly" %\include "showfirst.ly" \header { tagline = "" % removed } \paper { #(set-paper-size "letter") ragged-last-bottom = ##t } #(ly:set-option 'point-and-click #f) #(set-global-staff-size 28) FO = #(define-music-function (parser location offsetX offsetY) (number? number?) #{ \once \override Voice.Fingering.extra-offset = #(cons offsetX offsetY ) #}) sfod = \set fingeringOrientations = #'(down) givenbelow = \markup { \tiny \halign #2 {Given part, below.}} givenabove = \markup { \tiny \halign #2 {Given part, above.}} nct = \finger \markup \teeny {\fontsize #-3 "x"} opt = \markup \tiny { \whiteout \pad-markup #0.4 "or"} % define fingering offset FO = #(define-music-function (parser location offsetX offsetY) (number? number?) #{ \once \override Voice.Fingering.extra-offset = #(cons offsetX offsetY ) #}) eight = \finger \markup \teeny {\fontsize #-2 "8"} four = \finger \markup \teeny {\fontsize #-2 "4+"} sixeight = \finger \markup \teeny {\fontsize #-2 {\tied-lyric #"6~8"}} global = { % \time 3/4 \override Staff.BarLine.allow-span-bar = ##f %\numericTimeSignature %\key c \major \set Staff.midiInstrument = "piano" %\override Score.MetronomeMark #'padding = #3.8 %\override Staff.TimeSignature #'stencil = ##f % \set Timing.beamExceptions = #'() % \set Timing.baseMoment = #(ly:make-moment 1/4) % \set Timing.beatStructure = #'(1 1 1 1) \override Glissando.thickness = #3 } sop = \relative c'' { \global \sfod 8 d\nct b\nct b\nct \nct d | g\nct a_\four^\nct b d\nct c\nct | \noBreak 4 | 8\nct c \nct d c2_\sixeight \bar "|." } bass = \relative c { \global \clef "bass" c4_\givenbelow e f^\markup {"IV"} d^\markup {"II"} g^\markup {"V"} f^\markup {"V7"} e c' | a8 c_\nct b a_\nct g b_\nct a g_\nct | f4 g8 f\nct e d\nct c4 } \score { \new PianoStaff \with { \override StaffGrouper.staff-staff-spacing = #'( (basic-distance . 2) (padding . .5)) } << \set PianoStaff.instrumentName = \markup \center-column { Ex. "66." } \new Staff = "up" << \context Voice = "soprano" \sop >> \new Staff = "down" << %\context Voice = "intervals" \intervals %\context Voice = "tenor" \tenor \context Voice = "bass" \bass >> >> \layout { \context { \Score \remove "Bar_number_engraver" } } \midi {\tempo 4 = 100} }