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

   1 \header{
   2 filename =       "preludes-6.ly";
   3 % blz 11
   4 % Six Petits Preludes
   5 % Collection Johann Peter Kellner
   6 % ca 1703 - 1707
   7 composer =       "Johann Sebastian Bach (1685-1750)";
   8 enteredby =      "jcn";
   9 copyright =      "public domain";
  10 }
  11 \version "1.0.14";
  12
  13
  14 one = \notes\relative c{
  15         \skip 1; |
  16         \stemup
  17         r4 d''2-5( cis4-4 |
  18         \stemboth
  19         [)d16-5\mf a'-4( g f] [e f-4 cis-2 d-1]
  20         [e8.-\mordent f16] [d8.-\prall-1 cis16-3] |
  21         \stemup
  22         )cis4\> ~ [cis16 a \!d8 ~] d4 c-5 |
  23         %5
  24         b2-4 ~ b4 a-5 ~ |
  25         [a16 a-5 \stemup g! f] g4-4\< ~ g f-3 ~ |
  26         [\!f16 a g f] [e16 g8.-5 ~] [g16 g-5 f-4 e-3] [d-1 f8.-4 ~] |
  27         [f16 f-3 e d] b'4 a-5 g-5 |
  28         fis4-4 g r8\<-"rall." [g16-1( bes-2] \!e4-5 |
  29         %10
  30         \!)d1-5
  31         \bar "|.";
  32 }
  33
  34 two = \notes\relative c{
  35         r16\p [d''-5( c-4 bes-3] [a-2 bes-3 f-1 g-2]
  36         [a8.-\mordent bes16-1] [g8.-\prall f16-1] |
  37         \stemdown
  38         )f2 e2 |
  39         \translator Staff=bass \stemup
  40         r4 a,-1 bes-2 b-1 |
  41         \translator Staff=treble \stemdown
  42         r16 [b'-3 a-1 g-2] [f8. f16-2] e2 ~ |
  43         %5
  44         e2 ~ e4 ~ [e16 e-2 f! d-1] |
  45         s4 [e32 d e8.~] e4 d4 ~ |
  46         d4. [cis16-2 d-1] cis4 d-1 ~ |
  47         d8 r r16 [e-2 f d] r16 [e-2 f d] r [d-1 e-3 cis] |
  48         r16 [e-3 d-1 c!-2] [bes! d8.] s4 r16\> [bes'-2 a-2 \!g-1] |
  49         %10
  50         fis1-2
  51 }
  52
  53 three = \notes\relative c{
  54         \stemup
  55         f2-1( e-2 |
  56         \stemboth
  57         [)d16 d'( c bes] [a-4 bes-2 f-5 g-4]
  58         [a8.-\mordent bes16-2]
  59         [g8.-\prall-4 f16-5] |
  60         )f2-5 g4-4 gis |
  61         a2-2 ~ [a16 a-1( g f] [e-4 f-2 c-5 d] |
  62         %5
  63         [e8.-\mordent f16] [d8.-\prall-4 c16-5] \stemboth )c4.-5 d8-4 |
  64         \stemdown
  65         e4 ~ [e16 f-2( e-3 d-4] [cis a b cis-3] [d-4 e-3 f-2 d-4] |
  66         \property Voice . textstyle =  "finger"
  67         )bes!2-"5\\_4" a ~ |
  68         a a |
  69         d, cis'-5 |
  70         %10
  71         a'1-2
  72         \bar "|.";
  73 }
  74
  75 four = \notes\relative c{
  76         \stemdown
  77         d2-3 cis-4 |
  78         \skip 1*3; |
  79         %5
  80         \translator Staff=treble \stemup \property Voice.hshift = 1
  81         a'4 gis-2 ~ [gis16 gis-3 fis e]
  82         \skip 4*1;
  83         \translator Staff=bass \stemdown \property Voice.hshift = 0
  84         \stemup
  85         b2-1 a-1 |
  86         g a4. [gis16 a] |
  87         gis2 <[g8 cis,> <f-3 d-1>] e4-2 |
  88         d4. [fis16-3 g-2] r16 bes8.-1 ~ bes4 |
  89         %10
  90         \stemdown
  91         d,1-5
  92 }
  93
  94 global = \notes{
  95         \time 4/4;
  96         \key F;
  97 }
  98
  99
 100 treble_staff = \type Staff = treble <
 101         \global
 102         \one
 103         \two
 104 >
 105
 106 bass_staff = \type Staff = bass <
 107 % bass = Staff <
 108         \clef "bass";
 109         \global
 110         \three
 111         \four
 112 >
 113
 114 grand_staff = \type GrandStaff <
 115         \treble_staff
 116         \bass_staff
 117 >
 118
 119 a4 = \paper{
 120         linewidth = 193.\mm;
 121 }
 122
 123 \score{
 124         % Allegretto
 125         \grand_staff
 126         \paper{ \a4 }
 127         \midi{ \tempo 4 = 40; }
 128         \header{
 129                 piece = "6";
 130                 opus = "BWV 940";
 131         }
 132 }
 133