mutopia/J.S.Bach/Petites-Preludes/preludes-3.ly

   1 %{
   2
   3  Six Petits Preludes,
   4  Collection Johann Peter Kellner
   5  ca 1703 - 1707
   6
   7
   8
   9  Kellner was a student of Bach's.
  10
  11 %}
  12 \header{
  13   copyright =    "public domain";
  14   source = "Ed. Henry Lemoine Urtext";
  15   title =        "Pr\\\"aludum in C moll";
  16   subtitle = "f\\\"ur Laute";
  17   composer =     "Johann Sebastian Bach (1685-1750)";
  18   enteredby =    "jcn,hwn";
  19   copyright =    "public domain";
  20
  21   % mutopia headers.
  22   mutopiatitle = "Prelude";
  23   mutopiacomposer = "J.S.Bach";
  24   mutopiaopus = "BWV999";
  25   mutopiainstrument = "Piano";
  26   style = "baroque";
  27   copyright = "Public Domain";
  28   tagline =    "\\\\This music is part of the Mutopia project, http://sca.uwaterloo.ca/Mutopia/\\\\It has been typeset and placed in the public domain by Jan Nieuwenhuizen.\\\\Unrestricted modification and redistribution is permitted and encouraged - copy this music and share it!";
  29   maintainer = "janneke@gnu.org";
  30   lastupdated = "1999/Oct/16";
  31
  32 }
  33 %{
  34
  35 TODO: this file needs additional layouting: the upper voice should
  36 switch staffs to avoid leger lines.
  37
  38 %}
  39 \version "1.2.13";
  40
  41
  42 upper =  \notes \transpose c'' {
  43         r16 [c es g] [es c es c] r c r c |
  44         r16 [c es g] [es c es c] r c r c |
  45         r16 [c f as] [f c f c] r c r c |
  46         r16 [c f as] [f c f c] r c r c |
  47         r16 [b, d f] [d b, d b,] r b, r b, |
  48         r16 [b, d f] [d b, d b,] r b, r b, |
  49         r16 [g, c es] [c g, c g,] r g, r g, |
  50         r16 [g, c es] [c g, c g,] r g, r g, |
  51         r16 [g, c es] [c g, c g,] r g, r g, |
  52         r16 [g, c es] [c g, c g,] r g, r g, |
  53         r16 [a, c es] [c a, c a,] r a, r a, |
  54         r16 [a, c es] [c a, c a,] r a, r a, |
  55         r16 [a, bes, d] [bes, a, bes, a,] r a, r a, |
  56         r16 [g, bes, d] [bes, g, bes, g,] r g, r g, |
  57         r16 [bes, d g] [d bes, d bes,] r bes, r bes, |
  58         r16 [a, es g] [es a, es a,] r a, r a, |
  59         r16 [a, c fis] [c a, c a,] r a, r a, |
  60         r16 [a, c fis] [c a, c a,] r a, r a, |
  61         r16 [bes, d g] [d bes, d bes,] r bes, r bes, |
  62
  63         r16 [c fis a] [fis c fis c] r c r c |
  64         r16 [d g bes] [g d g d] r d r d |
  65         r16 [d fis c'] [fis d fis d] r d r d |
  66
  67         r16 [cis g bes] [g cis g cis] r cis r cis |
  68         r16 [c! es a] [es c es c] r c r c |
  69         r16 [bes, e g] [e bes, e bes,] r bes, r bes, |
  70         r16 [a, c g] [c a, c a,] r a, r a, |
  71
  72         r16 [a, c fis] [c a, c a,] r a, r a, |
  73         r16 [g, bes, e] [bes, g, bes, g,] r g, r g, |
  74         r16 [fis, a, es] [a, fis, a, fis,] r fis, r fis, |
  75         r16 [g, bes, d] [bes, g, bes, g,] r g, r g, |
  76         r16 [g, a, c] [a, g, a, g,] r g, r g, |
  77         r16 [fis, a, c] [a, fis, a, fis,] r fis, r fis, |
  78         r16 [fis, a, c] [a, fis, a, fis,] r fis, r fis, |
  79         r16 [g, a, c] [b, g, b, g,] r g, r g,
  80         r16 [a, c fis] [c a, c a,] r a, r a, |
  81         r16 [c fis a] [fis c fis c] r c r c |
  82         r16 [b, d g] [d b, d b,] r b, r b, |
  83         r16 [b, d f] [d b, d b,] r b, r b, |
  84         r16 [g, c es] [c g, c g,] r g, r g, |
  85         r16 [fis, c es] [c fis, c fis,] r fis, r fis, |
  86         r16 [fis, c es] [c fis, c fis,] r fis, r fis, |
  87         r16 [g, b, d] [b, g, b, d] [es c a, fis] |
  88         \context Staff <
  89                 \context Voice=i {\stemup g2.-\fermata\mf}
  90                 \context Voice=ii {\stemdown <b,2. d>}
  91         >
  92         \stemboth
  93         \bar "|.";
  94 }
  95
  96 lower =  \notes{
  97         c4 r [g8 es] |
  98         c4 r [g8 es] |
  99         c4 r [as8 f] |
 100
 101         c4 r [as8 f] |
 102         c4 r [as8 f] |
 103         c4 r [as8 f] |
 104
 105         c4-- r [es8 c] |
 106         bes,!4-- r [es8 c] |
 107         as,!4-- r [es8 c] |
 108
 109         g,4-- r [es8 c] |
 110         fis,4-- r [es8 c] |
 111         fis,4 r [fis8 d] |
 112
 113         g,4 r [d8 bes,] |
 114         g,4 r [bes,8 g,] |
 115         es,4 r [g8 es] |
 116
 117         c4 r [c8 a,] |
 118         d,4 r [d8 a,] |
 119         d,4 r [d8 a,] |
 120         d,4 r [d8 bes,] |
 121
 122
 123         d,4 r [es8 c] |
 124         d,4 r [g8 d] |
 125         d,4 r [a8 fis] |
 126
 127         d,4 r [g8 es] |
 128         d,4 r [fis8 d] |
 129         d,4 r [e8 cis] |
 130         d,4 r [es8 c] |
 131
 132         d,4 r [d8 a,] |
 133         d,4 r [cis8 bes,] |
 134         d,4 r [c!8 a,] |
 135
 136         d,4 r [bes,8 g,] |
 137         d,4 r [es8 c] |
 138         d,4 r [d8 a,] |
 139
 140         g,4 r [es8 c] |
 141         g,4 r [d8 b,] |
 142         g,4 r [es8 c] |
 143
 144         g,4 r [es8 c] |
 145         g,4 r [g8 d] |
 146         g,4 r [as8 f] |
 147         g,4 r [es8 c] |
 148
 149         g,4 r [es8 c] |
 150         g,4 r [es8 c] |
 151         g,4 r r |
 152         g,2._\fermata
 153         \bar "|.";
 154 }
 155
 156 global  = \notes{
 157         \time 3/4;
 158         \key es;
 159 }
 160
 161 \score{
 162         \context PianoStaff <
 163                 \context Staff = up <
 164                         \global
 165                         \upper
 166                 >
 167                 \context Staff = down <
 168                         \global
 169                         \clef "bass";
 170                         \lower
 171                 >
 172         >
 173         \paper{
 174                 \translator { \PianoStaffContext
 175                         minVerticalAlign = 2.2 * \staffheight;
 176                         maxVerticalAlign = 2.2 * \staffheight ;
 177                 }
 178                 \translator {\OrchestralScoreContext }
 179         }
 180         \midi{ \tempo 4 = 100; }
 181         \header{
 182                 opus =  "BWV 999";
 183         }
 184 }