+++ /dev/null
-/*
- bar-req-collect-engraver.cc -- implement Bar_req_collect_engraver
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-
-#include "command-request.hh"
-
+++ /dev/null
-/*
- abbreviation-beam.cc -- implement Chord_tremolo
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-#include "paper-column.hh"
-#include "array.hh"
-#include "proto.hh"
-#include "chord-tremolo.hh"
-#include "misc.hh"
-#include "debug.hh"
-
-#include "molecule.hh"
-#include "leastsquares.hh"
-#include "stem.hh"
-#include "paper-def.hh"
-#include "lookup.hh"
-#include "stem-info.hh"
-
-
-
-
-Chord_tremolo::Chord_tremolo ()
- : Beam ()
-{
-}
-
-Molecule*
-Chord_tremolo::do_brew_molecule_p () const
-{
- return Beam::do_brew_molecule_p ();
-}
-
-void
-Chord_tremolo::do_print () const
-{
-#ifndef NPRINT
- Beam::do_print ();
- Spanner::do_print ();
-#endif
-}
-
-/*
- beams to go with one stem.
- */
-Molecule
-Chord_tremolo::stem_beams (Stem *here, Stem *next, Stem *prev) const
-{
- /*
- todo
- - shorter beams (not reaching outer "stems")
- for [:16 c4 c4] and [:16 c1 c1]
- - centered beam on [:16 c1 c1] heads, rather than "stems"
- */
- return Beam::stem_beams (here, next, prev);
-}
+++ /dev/null
-/*
- font-size-grav.cc -- implement Font_size_engraver
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1998--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-
-#include "font-size-engraver.hh"
-#include "score-element.hh"
-#include "lily-guile.hh"
-
-Font_size_engraver::Font_size_engraver ()
-{
- size_ = SCM_EOL;
-}
-
-void
-Font_size_engraver::do_process_requests ()
-{
- SCM s (get_property ("fontSize", 0));
-
- if (gh_number_p(s))
- {
- size_ = gh_scm2int (s);
- }
- else
- {
- size_ = SCM_EOL;
- }
-}
-
-void
-Font_size_engraver::acknowledge_element (Score_element_info e)
-{
- if (size_ != SCM_EOL
- && e.elem_l_->get_elt_property (fontsize_scm_sym) == SCM_BOOL_F)
- {
- e.elem_l_->set_elt_property (fontsize_scm_sym, size_);
- }
-}
-
-ADD_THIS_TRANSLATOR (Font_size_engraver);
-
+++ /dev/null
-/*
- ly-symbols.hh -- declare SCM symbols.
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-
-#ifndef LY_SYMBOLS_HH
-#define LY_SYMBOLS_HH
-
-#include "lily-guile.hh"
-
-#ifndef DECLARE_LY_SYMBOL
-#define DECLARE_LY_SYMBOL(a) extern SCM a ## _scm_sym
-#endif
-
-DECLARE_LY_SYMBOL(alt_symbol);
-DECLARE_LY_SYMBOL(at_line_start);
-DECLARE_LY_SYMBOL(auto_interstaff_knee_gap);
-DECLARE_LY_SYMBOL(auto_knee_gap);
-DECLARE_LY_SYMBOL(bar_size);
-DECLARE_LY_SYMBOL(beam);
-DECLARE_LY_SYMBOL(beam_thickness);
-DECLARE_LY_SYMBOL(beam_dir);
-DECLARE_LY_SYMBOL(beam_gap);
-DECLARE_LY_SYMBOL(bracket);
-DECLARE_LY_SYMBOL(break_helper_only);
-DECLARE_LY_SYMBOL(break_priority);
-DECLARE_LY_SYMBOL(breakable);
-DECLARE_LY_SYMBOL(char);
-DECLARE_LY_SYMBOL(change);
-DECLARE_LY_SYMBOL(contains_grace);
-DECLARE_LY_SYMBOL(damping);
-DECLARE_LY_SYMBOL(dashed);
-DECLARE_LY_SYMBOL(dangling);
-DECLARE_LY_SYMBOL(extremal);
-DECLARE_LY_SYMBOL(extra_space);
-DECLARE_LY_SYMBOL(dir_forced);
-DECLARE_LY_SYMBOL(dir_list);
-DECLARE_LY_SYMBOL(extender_height);
-DECLARE_LY_SYMBOL(hyphen_thickness);
-DECLARE_LY_SYMBOL(hyphen_height);
-DECLARE_LY_SYMBOL(hyphen_minimum_length);
-DECLARE_LY_SYMBOL(filledbox);
-DECLARE_LY_SYMBOL(fontsize);
-DECLARE_LY_SYMBOL(force_hshift);
-DECLARE_LY_SYMBOL(grace);
-DECLARE_LY_SYMBOL(header);
-DECLARE_LY_SYMBOL(horizontal_shift);
-DECLARE_LY_SYMBOL(interbeam);
-DECLARE_LY_SYMBOL(interbeam4);
-DECLARE_LY_SYMBOL(interline);
-DECLARE_LY_SYMBOL(length);
-DECLARE_LY_SYMBOL(linewidth);
-DECLARE_LY_SYMBOL(minimum_space);
-DECLARE_LY_SYMBOL(molecule);
-DECLARE_LY_SYMBOL(notewidth);
-DECLARE_LY_SYMBOL(non_default);
-DECLARE_LY_SYMBOL(non_rhythmic);
-DECLARE_LY_SYMBOL(no_staff_support);
-DECLARE_LY_SYMBOL(no_stem_extend);
-DECLARE_LY_SYMBOL(octave_dir);
-DECLARE_LY_SYMBOL(origin);
-DECLARE_LY_SYMBOL(output);
-DECLARE_LY_SYMBOL(padding);
-DECLARE_LY_SYMBOL(penalty);
-DECLARE_LY_SYMBOL(pianobrace);
-DECLARE_LY_SYMBOL(placebox);
-DECLARE_LY_SYMBOL(rulesym);
-DECLARE_LY_SYMBOL(rulethickness);
-DECLARE_LY_SYMBOL(script_priority);
-DECLARE_LY_SYMBOL(staffheight);
-DECLARE_LY_SYMBOL(stretch_distance);
-DECLARE_LY_SYMBOL(style);
-DECLARE_LY_SYMBOL(text);
-DECLARE_LY_SYMBOL(transparent);
-DECLARE_LY_SYMBOL(tuplet);
-DECLARE_LY_SYMBOL(tuplet_thick);
-DECLARE_LY_SYMBOL(tuplet_visibility);
-DECLARE_LY_SYMBOL(visibility_lambda);
-DECLARE_LY_SYMBOL(volta);
-DECLARE_LY_SYMBOL(void);
-DECLARE_LY_SYMBOL(volta_thick);
-
-
-
-#endif /* LY_SYMBOLS_HH */
-
+++ /dev/null
-/*
- ly-symbols.cc -- implement scheme symbols
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-#include "lily-guile.hh"
-
-/*
- storage
- */
-#undef LY_SYMBOLS_HH
-#define extern
-#include "ly-symbols.hh"
-
-#undef DECLARE_LY_SYMBOL
-#undef LY_SYMBOLS_HH
-#define DECLARE_LY_SYMBOL(a) a ## _scm_sym = ly_symbol (#a); scm_permanent_object(a ## _scm_sym)
-
-/*
- initialisations.
- */
-void
-init_symbols ()
-{
-#include "ly-symbols.hh"
-}
-
-
-ADD_SCM_INIT_FUNC(lysyms, init_symbols);
+++ /dev/null
-#
-
-depth = ../..
-
-examples=sonata-k3-l378
-LOCALSTEPMAKE_TEMPLATES=mutopia
-
-include $(depth)/make/stepmake.make
-
-
+++ /dev/null
- %{
-Here are the first four sonatas with barring, stem directions
-etc., laid out so that two note shapes can be used when that is
-ready. (Freenet will chop some of the code lines - I've got it
-as one Mudela line per bar.) As you will quickly see, K.4 raises
-some notation and collision problems. I've used the modern
-tied-notes syntax you prefer, instead of the way Scarlatti wrote
-it (bar1.jpeg). Scarlatti had a point, didn't he! (150 years
-later, Longo agreed - bar1 is from his edition.)
-
-Harpsichord music is written much closer than organ (or piano)
-music because harpsichords rely on the transfer of energy from
-one string directly to other harmonically-related strings to
-build power and maintain sound. That only happens when the
-strings are close to each other on the soundboard. In fact, that
-is one of the ways of judging what instrument a keyboard piece
-was written for - organ pipes don't talk to each other, organ
-sound is always fighting for clarity, and close harmonies sound
-thick, so good organ music is much more widely spaced. K.4 is
-typical of mainstream harpsichord music.
-
-I'll work on the musical aspects of the notation - Lily can be
-told to do it one way as easily as the other. (I really
-appreciate that.) But, would you give some thought to the best
-way of dealing with 'multi-voice' collisions? In the long term,
-particularly if you go ahead with automating beaming, you will
-need a general anti-collision system. But, for the next 6 months
-or so, to keep the Scarlatti project going, might it be faster
-to provide for setting the stem length of individual notes? Or
-some other similar workaround?
-
-Oh yes - when the middle note of a chord is trilled, Scarlatti
-wrote the praller directly in front of the note, whether the
-note was on a line or a space. And, he wrote most of the K.3
-fermatae on top of a bar line to indicate that a sound gap was
-wanted, not that the prior note be extended in length.
-
-John
-
-----------------------------------------------------
-%}
-
-----------------------------------------------------
-
-\score {
- \header {title="Domenico Scarlatti - Sonata K.3 L.378";
- description="Presto";}
- % vOne is right hand outside part, vTwo r.h. inside part,
- % vThree left hand outside, vFour l.h. inside.
- \notes {
- \context Staff=staffOne <
- \property Staff.nolines=11
- \property Voice.pletvisibility=0
- \time 2/2;
- \clef alto;
- \context Voice=vOne <{
-% 1
-\stemup s1
-% 2
-s4 [e'16 d' c' b] a4 s |
-% 3
-s4 a' e' c'' |
-% 4
-b'4 a'2 gis'4 |
-% 5
-s4 c'' a' e'' |
-% 6
-d''4 c''2 b'4 |
-% 7
-s4 c'' g' f'' |
-% 8
-e''4 d''2 cis''4 |
-% 9
-s4 d'' a' g'' |
-% 10
-fis''4 e''2 dis''4 |
-% 11
-[e''8 d''] c''2 b'4~b'
-% 12
-a'2 g'4~g'
-% 13
-fis'2 e'4~e'
-% 14
-d'2 c'4~c'
-% 15
-b2 a4 |
-% 16
-s4 c' dis' fis' |
-% 17
-a'4 c'' dis'' fis'' |
-% 18
-a''4 c'''2 [b''8 a''] |
-% 19
-g''4 f'' e'' d''^\fermata |
-s1 s
-% 22
-\stemdown s4 a, b, cis |
-% 23
-d4 e f2 |
-% 24
-\stemup f4 aes b d' |
-% 25
-f'4 aes' b' d'' |
-% 26
-f''4 aes''2 [g''8 f''] |
-% 27
-ees''4 d'' c'' d'' |
-% 28
-g'4 b' c'' \stemdown f |
-% 29
-e4 e'2 \stemup d''4 |
-% 30
-e'4 b' c'' \stemdown b, |
-% 31
-a,4 a \stemup c'' d'' |
-% 32
-a4 b c' d' |
-% 33
-e'4 f' g' a' |
-% 34
-b'4 [a'8 g'] g''4 c'' |
-% 35
-c''4~[c''16 b' c'' d''] d''4.^\prall c''8 |
-% 36
-c''4 c''' b'' bes''
-% 37
-a'' aes''2 g''4~g''
-% 38
-f''2 dis''4~dis''
-% 39
-d''2 c''4~c''
-% 40
-b'4 c'' d'' |
-% 41
-e'4 f' g' a' |
-% 42
-b'4 [a'8 g'] g''4 c'' |
-% 43
-c''4~[c''16 b' c'' d''] d''4.^\prall c''8 |
-% 44
-c''4 [g''16 f'' e'' d''] c''4 s |
-% 45
-s4 [g16 f e d] c4 s |
-% 46
-s4 c'' g' a' |
-% 47
-e''4 c'' d'' b' |
-% 48
-e'2. s4 |
-% 49
-s4 [g'16 f' e' d'] c'4 s |
-% 50
-s4 c'' g' ees''~ees''
-% 51
-d''2 c''4 |
-% 52
-bes'4 s2 [d'16 c' bes a] |
-% 53
-g4 s2 g''4 |
-% 54
-g''4 d'' f'' e'' |
-% 55
-d''4 [a''16 g'' f'' e''] d''4 s |
-% 56
-s4 [a16 g f e] d4 s |
-% 57
-s4 d'' a' f'' |
-% 58
-f'' e''4 bes'2 |
-% 59
-cis''4 s2. |
-% 60
-\stemdown s4 a' gis' g' |
-% 61
-fis'4 f' e'2 |
-% 62
-dis'4 d' cis' c' |
-% 63
-b4 bes a2 |
-% 64
-gis4 g fis f |
-% 65
-\stemup s4 e gis b |
-% 66
-d'4 f' gis' b' |
-% 67
-d''4 f''2 e''8 d'' |
-% 68
-c''4 b' a' g'^\fermata |
-s1 s
-% 71
-\stemdown s4 d e fis |
-% 72
-g4 a bes2 |
-% 73
-\stemup e'4 g' bes' e'' |
-% 74
-bes''2. [a''8 gis''] |
-% 75
-a''4 g''2 [f''8 e''] |
-% 76
-f''4 e''2 [d''8 cis''] |
-% 77
-d''4 c''2 [b'8 a'] |
-% 78
-gis'4 gis'' a'' \stemdown d |
-% 79
-c4 c'2 \stemup b''4 |
-% 80
-c''4 gis'' a'' \stemdown g, |
-% 81
-f,4 f2 \stemup b''4 |
-% 82
-f'4 gis' a' b' |
-% 83
-c''4 d'' e'' f'' |
-% 84
-gis'4 [a'8 b'] e'4 d'' |
-% 85
-c''4 d'' b'2 |
-% 86
-a'4 a'' gis'' g'' |
-% 87
-fis''4 f''2 e''4~e''
-% 88
-d''2 c''4~c''
-% 89
-b'2 a'4~a'
-% 90
-gis'4 a' d'' |
-% 91
-a'2 gis' |
-% 92
-a'4 s2 [e'16 d' c' b] |
-% 93
-a4 s2 d''4 |
-% 94
-c''2 gis' |
-% 95
-a'2. s4 |
-} {
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-s s s s s s s s s s s s s
-% 46
-s2. f''4 |
-% 47
-g'2 f' |
-% 48
-c''2. s4 |
-s1 s
-% 51
-g'2 fis' |
-s1
-% 53
-s2. bes'4 |
-% 54
-a'4 f'' d'' cis'' |
-% 55
-f''4 s2. |
-s1 s
-% 58
-bes'2 e''4 d'' |
-% 59
-a'4 s2. |
-s1 s s s s s s s s s s s s s s s s s s s s s s s s
-% 85
-a'2 gis' |
-s1 s s s s
-% 91
-e'2 b' |
-s1
-% 93
-s2. a'4 |
-% 94
-a'2 b'
-} {
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-% 91
-c''4 d''4 s2 |
-s1
-% 93
-s2. f'4 |
-% 94
-e'2 e'2
- }>
- \context Voice=vTwo <
- {
- %- right hand unchorded notes -
- }>
- \context Voice=vThree <{
-% 1
-\stemdown s2. [e''16 d'' c'' b'] |
-% 2
-a'4 s2 [e16 d c b,] |
-% 3
-a,4 s2 a4 |
-% 4
-e4 c' b2 |
-% 5
-a4 s2 c'4 |
-% 6
-g4 e' d'2 |
-% 7
-c'4 s2 d'4 |
-% 8
-a4 f' e'2 |
-% 9
-d'4 s2 e'4 |
-% 10
-b4 g' fis'2 |
-% 11
-e'2 dis'4 d' |
-% 12
-cis'4 c' b2 |
-% 13
-bes4 a gis g |
-% 14
-fis4 f e2 |
-% 15
-dis4 d cis c |
-% 16
-b,2 s |
-s1
-% 18
-s4 b, cis dis |
-% 19
-e4 f g2 |
-% 20
-\stemup g4 bes cis' e' |
-% 21
-g'4 bes' cis'' e'' |
-% 22
-g''4 bes''2 [a''8 g''] |
-% 23
-f''4 e'' d'' c''^\fermata |
-s1 s
-% 26
-\stemdown s4 g, a, b, |
-% 27
-c4 d dis f |
-% 28
-g4 g'2 \stemup d''4 |
-% 29
-g'4 b' c'' \stemdown d |
-% 30
-c4 c'2 \stemup d''4 |
-% 31
-c'4 b'2 \stemdown g,4 |
-% 32
-f,4 f e d |
-% 33
-c4 d e f |
-% 34
-g,4 g e f |
-% 35
-g4 f g g, |
-% 36
-c2 s
-% 37
-s4 c'' b' bes' |
-% 38
-a'4 gis' g'2 |
-% 39
-fis'4 f' e' dis' |
-% 40
-d4 d' c' b |
-% 41
-c4 d e f |
-% 42
-g,4 g e f |
-% 43
-g4 f g g, |
-% 44
-c2 s4 [g'16 f' e' d'] |
-% 45
-c'4 s2 [g,16 f, e, d,] |
-% 46
-c,4 c s f |
-% 47
-g2 g, |
-% 48
-c2. [g''16 f'' e'' d''] |
-% 49
-c''4 s2 [g16 f e d] |
-% 50
-c4 s2 c'4 |
-% 51
-d'2 d |
-% 52
-g4 [d''16 c'' bes' a'] g'4 s2
-% 53
-[d16 c bes, a,] g,4 g |
-% 54
-a2 a, |
-% 55
-d2 s4 [a'16 g' f' e'] |
-% 56
-d'4 s2 [a,16 g, f, e,] |
-% 57
-d,4 s2 d'4 |
-% 58
-g2 g, |
-% 59
-a,4 \stemup a'' gis'' g'' |
-% 60
-fis''4 f''2 e''4~e''
-% 61
-d''2 c''4~c''
-% 62
-b'2 a'4~a'
-% 63
-g'2 f'4~f'
-% 64
-e'2 d'4 |
-% 65
-\stemdown e,2^\fermata s |
-s1
-% 67
-s4 e fis gis |
-% 68
-a4 b c'2 |
-% 69
-\stemup fis4 a c' ees' |
-% 70
-fis'4 a' c'' ees'' |
-% 71
-c'''2. [bes''8 a''] |
-% 72
-bes''4 a'' g'' f'' |
-s1
-% 74
-\stemdown s4 c d e |
-% 75
-f2 e |
-% 76
-d2 c |
-% 77
-b,2 a, |
-% 78
-e4 e'2 \stemup b''4 |
-% 79
-e''4 gis'' a'' \stemdown b, |
-% 80
-a,4 a2 \stemup b''4 |
-% 81
-a'4 gis'' a'' \stemdown e, |
-% 82
-d,4 d' c' b |
-% 83
-a4 b c' d' |
-% 84
-e4 d' c' d' |
-% 85
-e'4 d' e' e |
-% 86
-a2 s |
-% 87
-s4 a' gis' g' |
-% 88
-fis'4 f' e'2 |
-% 89
-dis'4 d' cis' c' |
-% 90
-d'2 c'4 d |
-% 91
-e4 d e e, |
-% 92
-a,4 [e''16 d'' c'' b'] a'4 s2
-% 93
-[e16 d c b,] a,4 d |
-% 94
-e2 e, |
-% 95
-a,2.
-} {
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s s
-% 90
-b2 a4
- } >
- \context Voice=vFour <
- {
- %- left hand unchorded notes -
- }
- >>}
- \paper{barsize=50.0; \translator {\StaffContext \consists
-Bar_number_engraver;}}
-}
-
-----------------------------------------------------
-
-\score {
- \header {title="Domenico Scarlatti - Sonata K.4 L.390";
- description="Allegro";}
- % vOne is right hand outside part, vTwo r.h. inside part,
- % vThree left hand outside, vFour l.h. inside.
- \notes {
- \context Staff=staffOne <
- \property Staff.nolines=11
- \keysignature bes;
- \time 4/4;
- \clef alto;
- \context Voice=vOne <
-{
-% 1
-\stemup \skip 4..*15/7; g'16 |
-% 2
-[g'16 bes' a' c''] [bes' d'' c'' ees''] d''4. g''8 |
-% 3
-[fis''8 g''] [a'' c''] [bes' c''] [d'' g'] |
-% 4
-[fis'8 g'] [a' c'] [bes c'] [d' g'] |
-% 5
-[fis'8 g'] a' \stemdown d [g bes,] [c d] |
-% 6
-[g,8 g8.] s16 \stemup ees'8 [f' a'] [bes'16 ees'' d'' c''] |
-% 7
-[d''8 ees''] [f'' bes'] \stemdown [f' d'] [ees'16 g' b d'] |
-% 8
-[c'16 ees' d' f'] [ees' g' f' aes'] \stemup [b' d'' cis'' e'']
-[d''8 e''] |
-% 9
-[f''8 g''] [a'' d''] \stemdown [a16 cis' b d'] [cis' e' a cis'] |
-% 10
-\stemup [f'8 g'] [a' d'] [cis' d'] [e'16 g' f' e'] |
-% 11
-[f'16 a' d''8]~[d''16 e'' c''8]~[c''16 d'' bes' g'] [a' e'' f''8]
-|
-% 12
-e''8 d''4~[d''16 cis''] [d'' bes' a' g'] [a' bes' cis'' a'] |
-% 13
-[bes'16 cis'' d'' e''] [a' g'' f'' e''] [f'' e'' d'' c''] [d''
-e'' f'' g''] |
-% 14
-[a''16 cis'' d'' e''] a' \stemdown [f' e' d'] a,4~a,16 \stemup
-[d'' cis'' b'] |
-% 15
-[a''16 cis'' d'' e''] [a' d'' cis'' b'] cis''4~[cis''16 cis'' d''
-e''] |
-% 16
-[a'8 a''8]~[a''16 g'' f'' e''] [f''8 e''16 d''] [cis''8 d''] |
-% 17
-cis''4 \stemdown [cis'16 a g f] [e8 a] d \stemup g' |
-% 18
-[a'16 cis' d' e'] a \stemdown [f e d] a,4~a,16 \stemup [d' cis'
-b] |
-% 19
-cis'4~[cis'16 cis' d' e'] [a8 a']~[a'16 g' f' e'] |
-% 20
-[f'16 a' d''8]~[d''16 e'' cis''8] d''4 [a'8 g'] |
-% 21
-fis'8 d'4 cis'8 [d'8. e'16] [fis'8. g'16]~
-% 22
-[g'16 a'8 fis'16] [bes'8. cis''16] [cis''8 d''] r8. d'16 |
-% 23
-[d'16 fis' e' g'] [fis' a' g' bes'] a'4. bes'8 |
-% 24
-[c''8 d''] [ees'' fis'] [g' a'] [bes' b'] |
-% 25
-[c''8 d''] [ees'' g''] [f'' ees''] [d'' c''] |
-% 26
-[g''16 b' c'' d''] g' \stemdown [ees' d' c'] g,4~g,16 \stemup
-[c'' b' a'] |
-% 27
-[g''16 b' c'' d''] [g' c'' b' a'] b'4~b'16 \stemdown [f' ees' d']
-|
-% 28
-g8 \stemup g''8~[g''16 f'' ees'' d''] ees''8 \stemdown f [g aes]
-|
-% 29
-g,8 \stemup [ees'16 f'] [d'8 ees'] [f' g'] g'16 \stemdown [c' bes
-a] |
-% 30
-[g16 g'] \stemup cis''8 [d''16 c''' bes'' a''] [bes''8 a''16 g'']
-[fis''8 g''] |
-% 31
-[a''16 fis'' g'' a''] d'' \stemdown [bes' a' g'] d,4~d,16 \stemup
-[g'' fis'' e''] |
-% 32
-[fis''16 fis'' g'' a''] d'' \stemdown [bes' a' g'] [d'' a' fis'
-a'] s \stemup [fis''16 g'' a''] |
-% 33
-d''8 g''8~[g''16 c''' bes'' a''] [bes''8 a''16 g''] [fis''8 g'']
-|
-% 34
-[a''16 a' bes' c''] \stemdown [fis' d' c' bes] [a8 d] g s |
-% 35
-d4~d16 \stemup [g' fis' e'] [d'' fis' g' a'] d' \stemdown [bes a
-g] |
-% 36
-d,4~d,16 \stemup [g' fis' e'] d'' [fis' g' a'] [d' g'] [fis' e']
-|
-% 37
-d''4~d''16 [fis' g' a'] d' \stemdown [bes a g] [d a g fis] |
-% 38
-[g8 ees] [d d,] g,4 \stemup [bes'16 g' a' fis'] |
-% 39
-bes'8 g'4 fis'8 [g'8. a'16] [bes'8 c''] |
-% 40
-[d''8. d''16] [ees''8 fis'' ] [fis'' g''] r8. s16 |
-}
-{
-s1 s s s s s s s s s s
-%12
-cis''8 s s4 s2 |
-s1 s s s
-% 17
-<e''4 a'> s4 s2 |
-s1 s s s
-%22
-s4 s8. a'16 d'4 s4 |
-s1
-%24
-s2 s4. d'8 |
-%25
-ees'8 f' g' s s2 |
-s1 s s
-%29
-s4. c'8 s4 ees'16
-}
- >
- \context Voice=vTwo <
- {
-s1 s s s s s s s s s
-% 11
-\stemdown s4. [c''16 g'] fis'8 s8 [a'8. b'16] |
-% 12
-s16 \skip 4..*71/7;
-% 16
-[f''16 a' bes'8]~[bes'16 a'8 g'16] |
-s1 s s
-% 20
-[f'8. f'16] [e'8. g'16]~[g' bes' a' g'] [fis' d' e' cis'] |
-% 21
-[d'16 c' bes a] [g bes a g] [fis a g8] [a16 d bes8] |
-% 22
-[ces'8 d']~[d'16 g' e' g'] s2 |
-s1 s
-% 25
-s4. \skip 4..*64/7;
-% 29
-c'8 [f'16 d' ees' d'] \skip 4..*12/7;
-% 30
-[bes''16 d'' ees''8]~[ees''16 d''8 c''16] |
-% 31
-\skip 4..*40/7;
-% 33
-[bes''16 d'' ees''8]~[ees''16 d''8 c''16] |
-% 34
-\skip 4..*48/7; |
-% 37
-fis'4~fis'16 \skip 4..*27/7; |
-% 39
-[g'16 f' ees' d'] [c' ees' d' c']~[c' bes c'8]~[c'16 d'8 fis'16]~
-% 40
-[fis'16 a' bes' g']~[g' c'' a'd'] <g'4 bes'>
-} >
- \context Voice=vThree <
-{
-% 1
-\stemdown \skip 4..*23/7;
-% 2
-g16 [g bes a c'] [bes d' c' ees'] |
-% 3
-[d'16 fis' e' g'] [fis' a' d' fis'] [g bes a c'] [bes d' c' ees']
-|
-% 4
-[d16 fis e g] [fis a d fis] [g, bes, a, c] [bes, d c ees] |
-% 5
-[d16 fis e g] fis \stemup [c' bes a] [bes d' g'8]~ [g'16 a'
-fis'8] |
-% 6
-[g'16 ees' d' c'] \stemdown [d' bes a g] [a ees' d' c'] [d'8 a] |
-% 7
-[bes16 d' c' ees'] [d' f' ees' g'] \stemup [a' c'' b' d''] [c''8
-d''] |
-% 8
-[ees''8 f''] [g'' c''] \stemdown [g' e'] [f'16 a' cis' e'] |
-% 9
-[d'16 f' e' g'] [f' a' g' bes'] \stemup [cis''8 d''] [e'' g'] |
-% 10
-\stemdown [d16 f e g] [f a g bes] [a, cis b, d] [cis8 a,] |
-% 11
-[d8 f] [g a] [d g] [cis d] |
-% 12
-a2 d' |
-% 13
-[g'8 e'] [f' cis'] d' a'4 g'8 |
-% 14
-a,4~a,16 \stemup [d'' cis'' b'] [a'' cis'' d'' e''] a' \stemdown
-[f' e' d'] |
-% 15
-a,4~a,16 [f' e' d'] [a' e' cis' e'] [a g' f' e'] |
-% 16
-[a16 f' e' d'] [a e' d' cis'] [d'8 g] [a bes] |
-% 17
-a,16 \stemup [e' f' g'] [e'8 f'] [g' f'16 e'] f' \stemdown [d'
-cis' b] |
-% 18
-a,4~a,16 \stemup [d' cis' b] [a' cis' d' e'] a \stemdown [f e d]
-|
-% 19
-[a16 e cis e] [a, g f e] [a, f e d] [a, e d cis] |
-% 20
-[d8 g] [a a,] d,2 |
-% 21
-d,2 d, |
-% 22
-d,2 d,4 \skip 4..*11/7;
-% 23
-d16 [d fis e g] [fis a g bes] |
-% 24
-[a16 c' bes d'] [c' ees' d' c'] [bes c' a bes] [g a f g] |
-% 25
-[ees16 f d ees] [c d bes, c] [aes, bes, g, aes,] [f, aes, g, f,]
-|
-% 26
-g,4~g,16 \stemup [c'' b' a'] [g'' b' c'' d''] g' \stemdown [ees'
-d' c'] |
-% 27
-g,4~g,16 [ees' d' c'] [g' d' b d'] g \stemup [b' c'' d''] |
-% 28
-[g'16 ees'] \stemdown [d' c'] [g d' c' b] [c' g'] \stemup [d''
-c''] [b'8 c''] |
-% 29
-[d''16 d'] \stemdown g8 [b16 g f ees] [d8 g] c \stemup a' |
-% 30
-bes'8 \stemdown [fis'16 e'] [fis'8 d'] [g' c'] [d' ees'] |
-% 31
-d,4~d,16 \stemup [g'' fis'' e''] [fis'' fis'' g'' a''] d''
-\stemdown [bes' a' g'] |
-% 32
-d4~d16 \stemup [g'' fis'' e''] fis''4 \stemdown [d'16 c'' bes'
-a'] |
-% 33
-[d'16 bes' a' g'] [d' a' g' fis'] [g'8 c'] [d' ees'] |
-% 34
-[d8 d'] \stemup [a' bes'] [c'' bes'16 a'] [bes'8 c''] |
-% 35
-[d''16 fis' g' a'] d' \stemdown [bes a g] d,4~d,16 \stemup [g'
-fis' e'] |
-% 36
-[d''16 fis' g' a'] d' \stemdown [bes a g] d,4~d,16 [bes a g] |
-% 37
-[d'16 a fis a] [d c' bes a] d8 \stemup d''8. [c''16 bes' a'] |
-% 38
-[bes'16 d'' g''8]~[g''16 a''8 fis''16] g''4 s4 |
-% 39
-\stemdown g,2 g, |
-% 40
-g,2 g,4
-}
-{s1 s s s s s s s s s s s s s s s
-%17
-s4 s8 d' s2 |
-s1 s s s s s s s s s s
-% 29
-g'16 s8. s2 s8 fis' |
-%30
-g8 s s2. |
-s1 s s
-%34
-s4. g'8}
-{s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s
-% 29
-b'16}
- >
- \context Voice=vFour <
- {
-\stemdown \skip 4..*74/7;
-% 5
-[g'16 bes a8.] c'16~c'
-% 6
-\skip 4..*81/7;
-% 11
-\stemup [f16 f' e'8] \skip 4..*11/7;
-% 12
-\stemdown [e'16 f' d'] [e' f' g'8] s [fis'16 e'] [fis' g' a'
-fis'] |
-% 13
-s2 s8 a'4 g'8 |
-% 14
-\skip 4..*48/7; |
-% 17
-s2 [g'16 e' d' cis'] \skip 4..*39/7;
-% 20
-\skip 4..*135/7;
-% 28
-aes'8 [b16 g'8 f'16] |
-% 29
-s16 \skip 4..*13/7; s8 |
-% 30
-s8 \skip 4..*68/7;
-% 34
-s8 [c''16 g'8 fis'16] [bes'' g' f' ees'] |
-% 35
-\skip 4..*50/7;
-% 38
-[g''16 c''] [bes'8 a'] s16 [ees'' d'' c'']
-} >>}
- \paper{barsize=50.0; \translator {\StaffContext \consists
-Bar_number_engraver;}}
-}
-
-----------------------------------------------------
-
-\version "1.2.0";
+++ /dev/null
- %{
-From: bf250@freenet.carleton.ca (John Sankey)
-To: hanwen@cs.uu.nl, jantien@xs4all.nl
-Subject: the first Sonata
-Date: Sat, 16 Jan 1999 20:50:07 -0500 (EST)
-
-To give you an idea of what is involved in the Scarlatti project,
-here is the Mudela for the first sonata of the 550, organized so I
-can proofread the ps output against the original manuscripts. Lily
-mutters about clashing note columns and spans, but puts everything
-except note stems where they should be.
-
-I've set it on a double staff to separate the parts enough so they
-are readable without setting all the note stem directions manually.
-Voices 1 & 3 are the chords, 2 & 4 the notes that can't be chorded
-because of duration.
-
-I have a program that does most of the enharmonic corrections to
-mi2mu output properly. I'm mulling over how to insert beam brackets
-(so I can correct the few it gets wrong) and set stem directions
-(ditto) mostly automatically too, but that's not as easy.
-
-Suggestions welcome as always
-John
-
-%}
-
-\score {
-\header {title ="Domenico Scarlatti - Sonata K.1 L.366";
- description="Allegro";}
-% vOne is right hand outside part, vTwo r.h. inside part,
-% vThree left hand outside, vFour l.h. inside.
-\notes {
-\context Staff = staffOne <
-\property Staff.nolines=11
-\keysignature bes;
-\time 4/4;
-\clef alto;
-\context Voice = vOne <
-{
-% 1
-\stemup [d''16 e'' f'' g''] [a'' a' cis'' a'] d''4. e''8 |
-% 2
-[f''16 d'' g'' e''] [a'' f'' e'' d''] [cis''8 a''] a''4^\prall~
-% 3
-[a''16 g'' f'' e''] [d'' c'' bes' a'] bes'8 \stemdown bes' [g'
-bes'] |
-% 4
-[e'8 e'] [e' e'] f \stemup f'' f''4^\prall~
-% 5
-[f''16 e'' d'' c''] [bes' a' g' f'] g'8 \stemdown g' [e' e'] |
-% 6
-[e'8 a] [a a] [d e] [f g] |
-% 7
-a16 s b s cis' s d' s e' s f' s g' s a' s |
-% 8
-b'16 s cis'' s d'' s e'' s [f'' d'' bes' g'] [e'' cis'' a' cis'']
-|
-% 9
-\stemup a''4 g''4^\prallmordent \stemdown [f''16 d'' bes' g']
-[e'' cis'' a' cis''] |
-% 10
-\stemup [f''16 d'' g'' e''] [a'' f'' e'' d''] [cis'' a' d'' b']
-[e'' g' f' e'] |
-% 11
-[f'16 d' g' e'] [a' f' e' d'] [cis' a d' b] [e' cis' f' d'] |
-% 12
-g'16 \stemdown [ e' d' cis'] \stemup f'8 [g'16^\prall f'32 g']
-[a'16 e' f' d'] \stemdown [e' cis' d' b] |
-% 13
-[cis'16 a b aes] \stemup cis'4 a,4^\prall^"\\textnatural"
-r^\fermata | \break
-% 14
-[a'16 b' cis'' d''] [e'' cis'' f'' d''] e''4. a'8 |
-% 15
-[b'16 g' cis'' a'] [d'' b' e'' cis''] [fis'' d'' g'' e''] [a''
-c'' bes' a'] |
-% 16
-[bes'16 g' c'' a'] [d'' bes' a' g'] [fis' d' g' e'] [a' c' bes a]
-|
-% 17
-\stemdown g16 s a s bes s c' s d' s e' s f' s g' s |
-% 18
-[a'16 f' d' bes] [g' e' c' e'] \stemup c''4 bes'4^\prall |
-% 19
-[c''8 f''] [bes' e''] [a'16 f' c'' a'] [f'' c'' a'' f''] |
-% 20
-[e''16 g'' c'' e''] g'8 \stemdown fis' g'16 s g8 [g g,] |
-% 21
-[d8 d'] d'16 \stemup [d'' c'' b'] [c'' a' e'' c''] [a'' e'' c'''
-a''] |
-% 22
-[gis''16 b'' e'' aes''] [b' d'' cis'' b'] \stemdown [cis''8 a']
-[a' a'] |
-% 23
-f,8 a' [f' f'16 a'] \stemup [bes'8 g''] g''4^\prall~ |
-% 24
-[g''16 f'' e'' d''] [c'' bes' a'] s \stemdown f,8 f' [f' f'] |
-% 25
-d,8 d' [f' d'16 f'] \stemup [g'8 e''] e''4^\prall~ |
-% 26
-[e''16 d'' cis'' b'] [a' g' f' e'] [f' d' g' e'] [a' f' bes' g']
-|
-% 27
-\stemdown [f'16 d' g' e'] [a' f' bes' g'] \stemup f' s g' s a' s
-bes' s |
-% 28
-[a'8 d''] [g' cis''] \stemdown [f'16 d' bes g] [e' cis' a cis'] |
-% 29
-\stemup [a'8 d''] [g' e''] [f'16 d' g' e'] [a' f' b' g'] |
-% 30
-[cis''16 a' d'' e''] [f'' d'' e'' cis''] [d'' a' bes' g']
-\stemdown [a' f' g' e'] |
-% 31
-[f'16 d' e' cis'] d'4 \stemup d4^\prall r4^\fermata |
-} {
-s1 s
-% 3
-s2 s8 g' bes' g' |
-% 4
-g'8 g' g' s s2 |
-% 5
-s2 s8 e' g' g' |
-% 6
-a8 e' e' s s2 |
-s1 s s s s s s s s s s s
-% 19
-s8 a'' s g'' s2 |
-s1 s s
-% 23
-s8 f' a' s s2 |
-% 24
-s2 s8 a' a' a' |
-% 25
-s8 f' d' s s2 |
-% 26
-\stemup s2 d''4 s |
-% 27
-\stemdown d'16 s e' s f' s g' s s2 |
-% 28
-s8 f'' s e'' s2 |
-% 29
-s8 f'' s cis''
-} >
-\context Voice = vTwo <
-{s1 s s s s
-%6
-\stemdown s2 d'16 s s4. |
-s1 s s s s s s s s s s s s s s s s s s
-%26
-\stemup s2 d''4 s |
-%27
-s2 d''4 s2
-s1
-%29
-s2 d''8}
->
-\context Voice = vThree <
-{
-% 1
-\stemdown s2 [d'16 e' f' g'] [a' a cis' a] |
-% 2
-[d'8 e'] [f' g'] [a' a'] [a' a'] |
-% 3
-[a'8 a'] [a' f'] g \stemup g'' g''4^\prall~
-% 4
-[g''16 f'' e'' d''] [c'' bes' a' g'] a'8 \stemdown a' [f' a'] |
-% 5
-[d'8 f'] [d' d'] e \stemup e'' e''4^\prall~
-% 6
-[e''16 d'' cis'' b'] [a' g' f' e'] [f' d' g' e'] [a' f' e' d'] |
-% 7
-[cis'16 a d' b] [e' cis' f' d'] [g' e' a' f'] [b' g' cis'' a'] |
-% 8
-[d''16 b' e'' cis''] [f'' d'' g'' e''] a''4 g''4^\prallmordent |
-% 9
-\stemdown [f''16 d'' bes' g'] [e'' cis'' a' cis''] \stemup a''4
-g''4^\prallmordent |
-% 10
-\stemdown [d'8 e'] [f' g'] [a b] [cis' a] |
-% 11
-[d8 e] [f g] a16 s b s cis' s d' s |
-% 12
-e16 \stemup [g' f' e'] \stemdown [d'8 bes] a,4 s8 \stemup f' |
-% 13
-[e'8 d'] \stemdown [a16 e cis e] s2 |
-% 14
-s2 [a16 b cis' d'] [e' cis' f' d'] |
-% 15
-g'16 s a' s b' s cis'' s [d'8 e'] [fis' d'] |
-% 16
-[g8 a8] [bes c'] [d e] [fis d] |
-% 17
-\stemup [bes16 g c' a] [d' bes e' c'] [f' d' g' e'] [a' f' bes'
-g'] |
-% 18
-c''4 bes'4^\prall \stemdown [a'16 f' d' bes] [g' e' c' e'] |
-% 19
-[a'16 f' d' bes] [g' e' c' e'] f' s f8 [f f,] |
-% 20
-[c8 c'] c'16 \stemup [c'' bes' a'] [bes' g' d'' bes'] [g'' d''
-bes'' g''] |
-% 21
-[f''16 a'' d'' f''] a'8 \stemdown gis' a'16 s a8 [a a,] |
-% 22
-[e8 e,] [e, e,] a, \stemup a'' a''4^\prall^"\\textflat"~ |
-% 23
-[a''16 g'' f'' e''] [d'' c'' bes'] s \stemdown g,8 bes' [bes'
-bes'] |
-% 24
-e,8 e' [g' e'16 g'] \stemup [a'8 f''] f''4^\prall~ |
-% 25
-[f''16 e'' d'' c''] [bes' a' g'] s \stemdown e,8 g' [g' g'] |
-% 26
-a,8 a [e' a] d'16 s e' s f' s g' s |
-% 27
-s2 [d'16 d' e' e'] [f' f' g' g'] |
-% 28
-[f'16 d' bes g] [e' cis' a cis'] \stemup [a'8 d''] [g' e''] |
-% 29
-\stemdown [f'16 d' bes g] [e' cis' a cis'] [d8 e] [f g] |
-% 30
-[a8 g] [a a,] d4 s8 \stemup bes' |
-% 31
-[a'8 g'] f'16 \stemdown [a f a] s2 |
-} {
-s1 s
-% 3
-f'8 f' f' s s2 |
-% 4
-s2 s8 f' a' f' |
-% 5
-f'8 d' f' s s2 |
-s1 s s s s s s s s s s s s s s s s
-% 23
-s2 s8 g' g' g' |
-ii% 24
-s8 g' e' s s2 |
-% 25
-s2 s8 e' e' e' |
-% 26
-s8 e' a s s2 |
-s1
-% 28
-s2 s8 f'' s cis'' |
-} >
-\context Voice = vFour <
-{s1 s s s s s s s s
-%10
-\stemdown d''16 s s4. a'16 s s4. |
-%11
-d'16 s s4. s2 |
-s1 s s
-%15
-s2 d''16 s s4. |
-%16
-g'16 s s4. d'16 s s4. |
-s1 s s s s s s s s s
-%27
-\stemup d''4 s2. |
-s1
-%29
-\stemdown s2 d'16}
->
->}
-\paper{barsize=50.0; \translator {\StaffContext \consists
-Bar_number_engraver;}}
-}
-\version "1.2.0";
+++ /dev/null
-
-
-\score {
- \header {title="Domenico Scarlatti - Sonata K.2 L.388";
- description="Presto";}
- % vOne is right hand outside part, vTwo r.h. inside part,
- % vThree left hand outside, vFour l.h. inside.
- \notes {
- \context Staff=staffOne <
- \property Staff.nolines=11
- \property Voice.pletvisibility=0
- \keysignature fis;
- \time 3/8;
- \clef alto;
- \context Voice=vOne <{
-%1
-\stemup [g''8 g' g'] |
-% 2
-g'4.^\prall |
-% 3
-[g'16 d' b' g' d'' b'] |
-% 4
-g''4. |
-% 5
-[b'8 c'' d''] |
-% 6
-c''4 b'8 |
-% 7
-[c''16 a'' b' g'' a' fis''] |
-% 8
-[b'16 g'' a' fis'' g''8] |
-% 9
-\stemdown [g'8 a' b'] |
-% 10
-[a'8 fis' g'] |
-% 11
-[c'8 d' d] |
-% 12
-[g8 d g,] |
-% 13
-[b'16 d'' a' d'' g' cis''] |
-% 14
-[fis'16 d'' e'' cis'' d'' a'] |
-% 15
-\stemup [g''8 fis'' e''] |
-% 16
-a''8 s4 |
-% 17
-[d''16 a' cis'' a' b' gis'] |
-% 18
-[e''16 a' b' gis' a' e'] |
-% 19
-\stemdown [fis'8 e' d'] |
-% 20
-cis'8 s4 |
-% 21
-\stemup [d''16 g' a'' fis' cis'' e'] |
-% 22
-[d''16 a' fis'] s8. |
-% 23
-\stemdown [b8 a g] |
-% 24
-fis8 s16 \stemup [d' fis' a'] |
-% 25
-[d''16 g' a'' f' cis'' e'] |
-% 26
-[d''16 a' f'] s8. |
-% 27
-\stemdown [bes8 a g] |
-% 28
-f8 s16 \stemup [d' f' a'] |
-% 29
-[d''16 g' cis'' fis' b' e'] |
-% 30
-[a'16 d' g' cis' fis' d'] |
-% 31
-[g'16 e' fis' d' e' cis'] |
-% 32
-[d'8 cis' b] |
-% 33
-[a8 g' fis'] |
-% 34
-[e'8 d'8. cis'16] |
-% 35
-[d'16 a fis' d' a' fis'] |
-% 36
-[d''16 a' fis'' d'' a'' a'] |
-% 37
-d''4. | \break
-% 38
-[d''8 d' d'] |
-% 39
-d'4.^\prall |
-% 40
-[d'16 a fis' d' a' fis'] |
-% 41
-d''4.^\prall |
-% 42
-[fis'8 g' a'] |
-% 43
-g'4^\prall fis'8 |
-% 44
-[g'16 e'' fis' d'' e' cis''] |
-% 45
-[fis'16 d'' e' cis'' d''8] |
-% 46
-\stemdown [d'8 e' fis'] |
-% 47
-[e'8 cis' d'] |
-% 48
-[g8 a a,] |
-% 49
-[d8 a, d,] |
-% 50
-\stemup [d''16 a' c'' a' b' gis'] |
-% 51
-[e''16 a' b' gis' a' e'] |
-% 52
-\stemdown [f'8 e' d'] |
-% 53
-c'8 s4 |
-% 54
-[e'8 d' c'] |
-% 55
-b8 s4 |
-% 56
-\stemup [c''16 g' b' g' a' fis'] |
-% 57
-[d''16 g' a' fis' g' d'] |
-% 58
-\stemdown [e'16 c'' d' b' c' a'] |
-% 59
-[b16 g' a fis' g g'] |
-% 60
-[c'8 d' e'] |
-% 61
-d'8 s4 |
-% 62
-[e8 d c] |
-% 63
-b,8 s \stemup [b16 d'] |
-% 64
-[g'16 c' d'' b fis' a] |
-% 65
-[g'16 d' b g] s8 |
-% 66
-\stemdown [ees8 d c] |
-% 67
-bes,8 s \stemup [ais16 d'] |
-% 68
-[g'16 c' d'' bes fis' a] |
-% 69
-[g'16 d' ais g] s8 |
-% 70
-[g''16 c'' fis'' b' e'' a'] |
-% 71
-[d''16 g' c'' fis' b' g'] |
-% 72
-[c''16 a' b' g' a' fis'] |
-% 73
-[g'8 fis' e'] |
-% 74
-[d'8 c' b] |
-% 75
-[a16 c' b g' a fis'] |
-% 76
-[g'16 d' b g b d'] |
-% 77
-[g'16 d' b' g' d'' d'] |
-% 78
-g'4. |}
-{s1 s s s s
-%6
-d4
- }>
- \context Voice=vThree <{
-% 1
-\stemdown s4. |
-% 2
-[g8 g, g,] |
-% 3
-g,4. |
-% 4
-[g16 d b g d' b] |
-% 5
-[g'8 a' b'] |
-% 6
-[a'8 fis' g'] |
-% 7
-[c'8 d' fis'] |
-% 8
-[g'8 d' g] |
-% 9
-\stemup [b'8 c'' d''] |
-% 10
-c''4^\prall b'8 |
-% 11
-[c''16 a'' b' g'' a' fis''] |
-% 12
-[b'16 g'' a' fis'' g''8] |
-% 13
-[g''8 fis'' e''] |
-% 14
-a''8 s4 |
-% 15
-\stemdown [b'16 d'' a' d'' g' cis''] |
-% 16
-[fis'16 d'' e'' cis'' d'' a'] |
-% 17
-[fis'8 e' d'] |
-% 18
-cis'8 s4 |
-% 19
-\stemup [d''16 a' cis'' a' b' gis'] |
-% 20
-[e''16 a' b' gis' a' e'] |
-% 21
-\stemdown [b8 a g] |
-% 22
-fis8 s16 \stemup [d' fis' a'] |
-% 23
-[d''16 g' a'' fis' cis'' e'] |
-% 24
-[d''16 a' fis'] s8. |
-% 25
-\stemdown [bes8 a g] |
-% 26
-f8 s16 \stemup [d' f' a'] |
-% 27
-[d''16 g' a'' f' cis'' e'] |
-% 28
-[d''16 a' f'] s8. |
-% 29
-\stemdown [b8 a g] |
-% 30
-[fis8 e d] |
-% 31
-[g8 a a,] |
-% 32
-[b,16 g a, fis g, e] |
-% 33
-[fis,16 d e, cis d, d] |
-% 34
-[g,16 e a, fis e8] |
-% 35
-d,4. |
-% 36
-d,4. |
-% 37
-d,4. |
-% 38
-s4. |
-% 39
-[d8 d, d,] |
-% 40
-d,4. |
-% 41
-[d16 a, fis d a fis] |
-% 42
-[d'8 e' fis'] |
-% 43
-[e'8 cis' d'] |
-% 44
-[g8 a cis'] |
-% 45
-[d'8 a d] |
-% 46
-\stemup [fis'8 g' a'] |
-% 47
-g'4^\prall fis'8 |
-% 48
-[g'16 e'' fis' d'' e' cis''] |
-% 49
-[fis'16 d'' e' cis'' d''8] |
-% 50
-\stemdown [f'8 e' d'] |
-% 51
-c'8 s4 |
-% 52
-\stemup [d''16 a' c'' a' b' gis'] |
-% 53
-[e''16 a' b' gis' a' e'] |
-% 54
-[c''16 g' b' g' a' fis'] |
-% 55
-[d''16 g' a' fis' g' d'] |
-% 56
-\stemdown [e'8 d' c'] |
-% 57
-b8 s4 |
-% 58
-\stemup [g''8 fis'' e''] |
-% 59
-[d''8 c'' b'] |
-% 60
-[a'16 b' c'' b' a' g'] |
-% 61
-[a'16 fis' g' e' fis' d'] |
-% 62
-[g'16 c' d'' b fis' a] |
-% 63
-[g'16 d' b g] s8 |
-% 64
-\stemdown [e8 d c] |
-% 65
-b,8 s \stemup [b16 d'] |
-% 66
-[g'16 c' d'' bes fis' a] |
-% 67
-[g'16 d' bes g] s8 |
-% 68
-\stemdown [ees8 d c] |
-% 69
-bes,8 s [bes16 d'] |
-% 70
-[e'8 d' c'] |
-% 71
-[b8 a g] |
-% 72
-[c'8 d' d] |
-% 73
-[e16 c' d b c a] |
-% 74
-[b,16 g a, fis g, g] |
-% 75
-[c8 d d,] |
-% 76
-g,4. |
-% 77
-g,4. |
-% 78
-g,4. |
- } >
- >}
- \paper{barsize=50.0; \translator {\StaffContext \consists
-Bar_number_engraver;}}
-}
-
-\version "1.2.0";
+++ /dev/null
- \header {
- composer = "Domenico Scarlatti";
- title="Sonata K.3";
- opus="L.378";
- movement="Presto";
- copyright = "General Public License";
-}
-
-tolower = \translator Staff = lower
-toupper = \translator Staff = upper
-
-RHtoL = { \tolower \stemdown }
-RHtoR = { \toupper \stemup }
-LHtoR = { \toupper \stemup }
-LHtoL = { \tolower \stemdown }
-
-\score {
- \notes
- \context PianoStaff <
- \context Staff = upper <\context Voice = mainV <{
- % 1
- \stemup s1
- s4 [e'16 d' c' b] a4 s |
- s4 a' e' c'' |
- b'4 a'2 gis'4 |
- s4 c'' a' e'' |
- % 5
- d''4 c''2 b'4 |
- s4 c'' g' f'' |
- e''4 d''2 cis''4 |
- s4 d'' a' g'' |
- fis''4 e''2 dis''4 |
- % 10
- [e''8 d''] c''2 b'4~b'
- a'2 g'4~g'
- fis'2 e'4~e'
- d'2 c'4~c'
- b2 a4 |
- % 15
- s4 c' dis' fis' |
- a'4 c'' dis'' fis'' |
- a''4 c'''2 [b''8 a''] |
- g''4 f'' e'' d''^\fermata |
- s1
- % 20
- s
- s4 \RHtoL a, b, cis |
- d4 e f2 |
- \RHtoR f4 aes b d' |
- f'4 aes' b' d'' |
- % 25
- f''4 aes''2 [g''8 f''] |
- ees''4 d'' c'' d'' |
- g'4 b' c'' \RHtoL f |
- e4 e'2 \RHtoR d''4 |
- e'4 b' c'' \RHtoL b, |
- % 30
- a,4 a \RHtoR c'' d'' |
- a4 b c' d' |
- e'4 f' g' a' |
- b'4 [a'8 g'] g''4 c'' |
- c''4~[c''16 b' c'' d''] d''4.^\prall c''8 |
- % 35
- c''4 c''' b'' bes''
- a'' aes''2 g''4~g''
- f''2 dis''4~dis''
- d''2 c''4~c''
- b'4 c'' d'' |
- % 40
- e'4 f' g' a' |
- b'4 [a'8 g'] g''4 c'' |
- c''4~[c''16 b' c'' d''] d''4.^\prall c''8 |
- c''4 [g''16 f'' e'' d''] c''4 s |
- s4 [g16 f e d] c4 s |
- s4 c'' g'
- <
- { f''4 e'' c'' d'' b' c''2. }
- \context Voice = anotherV { a'4 g'2 f'2 e'2. }
- > s4 |
-
-
- s4 [g'16 f' e' d'] c'4 s |
- s4 c'' g' ees'' ~
- < { ees'' d''2 c''4 }
- \context Voice = anotherV { \stemdown g'2 fis'2 }
- >
- |
- bes'4 s2 [d'16 c' bes a] |
- g4 s2 <bes'4 g''> |
- <a' g''> <d'' f''> <d'' f''> <cis'' e''> |
- d''4 [a''16 g'' f'' e''] d''4 s |
- s4 [a16 g f e] d4 s |
- s4 d'' a' f'' |
- <
- { f''4 e'' e'' d'' }
- \context Voice = anotherV { \stemdown bes'2 bes'2 }
- > |
- < a'4 cis''> s2. |
- \RHtoL s4 a' gis' g' |
- fis'4 f' e'2 |
- dis'4 d' cis' c' |
- b4 bes a2 |
- gis4 g fis f |
- \RHtoR s4 e gis b |
- d'4 f' gis' b' |
- d''4 f''2 e''8 d'' |
- c''4 b' a' g'^\fermata |
- s1 s
- \RHtoL s4 d e fis |
- g4 a bes2 |
- \RHtoR e'4 g' bes' e'' |
- bes''2. [a''8 gis''] |
- a''4 g''2 [f''8 e''] |
- f''4 e''2 [d''8 cis''] |
- d''4 c''2 [b'8 a'] |
- gis'4 gis'' a'' \RHtoL d |
- c4 c'2 \RHtoR b''4 |
- c''4 gis'' a'' \RHtoL g, |
- f,4 f2 \RHtoR b''4 |
- f'4 gis' a' b' |
- c''4 d'' e'' f'' |
- gis'4 [a'8 b'] e'4 d'' |
- < \context Voice = mainV { c''4 d'' s2 }
- \context Voice = anotherV { \stemdown a'2 <b'2 gis'> }
- >
- a'4 a'' gis'' g'' |
- fis''4 f''2 e''4~e''
- d''2 c''4~c''
- b'2 a'4~a'
- gis'4 a' d'' |
- < \context Voice = mainV { c''4 d'' s2 }
- \context Voice = anotherV { \stemdown <a'2 e'> <gis' b'> } |
- >
- a'4 s2 [e'16 d' c' b] |
- a4 s2 <f'4 a' d''4> | %% added some chording.
- <e'2 a' c''> <e' gis' b'> |
- a'2. |
- }>>
-
-
- \context Staff = lower <{
-
- \stemdown s2. [e''16 d'' c'' b'] |
-
- a'4
- s2
- \clef bass; % HWN
- [e16 d c b,] |
- a,4 s2 a4 |
- e4 c' b2 |
- a4 s2 c'4 |
- g4 e' d'2 |
- c'4 s2 d'4 |
- a4 f' e'2 |
- d'4 s2 e'4 |
- b4 g' fis'2 |
- e'2 dis'4 d' |
- cis'4 c' b2 |
- bes4 a gis g |
- fis4 f e2 |
- dis4 d cis c |
- b,2 s |
- s1
- s4 b, cis dis |
- e4 f g2 |
- \LHtoR g4 bes cis' e' |
- g'4 bes' cis'' e'' |
- g''4 bes''2 [a''8 g''] |
- f''4 e'' d'' c''^\fermata |
- s1 s
- \LHtoL s4 g, a, b, |
- c4 d dis f |
- g4 g'2 \LHtoR d''4 |
- g'4 b' c'' \LHtoL d |
- c4 c'2 \LHtoR d''4 |
- c'4 b'2 \LHtoL g,4 |
- f,4 f e d |
- c4 d e f |
- g,4 g e f |
- g4 f g g, |
- c2 s
- \LHtoR %% added. HWN
- s4 c'' b' bes' |
- a'4 gis' g'2 |
- fis'4 f' e' dis'
- \LHtoL
- |
- d4 d' c' b |
- c4 d e f |
- g,4 g e f |
- g4 f g g, |
- c2 s4 [g'16 f' e' d'] |
- c'4 s2 [g,16 f, e, d,] |
- c,4 c s f |
- g2 g, |
- c2. \LHtoR [g''16 f'' e'' d''] |
-
- c''4 \LHtoL
- s2 [g16 f e d] |
- c4 s2 c'4 |
- d'2 d |
- g4
- \LHtoR
- [d''16 c'' bes' a'] g'4 \LHtoL s2
- [d16 c bes, a,] g,4 g |
- a2 a, |
- d2 s4 \LHtoR [a'16 g' f' e'] |
- d'4 \LHtoL s2 [a,16 g, f, e,] |
- d,4 s2 d'4 |
- g2 g, |
- a,4 \LHtoR a'' gis'' g'' |
- fis''4 f''2 e''4~e''
- d''2 c''4~c''
- b'2 a'4~a'
- g'2 f'4~f'
- e'2 d'4 |
- \LHtoL e,2^\fermata s |
- s1
- s4 e fis gis |
- a4 b c'2 |
- \LHtoR fis4 a c' ees' |
- fis'4 a' c'' ees'' |
- c'''2. [bes''8 a''] |
- bes''4 a'' g'' f'' |
- s1
- \LHtoL s4 c d e |
- f2 e |
- d2 c |
- b,2 a, |
- e4 e'2 \LHtoR b''4 |
- e''4 gis'' a'' \LHtoL b, |
- a,4 a2 \LHtoR b''4 |
- a'4 gis'' a'' \LHtoL e, |
- d,4 d' c' b |
- a4 b c' d' |
- e4 d' c' d' |
- e'4 d' e' e |
- a2 s |
- s4 a' gis' g' |
- fis'4 f' e'2 |
- dis'4 d' cis' c' |
- <d'2 b> <c'4 a> d |
- e4 d e e, |
- a,4 \LHtoR [e''16 d'' c'' b'] a'4 \LHtoL s2
- [e16 d c b,] a,4 d |
- e2 e, |
- a,2.
- }
- > >
-
-
-
-}
-\version "1.2.0";
+++ /dev/null
-
-\score {
- \header {title="Domenico Scarlatti - Sonata K.4 L.390";
- description="Allegro";}
- % vOne is right hand outside part, vTwo r.h. inside part,
- % vThree left hand outside, vFour l.h. inside.
- \notes {
- \context Staff=staffOne <
- \property Staff.nolines=11
- \keysignature bes;
- \time 4/4;
- \clef alto;
- \context Voice=vOne <
-{
-% 1
-\stemup \skip 4..*15/7; g'16 |
-% 2
-[g'16 bes' a' c''] [bes' d'' c'' ees''] d''4. g''8 |
-% 3
-[fis''8 g''] [a'' c''] [bes' c''] [d'' g'] |
-% 4
-[fis'8 g'] [a' c'] [bes c'] [d' g'] |
-% 5
-[fis'8 g'] a' \stemdown d [g bes,] [c d] |
-% 6
-[g,8 g8.] s16 \stemup ees'8 [f' a'] [bes'16 ees'' d'' c''] |
-% 7
-[d''8 ees''] [f'' bes'] \stemdown [f' d'] [ees'16 g' b d'] |
-% 8
-[c'16 ees' d' f'] [ees' g' f' aes'] \stemup [b' d'' cis'' e'']
-[d''8 e''] |
-% 9
-[f''8 g''] [a'' d''] \stemdown [a16 cis' b d'] [cis' e' a cis'] |
-% 10
-\stemup [f'8 g'] [a' d'] [cis' d'] [e'16 g' f' e'] |
-% 11
-[f'16 a' d''8]~[d''16 e'' c''8]~[c''16 d'' bes' g'] [a' e'' f''8]
-|
-% 12
-e''8 d''4~[d''16 cis''] [d'' bes' a' g'] [a' bes' cis'' a'] |
-% 13
-[bes'16 cis'' d'' e''] [a' g'' f'' e''] [f'' e'' d'' c''] [d''
-e'' f'' g''] |
-% 14
-[a''16 cis'' d'' e''] a' \stemdown [f' e' d'] a,4~a,16 \stemup
-[d'' cis'' b'] |
-% 15
-[a''16 cis'' d'' e''] [a' d'' cis'' b'] cis''4~[cis''16 cis'' d''
-e''] |
-% 16
-[a'8 a''8]~[a''16 g'' f'' e''] [f''8 e''16 d''] [cis''8 d''] |
-% 17
-cis''4 \stemdown [cis'16 a g f] [e8 a] d \stemup g' |
-% 18
-[a'16 cis' d' e'] a \stemdown [f e d] a,4~a,16 \stemup [d' cis'
-b] |
-% 19
-cis'4~[cis'16 cis' d' e'] [a8 a']~[a'16 g' f' e'] |
-% 20
-[f'16 a' d''8]~[d''16 e'' cis''8] d''4 [a'8 g'] |
-% 21
-fis'8 d'4 cis'8 [d'8. e'16] [fis'8. g'16]~
-% 22
-[g'16 a'8 fis'16] [bes'8. cis''16] [cis''8 d''] r8. d'16 |
-% 23
-[d'16 fis' e' g'] [fis' a' g' bes'] a'4. bes'8 |
-% 24
-[c''8 d''] [ees'' fis'] [g' a'] [bes' b'] |
-% 25
-[c''8 d''] [ees'' g''] [f'' ees''] [d'' c''] |
-% 26
-[g''16 b' c'' d''] g' \stemdown [ees' d' c'] g,4~g,16 \stemup
-[c'' b' a'] |
-% 27
-[g''16 b' c'' d''] [g' c'' b' a'] b'4~b'16 \stemdown [f' ees' d']
-|
-% 28
-g8 \stemup g''8~[g''16 f'' ees'' d''] ees''8 \stemdown f [g aes]
-|
-% 29
-g,8 \stemup [ees'16 f'] [d'8 ees'] [f' g'] g'16 \stemdown [c' bes
-a] |
-% 30
-[g16 g'] \stemup cis''8 [d''16 c''' bes'' a''] [bes''8 a''16 g'']
-[fis''8 g''] |
-% 31
-[a''16 fis'' g'' a''] d'' \stemdown [bes' a' g'] d,4~d,16 \stemup
-[g'' fis'' e''] |
-% 32
-[fis''16 fis'' g'' a''] d'' \stemdown [bes' a' g'] [d'' a' fis'
-a'] s \stemup [fis''16 g'' a''] |
-% 33
-d''8 g''8~[g''16 c''' bes'' a''] [bes''8 a''16 g''] [fis''8 g'']
-|
-% 34
-[a''16 a' bes' c''] \stemdown [fis' d' c' bes] [a8 d] g s |
-% 35
-d4~d16 \stemup [g' fis' e'] [d'' fis' g' a'] d' \stemdown [bes a
-g] |
-% 36
-d,4~d,16 \stemup [g' fis' e'] d'' [fis' g' a'] [d' g'] [fis' e']
-|
-% 37
-d''4~d''16 [fis' g' a'] d' \stemdown [bes a g] [d a g fis] |
-% 38
-[g8 ees] [d d,] g,4 \stemup [bes'16 g' a' fis'] |
-% 39
-bes'8 g'4 fis'8 [g'8. a'16] [bes'8 c''] |
-% 40
-[d''8. d''16] [ees''8 fis'' ] [fis'' g''] r8. s16 |
-}
-{
-s1 s s s s s s s s s s
-%12
-cis''8 s s4 s2 |
-s1 s s s
-% 17
-<e''4 a'> s4 s2 |
-s1 s s s
-%22
-s4 s8. a'16 d'4 s4 |
-s1
-%24
-s2 s4. d'8 |
-%25
-ees'8 f' g' s s2 |
-s1 s s
-%29
-s4. c'8 s4 ees'16
-}
- >
- \context Voice=vTwo <
- {
-s1 s s s s s s s s s
-% 11
-\stemdown s4. [c''16 g'] fis'8 s8 [a'8. b'16] |
-% 12
-s16 \skip 4..*71/7;
-% 16
-[f''16 a' bes'8]~[bes'16 a'8 g'16] |
-s1 s s
-% 20
-[f'8. f'16] [e'8. g'16]~[g' bes' a' g'] [fis' d' e' cis'] |
-% 21
-[d'16 c' bes a] [g bes a g] [fis a g8] [a16 d bes8] |
-% 22
-[ces'8 d']~[d'16 g' e' g'] s2 |
-s1 s
-% 25
-s4. \skip 4..*64/7;
-% 29
-c'8 [f'16 d' ees' d'] \skip 4..*12/7;
-% 30
-[bes''16 d'' ees''8]~[ees''16 d''8 c''16] |
-% 31
-\skip 4..*40/7;
-% 33
-[bes''16 d'' ees''8]~[ees''16 d''8 c''16] |
-% 34
-\skip 4..*48/7; |
-% 37
-fis'4~fis'16 \skip 4..*27/7; |
-% 39
-[g'16 f' ees' d'] [c' ees' d' c']~[c' bes c'8]~[c'16 d'8 fis'16]~
-% 40
-[fis'16 a' bes' g']~[g' c'' a'd'] <g'4 bes'>
-} >
- \context Voice=vThree <
-{
-% 1
-\stemdown \skip 4..*23/7;
-% 2
-g16 [g bes a c'] [bes d' c' ees'] |
-% 3
-[d'16 fis' e' g'] [fis' a' d' fis'] [g bes a c'] [bes d' c' ees']
-|
-% 4
-[d16 fis e g] [fis a d fis] [g, bes, a, c] [bes, d c ees] |
-% 5
-[d16 fis e g] fis \stemup [c' bes a] [bes d' g'8]~ [g'16 a'
-fis'8] |
-% 6
-[g'16 ees' d' c'] \stemdown [d' bes a g] [a ees' d' c'] [d'8 a] |
-% 7
-[bes16 d' c' ees'] [d' f' ees' g'] \stemup [a' c'' b' d''] [c''8
-d''] |
-% 8
-[ees''8 f''] [g'' c''] \stemdown [g' e'] [f'16 a' cis' e'] |
-% 9
-[d'16 f' e' g'] [f' a' g' bes'] \stemup [cis''8 d''] [e'' g'] |
-% 10
-\stemdown [d16 f e g] [f a g bes] [a, cis b, d] [cis8 a,] |
-% 11
-[d8 f] [g a] [d g] [cis d] |
-% 12
-a2 d' |
-% 13
-[g'8 e'] [f' cis'] d' a'4 g'8 |
-% 14
-a,4~a,16 \stemup [d'' cis'' b'] [a'' cis'' d'' e''] a' \stemdown
-[f' e' d'] |
-% 15
-a,4~a,16 [f' e' d'] [a' e' cis' e'] [a g' f' e'] |
-% 16
-[a16 f' e' d'] [a e' d' cis'] [d'8 g] [a bes] |
-% 17
-a,16 \stemup [e' f' g'] [e'8 f'] [g' f'16 e'] f' \stemdown [d'
-cis' b] |
-% 18
-a,4~a,16 \stemup [d' cis' b] [a' cis' d' e'] a \stemdown [f e d]
-|
-% 19
-[a16 e cis e] [a, g f e] [a, f e d] [a, e d cis] |
-% 20
-[d8 g] [a a,] d,2 |
-% 21
-d,2 d, |
-% 22
-d,2 d,4 \skip 4..*11/7;
-% 23
-d16 [d fis e g] [fis a g bes] |
-% 24
-[a16 c' bes d'] [c' ees' d' c'] [bes c' a bes] [g a f g] |
-% 25
-[ees16 f d ees] [c d bes, c] [aes, bes, g, aes,] [f, aes, g, f,]
-|
-% 26
-g,4~g,16 \stemup [c'' b' a'] [g'' b' c'' d''] g' \stemdown [ees'
-d' c'] |
-% 27
-g,4~g,16 [ees' d' c'] [g' d' b d'] g \stemup [b' c'' d''] |
-% 28
-[g'16 ees'] \stemdown [d' c'] [g d' c' b] [c' g'] \stemup [d''
-c''] [b'8 c''] |
-% 29
-[d''16 d'] \stemdown g8 [b16 g f ees] [d8 g] c \stemup a' |
-% 30
-bes'8 \stemdown [fis'16 e'] [fis'8 d'] [g' c'] [d' ees'] |
-% 31
-d,4~d,16 \stemup [g'' fis'' e''] [fis'' fis'' g'' a''] d''
-\stemdown [bes' a' g'] |
-% 32
-d4~d16 \stemup [g'' fis'' e''] fis''4 \stemdown [d'16 c'' bes'
-a'] |
-% 33
-[d'16 bes' a' g'] [d' a' g' fis'] [g'8 c'] [d' ees'] |
-% 34
-[d8 d'] \stemup [a' bes'] [c'' bes'16 a'] [bes'8 c''] |
-% 35
-[d''16 fis' g' a'] d' \stemdown [bes a g] d,4~d,16 \stemup [g'
-fis' e'] |
-% 36
-[d''16 fis' g' a'] d' \stemdown [bes a g] d,4~d,16 [bes a g] |
-% 37
-[d'16 a fis a] [d c' bes a] d8 \stemup d''8. [c''16 bes' a'] |
-% 38
-[bes'16 d'' g''8]~[g''16 a''8 fis''16] g''4 s4 |
-% 39
-\stemdown g,2 g, |
-% 40
-g,2 g,4
-}
-{s1 s s s s s s s s s s s s s s s
-%17
-s4 s8 d' s2 |
-s1 s s s s s s s s s s
-% 29
-g'16 s8. s2 s8 fis' |
-%30
-g8 s s2. |
-s1 s s
-%34
-s4. g'8}
-{s1 s s s s s s s s s s s s s s s s s s s s s s s s s s s
-% 29
-b'16}
- >
- \context Voice=vFour <
- {
-\stemdown \skip 4..*74/7;
-% 5
-[g'16 bes a8.] c'16~c'
-% 6
-\skip 4..*81/7;
-% 11
-\stemup [f16 f' e'8] \skip 4..*11/7;
-% 12
-\stemdown [e'16 f' d'] [e' f' g'8] s [fis'16 e'] [fis' g' a'
-fis'] |
-% 13
-s2 s8 a'4 g'8 |
-% 14
-\skip 4..*48/7; |
-% 17
-s2 [g'16 e' d' cis'] \skip 4..*39/7;
-% 20
-\skip 4..*135/7;
-% 28
-aes'8 [b16 g'8 f'16] |
-% 29
-s16 \skip 4..*13/7; s8 |
-% 30
-s8 \skip 4..*68/7;
-% 34
-s8 [c''16 g'8 fis'16] [bes'' g' f' ees'] |
-% 35
-\skip 4..*50/7;
-% 38
-[g''16 c''] [bes'8 a'] s16 [ees'' d'' c'']
-} >>}
- \paper{barsize=50.0; \translator {\StaffContext \consists
-Bar_number_engraver;}}
-}
-\version "1.2.0";
+++ /dev/null
-\header {
-filename = "AnSylvia.ly";
-enteredby = "Peter Chubb";
-composer = "Franz Schubert";
-poet = "Original text by William Shakespeare\\\\" +
- "German text by Eduard von Bauernfeld";
-opus = "D. 891";
-date = "1826";
-title = "An Sylvia";
-}
-
-
-\version "1.2.0";
-
-\include "paper16.ly";
-\include "paper13.ly";
-
-pianoRH=\notes \relative c' {
- \clef "G";
-%1
- <[b8-.(\pp d-. g-.> <b-. d-. g-.> <b-. d-. g-.> <)b-. d-. g-.>]
- <[b8-. d-. g-.(> <b-. d-. g-.> <b-. d-. g-.> <)b-. d-. g-.>]
- |
-%2
- <[c d g_"{\it simile}" \< > <c d g> <c d fis> <c d fis>]
- <[c d fis> < \! c d fis > <c d fis> <c d fis>]
-%3
- |
- <[d f gis \> > <d f gis> <d f gis> < \! d f gis >]
- <[c e a> <c e a> <e a c> <e a c>]
- |
-%4
- <[d a' b> <d a' b> <d g! b> <d g b>]
- <[d g a> <d g a> <d fis a> <d fis a>] |
-%5
- \repeat semi 2 {
- <[b_. d g( \pp > <b_. d g> <b_. d g> <)b_. d g>]
- <[b_. d g(> <b_. d g> <b_. d g> <)b_. d g>]
- |
-%6
- <[c d g> <c d g> <c d fis> <c d fis>]
- <[c d fis> <c d fis> < a c dis fis> <a c dis fis>]
- |
-%7
- <[g c e g> <g c e g> <g c e g> <g c e g >]
- <[g c e g> <g c e g> <g c e> <g c e>]
- |
-%8
- <[g c e> <g c e> <g b d> <g b d>]
- <[g b d> <g b d> <g b d> <g b d>]
- |
-%9
- <[fis a d> <fis a d> <fis a d> <fis a d>]
- <[g b d> <g b d> <g b d> <g b d>]
- |
-%10
- [< g a c d \> > <g a c d> <fis a c d> <\! fis a c d >]
- <[g b d> <g b d><g b d><g b d>]
- |
-%11
- <[g a c d> <g a c d> <fis a c d> <fis a c d>]
- <[g b d> <g b d>] <[b d g> <b d g>]
- |
-%12
- [<d fis b> <d fis b><d fis b><d fis b>]
- [<d fis b> <d fis b><d fis b><d fis b>]
- |
-%13
- <[e fis b> <e fis b> < e fis ais> <e fis ais>]
- <[e fis ais> <e fis ais> <d fis b> <d fis b>]
- |
-%14
- <[cis g' a!> <cis g' a> <cis a' g> <cis a' g>]
- <[cis g' a> <cis g' a> < e g a> <e g a>]
- |
-%15
- <[e g a> <e g a> <d fis a> <d fis a>]
- <[d fis a> <d fis a> <d fis a> <d fis a>]
- |
-%16
- <[d fis a> <d fis a> <d fis a> <d fis a>]
- <[d fis a \< > <d fis a> <d fis a> < \! d fis a >]
- |
-%17
- <[d a' c \> > <d a' c><d a' c>< \! d a' c >]
- <[d a' c> <d a' c><d a' c><d a' c>]
- |
-%18
- <[d g a c \> > <d g a c> <d g a c> <d g a c>]
- <[d fis a c> <\! d fis a c \pp > <d fis a c> <d fis a c>]
- |
-%19
- <[d g b> <d g b> <d g b> <d g b>]
- <[d g b> <d g b> <d g b> <s g b>]
- |
-%20
- <[e g c> <e g c> <e gis c> <e gis c>]
- <[e a c> <e a c> <e b' c> < e b' c>]
- |
-%21
- <[e c'> <e c'> <e a c> <e a c>]
- <[e a c> <e a c> <e a c> <e a c>]
- |
-%22
- <[d a' c> <d a' c> <d a'> <d a'>]
- <[d a' d> <d a' d> <d a' c> <d a' c>]
- |
-%23
- <[b d b'> <b d b'> <b d a'> <b d a'>]
- <[b d g \< > <b d g> <b d fis> < \! b d fis >]
- |
-%24
- <[b d e \> > <b d e> <gis b e> < \! gis b e >]
- <[a c e> <a c e> <e' a> <e a>]
- |
-%25
- <[d a' c> <d a' c> <d a' c> <d a' c>]
- <[d a'> <d a' \> > <c d fis> < \! c d fis \p >]
- |
-%26
- <[b d g> <b d g> <b d g> <b d g>]
- <[b d g> <b d g> <b d g> <b d g>]
- |
-%27
- <[c d g > <c d g > <c d fis > <c d fis >]
- <[c d fis \< > <c d fis >< \! c d fis ><c d fis >]
- |
-%28
- <[d f gis \> > <d f gis> < \! d f gis > <d f gis>]
- <[c e a> <c e a> <e a c> <e a c>]
-%29
- <[d a' b> <d a' b> <d g! b> <d g b>]
- <[d g a> <d g a> < d fis! a> <d fis a>]
- }
-%30
- <b2 d2 g2> r2
- \bar "|.";
-}
-
-pianoLH=\notes \relative c {
- \clef "F";
- g4-. d-. r [g8.( g16] | )a4-. d,-. r [a'8.( a16] |
-%3
- )b4-. [d,8.( d16] )c'4-. [d,8. d16] |
-%4
- d'4-. d,-. d'-. [d,8.( d16 ]
- \repeat semi 2 {
-%5
- )g4-. d_. r4 [g8.( g16] |
-%6
- )a4-. d,-. r4 [a'8.( a16] |
-%7
- )c4-. c,-. r [e8.( e16] |
-%8
- )g4-. g,-. r4 [b'8.( b16] |
-%9
- )d4-. c-. b-. g-. |
-%10
- d2(-> )g4 r4 \clef "G"; |
-%11
- d'''2->( )b4 r4 \clef "F"; |
-%12
- b,,4-. fis-. r [b8.( b16] |
-%13
- )cis4-. fis,4-. r4 [d'8.( d16] |
-%14
- )e4-. g,4-. r [cis8.( cis16] |
-%15
- )d4-. d,4-. r4 [d'8.( d16] |
-%16
- )fis4-. d-. a-. d-. |
-%17
- fis,4.( a8 )d4 r4 \clef "G"; |
-%18
- e''2->( )d4 r4 \clef "F"; |
-%19
- g,,,4-. b-. r [g8.( g16 ] |
-%20
- )c4-. e-. r [gis,8.( gis16] |
-%21
- )a4-. c-. r [g!8.( g16 ] |
-%22
- )fis4-. d'-. r [fis,,8.( fis16] |
-%23
- )g4-. g'-. r [b,8.( b16] |
-%24
- )c4-. c'-. r [c,8.( c16] |
-%25
- )d4-. d'-. r [d,8.( d16] |
-%26
- )g4-. d-. r [g8.( g16] |
-%27
- )a4-. d,-. r [a'8.( a16] |
-%28
- )b4 [d,8.( d16] )c'4-. [d,8. d16] |
-%29
- d'4-. d,-. d'-. [d,8.( d16 ]
- }
-%30
- )g2 r2 \bar "|.";
-
-}
-
-tune=\notes \relative c'' {
- % Put dynamics over the stave.
- \property Voice.dynamicdir = "1"
-
- r1 | r1 |r1 | r1 |
- \repeat semi 2 {
-%5
- b2. g4 |
-%6
- g( )fis \context Staff < {\voiceone r2}{\voicetwo r4 a4}> |
-%7
- g2. e4 |
-%8
- e4( )d r4 \< g |
-%9
- fis a g \! b |
-%10
- d2 b4 r4 |
-%11
- r1 |
-%12
- d2. b4 |
-%13
- b4( )ais r [cis8()b] |
-%14
- a!2. e4 |
-%15
- g4()fis r4 \< d4 |
-%16
- a' fis c' \! a |
-%17
- e'4.( \> )c8 \! a4 r |
-%18
- r1 |
-%19
- d2. \context Staff < {\voiceone b8( )g8} {\voicetwo [b8 g8]} > |
-%20
- \property Voice.slurDash = 2
- fis4( )e \property Voice.slurDash = ""
- \context Staff < {\voiceone r2}{\voicetwo r4 e4} > |
-%21
- c'2. [b16( a g )fis] |
-%22
- e4( )d \context Staff <{\voiceone r2} {\voicetwo r4 d4}> |
-%23
- d2 d'2 |
-%24
- e2 e,2 |
-%25
- fis2. \> [g8( )a] |
-%26
- \! g2 r2 |
-%27
- r1 | r1 | r1
- }
- r1 \bar "|.";
-}
-
-fourbars=\lyrics { ""1*4 }
-verseOne=\lyrics {
- Who2. is4 | Syl- via, ""2 |
- What2. is4 | she,2 That4 |
- all our swains com- |
- mend2 her?4 " " |
- " "1 |
- Ho-4 - - ly, |
- fair,2 ""4 and |
- wise2. is4 |
- she;2 ""4 The |
- heav'ns4 such grace did |
- lend2 her4 "" | ""1 |
- That2. a-4 |
- do- red ""2 |
- She2. might4 |
- be,2 "" |
- That2 a- |
- do- red |
- she2. might4 | be.2 "" |
-}
-
-verseTwo=\lyrics {
- Is2. she4 | kind,2 ""4 as |
- she2. is4 |fair?2 ""4 For |
- beau- ty lives with | kind-2 ness4 "" | ""1 |
- To2. her4 |eyes2 ""4 doth | Love 2. re-4 |
- pair,2 ""4 To | help him of his | blind-2 ness;4 "" |
- ""1 |
- And2*3/2 be-8 ing | help'd4 - "" "" | in-2. hab-8 its |
- there,2 ""4 And |
- be-2 ing | help'd in- | ha-2 -4 bits4 | there.2 ""2 |
-}
-
-verseThree=\lyrics {
- Then2. to4 | Syl-4 via ""2 |
- let2. us4 | sing,2 ""4 That |
- Syl- via is ex- | cel4 - ing; "" | ""1 |
- She2. ex-4 | cels2 ""4 each | mor - - tal |
- thing,2 ""4 Up- | on the dull earth | dwell-2 ing4
- "" | ""1 |
- To2. her4 | gar- lands ""2 | let2. us4 |
- bring,2 "" | To her | gar- lands | let2. us4 |
- bring.2 "" |
-}
-
-
-%%
-%% German Words -- syllabification may be incorrect (entered by
-%% someone who knows no German!)
-origVerseOne=\lyrics {
- Was2. ist4 | Sil-4 via, ""2 |
- sag-2. et4 | an,2 ""4
- Da{\ss}4 |
- sie die wie- te | Flur2 preist?4 "" | ""1|
- Sch\"on2. und4 | zart2 ""4 seh'- | ich2. sie4 |
- nah'n,2 ""4 Auf4 |
- Him- melsg- gunst " und" | Spur2 weist,4 "" | ""1
- Da{\ss}2. ihr4 | al- les ""2 |
- un-2. ter4 | tan.2 "" |
- Da{\ss}2 ihr | al- les | un-2. ter4 | tan2 "" |
-}
-
-origVerseTwo=\lyrics {
- Ist2. sie4 | sch\"on2 ""4 und4 | gut2. da-4 | zu?2 ""4
- Reiz4| labt wie mil- de | Kind-2 heit;4 "" | ""1 |
- Ihr-2. em4 | Aug'-2 ""4 eilt | A-2. mor4 |
- zu,2 ""4
- Dort4 | heilt er sein- e | Blind-2 heit,4 "" | ""1 |
- Und2. ver-4 | weilt2 ""4 in4 | s\"u{\ss}-2. er4
- Ruh'.2 "" |
- Und2 ver-2 | weilt in | s\"u{\ss}-2. er4| Ruh'.2 "" |
-}
-
-origVerseThree=\lyrics {
- Dar4 - - um | Sil- via, ""2 | t\"on',2. o4 |
- Sang,2 ""4
- Der4 | hold- en Sil- via | Ehr-2 en;4 ""4 | ""1 |
- Je2. den4 | Reiz2 ""4 be- |siegt2. sie4 | lang,2 ""4
- Den | Er- de kann ge- | w\"ah-2 ren;4 "" | ""1 |
- Kr\"an-2. ze4 | ihr2 ""4 und4 | Sai-2. ten4
- |klang!2 ""
- Kr\"an-2 ze | ihr und | Sai-2. ten-4 |klang!2 "" |
-}
-
-global=\notes {
- \key G;
- \time 2/2;
- \property Staff.timeSignatureStyle = "C"
-}
-
-Piano=\context GrandStaff = piano {
- \property GrandStaff.instrument="Piano"
- <
- \context Staff=RH {\global \pianoRH }
- \context Staff=LH {\global \pianoLH }
- >
-}
-
-
-EnglishWords= \lyrics<
- {\fourbars \verseOne \fourbars}
- {\fourbars \verseTwo \fourbars}
- {\fourbars \verseThree \fourbars}
->
-
-GermanWords = \lyrics<
- {\fourbars \origVerseOne \fourbars}
- {\fourbars \origVerseTwo \fourbars}
- {\fourbars \origVerseThree \fourbars}
-
->
-
-Vocals= <
- \context Staff = vocal <
- \notes {\clef "G2"; \global\tune}
-% {\context Lyrics = vocal \EnglishWords}
- {\context Lyrics = vocal \GermanWords}
- >
->
-
-
-\score {
- <
- % \transpose aes for basses (Key Eflat).
- % (bes to c'')
- % \transpose d' for original (in A.)
- % Untransposed range: d' to e''
- \notes \transpose d' <
- \Vocals
- \Piano
- >
- >
- \paper {
- % \paper_thirteen
- \paper_sixteen
- linewidth = 18.0\cm;
- textheight = 26.0\cm;
- gourlay_maxmeasures=15.0;
- \translator { \HaraKiriStaffContext }
- }
-}
-
projects / lilypond.git / commitdiff