From e1a0f832a9fb12d8d7666f1dfeee0f95a14d3b50 Mon Sep 17 00:00:00 2001 From: Tucker Johnson Date: Sat, 30 Sep 2023 16:22:56 -0400 Subject: [PATCH] work --- book.ly | 64 ++++++++++++++------- manuscripts/{clarinet.ly => I-clarinet.ly} | 0 manuscripts/{piano.ly => I-piano.ly} | 0 manuscripts/III-clarinet.ly | 24 ++++++++ manuscripts/III-piano.ly | 67 ++++++++++++++++++++++ 5 files changed, 134 insertions(+), 21 deletions(-) rename manuscripts/{clarinet.ly => I-clarinet.ly} (100%) rename manuscripts/{piano.ly => I-piano.ly} (100%) create mode 100644 manuscripts/III-clarinet.ly create mode 100644 manuscripts/III-piano.ly diff --git a/book.ly b/book.ly index 6148d31..4f1492d 100644 --- a/book.ly +++ b/book.ly @@ -1,4 +1,4 @@ -%river sonata project +% Net Clarity project \book { \outcover \pageBreak @@ -11,31 +11,53 @@ \header { tagline = ##f } - - \score { - \header { - title = \markup { \fontsize #1 \xtitle } - subtitle = \markup { \medium \italic \xsub } - composer = \xcomp - poet = \markup { \xinst } + \bookpart { + \tocItem \markup { "I. " \bold "Largo; Allegro moderato" } + \score { + \header { + title = \markup { \fontsize #1 \xtitle } + subtitle = \markup { \medium \italic \xsub } + composer = \xcomp + poet = \markup { \xinst } + piece = \markup { \large \bold "I. " } + } + << + \include "manuscripts/I-clarinet.ly" + \include "manuscripts/I-piano.ly" + >> + %\midi { } + \layout { + \context { + \Score + \override RehearsalMark.break-visibility = #begin-of-line-invisible + \override BarNumber.font-size = #1 + \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/8) + } + } } - << - \include "manuscripts/clarinet.ly" - \include "manuscripts/piano.ly" - >> - %\midi { } - \layout { - \context { - \Score - \override RehearsalMark.break-visibility = #begin-of-line-invisible - \override BarNumber.font-size = #1 - \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/8) + } + \bookpart { + \tocItem \markup { "III. " \bold "Lento, poco Rubato" } + \score { + \header { + piece = \markup { \large \bold "III. " } + } + << + \include "manuscripts/III-clarinet.ly" + \include "manuscripts/III-piano.ly" + >> + %\midi { } + \layout { + \context { + \Score + \override RehearsalMark.break-visibility = #begin-of-line-invisible + \override BarNumber.font-size = #1 + \override SpacingSpanner.base-shortest-duration = #(ly:make-moment 1/8) + } } } } - - \markup { \null } \pageBreak \backcover diff --git a/manuscripts/clarinet.ly b/manuscripts/I-clarinet.ly similarity index 100% rename from manuscripts/clarinet.ly rename to manuscripts/I-clarinet.ly diff --git a/manuscripts/piano.ly b/manuscripts/I-piano.ly similarity index 100% rename from manuscripts/piano.ly rename to manuscripts/I-piano.ly diff --git a/manuscripts/III-clarinet.ly b/manuscripts/III-clarinet.ly new file mode 100644 index 0000000..5d3adbc --- /dev/null +++ b/manuscripts/III-clarinet.ly @@ -0,0 +1,24 @@ +% river project + +\new Staff \with { + instrumentName = \markup { clarinet in \concat { \bold "B" \tiny \flat " " } } + shortInstrumentName = \markup { cl } + \override DynamicLineSpanner.staff-padding = \phds +} +\relative { + \numericTimeSignature + \clef treble + \tempo "Lento, poco rubato" 4=50 + \time 5/4 R1*5/4 | + \time 4/4 R1 | + \time 5/4 R1*5/4 | + R1*5/4 | + R1*5/4 | + \time 4/4 R1 | + \time 3/4 R1*3/4 | + \time 4/4 d'4(\mp c2.~ | + \time 3/4 c8) r8 r4 r8 dis8~ | + \time 7/8 4. b4( e | + \time 3/4 cis'2) r8 g8( | + \time 7/8 a4. ges,2) | +} diff --git a/manuscripts/III-piano.ly b/manuscripts/III-piano.ly new file mode 100644 index 0000000..f202be1 --- /dev/null +++ b/manuscripts/III-piano.ly @@ -0,0 +1,67 @@ +% clarity project + +\new PianoStaff \with { + instrumentName = \markup { "piano " } +} +<< + \set PianoStaff.connectArpeggios = ##t + \override PianoStaff.Arpeggio.arpeggio-direction = #UP + \new Staff = "u" \with { \consists "Merge_rests_engraver" } + { + \clef bass + \accidentalStyle piano + << + \relative { + \numericTimeSignature + \tempo "Lento, poco rubato" 4=50 + \time 5/4 r8 f8~\mp 2~ f4. gis8( | + \time 4/4 2.) 4~ | + \time 5/4 4 b8( e,~ e2.) | + r4 4( 2.) | + r4 2~ 4. cis'8( | + \time 4/4 4 2.) | + \time 3/4 r4 a8( ~ 4) | + \clef treble + \time 4/4 d'4( 2.) | + \time 3/4 r8 f8~ 4~ 8 dis8( | + \time 7/8 gis4.) b,4(~ 4) | + \time 3/4 cis'4.( d,8~ 8)[ g]( | + \time 7/8 a4. ges,8~ ~ 4) | + \time 4/4 r8 f8 fis cis'~ cis bes aes' ees~ | + 2 r4 \tuplet 3/2 { r8 a, e'} | + r2 \tuplet 3/2 { r8 c'4~-> } 8 \clef bass e,,8 | + 1~\arpeggio | + 1 | + } + >> + } + \new Staff = "d" \with { \consists "Merge_rests_engraver" } + { + \clef bass + \set Staff.pedalSustainStyle = #'mixed + \accidentalStyle piano + \override Score.SpacingSpanner.strict-grace-spacing = ##t + \relative { + \numericTimeSignature + \numericTimeSignature + \tempo "Lento, poco rubato" 4=50 + \time 5/4 c8(~^\p ~ 1) | + \time 4/4 a8(~ ~ 2.) | + \time 5/4 fis4. cis'8(~ 2.) | + ees,8(~ 4~ 8~ 2.) | + c'8(~ 4~ 8~ 2 d'4) | + \time 4/4 a,8(~ ~ 2.) | + \time 3/4 fis8(~ ~ 2) | + \time 4/4 ees8~( ~ 2.) | + \time 3/4 c'8~( 8~ 2) | + \time 7/8 a8~([ ~ ] 2) | + \time 3/4 b8~( ~ 2) | + \time 7/8 bes8~([ ~ ~] 2) | + \time 4/4 \tuplet 3/2 { d,8( 4~ } 4) \tuplet 3/2 { c,8( 4~ } 4) | + \tuplet 3/2 { des,8( 4~ } 4) \tuplet 3/2 { ees8( 4~ } 4) | + b,2~->^\mf \tuplet 3/2 { 8 a'4~-> } 8 r8 | + 1~\arpeggio | + 1 | + } + } +>> -- 2.39.5