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

   1 \header{
   2 filename =       "preludes-2.ly";
   3 title =  "2";
   4 opus = "BWV 939";
   5 % urg?? piece = "\\numfont 2";
   6 piece = "2";
   7 % blz 10
   8 %
   9 % Six Petits Pr eludes
  10 % Collection Johann Peter Kellner
  11 % ca 1703- 1707
  12 composer =       "Johann Sebastian Bach (1685-1750)";
  13 enteredby =      "jcn";
  14 copyright =      "public domain";
  15 }
  16
  17 \version "1.0.2";
  18 one = \melodic\relative c{
  19         \property Voice . textstyle =  "italic"
  20         r8\mf [c'-1( e-2 g-4] [e-2 c-1 bes'-5 g-3] |
  21         [)a-4\< c,-1( f-2 a-4] [f c c'-5 a-3] |
  22         [)b-4 g-1( b-2 d-4] [b-2 g f'-5 \!d-3] |
  23         <
  24                 {\voiceone )e2-4\f r4 e-5 }
  25                 \type Voice = second {\voicetwo <c2 g > r4 <c g > }
  26         >
  27         \onevoice |
  28         \type Staff <
  29                  { \voiceone d2-4 r4 d-4 }
  30                  \type Voice = second { \voicetwo <c2 a > r4 <c a > }
  31         >
  32         \onevoice |
  33         \type Staff <
  34                  { \voiceone d8 }
  35                  \type Voice = second { \voicetwo <b 8 g > }
  36         >
  37         \onevoice
  38         [g, 8-1\mf( b-2 d-4]
  39         <
  40                 { \voiceone )b 4 e-5 }
  41                 \type Voice = second { \voicetwo g, 4 b }
  42         >
  43         \onevoice |
  44         \type Staff <
  45                 { \voiceone c2 r4 < {c-5 ~ c8} {a 4 ~ a 8} > }
  46                 { \voicetwo c2 r4 e, 4 ~ e 8 }
  47         >
  48         \onevoice
  49         [d,-1\p( fis-2 a-4] [fis-2 d-1 c'-5 a-3] |
  50         [)b-4\< g-1( b-2 d-4] [ b-2 g-1 f'!-5 d-3] |
  51         [)e-4 g,-1( c-2 e-4] [c-2 g g'-5 e-3] |
  52         [)fis-4 a,-1( c-2 fis-4] [c a a'-5 \!fis-3] |
  53         <
  54                 { \voiceone )g2-5\f }
  55                 \type Voice = second { \voicetwo <d2 b > }
  56         >
  57         \onevoice
  58         r4 b4-2( |
  59         [c,8-1 e-2 g c ] [g-2 e-1 bes'-4 g-2] |
  60         [)a16->-3 g-2 f-1 e-3] [d c b !-3 a-2]
  61         [b-3\< g-1 a b ] [c-1 d e \!f] |
  62         g4-5\ff
  63         \type Staff <
  64                 { \voiceone c,2-5 b 4-4 }
  65                 { \voicetwo g 2-2 d 4-1 }
  66         >
  67         \onevoice
  68         \type Staff <
  69                 { \voiceone  c1^5 }
  70                 { \voicetwo e, 1_1}
  71         >
  72         \onevoice
  73         \bar "|.";
  74 }
  75
  76 two = \melodic\relative c{
  77         \type Staff <
  78                 { \voiceone c1 ~ | c ~ | c }
  79                 { \voicetwo c,1 ~ | c ~ | c }
  80         >
  81         \onevoice |
  82         r8 [c-5( e-3 g-1] [e-3 c-5 c' e,-4] |
  83         [)fis-3 d-5( fis-3 a-1] [fis-3 d-5 d' fis,-4] |
  84         )g2-3 r4 g-2( |
  85         [)a8 a,-5( c-4 e-2] [c-4 a-5 g' e-3] |
  86         )fis2 r4 d-4 |
  87         g-\mordent-"(\\textsharp)" g, 4 g'-\mordent g, |
  88         % mordents in brackets...
  89         g'-\mordent g, g'-\mordent g, |
  90         g'-\mordent g, g'-\mordent g, |
  91         [g'8 g,-5( b-4 d-2] [b-4 g-5 f'!-1 d-3] |
  92         [)e-2 c-4 e-2 g-1] [e-3 c-5 c' e,-4] |
  93         \property Voice . textstyle =  "finger"
  94         f1^"3\\_1" ~ |
  95         [f8 d-3 e-2 c-4] g'4-1 g,^"5\\_2" |
  96         <c1 c,1>
  97         \bar "|.";
  98 }
  99
 100 global = \melodic{
 101         \time 4/4;
 102 }
 103
 104 trebleStaff = \type Staff = treble <
 105         \global
 106         \one
 107 >
 108
 109 bassStaff = \type Staff = bass <
 110         \clef "bass";
 111         \global
 112         \two
 113 >
 114
 115 grandStaff = \type GrandStaff <
 116         \trebleStaff
 117         \bassStaff
 118 >
 119
 120 a4 = \paper{
 121         linewidth= 193.\mm;
 122 }
 123
 124 \score{
 125     % Moderato
 126         \grandStaff
 127         \paper{ \a4 }
 128         \midi{ \tempo 4 = 100; }
 129 }
 130