Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Updated structure for franz strauss horn concerto.

  • Loading branch information...
commit c5947c04ed59312657e9a6a2d40db6648b035d13 1 parent eca2428
@horndude77 authored
View
34 FranzStraussHornConcerto1/defs.lyi → FranzStraussHornConcerto1/defs.ily
@@ -1,4 +1,4 @@
-\version "2.12.2"
+\version "2.15.23"
%Octave
#(define (octave-up m t)
@@ -49,6 +49,9 @@ eightx = #(define-music-function (parser location x) (ly:music?)
\repeat unfold 8 $x
#})
+justDim = #(make-music 'DecrescendoEvent 'span-direction START 'span-type 'text 'span-text "dim." 'tweaks '((style . none)))
+justCresc = #(make-music 'CrescendoEvent 'span-direction START 'span-type 'text 'span-text "cresc." 'tweaks '((style . none)))
+
piuLento = \markup {\italic {più lento}}
animato = \markup {\italic {animato}}
aTempo = \markup {\italic {a tempo}}
@@ -145,6 +148,7 @@ afterGraceFraction = #(cons 15 16)
\context
{
\Score
+ \accepts "SoloStaff"
skipBars = ##t
extraNatural = ##f
\override PaperColumn #'keep-inside-line = ##t
@@ -153,6 +157,19 @@ afterGraceFraction = #(cons 15 16)
,(make-accidental-rule 'any-octave 0)
,(make-accidental-rule 'same-octave 1))
}
+
+ \context
+ {
+ \Staff
+ \type "Engraver_group"
+ \name "SoloStaff"
+
+ \alias "Staff"
+
+ fontSize = #-3
+ \override StaffSymbol #'staff-space = #(magstep -3)
+ \override RehearsalMark #'font-size = #0
+ }
}
\midi
@@ -162,4 +179,19 @@ afterGraceFraction = #(cons 15 16)
\Voice
\remove "Dynamic_performer"
}
+
+ \context
+ {
+ \Score
+ \accepts "SoloStaff"
+ }
+
+ \context
+ {
+ \Staff
+ \type "Performer_group"
+ \name "SoloStaff"
+
+ \alias "Staff"
+ }
}
View
6 FranzStraussHornConcerto1/header.lyi → FranzStraussHornConcerto1/header.ily
@@ -1,3 +1,5 @@
+\version "2.15.23"
+
\header
{
title = \markup{Concerto for Horn, Op.8}
@@ -15,7 +17,7 @@
maintainer = "Jay Anderson"
maintainerEmail = "horndude77@gmail.com"
maintainerWeb = "http://open-scores.blogspot.com/"
- lastupdated = "2009/May/18"
+ lastupdated = "2011 December 30"
footer = "Mutopia-"
tagline =
\markup
@@ -38,7 +40,7 @@
Typeset using \with-url #"http://www.LilyPond.org"
\line
{ \teeny www. \hspace #-1.0 LilyPond \hspace #-1.0 \teeny .org }
- by \maintainer \hspace #-1.0 . \hspace #0.5 Copyright © 2009. \hspace #0.5 Reference: \footer
+ by \maintainer \hspace #-1.0 . \hspace #0.5 Copyright © 2009-2011. \hspace #0.5 Reference: \footer
}
}
\line
View
23 FranzStraussHornConcerto1/horn_notes.lyi → FranzStraussHornConcerto1/horn.ily
@@ -1,6 +1,4 @@
-\version "2.12.2"
-
-\include "defs.lyi"
+\version "2.15.23"
hornMvtI = \relative c''
{
@@ -36,9 +34,7 @@ hornMvtI = \relative c''
d'4.(\< c8 b c d c) |
f2(\> d) |
bes2(\! a4 g) |
- \crescTextCresc
- f4 ees~\< ees8. ees'16-. d-. c-. bes-. a-. |
- \crescHairpin
+ f4 ees~\cresc ees8. ees'16-. d-. c-. bes-. a-. |
g4( fis8 g a4) d8( c) |
bes4 r d4..( f32) ees( |
d4) g,-> g'2-> |
@@ -87,9 +83,7 @@ hornMvtI = \relative c''
ees4( g16 f) ees-. d-. c( b) c-. d-. ees( d) c-. bes-. |
a( g) a-. bes-. c( bes) a-. g-. f8[\( \appoggiatura {g16[ f]} e16\) f]-. a( g) f-. ees-. |
d4 r f8(\p g16) f-. e( f) g-. aes-. |
- \override DynamicTextSpanner #'dash-period = #-1.0
- \crescTextCresc
- bes( c bes) aes-. g8\< r g( a16) g-. fis( g) a-. bes-. |
+ bes( c bes) aes-. g8\justCresc r g( a16) g-. fis( g) a-. bes-. |
c( d c) bes-. a8 r a( bes16) a-. gis( a) bes-. c-. |
d( ees d) c-. bes8 r16 bes b-. g( fis g) a-. b-. c-. d-. |
ees4\! r8 b \acciaccatura d8 c16( b c) d-. ees-. f-. fis( g) |
@@ -129,7 +123,6 @@ hornMvtII = \relative c''
\key ees \major
R4.*3 |
g2.( aes4 f8) |
- \crescHairpin
ees2. g4(\< bes8 |
<< {s4. s\>} {ees2.} >> d4 c8) |
c4.(\! bes2.) |
@@ -212,16 +205,13 @@ hornMvtIII = \relative c''
g2\! r |
R1*10 |
d'1~\sfp |
- \override DynamicTextSpanner #'dash-period = #-1.0
- \crescTextCresc
- d4\< d,( d'2~) |
+ d4\justCresc d,( d'2~) |
d4 d,( d'2~) |
d4 d,( d'2~) |
d2.( c4) |
\key g \major
b2~\! b8( c b a |
- \crescHairpin
g2~) g8(\< a b c) |
d4.( dis8 e4\> cis) |
d2( b)\! |
@@ -253,8 +243,7 @@ hornMvtIII = \relative c''
c4 d16( c) b-. c-. d( c) fis-. e-. d-. c-. b-. a-. |
}
g4 r g8( fis16) g-. fis( g) a-. b-. |
- \crescTextCresc
- c(\< b) c-. d-. e4 a,8( b16) a-. gis( a) b-. cis-. |
+ c(\justCresc b) c-. d-. e4\! a,8( b16) a-. gis( a) b-. cis-. |
d( cis) d-. e-. fis4 b,8( c16) b-. ais( b) c-. dis-. |
e( dis) e-. fis-. g8-. g,-. gis4~ gis16( b e) d-. |
c4~ c16( b) a-. gis-. a( gis) a-. b-. c-. d-. dis( e) |
@@ -281,7 +270,6 @@ hornMvtIII = \relative c''
b2~ b8. fis16-. g-. a-. b-. c-. |
d2~ d8. b16-. c-. d-. e-. fis-. |
g8 cis,( d) ais( b) g( c b) |
- \crescHairpin
\afterGrace a1\startTrillSpan {gis16[(\stopTrillSpan a])} |
e'2-> fis,-> |
g4\f c16( b) a-. g-. fis-. g-. a-. b-. c-. d-. e-. fis-. |
@@ -296,4 +284,3 @@ horn =
\hornMvtII
\hornMvtIII
}
-
View
8 FranzStraussHornConcerto1/horn.ly
@@ -1,7 +1,7 @@
-\version "2.12.2"
+\version "2.15.23"
-\include "defs.lyi"
-\include "horn_notes.lyi"
+\include "defs.ily"
+\include "horn.ily"
\paper
{
@@ -10,7 +10,7 @@
instrument = "Horn in F"
-\include "header.lyi"
+\include "header.ily"
\score
{
View
4 FranzStraussHornConcerto1/piano_notes.lyi → FranzStraussHornConcerto1/piano.ily
@@ -1,6 +1,4 @@
-\version "2.12.2"
-
-\include "defs.lyi"
+\version "2.15.23"
pianoRHMvtI = \relative c'
{
View
27 FranzStraussHornConcerto1/piano.ly
@@ -1,30 +1,23 @@
-\version "2.12.2"
+\version "2.15.23"
-\include "piano_notes.lyi"
-\include "horn_notes.lyi"
-\include "defs.lyi"
+\include "defs.ily"
+\include "piano.ily"
+\include "horn.ily"
#(set-global-staff-size 18)
\paper
{
- %#(define page-breaking ly:page-turn-breaking)
ragged-last-bottom = ##f
}
instrument = "Piano"
-\include "header.lyi"
+\include "header.ily"
\score
{
<<
- \new Staff
- \with
- {
- fontSize = #-3
- \override StaffSymbol #'staff-space = #(magstep -3)
- }
- { \horn }
+ \new SoloStaff { \horn }
\new PianoStaff
<<
\set PianoStaff.connectArpeggios = ##t
@@ -38,11 +31,8 @@ instrument = "Piano"
\score
{
<<
- \new Staff
- {
- \set Staff.midiInstrument = "french horn"
- \horn
- }
+ \new Staff \with { midiInstrument = "french horn" }
+ { \horn }
\new PianoStaff
<<
\new Staff="RH" { << \pianoRH \pianoDynamics >> }
@@ -52,4 +42,3 @@ instrument = "Piano"
>>
\midi { }
}
-
Please sign in to comment.
Something went wrong with that request. Please try again.