Little fixes: missing slurs, bad page turns, useful cues.

horndude77 · Nov 22, 2011 · 90e417a · 90e417a
1 parent fb92da4
commit 90e417a
Show file tree

Hide file tree

Showing 7 changed files with 40 additions and 22 deletions.
diff --git a/BeethovenHornSonata/horn.ly b/BeethovenHornSonata/horn.ly
@@ -12,6 +12,7 @@ instrument = "Horn in F"
   {
     \new Staff { << \hornMvtI \outlineMvtI >> }
   }
+  \pageBreak
   \score
   {
     \new Staff { << \hornMvtII \outlineMvtII >> }

diff --git a/DukasVillanelle/horn.ily b/DukasVillanelle/horn.ily
@@ -56,7 +56,7 @@ horn = \relative c''
   c2-> g-> |
   c,4~-> \times 2/3 {c16 r g'8-_( c-_}
     \times 2/3 {d-_ c-_ d-_}
-    \times 2/3 {d-_ e-_ c-_} |
+    \times 2/3 {d-_ e-_ c-_)} |
   \repeat unfold 2
   {
     e8.->(\> d16) c4~\! \breathe c16\< d-_( c-_ d-_ d-_ e-_ c-_ d-_) |
@@ -81,17 +81,30 @@ horn = \relative c''
 
   %2/2
   g1~->)\mfp | g~ | g~ | g~ | g4 r r2 |
-  R1*19 |
+  \tag #'horn \pageBreak
+  R1*15 |
+  \tag #'piano R1*4 |
+  \tag #'horn
+  <<
+    {s1*4 |}
+    \new CueVoice
+    {
+      r4 e'8 fis g a b cis |
+      e d cis d cis b ais b |
+      ais b c b ais b c b |
+      d c bes g e c bes g |
+    }
+  >>
 
   %B
   r4 g(\p^"(avec les Pistons)" c d |
   g f8 e d4 e |
   c g e a |
   g f8 e d4 c |
   g1~-> |
-  g8[) r8 a(\justPocoCresc b] c d e fis |
+  g8) r8 a(\justPocoCresc b c d e fis |
   g1~\! |
-  g8[) r d( e] fis g a b |
+  g8) r d( e fis g a b |
   c4) b8-. c-. a4-. d-. |
   c-. b8-. c-. a4-. d-. |
   c-. b-. a-. d-. |
@@ -115,15 +128,15 @@ horn = \relative c''
   bes g a c |
   bes a8 g f4 g |
   a1~ |
-  a8[ r b,( cis] d e fis g |
+  a8 r b,( cis d e fis g |
   a1~ |
-  a8[) r e( fis] g a b cis |
+  a8) r e( fis g a b cis |
   d4) cis8-. d-. b4-. e-. |
   d4-. cis8-. d-. b4-. e-. |
   d-. cis-. b-. e-. |
   \times 2/3 {d4-| cis-| d-|} \times 2/3 {b-| cis-| d-|}
   fis1~-^ | fis~ |
-  fis8[ r g e] c g e c |
+  fis8 r g e c g e c |
   g1( |
   \clef "bass^8"
     c,4) r r2 |
@@ -192,18 +205,28 @@ horn = \relative c''
   d4-.\! r d2-_(\p |
   d-_\> d-_ |
   ees2~\pp ees8) r r4 |
-  R1*3_"Mettez la Sourdine" |
+  \tag #'piano R1*3_"Mettez la Sourdine"
+  \tag #'horn
+  <<
+    {s1*2_"Mettez la Sourdine" | R1 |}
+    \new CueVoice
+    {
+      aes4 ges8 f ees4 f |
+      des aes f bes |
+      aes
+    }
+  >>
 
   %F
-  r4\p ees,-._\markup{\italic "léger (en forçant un peu le son)"} aes-. bes-. |
+  r4\p ees-._\markup{\italic "léger (en forçant un peu le son)"} aes-. bes-. | \tag #'horn \noBreak
   ees-. des8-. c-. bes4-. c-. |
   aes-. ees-. c-. f-. |
   ees-. des8-. c-. bes4-. aes-. |
   ees-. r r2 |
   r4 ges-. ces-. des-. |
   ges-. r r2 |
   r4 bes,-. ees-. f-. |
-  bes-. r r des8(_\scherzando c |
+  bes-. r r des8(_\scherzando c | \tag #'horn \noBreak
   bes4-.) r r des8( c |
   bes4-.) r r cis8( b |
   a4-.) r r cis8( b |
@@ -236,7 +259,7 @@ horn = \relative c''
   c-. g-. e-. a-. |
   g4( f8 e d4) e-. |
   c-. g-. e-. a-. |
-  g1~\fp | g~ | g2 r |
+  g1~\fp | \tag #'horn \noBreak g~ | g2 r |
   r_\markup{\column{"(sans les" "Pistons)"}} g'(\( |
 
   %6/8

diff --git a/DukasVillanelle/horn.ly b/DukasVillanelle/horn.ly
@@ -6,6 +6,7 @@
 \paper
 {
   #(define page-breaking ly:page-turn-breaking)
+  auto-first-page-number = ##t
 }
 
 \layout
@@ -31,7 +32,7 @@ instrument = "Horn"
     \new Staff = horn
     {
       \clef treble
-      << \horn \outline >>
+      \removeWithTag #'piano << \horn \outline >>
     }
   }
 }
diff --git a/DukasVillanelle/piano.ly b/DukasVillanelle/piano.ly
@@ -44,7 +44,7 @@ instrument = "Piano"
     \new Staff
     {
       \set Staff.midiInstrument = "french horn"
-      \horn
+      \removeWithTag #'horn \horn
     }
     \new PianoStaff
     <<

diff --git a/FranzStraussNocturno/horn.ily b/FranzStraussNocturno/horn.ily
@@ -10,7 +10,7 @@ horn = \relative c''
   ees' g,) bes8(\< aes g aes) |
   bes2.\> ees,4~\! |
   ees4. aes,8(\< c ees aes c) |
-  c4.(\> bes8 aes4)\! aes(\< |
+  c4.(\> bes8 aes4)\! aes\< |
   g8(\mf ees' d c) b4\( \grace {c16[( b])} a8 b\) |
   c2. r4 |
   r ees\(\pp des8 c bes a( |

diff --git a/GlazunovReveries/defs.ily b/GlazunovReveries/defs.ily
@@ -85,12 +85,6 @@ afterGraceFraction = #(cons 15 16)
                                ,(make-accidental-rule 'any-octave 0)
                                ,(make-accidental-rule 'same-octave 1))
   }
-
-  \context
-  {
-    \Dynamics
-    \consists "Tweak_engraver"
-  }
 }
 
 \midi

diff --git a/StraussHornConcerto1/defs.ily b/StraussHornConcerto1/defs.ily
@@ -168,9 +168,8 @@ outline =
   s1*2 | \bar "||"
 
   \time 6/8
-  \tempo 4.=144
   \boxMark "R"
-  \tempo \markup{\bold {Tempo I} \normal-text \italic {un poco più mosso}}
+  \tempo \markup{\bold {Tempo I} \normal-text \italic {un poco più mosso}} 4.=144
   s2.*53 | \bar "|."
 }