--- /dev/null
+/*
+ tempo-performer.hh -- declare Tempo_performer
+
+ source file of the GNU LilyPond music typesetter
+
+ (c) 1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
+*/
+
+#ifndef TEMPO_PERFORMER_HH
+#define TEMPO_PERFORMER_HH
+
+#include "lily-proto.hh"
+#include "performer.hh"
+
+class Tempo_performer : public Performer
+{
+public:
+ VIRTUAL_COPY_CONS(Translator);
+
+ Tempo_performer();
+ ~Tempo_performer();
+
+protected:
+ void do_print() const;
+ virtual bool do_try_music (Music* req_l);
+ virtual void do_process_requests();
+ virtual void do_pre_move_processing ();
+
+private:
+ Tempo_req* tempo_req_l_;
+ Audio_tempo* audio_p_;
+};
+
+#endif // TEMPO_PERFORMER_HH
midi_track.add (Moment (0), &track_name);
- Audio_tempo tempo_a (midi_l_->get_tempo_i (Moment (1, 4)));
- Midi_tempo tempo (&tempo_a);
- midi_track.add (Moment (0), &tempo);
+ // Some sequencers read track 0 last.
+ // Audio_tempo tempo_a (midi_l_->get_tempo_i (Moment (1, 4)));
+ // Midi_tempo tempo (&tempo_a);
+ // midi_track.add (Moment (0), &tempo);
midi_stream << midi_track;
}
else
ss->dir_ = force_dir;
+ Scalar dir_prop (get_property ("articulationScriptVerticalDirection", 0));
+ if (dir_prop.isnum_b () && (int) dir_prop != CENTER)
+ ss->dir_ = (int) dir_prop;
+
if (l->dir_)
ss->dir_ = l->dir_;
--- /dev/null
+/*
+ tempo-performer.cc -- implement Tempo_performer
+
+ source file of the GNU LilyPond music typesetter
+
+ (c) 1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
+*/
+
+#include "tempo-performer.hh"
+#include "command-request.hh"
+#include "audio-item.hh"
+
+ADD_THIS_TRANSLATOR (Tempo_performer);
+
+Tempo_performer::Tempo_performer ()
+{
+ tempo_req_l_ = 0;
+ audio_p_ = 0;
+}
+
+Tempo_performer::~Tempo_performer ()
+{
+}
+
+void
+Tempo_performer::do_print () const
+{
+#ifndef NPRINT
+ if (tempo_req_l_)
+ tempo_req_l_->print ();
+#endif
+}
+
+void
+Tempo_performer::do_process_requests ()
+{
+ if (tempo_req_l_)
+ {
+ audio_p_ = new Audio_tempo (tempo_req_l_->dur_.length_mom () /
+ Moment (1, 4)
+ * Moment(tempo_req_l_->metronome_i_));
+ Audio_element_info info (audio_p_, tempo_req_l_);
+ announce_element (info);
+ tempo_req_l_ = 0;
+ }
+}
+
+void
+Tempo_performer::do_pre_move_processing ()
+{
+ if (audio_p_)
+ {
+ play_element (audio_p_);
+ audio_p_ = 0;
+ }
+}
+
+bool
+Tempo_performer::do_try_music (Music* req_l)
+{
+ if (tempo_req_l_)
+ return false;
+
+ if (Tempo_req *t =
+ dynamic_cast <Tempo_req *> (req_l))
+ {
+ tempo_req_l_ = t;
+ return true;
+ }
+
+ return false;
+}
+
/*
- time_signature-performer.cc -- implement Time_signature_performer
+ time-signature-performer.cc -- implement Time_signature_performer
source file of the GNU LilyPond music typesetter
time9_8beamAutoEnd_8 = "3/8";
time9_8beamAutoEnd_16 = "3/8";
-time6_8beamAutoEnd_32 = "1/8";
+time9_8beamAutoEnd_32 = "1/8";
+
+time12_8beamAutoEnd_8 = "3/8";
+time12_8beamAutoEnd_16 = "3/8";
+time12_8beamAutoEnd_32 = "1/8";
%{
\consists "Key_performer";
\consists "Time_signature_performer";
+ \consists "Tempo_performer";
};
\translator { \StaffContext }
\accepts LyricVoice;
\name Lyrics;
\consists "Time_signature_performer";
+ \consists "Tempo_performer";
}
\translator {
\type Performer_group_performer;
d4 () g r |
r r [d16 \f ( g, e' d ] |
[g, d' e ) d ] g,4 r |
-r \grace g8 \f d'2 \> (|
+r \grace g8 d'2 \f \> (|
[g,8. a16 g8. a16 \! g8. ) a16 ] |
g4 r r |
R2. |
) e8 r d4_"dim." ( |
) c8 r g4 |
g8 r [g'8.^""^"solo" ( \< \! a16 ] |
-g4. \> \! ) e8 |
-c4 ( d |
+g4. \> \! e8 |
+c4 d |
e d |
) c [g'8. ( \< \! a16 ] |
-g4. \> \! ) e8 |
-c4 ( d |
+g4. \> \! e8 |
+c4 d |
e d |
) c [c8. ( d16 ] |
) c2 ( |
\property Staff."midiInstrument" = "french horn"
R2.*19 |
-r4 r [g8^"solo" \p (\< \! ) e'] |
-\grace d8 g2 \> ( [e8. ) \! c16 ] |
+r4 r [g8^"solo" \p (\< ) e'] |
+\grace d8 \! g2 \> ( [e8. ) \! c16 ] |
g2 r 4 |
r r \times 2/3 {[e'8 \p ( g, ) g' ]} |
g4 \> () \! e r |
c,4. \f c8 ( |
)c,4. r8 |
R2*2 |
-c'4. \f c8 ( |
+c'4. c8 ( |
)c,4. c''8 |
c,4. c'8 |
c,4. r8 |
R2 |
d4 r |
R2*2 |
-e8 r r4 |
+e8 \f r r4 |
R2*19 |
c4. \f r8 |
c4. r8 |
R2*8 |
e4. \f r8 |
e4. r8 |
-r4 g4 ( |
-) fis8 r g4 ( |
+r4 g4-> ( | % added >
+) fis8 r g4-> ( | % added >
) fis8 r d'4 ( |
) e8 r r4 |
r g, ( |
[e8 e e g,,] | % In reality: e e e e | e
g8 r r4 }
{\voicetwo r2 | r |
- r4_" Timp." r8 \clef bass; c, |
+ r4_" Timp." r8 \clef bass; c, \p |
[c-. \< c-. c-. \! c-.] |
c4.:8 \f r8 |
R2 |
R2*4 |
c4 \f r |
c4 r |
-c2:32 |
+c2:32 ~ | % Added tie
c8 r r4 |
c4 r |
c4_"dim." r |
globalNoKey=\notes {
\time 3/4;
+\tempo 4=100; % My own suggestion, M.B.
\skip 2.*31;
s4 s4^\fermata s8^\fermata \bar "||"; \break
s8
\time 2/4;
+\tempo 4=130; % My own suggestion, M.B.
\skip 2*224;
s4 s4^\fermata
\bar "|.";
textScriptPadding = 5.0;
textStyle = "italic";
textEmptyDimension = 1;
+ beamAuto = 0; % Beams inserted explicitly as in the original.
}
}
\context Voice = corI <
\globalNoKey
\stemup \property Voice.dynamicDir = \up
+ \property Voice.articulationScriptVerticalDirection = \up
\corI
>
\context Voice = corII {
\stemdown \property Voice.dynamicDir = \down
+ \property Voice.articulationScriptVerticalDirection = \down
\corII
}
>
\context Voice = trpI <
\globalNoKey
\stemup \property Voice.dynamicDir = \up
+ \property Voice.articulationScriptVerticalDirection = \up
\trpI
>
\context Voice = trpII {
\stemdown \property Voice.dynamicDir = \down
+ \property Voice.articulationScriptVerticalDirection = \down
\trpII
}
>
>
\context StaffGroup = percussion <\context Voice = timpani <
\property Staff.instrument = "Timp. \& Triang."
- \property Staff.instr = "Tmp \& Trg"
+ \property Staff.instr = "Tmp\&{}Trg"
\global
\timpani
>
>
\paper {
% \paper_sixteen;
- linewidth = 185.\mm;
+ linewidth = 180.\mm;
textheight = 260.\mm;
\translator {
\OrchestralScoreContext
minVerticalAlign = 2.5*\staffheight;
barNumberScriptPadding = "12.0";
+ markScriptPadding = "20.0";
}
\translator { \StaffContext
\consists "Staff_margin_engraver";
textStyle = "italic";
textScriptPadding = 5.0;
textEmptyDimension = 1;
+ beamAuto = 0; % Beams inserted explicitly as in the original.
}
}
}
\score{
- \context StaffGroup <
+ \context StaffGroup < \global
\context Staff = oboe \oboe
\context Staff = flauto \flauto
\context Staff = clarinetsInBes {\notes \transpose bes <\clarI \clarII >}
\context Staff = contrabass \cb
>
\midi {
- \tempo 4=120;
}
}
[c16 ( \pp d c a][f a c d] |
[f8 d ) c d ( ] |
[ ) a bes () g d' ( ] |
-[ a ) bes g ] [d'16 ( es ] |
+[ ) a bes () g ] [d'16 ( es ] |
[ d es d bes][g bes d es] |
[ g8 es ) d bes ( ] |
[) g a () f c' ( ] |
\! d2 ~ |
d4 \> c |
\! d2 |
-[d8 c][bes g] |
+[d8_"dim." c][bes g] |
[e c] \grace e8 [d ) c ] |
R2 |
r4 r8 d' \mf |
b4:16 \p \< \! c4:16 \> |
\! b2:16 |
b4:16 \p \< \! c4:16 \> |
-\! b2:16 |
-\grace d8 f2 ( \> | % grace note c8 corrected to d8
+b2:16 |
+\grace d8 \! f2 ( \> | % grace note c8 corrected to d8
\! ) e |
b-> ( |
) e4 r |
) c4 r |
r r8 d' ( |
[ ) a bes () g d' ( ] |
-[ a ) bes g ] r |
+[ ) a bes () g ] r |
R2 |
r4 r8 bes ( |
[) g a () f c' ( ] |
[f g f e][ ) d8 d,16 ( e ] |
[ ) f8 e16 ( f][ ) g8 f16 ( g ] |
[as bes as g][ ) f8 g'16 ( a! ] | % misprint fz to early
-[bes! \fz c bes a][g a g ) f ] |
-e r r8 r4 |
+[bes! \fz c bes a][g a g f ] |
+) e r r8 r4 |
<{e,2 \p ~ |
e4 \< \! f |
e2 \> |
< \! g4 bes! \f > r8 a ( |
<c4._> ) a'> a8 ( |
<c4._> ) a'> f,8 \p |
-[fis-. g-. a-. bes-.] |
+[fis-. \< g-. a-. \! bes-.] | % cresc. added
bes4. a8 ( \f |
<c4._> ) a'> a8 ( |
<c4._> ) a'> f,8 \p |
[fis-. \< g-. a-. \! bes-.] |
[bes \f c16 ( d][)c8 c, \p ] |
-c4^\trill ( d^\trill |
-e^\trill \grace{[d16 e]} [ f8 ) c ] |
+c4^\trill ( \< \! d^\trill |
+e^\trill \> \grace{[d16 e]} [ \! f8 ) c ] |
c4^\trill ( d^\trill |
e^\trill \grace{[d16 e]} [ ) f8 a ( \f ] |
<a4. ) c4.> d8 |
\! c |
a4 ( \< c |
d \! des |
-c \f \> \! ) bes |
-a ( \> g |
+c \f \> ) bes |
+a ( g |
\! ) a r |
R2 |
c8 \p r r4 |
e f4 c8 ~ |
c d4 e8 ~ |
e \< e4 \! e8 ( |
-) bes'!4. \fz \> \! a8 |
-[g-. f-. e-.] r |
+) bes'!4. \fz \> a8 |
+[ \! g-. f-. e-.] r |
R2 |
r4 r8 es \p ~ |
es es4 es8 ~ |
[f! ( g f g][e g e ) g] |
[d ( g d g ][d g d g ] |
[d g d g ] [c, g' c, g' ]
-) d4 r |
+) d4 \p r |
r r8 <c \p g'> |
<c2:8 g'2:8 > |
<c2:8 g'2:8 \< > |
[c-. \< bes-. a-. \! g-. ] |
<{c,4. f,8 \f |
f'4._> f,8 |
- f'4. }
+ f'4._> } % added >
{e4. c8 ( |
) c'4. c,8 ( |
) c'4. }> d'8 \p | % \p added
g \> ) \! f r |
e'2 ( f4 |
g ) f f, ( \< | % added slur
-) \! e2 f'4 ( |
+) \! e2 f'4 \pp ( |
) e2 dis4 ( \< |
\! ) e2 dis4 ( \pp |
) e2. ~ |
[cis-. \< d-. e-. \! f-. ] |
g,4. c8 \f ( |
< ) c4. f,_> > c8 ( | % slur added
-< ) c4. f,> c8-> |
-[cis-. \p \< d-. e-. \! f-. ] |
+< ) c4.-> f,> c8 \p | % > and \p moved one quaver backwards
+[cis-. \< d-. e-. \! f-. ] |
g,4 r8 <{ c8 \p |
c2:8 |
c2:8 \< |
g2:8 |
g2:8 |
g2:8 |
- [g8 g c cis] |
- e,4.-> }> a8 |
+ [g8 g c cis (] | % added slur
+ ) e,4.-> }> a8 |
[d-. e-. f-. b ( ] |
) b,4. \f b'8 ( |
< ) d,4. \f g,> g8 ( |
[e ( g fis ) g][c, ( a' gis ) a] |
[b ( c d ) b][g ( a f )d ] |
[c ( g' fis ) g][c, ( g' fis ) g] |
-[c, ( g' fis ) g][c, ( g' fis ) g] |
-c,4_"dim." r |
+[c,_"dim." ( g' fis ) g][c, ( g' fis ) g] |
+c,4 r |
c4 r |
-c8 r8 r4 |
+c8 \p r8 r4 |
R2 |
r8 [c-.^"solo" \p d-. dis-. ] |
e r e, r |
c'4:16 \p d4:16 |
e4:16 \< \! fis4:16 |
-g!2:16 \> |
+g2:16 \> |
g4:16 \! a4:16 |
g4:16 \< \! a4:16 |
g4:16 \> \! a4:16 |
[e8 d c ) b ] |
c4:16 \p d4:16 |
e4:16 \< \! fis4:16 |
-g!2:16 \> |
-\! g4:16 \p \< \! a4:16 |
-g4:16 \> \! a4:16 |
+g2:16 \fz \> |
+\! g4:16 \p \< a4:16 |
+\! g4:16 \> \! a4:16 |
g4:16 \< \! a4:16 |
g4:16 \> a4:16 |
g4:16 \! a4:16 |
) e4 r |
[f16 ( g f_"dim." g][f g f8 ] |
) e4 r |
-[c'16 ( d c a][f a c ) d] |
+[c'16 \pp ( d c a][f a c ) d] |
[f8 ( d ) c] r |
fis,8-. r g-. r |
d r [g d'16 ( es] |
[g8 es ) d] r |
c, r f-. r |
c r [f-. c'-. ] |
-[bes-. a-. g-. f-.] |
-[e d][c a'16 \f ( f] |
+[bes-. \< a-. g-. \! f-.] |
+[e-. d-.][c-. a'16 \f ( f] |
[a f a f][a f a ) f] | % Misprint trem 8
[bes ( f bes f][a f a ) f] |
[bes ( f bes f][) a8 f-.] |
R2 |
r4 r8 f'' (|
) f,4.-> f8 ( |
-) f,4.-> f'8 (|
+) f,4. f'8 (|
<) c4. f, > f8 ( |
<) c4. f,> f8 \p |
[fis-. \< g-. a-. \! bes-. ] |
c,4. f8 \f ( |
<) f4. bes,_> > f8 (|
-<) f4. bes,> f8 \p | % \p added
+<) f4. bes,_> > f8 \p | % \p added
[fis-. \< g-. a-. \! bes-. ] |
c,4 r8 <{ f8 \p |
f2:8 \< |
[f16 ( c' b ) c][f,16 ( c' b ) c] |
[f,16 ( c' b ) c][f,16 ( c' b ) c] |
f,8 r e'4 ( |
-) f8 r bes,4 ( |
+) f8 r bes,4 \p ( |
) a2 ( |
) bes |
a4 \< ( \! bes |
<c f,> r <c f,> r |
e, r e r |
e r [e () c] |
-c'4. \f \> \! d8 |
-[e-._"dim." f-. g-.] r |
+c'4. \f \> d8 |
+[\! e-._"dim." f-. g-.] r |
<c,8 \p f,> r <c f,> r |
<c f,> r <c f,> r |
<c f,> r <c f,> r |
\version "1.1.52";
+flauto=\notes\relative c''' {
+\clef "treble";
+\property Staff."midiInstrument" = "flute"
+
+[c8. \f ( d16] c2 |
+)c,8 r r4 r |
+R2.*4 |
+[c8. \p ( d16] c4. ) a8 |
+[f8. ( e16 ] f4. ) a8 |
+[c8. ( d16] c4. ) a8 |
+[a8. ( g16 ] ) f4 r |
+R2.*4 |
+[c'8. ( d16] c4. ) a8 |
+[g8. ( a16 ] f4. ) a8 |
+[c8. ( d16] c4. ) a8 |
+[a8. ( g16 ] ) f4 r |
+R2.*13 |
+r4 r4 r8 r8 \time 2/4;
+R2*4 |
+a'8-. \pp r g-. r |
+a8-. r g-. r |
+R2*2 |
+g8-. r f-. r |
+g8-. r f-. r |
+R2 |
+r4 r8 [c'16 \f ( d] |
+[c d c a][f a c d] |
+[f8 d ) c] f, ( |
+[f'8 d ) c] a ( |
+[a'8 f ) e] a ( |
+dis,2 |
+) e4 r8 a8 ( |
+dis,2 |
+) e4 r8 a ( |
+) es r d r |
+c r d r |
+g, r r4 |
+R2*10 |
+r4 r8 e' \p |
+e [es-. es-.] d-. |
+d-. [cis-. cis-.] c-. |
+c \f [c16 ( d] [es8 d16 c] | % slur and \f added
+) d4 r8 e!-. \p |
+e-. [es-. es-.] d-. |
+d-. [cis-. cis-.] c |
+c-. \f [c16 ( d][es8 d16 c] | % \f added
+) d4 r8 e,! ( |
+)e'4.-> e,8 ( |
+)e'4.-> a8 \p |
+[g-. f-. e-. d-.] |
+[cis16 ( \< e d \! b ] ) g8 e \f ( |
+)e'4.-> e,8 ( |
+)e'4.-> a8 \p |
+[g-. \< f-. e-. \! d-.] |
+g r r e-. \p |
+e-. [es-. \< es-.] d-. |
+d-. [c-. \! c-.] g-. |
+g-. [fis-. \< fis-.] f-. |
+f-. [e-. \! e-.] bes \f ( |
+) bes'4.-> a8-. |
+[f'-. e-. d-.] f, ( |
+) f'4. \fz g,8 ( |
+) g'4. \fz g,8 ( |
+) e' r g4-> ( |
+) e8 r g4-> ( |
+) e8 r es4-> ( |
+) d8 r r g, ( |
+) e'! r g4 ( |
+) e8 r g4 ( |
+) e8 r es4-> ( |
+) d8 r r g, ( |
+) e'! r g4 ( |
+) e8 r d4 ( |
+) e8 r r4 |
+R2*27 |
+d2 ( \p |
+) gis, |
+R2*2 |
+d'2 ( \p |
+) gis, |
+a ( |
+) gis |
+a_"dim." ( |
+) gis ( |
+) a ( |
+bes!4 ) a8 r |
+a r bes r |
+fis r g r |
+bes2 ( |
+c4 ) bes8 r |
+bes r a r |
+e! r f r |
+R2 |
+r4 r8 [c'16 \f ( d] | % \f added
+[c d c a][f a c d] |
+[f8 d ) c] f, ( |
+[f'8 d ) c] f,-. |
+[g-. a-. bes-. a-. ] |
+bes4 r8 bes,8 ( |
+[bes' g ) f] bes,8 ( |
+[bes' g ) f] bes,8 ( |
+[d' g ) f! ] d ( |
+gis,2 |
+) a4. d8 ( |
+gis,2 |
+) a4. d,8 ( |
+) d' r d-. r |
+d-. r d-. r |
+c r r4 |
+R2*10 |
+r4 r8 [c16^""^"solo" \p ( d] |
+) c8-. [b16 ( c ] ) b8-. [bes16 \< ( c ] |
+)bes8-. [a16 ( \! bes ] ) a8-. [as16 ( bes ] |
+) as8-. \f [f16 ( g][as8 g16 f ] |
+) g4 r8 [c16 ( d] |
+) c8-. [b16 ( c ] ) b8-. [bes16 \< ( c ] |
+)bes8-. [a16 ( \! bes ] ) a8-. [as16 bes ] |
+as8 \f [f16 ( g][as8 g16 f ] |
+) g4 r8 es ( |
+)es'4.-> es,8 ( |
+)es'4.-> d8 \p |
+[c8-. \< bes-. a \! g ] |
+[fis16 ( a g e! ] ) c8 es ( \f |
+) es'4.-> es,8 ( |
+) es'4.-> d8 \p |
+[c8-. \< bes-. a \! g ] |
+c r r a'-. \p |
+a-. [gis-. \< gis-.] \! g-. |
+g-. [f-. f-.] c-. |
+c-. [b-. \< b-.] bes-. |
+bes-. [a-. \! a-.] a( \f |
+) es'4.-> d8 |
+[bes-. a-. g-.] bes, ( |
+) d'4. \fz c,8 ( |
+) c'4. \fz c,8 ( |
+) a' r c4-> ( |
+) a8 r c4-> ( |
+) a8 r as4-> ( |
+) g8 r r c ( |
+) a! r c4 ( |
+) a8 r c4 ( |
+) a8 r as4-> ( |
+) g8 r r c, ( |
+) a'! r c4_"dim." ( |
+) a8 r g4 ( |
+) f8 r c4 ( |
+) a8 r r4 |
+R2*19 |
+r4 r8 [c'16 \p ( d] |
+) c8-. [b16 ( c ] ) b8-. [bes16 ( c ] |
+)bes8-. [a16 ( bes ] ) a8-. [c16 ( d] |
+) c8-. [b16 ( c ] ) b8-. [bes16 \< ( c ] |
+)bes8-. [a16 ( \! bes ] ) a8-. bes ( \f |
+) bes,4. d8 ( |
+) d'4. c8 ( |
+) c,4. e8 ( |
+) e'4. c8 ( |
+) a'4 r |
+[f8 ( d ) c ] c ( |
+) a'4 r |
+[f8 ( d ) c ] f, ( |
+) f'4. e,8 ( |
+) e'4. e8 |
+[f-. e-. f-. e-.] |
+[f-. e-. f-. e-.] |
+f r e r |
+f r e r |
+f r a, r |
+c r a r |
+f4 r8 c' ( |
+) a4 r8 c ( |
+) f4 r8 c ( |
+) a4 r8 c ( |
+) f4 r |
+R2 |
+f4 \fz r
+
+}
+
oboe=\notes\relative c'' {
\clef "treble";
\property Staff."midiInstrument" = "oboe"
r8 [g,-.^""^"solo" \p a-. b-. ] |
c r r4 |
R2*10 |
-\grace d8 \fz f2 \> ( |
+\grace d8 f2 \fz \> ( |
\! b,4 [c8 b] |
a2-> |
) gis |
\! e ) b |
\grace e8 g4 ( \> dis |
\! e_"dim." ) b |
-\grace d!8 \fz f2 ( \> |
+\grace d!8 f2 \fz ( \> |
b,4 [ \! c8 b] |
a2 \p |
) gis |
) a8 r g4 ( |
) f8 r r4 |
R2*7 |
-\grace f8 \f a4 \> ( e |
+\grace f8 a4 \f \> ( e |
f \! b, |
) c r |
R2*7 |
R2 |
c8-. \p r b-. r |
bes!-. r a-. r |
-c-. \p r b-. r |
+c-. r b-. r |
bes!-. r a-. bes \f ( |
) bes'4. bes,8 ( |
) bes'4. bes,8 ( |
f4-. \fz r
}
-
-flauto=\notes\relative c''' {
-\clef "treble";
-\property Staff."midiInstrument" = "flute"
-
-[c8. \f ( d16] c2 |
-)c,8 r r4 r |
-R2.*4 |
-[c8. \p ( d16] c4. ) a8 |
-[f8. ( e16 ] f4. ) a8 |
-[c8. ( d16] c4. ) a8 |
-[a8. ( g16 ] ) f4 r |
-R2.*4 |
-[c'8. ( d16] c4. ) a8 |
-[g8. ( a16 ] f4. ) a8 |
-[c8. ( d16] c4. ) a8 |
-[a8. ( g16 ] ) f4 r |
-R2.*13 |
-r4 r4 r8 r8 \time 2/4;
-R2*4 |
-a'8-. \pp r g-. r |
-a8-. r g-. r |
-R2*2 |
-g8-. r f-. r |
-g8-. r f-. r |
-R2 |
-r4 r8 [c'16 \f ( d] |
-[c d c a][f a c d] |
-[f8 d ) c] f, ( |
-[f'8 d ) c] a ( |
-[a'8 f ) e] a ( |
-dis,2 |
-) e4 r8 a8 ( |
-dis,2 |
-) e4 r8 a ( |
-) es r d r |
-c r d r |
-g, r r4 |
-R2*10 |
-r4 r8 e' \p |
-e [es-. es-.] d-. |
-d-. [cis-. cis-.] c-. |
-c [c16 ( d] [es8 d16 c] | % slur added
-) d4 r8 e!-. \p |
-e-. [es-. es-.] d-. |
-d-. [cis-. cis-.] c |
-c-. [c16 ( d][es8 d16 c] |
-) d4 r8 e,! ( |
-)e'4.-> e,8 ( |
-)e'4.-> a8 \p |
-[g-. f-. e-. d-.] |
-[cis16 ( \< e d \! b ] ) g8 e \f ( |
-)e'4.-> e,8 ( |
-)e'4.-> a8 \p |
-[g-. \< f-. e-. \! d-.] |
-g r r e-. \p |
-e-. [es-. \< es-.] d-. |
-d-. [c-. \! c-.] g-. |
-g-. [fis-. \< fis-.] f-. |
-f-. [e-. \! e-.] bes \f ( |
-) bes'4.-> a8-. |
-[f'-. e-. d-.] f, ( |
-) f'4. \fz g,8 ( |
-) g'4. \fz g,8 ( |
-) e' r g4-> ( |
-) e8 r g4-> ( |
-) e8 r es4-> ( |
-) d8 r r g, ( |
-) e' r g4 ( |
-) e8 r g4 ( |
-) e8 r es4-> ( |
-) d8 r r g, ( |
-) e' r g4 ( |
-) e8 r d4 ( |
-) e8 r r4 |
-R2*27 |
-d2 ( \p |
-) gis, |
-R2*2 |
-d'2 ( \p |
-) gis, |
-a ( |
-) gis |
-a_"dim." ( |
-) gis ( |
-) a ( |
-bes!4 ) a8 r |
-a r bes r |
-fis r g r |
-bes2 ( |
-c4 ) bes8 r |
-bes r a r |
-e! r f r |
-R2 |
-r4 r8 [c'16 \f ( d] | % \f added
-[c d c a][f a c d] |
-[f8 d ) c] f, ( |
-[f'8 d ) c] f,-. |
-[g-. a-. bes-. a-. ] |
-bes4 r8 bes,8 ( |
-[bes' g ) f] bes,8 ( |
-[bes' g ) f] bes,8 ( |
-[d' g ) f! ] d ( |
-gis,2 |
-) a4. d8 ( |
-gis,2 |
-) a4. d,8 ( |
-) d' r d-. r |
-d-. r d-. r |
-c r r4 |
-R2*10 |
-r4 r8 [c16^""^"solo" \p ( d] |
-) c8-. [b16 ( c ] ) b8-. [bes16 \< ( c ] |
-)bes8-. [a16 ( \! bes ] ) a8-. [as16 ( bes ] |
-) as8-. \f [f16 ( g][as8 g16 f ] |
-) g4 r8 [c16 ( d] |
-) c8-. [b16 ( c ] ) b8-. [bes16 \< ( c ] |
-)bes8-. [a16 ( \! bes ] ) a8-. [as16 bes ] |
-as8 \f [f16 ( g][as8 g16 f ] |
-) g4 r8 es ( |
-)es'4.-> es,8 ( |
-)es'4.-> d8 \p |
-[c8-. \< bes-. a \! g ] |
-[fis16 ( a g e! ] ) c8 es ( \f |
-) es'4.-> es,8 ( |
-) es'4.-> d8 \p |
-[c8-. \< bes-. a \! g ] |
-c r r a'-. \p |
-a-. [gis-. \< gis-.] \! g-. |
-g-. [f-. f-.] c-. |
-c-. [b-. \< b-.] bes-. |
-bes-. [a-. \! a-.] a( \f |
-) es'4.-> d8 |
-[bes-. a-. g-.] bes, ( |
-) d'4. \fz c,8 ( |
-) c'4. \fz c,8 ( |
-) a' r c4-> ( |
-) a8 r c4-> ( |
-) a8 r as4-> ( |
-) g8 r r c ( |
-) a! r c4 ( |
-) a8 r c4 ( |
-) a8 r as4-> ( |
-) g8 r r c, ( |
-) a'! r c4_"dim." ( |
-) a8 r g4 ( |
-) f8 r c4 ( |
-) a8 r r4 |
-R2*19 |
-r4 r8 [c'16 \p ( d] |
-) c8-. [b16 ( c ] ) b8-. [bes16 ( c ] |
-)bes8-. [a16 ( bes ] ) a8-. [c16 ( d] |
-) c8-. [b16 ( c ] ) b8-. [bes16 \< ( c ] |
-)bes8-. [a16 ( \! bes ] ) a8-. bes ( \f |
-) bes,4. d8 ( |
-) d'4. c8 ( |
-) c,4. e!8 ( |
-) e'4. c8 ( |
-) a'4 r |
-[f8 ( d ) c ] c ( |
-) a'4 r |
-[f8 ( d ) c ] f, ( |
-) f'4. e,8 |
-e'4. e8 |
-[f-. e-. f-. e-.] |
-[f-. e-. f-. e-.] |
-f r e r |
-f r e r |
-f r a, r |
-c r a r |
-f4 r8 c' ( |
-) a4 r8 c ( |
-) f4 r8 c ( |
-) a4 r8 c ( |
-) f4 r |
-R2 |
-f4 \fz r
-
-}
-
clarI=\notes\relative c'' {
\key G;
\clef "treble";
[fis8. \> e16 ] \! d4 ) a |
b2. \pp \< ( |
\! ais4 ) b2 |
-a4 \p ( [g8. a16 ] g4 |
+a!4 \p ( [g8. a16 ] g4 |
fis ) g8 r r4 |
a4 ( [g8. a16 ] g4 |
-fis ) g8 r [d^""^"solo" \mf \< () \! b' ] |
-\grace a8 d2 ( \> [b8. \! g16] |
+fis ) g8 r [d^""^"solo" \mf \< () b' ] |
+\grace a8 \! d2 ( \> [b8. \! g16] |
) d2 r4 |
R2. |
r4 r \times 2/3 { [b'8^""^"solo" ( \ff d, ) d' ] } |
[d e d b][g b d e] |
[g8 e ) d ] g, ( |
[g' e ) d ] b ( |
-[b' g ) fis] b |
-f2 ( |
+[b' g ) fis] b ( | % slur added
+) f2 ( |
) fis!4 r8 b ( |
) f2 ( |
) fis!4 r8 b |
[e-. dis-. dis-. d-. ] |
d r b4 \f ( |
) cis8 [a'16-> ( b] ) a8 r |
-d,4. r8 |
+d,4.-> r8 | % added >
d4.-> r8 |
R2*2 |
d4. \f r8 |
) fis8 r e4 \p ( |
) fis8 r r4 |
R2*3 |
-fis,2 \pp ~ |
-fis ~ |
-fis ~ |
-fis4 r |
+fis,2 \pp \< ~ |
+\! fis ~ |
+fis \> ~ | % cresc. added
+\! fis4 r | % dim. added
R2*4 |
e'2 \fz \> ( |
) \! fis,4 r |
[a8. ( \> g16 ] \! ) fis4 r |
b2. \pp \< ( |
\! ais4 ) b2 |
-a4 \p ( [g8. a16 ] g4 |
+a!4 \p ( [g8. a16 ] g4 |
fis ) g8 r r4 |
a4 ( [g8. a16 ] g4 |
-fis ) g8 r [d^""^"solo" \mf \< () \! b' ] |
-\grace a8 d2 ( \> [b8. \! g16] |
+fis ) g8 r [d^""^"solo" \mf \< () b' ] |
+\grace a8 \! d2 ( \> [b8. \! g16] |
) d2 r4 |
R2. |
r4 r \times 2/3 { [b'8 ( \f d, ) d' ] } |
a8 r a4-> ~ |
a8 r gis4 ( |
[ ) g!8 g-. g-. g ( ] |
-) fis! r a4 ~ |
+) fis! r a4-> ~ | % added >
a8 r a4-> ~ |
a8 r gis4 ( |
) g!8 [g-. g-.] g ( |
a8 r r4 |
R2*3 |
fis2 \pp \< ~ |
-fis ~ |
-\! fis \>~ |
+\! fis ~ |
+fis \>~ |
\! fis4 r |
R2*4 |
g2 \f \> ( |
b2 \> ( |
) \! ais4 r |
fis2 \pp \< ~ |
-fis ~ |
-\! fis \>~ |
+\! fis ~ |
+fis \>~ |
\! fis4 r |
R2*16 |
f2 \pp ( |
d ~ |
d4. r8 |
R2*6 |
-fis4. \fz \> \! g8 |
-[a-. b-. c-. ] r |
+fis4. \fz \> g8 |
+[ \! a-. b-. c-. ] r |
R2*3 |
r4 r8 e, \f ( |
) e'4. a,8 ( |
) a'4. fis,8 ( |
) d'4. c8 ( |
) b4 r8 g ( |
-e'4 [d8 ) c ] |
-b4 r8 g ( |
-e'4 () ) d8 g, |
-cis4. fis,8 ( |
+e'4 [ ) d8 c ( ] |
+) b4 r8 g ( |
+e'4 () ) d8 g, ( | % ending slur added
+) cis4. fis,8 ( |
) c'!4. c8 |
[b-. c-. b-. c-. ] |
[b-. c-. b-. c-. ] |
\! e \> ~ |
\! e \< ~ |
\! e \> |
-\grace \! d'8 \fz ( ) f2 \> ( |
+\grace d'8 ( ) \! f2 \fz \> ( |
) \! e4. r8 |
f,2 \> ( ( |
[ ) \! e8 d c ) b ] |
e ~ |
e ~ |
e |
-\grace d'8 \fz ( ) f2 \> ( |
+\grace d'8 ( ) f2 \fz \> ( |
) \! e4. r8 |
f,2 \p ( |
) e4 r |
[c c c ] f ( |
) c4.-> f8 ( |
) c4.-> r8 |
-r4 r8 f8 ( |
+r4 r8 d8 ( |
) e!4. c8 \f ( |
) f4.-> c8 ( | % slur added
) f4.-> r8 |
global = \notes {
\property StaffGroup.timeSignatureStyle = "old"
\time 4/4;
- \tempo 4=80;
+ \tempo 4=100;
\skip 1*31;
\property StaffGroup.timeSignatureStyle = "1"
\time 3/2;
\skip 1.*15;
\property StaffGroup.timeSignatureStyle = "old"
\time 4/4;
- \tempo 4=80;
+ \tempo 4=100;
}
vi1=\context Staff = vi1 <
\global
\notes \relative c'' {
+\property Staff.instrument = "Violin 1"
+\property Staff.midiInstrument = "recorder" % The default midi violin is terrible
- [d8 d d d] d4 [a16 b c a] |
- [b8 g ][ g g16 a][ b8 g ][ g g16 a] |
- [b8 g ][ g a16 b] c4 b |
- [a8 d,] g2 fis4 |
+ d8 d d d d4 a16 b c a |
+ b8 g g g16 a b8 g g g16 a |
+ b8 g g a16 b c4 b |
+ a8 d, g2 fis4 |
g2 r2 |
r1 |
- [d'8 d d d] d4 [a16 b c a] |
- [b8 g ][ g g16 a][ b8 g ][ g g16 a] |
- [b8 g ][ g a16 b][ c8 e d c] |
- [b g] c2 b4 |
+ d'8 d d d d4 a16 b c a |
+ b8 g g g16 a b8 g g g16 a |
+ b8 g g a16 b c8 e d c |
+ b g c2 b4 |
c2 r |
r1 |
- [g'8 g g g] g4 [d16 e f d] |
- [e8 c ][ c c16 d][ e8 c ][ c c16 d] |
- [e8 c ][ c d16 e] f4 e |
- [d8 g,] c2 b4 |
- [c8 g ][ g g16 a] b4 g |
- r8 g [g g16 a] b4 g |
- r8 [e16 fis ][ g8 g] [ fis! g g fis!] |
+ g'8 g g g g4 d16 e f d |
+ e8 c c c16 d e8 c c c16 d |
+ e8 c c d16 e f4 e |
+ d8 g, c2 b4 |
+ c8 g g g16 a b4 g |
+ r8 g g g16 a b4 g |
+ r8 e16 fis g8 g fis! g g fis! |
g2 r |
r1 |
- r16 [d' c b ][ a g fis e] [d8 d' ][ d d16 c] |
- [b8 d ][ d d16 c][ b8 d ][ d d16 e] |
+ r16 d' c b a g fis e d8 d' d d16 c |
+ b8 d d d16 c b8 d d d16 e |
fis4 g2 fis!4 |
- r16 [g f e ][ d c b a][ g8 g' ][ g g16 f] |
- [e8 g ][ g g16 f][ e8 g ][ g g16 a] |
+ r16 g f e d c b a g8 g' g g16 f |
+ e8 g g g16 f e8 g g g16 a |
b4 c2 b4 |
- [c8 g ][ g g16 f] e4 d |
- r8 g [g g16 f] e4 d |
- r8 [d16 a ][ b8 b16 c] a2 |
+ c8 g g g16 f e4 d |
+ r8 g g g16 f e4 d |
+ r8 d16 a b8 b16 c a2 |
b1 |
\repeat "semi" 2 {
e1. |
r4 c c c c c |
d1. |
- r4 [d8 c] b4 [c8 d] g,4 [a8 b] |
+ r4 d8 c b4 c8 d g,4 a8 b |
e,1. |
- r4 [e'8 d] cis4 [d8 e] a,4[ b8 cis!] |
+ r4 e'8 d cis4 d8 e a,4 b8 cis! |
fis,1. |
r4 d' d d d d |
- e [e8 d] c4 [d8 e] a,4 [b8 c] |
- fis,4 [fis'8 e] d4 [e8 fis!] b,4 [c8 d] |
+ e e8 d c4 d8 e a,4 b8 c |
+ fis,4 fis'8 e d4 e8 fis! b,4 c8 d |
g,4 g' g g g g |
- a4 [c8 b] a4 [b8 c] f,4 [g8 a] |
+ a4 c8 b a4 b8 c f,4 g8 a |
d,4 g g g g g |
- a [d,8 c] b4 [c8 d] a2 |
+ a d,8 c b4 c8 d a2 |
}
\repeat "semi" 2 {
b1 |
- [d8 d d d] d4 [a16 b c a] |
- [b8 g ][ g g16 a] [b8 g ][ g g16 a] |
- [b8 g] c2 b4 |
+ d8 d d d d4 a16 b c a |
+ b8 g g g16 a b8 g g g16 a |
+ b8 g c2 b4 |
c2 r |
- [g'8 g g g] g4 [d16 e f d] |
- [e8 g, ][ g g16 a] [b8 d ][ d d16 e] |
+ g'8 g g g g4 d16 e f d |
+ e8 g, g g16 a b8 d d d16 e |
fis4 g2 fis!4 |
- r16 [g f e ][ d c b a] [g8 g' ][ g g16 f] |
- e2 r8 d [d d16 e] |
- [fis a g fis ][ e d c b] [a8 d ][ d d16 e] |
+ r16 g f e d c b a g8 g' g g16 f |
+ e2 r8 d d d16 e |
+ fis a g fis e d c b a8 d d d16 e |
fis4 g2 fis!4 |
\cadenza 1;
g\breve
vi2=\context Staff = vi2 <
\global
\notes \relative c'' {
+\property Staff.instrument = "Violin 2"
+\property Staff.midiInstrument = "recorder" % The default midi violin is terrible
r1 | r | r |
- [d8 d d d] d4 [a16 b c a] |
- [b8 g ][ g g16 a] [b8 g ][ g g16 a] |
- [b8 g ][ g a16 b] c4 b |
- [a8 d,] g2 fis4 |
+ d8 d d d d4 a16 b c a |
+ b8 g g g16 a b8 g g g16 a |
+ b8 g g a16 b c4 b |
+ a8 d, g2 fis4 |
g2 r2 |
r1 |
- [g'8 g g g] g4 [d16 e f d] |
- [e8 c ][ c c16 d] [e8 c ][ c c16 d] |
- [e8 c ][ c d16 e] f4 e |
- [d8 g,] c2 b4 |
+ g'8 g g g g4 d16 e f d |
+ e8 c c c16 d e8 c c c16 d |
+ e8 c c d16 e f4 e |
+ d8 g, c2 b4 |
c2 r |
r1 |
- [g'8 g g g] g4 [d16 e f d] |
- e2 r8 g, [g g16 a] |
- b4 g r8 g [g a16 b] |
+ g'8 g g g g4 d16 e f d |
+ e2 r8 g, g g16 a |
+ b4 g r8 g g a16 b |
c4 b a2 |
- g r16 [d' c b ][ a g fis e] |
- [d8 d' ][ d d16 c] [b8 d ][ d d16 e] |
+ g r16 d' c b a g fis e |
+ d8 d' d d16 c b8 d d d16 e |
fis4 g g4. fis!8 |
g2 r |
- r16 [d c b ][ a g fis e] [d8 d' ][ d d16 c] |
+ r16 d c b a g fis e d8 d' d d16 c |
b4 c2 b4 |
c d g,2 |
- r16 [g' f e ][ d c b a] [g8 g' ][ g g16 f] |
- e4 d r8 g [g g16 f] |
- e4 d r8 [c16 g ][ b8 b16 c] |
+ r16 g' f e d c b a g8 g' g g16 f |
+ e4 d r8 g g g16 f |
+ e4 d r8 c16 g b8 b16 c |
a4 g2 fis4 |
g1 |
\repeat "semi" 2 {
r1. |
- r4 [g'8 f] e4 [f8 g] c,4 [d8 e] |
+ r4 g'8 f e4 f8 g c,4 d8 e |
a,1. |
- r4 [a'8 g] fis4 [g8 a] d,4 [e8 fis!] |
+ r4 a'8 g fis4 g8 a d,4 e8 fis! |
b,1. |
r4 g' g g g g |
a1. |
r4 a a a a a |
- b [d,8 c] b4 [c8 d] g,4 [a8 b] |
- e,4 [g'8 f] e4 [f8 g] c,4 [d8 e] |
- a,4 [a'8 g] fis4 [g8 a] d,4 [e8 fis!] |
- b,4 [b'8 a] g4 [a8 b] e,4 [fis8 g] |
+ b d,8 c b4 c8 d g,4 a8 b |
+ e,4 g'8 f e4 f8 g c,4 d8 e |
+ a,4 a'8 g fis4 g8 a d,4 e8 fis! |
+ b,4 b'8 a g4 a8 b e,4 fis8 g |
c,4 a a a a a |
- b [d8 c] b4 [c8 d] d,4 e |
+ b d8 c b4 c8 d d,4 e |
fis2 g fis! |
}
\repeat "semi" 2 {
g1 |
r1 | r1 |
- [g'8 g g g] g4 [d16 e f d] |
- [e8 c ][ c c16 d] [e8 g, ][ g g16 a] |
- [b8 g] c2 b4 |
+ g'8 g g g g4 d16 e f d |
+ e8 c c c16 d e8 g, g g16 a |
+ b8 g c2 b4 |
c2 r |
- r16 [d c b ][ a g fis e] [d8 d' ][ d d16 c] |
+ r16 d c b a g fis e d8 d' d d16 c |
b4 c2 b4 |
- [c8 g ][ g g16 a] [b d c b ][ a g fis e] |
- [d8 d' ][ d d16 e] [fis16 a g fis ][ e d c b] |
- [a d c b ][ a g fis e] d4 d' |
+ c8 g g g16 a b d c b a g fis e |
+ d8 d' d d16 e fis16 a g fis e d c b |
+ a d c b a g fis e d4 d' |
\cadenza 1;
b\breve
}
\global
\notes\transpose c'{
\clef "bass";
+\property Staff.instrument = "Basso Continuo"
+\property Staff.midiInstrument = "bassoon" % The default midi violin is terrible
+
G2 d^"4 3" | G1 |
g2 c4 G | d1^"3 4 3" |
\bc
>
\paper{
- gourlay_maxmeasures=7.;
-
\translator { \VoiceContext
-
+ textScriptPadding = 3;
%% Uncomment to get the original layout without beams.
-%%%% Compare to the definition in init/engraver.ly.
% \remove "Beam_engraver";
% \remove "Auto_beam_engraver";
}
}
\midi{
- \tempo 4=80;
}
}
(("Clef_item" "Span_bar") . (minimum_space 3.7))
(("Time_signature" "Span_bar") . (minimum_space 2.0))
(("Key_item" "Span_bar") . (minimum_space 2.5))
- (("Staff_bar" "Time_signature") . (minimum_space 1.5)) ;double check this.
+ (("Staff_bar" "Time_signature") . (minimum_space 2.0)) ;double check this.
(("Time_signature" "begin-of-note") . (extra_space 2.0)) ;double check this.
(("Key_item" "begin-of-note") . (extra_space 2.5))
(("Staff_bar" "begin-of-note") . (extra_space 1.0))
projects / lilypond.git / commitdiff