X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mutopia%2FJ.S.Bach%2FPetites-Preludes%2Fpreludes-4.ly;h=cfb68c069553852c88521df19bc8e7a43f4a294b;hb=4fabc68182cab7149d2a4b52502e180f57199831;hp=35ee6bbeefa386d0800b60854bded13731e4d214;hpb=4ac2a813e27e121f4577f75b428544f69ade3b6c;p=lilypond.git diff --git a/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly b/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly index 35ee6bbeef..cfb68c0695 100644 --- a/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly +++ b/mutopia/J.S.Bach/Petites-Preludes/preludes-4.ly @@ -1,167 +1,179 @@ \header{ -filename = "preludes-4.ly"; +filename = "preludes-4.ly"; % blz 8 % Clavierb"uchlein f"ur W. Fr. Bach % Clav. W. Fr. Bach: 27-Praeludium ex d neutral % ca 1720 -composer = "Johann Sebastian Bach (1685-1750)"; -enteredby = "jcn"; -copyright = "public domain"; +composer = "Johann Sebastian Bach (1685-1750)"; +enteredby = "jcn"; +copyright = "public domain"; } -\version "1.0.7"; +\version "1.0.20"; -one = \notes\relative c{ - \property Voice . textstyle = "italic" - r16\p_"legato" - \property Voice . textstyle = "finger" - [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] | - \property Voice . textstyle = "finger" - \stemup - )cis4-2 fis-5 ~ [fis8 fis-4] e4-3 ~ | - e16\< \stemboth [a,16( cis a] [d-2 e fis d-1] - [g-3 fis g a-4] [g-3 b a \!g] | +one = \context Staff \notes\relative c { + \context Voice=i + \property Voice . textstyle = "italic" +% r16\p_"legato" + r16\p + \property Voice . textstyle = "finger" + 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 | + \property Voice . textstyle = "finger" + \stemup + )cis4-2 fis-5 ~ fis8 fis-4 e4-3 ~ | + 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-"2\\_3" e8-2 a-5 | + )fis4 e8-2 a-5 | %5 - <[)g!16-5 d> fis-2 g-3 a-4] + < )g!16-5 d> fis-2 g-3 a-4 \stemboth - [g-3 b a g] | - \property Voice . textstyle = "italic" - [fis_"dim." e fis-3 g] [fis-3 a-5 g fis] - \property Voice . textstyle = "finger" - e4-"2\\_5" ~ e16 [e,( fis g ] | - \property Voice . 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] | + g-3 b a g | + \property Voice . textstyle = "italic" +% fis_"dim." e fis-3 g fis-3 a-5 g fis + fis e fis-3 g fis-3 a-5 g fis + \property Voice . textstyle = "finger" +% e4-"2\\_5" ~ e16 e,( fis g | + e4 ~ e16 e,( fis g | + \property Voice . textstyle = "italic" +% a-4_"dim." g-1 a b a-2 c-4 b a + a-4 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 \skip 4*7; | %10 - \property Voice . textstyle = "finger" - d'4.\mf cis8-"4\\_5" ~ cis b4-5 a8-"4\\_5" ~ | - \property Voice . textstyle = "italic" - a g4-5 fis8-4 ~ [fis16 fis-4-"dim." e-3 d-2] - \property Voice . textstyle = "finger" - e4-"3\\_5" ~ | - [e16 e-5 d cis] d4-5 ~ [d16 d-5 cis b] cis4-5 | + \property Voice . textstyle = "finger" +% d'4.\mf cis8-"4\\_5" ~ cis b4-5 a8-"4\\_5" ~ | + d'4.\mf cis8 ~ cis b4-5 a8 ~ | + \property Voice . textstyle = "italic" +% a g4-5 fis8-4 ~ fis16 fis-4-"dim." e-3 d-2 + a g4-5 fis8-4 ~ fis16 fis-4 e-3 d-2 + \property Voice . textstyle = "finger" +% e4-"3\\_5" ~ | + e4 ~ | + e16 e-5 d cis d4-5 ~ d16 d-5 cis b cis4-5 | \stemboth - [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] [fis8-\prall e16-4 d-3] - [d8. e16~] [e d8 cis16] | + 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 fis8-\prall e16-4 d-3 + d8. e16~ e d8 cis16 | %15 \stemup - r16 [d-1\< fis d] [g a b g-1] [c-3 b c d] [c e d-4 \!c] | - b4-5 a ~ [a8 g-5 ~] [g16 fis8-4 e16-3] | - [fis8-4 e-5~] [e d-5~] d4 cis-4 | - d2\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 | + b4-5 a ~ a8 g-5 ~ g16 fis8-4 e16-3 | + fis8-4 e-5~ e d-5~ d4 cis-4 | +% d2\p-"rall." ~ d16 a-2( b-3 cis-4 )d4-5 | + d2\p ~ d16 a-2( b-3 cis-4 )d4-5 | \bar "|."; } -two = \notes\relative c{ - \property Voice . textstyle = "finger" +two = \context Staff \notes\relative c{ + \context Voice=ii + \stemup + \property Voice . textstyle = "finger" fis4-1( e8-2 a4 a4 gis8-2 | ) a8 - \translator Staff=treble \stemdown - a'4 a8 b4.-"2\\_1" cis8 ~ | + \translator Staff=upper \stemdown +% a'4 a8 b4.-"2\\_1" cis8 ~ | + a'4 a8 b4. cis8 ~ | cis8 - \translator Staff=bass \stemup - a,8 ~ [a d] ~ d d4-> cis8 | + \translator Staff=lower \stemup + a,8 ~ a d ~ d d4-> cis8 | d8 - \translator Staff=treble \stemdown + \translator Staff=upper \stemdown d'4-> cis8-1 ~ cis b4-1 b8 | %5 r8 a4 a8 - \translator Staff=bass \stemup - [g8-1( fis-2] )e4-1 ~ | - e4 d ~ [d16 d-1 cis-2 b-1] cis4-2 ~ | - [cis8 a-3] d4.-1 d4^> cis8-2 | - \translator Staff=treble \stemdown - d4 \stemboth r16 [b-1\< d-2 b~] - r16 [cis,-1 e-2 \!cis~] | - r16 [d,-1 fis-2 d~] - r16 [fis-1 a fis~] | + \translator Staff=lower \stemup + g8-1( fis-2 )e4-1 ~ | + e4 d ~ d16 d-1 cis-2 b-1 cis4-2 ~ | + cis8 a-3 d4.-1 d4^> cis8-2 | + \translator Staff=upper \stemdown + d4 \stemboth r16 b-1\< d-2 b~ + r16 cis,-1 e-2 \!cis~ | + r16 d,-1 fis-2 d~ + r16 fis-1 a fis~ | %10 \stemdown fis4 e d cis | b a b4. b8 | a4 - \translator Staff=bass \stemup - r16 [b-3 fis-1 a-2] g4-1 r16 [a-3 e-1 g-2] | + \translator Staff=lower \stemup + r16 b-3 fis-1 a-2 g4-1 r16 a-3 e-1 g-2 | \skip 1*1; s16 - \translator Staff=treble \stemdown - d'8.-1 ~ [d8 c] d4 [a8 g] | + \translator Staff=upper \stemdown + d'8.-1 ~ d8 c d4 a8 g | %15 - \translator Staff=bass \stemup - [fis'8 c-1] b4-1 \stemdown \stemdown a'8~ | - [a g-3~] [g16 e fis8~] [fis16 d8.~] [d8. cis!16] | - \translator Staff=bass \stemup + a g-3~ g16 e fis8~ fis16 d8.~ d8. cis!16 | + \translator Staff=lower \stemup < - % { \voiceone [d,8-2 a~] a4 } - { \voiceone [d8-2 a~] a4 } - % { \voicethree [a,8-1 g] [fis16-2 e-1 fis-2 d-1] } - { \voicethree [a8-1 g] [fis16-2 e-1 fis-2 d-1] } + { \stemup d8-2 a~ a4 } + \context Voice=ii { \stemdown a8-1 g fis16-2 e-1 fis-2 d-1 } > - \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 + \stemup + 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 "|."; } three = \notes\relative c{ -% \stemdown + \context Voice=iii + \stemdown d4-3 c-4 b e-3 | - 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] | + 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 | - d16 \stemboth [d,-5\f( fis-3 d-5] [a'-2 b-1 cis-2 a-4] - [d-1 cis-3 d e] [d-4 fis-2 e-1 ) d] | + d16 \stemboth d,-5\f( fis-3 d-5 a'-2 b-1 cis-2 a-4 + d-1 cis-3 d e d-4 fis-2 e-1 ) d | %5 - [cis-3 b-4 cis-3 d-2] [c-4 e-2 d-3 c-4] - \stemdown b4-5 [cis8-4 b-3(] | - [a-4 )fis-5 b-2 a-3] [gis-4 e-5 a-3 g-4] | + cis-3 b-4 cis-3 d-2 c-4 e-2 d-3 c-4 + \stemdown b4-5 cis8-4 b-3( | + a-4 )fis-5 b-2 a-3 gis-4 e-5 a-3 g-4 | fis4. d8-5 e4-5 a4-3 | \stemboth - 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 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,-. | %10 - 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] | + 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 | \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 g16-5] a4-4 | + 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 g16-5 a4-4 | %15 - [d8-5 a'-2~] [a g-3~] [g g-3] fis4-4 | + d8-5 a'-2~ a g-3~ g g-3 fis4-4 | \stemup - r16 [g-2 b-1 g-3] [d'8.-1 c16-1] [b8.-2 bes16-3] [a8-1 g] | + r16 g-2 b-1 g-3 d'8.-1 c16-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~ a16 a-2 b cis-2 d2 | } -four = \notes\relative c{ +four = \context Staff \notes\relative c{ \skip 1*9; -% \stemup -% \property Voice.hshift = 1 + \context Voice=iv + \stemup + \property Voice.hshift = 1 %10 a''2 fis | d s | % \property Voice.hshift = 0 \skip 1*2; | s4 - \translator Staff=bass \stemup - a4 ~ [a16 d,-2 g8-1] [fis e-1] | + \translator Staff=lower \stemup + a4 ~ a16 d,-2 g8-1 fis e-1 | %15 \stemdown d1 ~ | @@ -170,35 +182,35 @@ four = \notes\relative c{ d2 d2 } -global = \notes{ +global = \notes{ \time 4/4; \key D; } -treble_staff = \type Staff = treble < - \global - { \voiceone \one } - { \voicefour \four } -> - -bass_staff = \type Staff = bass < -% bass = Staff < - \clef "bass"; - \global -% { \voiceone \two } - { \type Voice = bone \skip 1*0; \property Voice.ydirection = \up \two } - { \voicetwo \three } -> - -grand_staff = \type GrandStaff < - \treble_staff - \bass_staff -> - \score{ - % Allegretto - \grand_staff - \include "preludes-paper.ly"; + % Allegretto + \context GrandStaff < + \context Staff = upper < + \global + \one + \four + > + \context Staff = lower < + \global + \clef "bass"; + \two + \three + > + > + \paper{ + \include "preludes-paper.ly"; + gourlay_maxmeasures = 2.0; + \translator{ + \GrandStaffContext + minVerticalAlign = 3.0*\staffheight; + maxVerticalAlign = 3.0*\staffheight; + } + } \midi{ \tempo 4 = 70; } \header{ opus = "BWV 925";