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

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