From: tuckerjohnson Date: Wed, 20 Apr 2022 01:12:41 +0000 (-0400) Subject: more work engraving X-Git-Url: https://git.newer.systems/?a=commitdiff_plain;h=d0b29d70b38b9254622d69c5fd81a76b1cea9ca7;p=circumnutation.git more work engraving --- diff --git a/lilypond-files/21-inventions.ly b/lilypond-files/21-inventions.ly index 8b55a58..6e78b76 100644 --- a/lilypond-files/21-inventions.ly +++ b/lilypond-files/21-inventions.ly @@ -11,6 +11,7 @@ \include "front-matter/pp-front-matter.ly" \include "manuscripts/pp-i1.ly" \include "manuscripts/pp-i2.ly" +\include "manuscripts/pp-i3.ly" \include "manuscripts/pp-i19.ly" \include "manuscripts/pp-i20.ly" \include "manuscripts/pp-i21.ly" diff --git a/lilypond-files/eng-files/pp-document-structure.ly b/lilypond-files/eng-files/pp-document-structure.ly index 5c64cee..5f449a2 100644 --- a/lilypond-files/eng-files/pp-document-structure.ly +++ b/lilypond-files/eng-files/pp-document-structure.ly @@ -17,10 +17,10 @@ \score { \header { title = \markup { \fontsize #1 \xtitle } - subtitle = \markup { \italic \xsub } + subtitle = \markup { \medium \italic \xsub } composer = \xcomp poet = \markup { "piano" } - instrument = \markup { \bold \italic "sequence " \number 1 } + instrument = \markup { \italic "sequence" \number 1 \smaller \medium \italic " (sunwise)" } piece = \markup { \large { \bold "prelude" } } } \new PianoStaff \with { \consists "Merge_rests_engraver" } << @@ -77,38 +77,46 @@ } } } + \score { + \header { + piece = \markup { \large { \bold "circumnutation" } } + } + \new PianoStaff << + \set PianoStaff.connectArpeggios = ##t + \override PianoStaff.Arpeggio.arpeggio-direction = #UP + \new Staff = "ui3" { + \accidentalStyle modern + << + \relative \voiceAithree + \\ + \relative \voiceDithree + \\ + \relative \voiceBithree + \\ + \relative \voiceCithree + >> + } + \new Staff = "di3" { \clef bass + \accidentalStyle modern + << + \relative \voiceEithree + \\ + \relative \voiceGithree + \\ + \relative \voiceFithree + >> + } + >> + \layout { + \context { + \Score + \override BarNumber.font-size = #1 + \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/16) + \override TimeSignature.stencil = ##f + } + } + } - - - \score { - \header { - instrument = \markup { \bold \italic { "sequence " \number 7 } } - piece = \markup { \large { \bold "panicle" } } - } - \new PianoStaff \with { \consists "Merge_rests_engraver" } << - \set PianoStaff.connectArpeggios = ##t - \override PianoStaff.Arpeggio.arpeggio-direction = #UP - \new Staff = "ut4" { - \accidentalStyle modern - << - \relative \voiceApthree - >> - } - \new Staff = "dt4" { \clef bass - \accidentalStyle modern - << - \relative \voiceBpthree - >> - } - >> - \layout { - \context { - \Score - \override BarNumber.font-size = #1 - \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/16) - } - } - } \score { \header { diff --git a/lilypond-files/manuscripts/pp-i2.ly b/lilypond-files/manuscripts/pp-i2.ly index 2a92756..6d49871 100644 --- a/lilypond-files/manuscripts/pp-i2.ly +++ b/lilypond-files/manuscripts/pp-i2.ly @@ -4,45 +4,45 @@ utwo = \change Staff = "ui2" dtwo = \change Staff = "di2" voiceAitwo = { \tmarktthree \omit Staff.BarLine \override Staff.BarLine.allow-span-bar = ##f -\time 7/8 c'8[\mp d e-. f->-. \change Staff = "di2" g,-. a-. b-.] | +\time 7/8 c'8[\offset X-offset #-2.5 \offset Y-offset #-2 \mp d-- e f->-. \change Staff = "di2" g,-. a-. b-.] | b8[-. \change Staff = "ui2" c-. d-. e-. f-. g-. a->-.] | -e[-.-> f-. g a-. \change Staff = "di2" bes,, \change Staff = "ui2" c''-. \change Staff = "di2" d,,-.] | +e[-.-> f-. g a \change Staff = "di2" bes,, \change Staff = "ui2" c''-. \change Staff = "di2" d,,] | \change Staff = "ui2" c''-.[ \change Staff = "di2" d,,-. \utwo ees''-. \dtwo f,,-. g-. \utwo aes''-. bes,-.->] | -\dtwo e,,-.[ \utwo f''-. g,-.-> \dtwo a,-. \utwo bes''-. \dtwo c,, \utwo d''-.] | -\dtwo b,,-.[ \utwo cis d-. e-. fis-. g-.-> a-.] | -a-.[ b-. c-.-> d-. e-. f-. g-.] | -\dtwo g,,,[ \utwo aes'''-. bes,-.-> \dtwo c,,-. des-. \utwo ees''' f-.] | +\stemUp \dtwo e,,-.[ \utwo f''-. g,-.-> \dtwo a,-. \utwo bes''-. \dtwo c,, \utwo d''-.] | +\dtwo b,,[ cis d \utwo e-. fis-. g-.-> a-.] | +\stemNeutral a-.[ b-. c-.-> d-. e-. f-. g-.] | +\dtwo g,,,[ \utwo aes'''-. bes,-.-> \dtwo c,, des-. \utwo ees''' f] | \dtwo bes,,,,-.[ \utwo c'''-. des-. \dtwo ees,,,-. f-. \utwo ges''-.-> aes-.] | -fis-.[ \dtwo gis,,-. \utwo ais''-. \dtwo b,,,, cis' \utwo dis''-.-> \dtwo e,,-.] | +fis-.[ \dtwo gis,,-. \utwo ais''-. \dtwo b,,,, cis' \utwo dis''-.-> \dtwo e,,] | cis,-.[ \utwo dis'''-.-> \dtwo e,,-. fis,-. gis'-. a,-. b'-.] | -a,-.[ b'-. \utwo cis'-> d,-. \dtwo e,,-. \utwo fis''-. \dtwo g,,-.] | -g-.[ \utwo a''-. b-.-> \dtwo c,, d,-. \utwo e''' \dtwo f,,-.] | -\utwo f''-.[ \dtwo g,,-. \utwo a''-. bes,-.-> c'-. \dtwo d,,,-. ees-.] | +a,-.[ b'-. \utwo cis' d, \dtwo e,,-. \utwo fis''-. \dtwo g,,-.] | +g-.[ \utwo a''-. b-.-> \dtwo c,, d, \utwo e''' \dtwo f,,-.] | +\utwo f''[ \dtwo g,,-. \utwo a''-. bes,-.-> c'-. \dtwo d,,,-. ees-.] | aes-.[ bes-. \utwo c''-. d-. ees,-.-> \dtwo f,,, \utwo \ottava 1 g''''-.] \ottava 0 | -\dtwo fis,,,,-.[ gis-. ais-. \utwo \ottava 1 b''''-. \ottava 0 \dtwo cis,,,, \utwo dis''-.-> \dtwo e,,-.] | +\dtwo fis,,,,[ gis-. ais-. \utwo \ottava 1 b''''-. \ottava 0 \dtwo cis,,,, \utwo dis''-.-> \dtwo e,,] | \utwo e''-.->[ \dtwo fis,,-. gis-. ais,-. b'-. cis,-. dis-.] | -c-.[ \utwo d'-. e'-.-> \dtwo fis,,,, g-. a'' b-.] | +c-.[ \utwo d'-. e'-.-> \dtwo fis,,,, g a'' b] | \utwo c-.[ d-. e-. fis'-.-> \dtwo g,,,,-. a-. b-.] | \utwo f'''-.[ g-. a^\markup { \italic "rit." } b \dtwo c,,,-. d-. e-.] \utwo \bar "|." \undo \omit Staff.BarLine \once \override Staff.BarLine.allow-span-bar = ##t } -voiceBitwo = { \tmarktthree \override TimeSignature.stencil = ##f \override Staff.BarLine.stencil = ##f -\time 7/8 s1*7/8 | +voiceBitwo = { \tmarktthree \set tieWaitForNote = ##t \override TimeSignature.stencil = ##f \override Staff.BarLine.stencil = ##f +\time 7/8 \utwo \stemDown c'4_( e8_._) \dtwo s8 s8 s8 s8 | s1*7/8 | +s4 \utwo \stemUp g8^([ a8^.]^) \dtwo \stemDown bes,,4_( d8_._) | s1*7/8 | +s4. s4 c'4_( | +b8_._) cis8_([ d8_.]_) s8 s4. | s1*7/8 | +g,,4._( c8_._) s8 \utwo \stemUp ees'''8^([ f8^.]^) | s1*7/8 | +\dtwo \stemDown s8 s8 s8 b,,,,,8_( cis'4 e8_._)| s1*7/8 | +s8 s8 \utwo cis''8_>_([ d,8_._)] s4. | +s4. \dtwo c,8_([ d,_._)] \utwo \stemUp e'''4^( | +f8^.^) s8 s4 s4. | +\dtwo s4. s4 \stemDown f,,,4_( | +fis8_._) s8 s8 s8 cis'4_( e8_._) | s1*7/8 | +s4. fis,,8_([ g_._)] a''_([ b_._)] | s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | -s1*7/8 | \revert Staff.BarLine.stencil } +\utwo s4 \stemUp a'8~[ b~] 4. \dtwo | \revert Staff.BarLine.stencil } diff --git a/lilypond-files/manuscripts/pp-i3.ly b/lilypond-files/manuscripts/pp-i3.ly new file mode 100644 index 0000000..500a993 --- /dev/null +++ b/lilypond-files/manuscripts/pp-i3.ly @@ -0,0 +1,130 @@ +\version "2.20.0" %Cor Anglais Settle the Score manuscript: + +voiceAithree = { \tmarksev \dtim \override TextSpanner.bound-details.left.text = "poco rit." +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + +voiceBithree = { \tmarksev \dtim +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + + +voiceCithree = { \tmarksev \dtim +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + +voiceDithree = { \tmarksev \dtim +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + +voiceEithree = { \tmarksev \dtim +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + +voiceFithree = { \tmarksev \dtim +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + +voiceGithree = { \tmarksev \dtim +\time 7/4 s1*7/4 | +\time 6/4 s1*6/4 | +\time 5/4 s1*5/4 | +\time 4/4 s1 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +s1*3/4 | +\time 2/4 s1*2/4 | +\time 3/4 s1*3/4 | +\time 4/4 s1 | +s1 | +\time 5/4 s1*5/4 | +\time 3/4 s1*3/4 | +\time 2/4 s1*1/2 | +\time 4/4 s1 \bar "|." } + + +