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

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