]> git.donarmstrong.com Git - lilypond.git/blobdiff - mutopia/J.S.Bach/preludes-4.ly
release: 0.1.64
[lilypond.git] / mutopia / J.S.Bach / preludes-4.ly
index c9098c7b19d3e98e5ca0c455f88d742f34a271c8..7ebf40661fc69349c65cad73445db8a164fb79ae 100644 (file)
@@ -2,7 +2,8 @@
 filename =      "preludes-4.ly";
 title =         "4";
 opus = "BWV 925";
-piece = "\\numfont 4";
+% piece = "\\numfont 4";
+piece = "4";
 % blz 8
 % Clavierb"uchlein f"ur W. Fr. Bach
 % Clav. W. Fr. Bach: 27-Praeludium ex d neutral
@@ -11,19 +12,18 @@ composer =   "Johann Sebastian Bach (1685-1750)";
 enteredby =     "jcn";
 copyright =     "public domain";
 }
-\version "0.1.14";
 
 one = \melodic{
        \octave c'';
        \textstyle "italic";
        r16\p_"legato" 
        \textstyle "finger";
-       ['d-1( fis,-3 d,-1] ['a-2 b,-3 cis-4 a,-3]
+       [d,-1( fis,-3 d,-1] [a,-2 b,-3 cis-4 a,-3]
        [d-3 cis-2 d-1 e-2] [d-1 fis-3 e-2 d-1] |
        \textstyle "finger";
-       \stemup; 
+       \stemup  
        )cis4-2 fis-5 ~ [fis8 fis-4] e4-3 ~ | 
-       e16\< \stemboth ['a16( cis a,] [d-2 e fis d-1]
+       e16\< \stemboth [a,16( cis a,] [d-2 e fis d-1]
        [g-3 fis g a-4] [g-3 b a \!g] |
        \stemup
        )fis4-"2\\_3" [e8-2 a-5] <fis4-4 d-2> <gis-5 e-3> |
@@ -33,30 +33,30 @@ one = \melodic{
        \textstyle "italic";
        [fis_"dim." e fis-3 g] [fis-3 a-5 g fis]
        \textstyle "finger";
-       e4-"2\\_5" ~ e16 ['e( fis, g, ] |
+       e4-"2\\_5" ~ e16 [e,( fis, g, ] |
        \textstyle "italic";
-       ['a-4_"dim." g,-1 a, b,] ['a-2 c-4 b, a,]
-       ['g-1 fis,-2 g,-3 a,] ['g-3 b, a, g,] |
+       [a,-4_"dim." g,-1 a, b,] [a,-2 c-4 b, a,]
+       [g,-1 fis,-2 g,-3 a,] [g,-3 b, a, g,] |
        \stemup
-       )'fis4\p 
+       )fis,4\p 
        \skip 4*7; |
        \textstyle "finger";
        d4.\mf cis8-"4\\_5" ~ cis b,4-5 a,8-"4\\_5" ~ |
        \textstyle "italic";
-       a, g,4-5 fis,8-4 ~ ['fis16 fis,-4-"dim." e,-3 d,-2] 
+       a, g,4-5 fis,8-4 ~ [fis,16 fis,-4-"dim." e,-3 d,-2] 
        \textstyle "finger";
        e,4-"3\\_5" ~ |
-       ['e16 e,-5 d, cis,] d,4-5 ~ ['d16 d,-5 cis, b,,] cis,4-5 |
+       [e,16 e,-5 d, cis,] d,4-5 ~ [d,16 d,-5 cis, b,,] cis,4-5 |
        \stemboth
-       [''fis16-1\p a,,-2 d,-5\< c,-4] [''b-1 d,-2 g,-5 fis,-4]
-       ['d-1 b,-5 a, g,] ['fis-2 e,-1 d,-4 \!'c!-3] |
-       [''b-2 d,-1 g, a,] ['fis8-\prall e,16-4 d,-3]
-       ['d8. e,16~] ['e d,8 cis,16] |
+       [fis,,16-1\p a,,-2 d,-5\< c,-4] [b,,-1 d,-2 g,-5 fis,-4]
+       [d,-1 b,-5 a, g,] [fis,-2 e,-1 d,-4 \!c,!-3] |
+       [b,,-2 d,-1 g, a,] [fis,8-\prall e,16-4 d,-3]
+       [d,8. e,16~] [e, d,8 cis,16] |
        \stemup
-       r16 ['d-1\< fis, d,] ['g a, b, g,-1] [c-3 b, c d] [c e d-4 \!c] |
-       b,4-5 a, ~ ['a8 g,-5 ~] ['g16 fis,8-4 e,16-3] |
-       ['fis8-4 e,-5~] ['e d,-5~] d,4 cis,-4 |
-       d,2\p-"rall." ~ ['d16 a,,-2( b,,-3 cis,-4] )'d4-5 |
+       r16 [d,-1\< fis, d,] [g, a, b, g,-1] [c-3 b, c d] [c e d-4 \!c] |
+       b,4-5 a, ~ [a,8 g,-5 ~] [g,16 fis,8-4 e,16-3] |
+       [fis,8-4 e,-5~] [e, d,-5~] d,4 cis,-4 |
+       d,2\p-"rall." ~ [d,16 a,,-2( b,,-3 cis,-4] )d,4-5 |
        \bar "|.";
 }
 
@@ -65,7 +65,7 @@ two = \melodic{
        \textstyle "finger";
 % ugh: koor
 %      \translator Staff=bass \octave c; \stemup
-%      \stemup;
+%      \stemup 
        fis4-1( e8-2 a4 a4 gis8-2 | 
        ) a8
        \translator Staff=treble \octave c''; \stemdown
@@ -84,10 +84,10 @@ two = \melodic{
        \translator Staff=treble \octave c''; \stemdown
        d,4 
        \stemboth
-       r16 [''b-1\< d,-2 b,,~] <'g4-5 e,-3 b,,>
-       r16 ['cis-1 e,-2 \!'cis~] |
-       <'a4-5 fis,-3 cis,> r16 ['d-1 fis,-2 d,~] <'b4-5 g,-3 d,>
-       r16 ['fis-1 a, fis,~] |
+       r16 [b,,-1\< d,-2 b,,~] <g,4-5 e,-3 b,,>
+       r16 [cis,-1 e,-2 \!cis,~] |
+       <a,4-5 fis,-3 cis,> r16 [d,-1 fis,-2 d,~] <b,4-5 g,-3 d,>
+       r16 [fis,-1 a, fis,~] |
        \stemdown
        fis,4 e, d, cis, |
        b,, a,, b,,4. b,,8 |
@@ -96,21 +96,21 @@ two = \melodic{
        r16 [b-3 fis-1 a-2] g4-1 r16 [a-3 e-1 g-2] |
        \skip 4*4; \skip 16*1;
        \translator Staff=treble \octave c''; \stemdown
-       d,8.-1 ~ ['d8 c,] d,4 [''a8 g,,] |
+       d,8.-1 ~ [d,8 c,] d,4 [a,,8 g,,] |
        \translator Staff=bass \octave c; \stemup
        [fis'8 c'-1] b4-1 \stemdown <a
        \translator Staff=treble \octave c''; \stemdown
        a,,4.-2>
        \stemdown
        a,8~ |
-       ['a g,-3~] ['g16 e, fis,8~] ['fis16 d,8.~] ['d8. cis,!16] |
+       [a, g,-3~] [g,16 e, fis,8~] [fis,16 d,8.~] [d,8. cis,!16] |
        \translator Staff=bass \octave c; \stemup
 %      <[d'8-2 a-1> <a~ g]> <a4 [fis16-2> e-1 fis-2 d-1]
        <
-               { \voiceone; [d'8-2 a~] a4 }
-               { \voicethree; [a8-1 g] [fis16-2 e-1 fis-2 d-1] }
+               { \voiceone  [d'8-2 a~] a4 }
+               { \voicethree  [a8-1 g] [fis16-2 e-1 fis-2 d-1] }
        >
-       \voiceone;
+       \voiceone 
        [g-1 fis-2 g-1 a-2] [g-1 b-3 a-2 g-1 ~] |
        [g g-1 fis-2 e-1] fis4-2 ~ fis2
        \bar "|.";
@@ -118,9 +118,9 @@ two = \melodic{
 
 three = \melodic{
        \octave c;
-%      \stemdown;
+%      \stemdown 
        d4-3 c-4 b, e-3 |
-       a16 ['a-5\mf( cis-3 a,-5] [d-2 e-1 fis-2 d-4]
+       a16 [a,-5\mf( cis-3 a,-5] [d-2 e-1 fis-2 d-4]
        [g-1 fis-3 g a] [g b a g] |
        )fis4 fis e a-4 |
        d'16 \stemboth [d-5\f( fis-3 d-5] [a-2 b-1 cis'-2 a-4]
@@ -133,27 +133,27 @@ three = \melodic{
        r16 [d-4( fis-2 d-4] [)g8-.-1 g,-.-5]
        r16 [e-4( g-2 e-4] [)a8-. a,-.-5] |
        r16 [fis-4( a fis] [)b8-. b,-.] r16 [g-4( b g] [)d'8-. d-.] |
-       r16 ['d16-5( fis,-3 d,] ['a-2 b,-1 cis-2 a,-4] [d b,-5 d-3 b,]
+       r16 [d,16-5( fis,-3 d,] [a,-2 b,-1 cis-2 a,-4] [d b,-5 d-3 b,]
        [fis-2 g a-2 fis-4] |
-       )fis16 ['g( b, g,] [d-2 e fis-2 d-4] [)g8-. g,-.] r16 [cis-4( e cis] |
-       [)fis8-. fis,-.] \stemdown r16 ['b-4( d b,] [)e8-. e,-.] 
-       r16 ['a-4 cis a,] |
+       )fis16 [g,( b, g,] [d-2 e fis-2 d-4] [)g8-. g,-.] r16 [cis-4( e cis] |
+       [)fis8-. fis,-.] \stemdown r16 [b,-4( d b,] [)e8-. e,-.] 
+       r16 [a,-4 cis a,] |
        \stemboth
        [d-1 e-3 fis-2 d-4] [g-1 fis-2 e-3 d-1] [cis!-3 a,-5 b, cis]
        [d-2 e fis-2 d-4] |
-       [g8 e-3] \stemdown [a a,] ['b8.-4 g,16-5] a,4-4 |
+       [g8 e-3] \stemdown [a a,] [b,8.-4 g,16-5] a,4-4 |
        [d8-5 a-2~] [a g-3~] [g g-3] fis4-4 |
        \stemup
        r16 [g-2 b-1 g-3] [d'8.-1 c'16-1] [b8.-2 bes16-3] [a8-1 g] |
        \stemdown
-       r16 ['a-2 cis!-1 a-2] [d-1 e fis d] [e8-1 d-2] [e-1 a,-2] |
-       [d a,-2~] ['a16 a,-2 b, cis-2] d2 |
+       r16 [a,-2 cis!-1 a-2] [d-1 e fis d] [e8-1 d-2] [e-1 a,-2] |
+       [d a,-2~] [a,16 a,-2 b, cis-2] d2 |
 }
 
 four = \melodic{
        \skip 4*36;
        \octave c';
-%      \stemup;
+%      \stemup 
 %      \property Voice.hshift = 1 
        a2 fis |
        d