2 filename = "preludes-1.ly";
7 % Clavierb"uchlein f"ur W. Fr. Bach
8 % Clav. W. Fr. Bach: 2-Praeambulum I
10 composer = "Johann Sebastian Bach (1685-1750)";
12 copyright = "public domain";
17 % urg, this all changed and was never fixed
18 % howto get rid of these ridiculous dimensions????
19 % to view the output, subsitute 0.0 with 0.0 in the .tex file...
21 % one = \type Voice=one \notes\relative c {
22 % one = \notes\relative c {
23 one = \type Staff=treble \notes\relative c {
24 \property Voice . textstyle = "italic"
25 r16\p_"legato"\< [g''-1( c-3 )e-5] r [g,-1( c )e]
26 r [g,( c )d] r [b-1( d-2 \!)g-5] |
27 r\mf [a,( d-2 ) g-5] r [a,(\< d )f-4]
28 r [a,( d )e-3] r [c-1( e-2 \!)a-5] |
29 r\f [b, e a-5] r [b, e-3 g-5]
30 r [c,-1 e-3 f-4] r [g, d'-3 f-5] |
31 r [g,-"poco a poco dim." d'-4 e] r [g, c-2 e]
32 r [a,-1 c-3 d-4] r [e, b'-3 d-5] |
33 r [e, b' c-4] r [e, a-2 c]
34 r [f,-1 a-3 bes-4] r [c, g'-3 bes-5] |
35 r [c, g' a-4] r [c, f-2 a]
36 r [d, f-2 b-5] r [e, g-2 c-5] |
37 r\p [d, g c-5] r [d, g b-4]
38 r [c, g'-3 b-5] r [c, fis-2 a-4] |
39 r [b, d a'-5] r [b, d g-4]
40 r [a, c g'-5] r [a, c f!-4] |
44 { \voicetwo <g,4 d'> r }
48 % ugh beam across staffs slur starts at lower staff
51 % )b s4 [g'16-1( b-2 d] )b s s s [f'-2 g-3 b-5 f-2] |
53 \translator Staff=bass\stemup
55 [f-1 \translator Staff=treble\stemdown g16-1 b d] | \stemup )b
56 \translator Staff=bass\stemdown
58 \translator Staff=treble\stemup
60 \translator Staff=bass\stemup
64 % urg, below translator change affects previous beam too!?
65 % howto separate translator command from previous beam end?
67 [\translator Staff=treble f-2 g-3 b-5 f-2] |
69 [e-1\f c'-5( g-3 f-2] [e-1 c'-5 g-3 e-2]
70 [)d c'-5( f,-3 e-2] [d-1 b'-5 f-3 d-2] |
71 [)c b'-5( e,-3 d-2] [c-1 a'-5 e-3 c-2]
72 [)b-1 a'-5( d,-3 c-2] [b-1 g'-5 d-3 b-2] |
73 [)a g'-5 c,-4 b] [a-"poco a poco dim." fis'-5 c-2 a-1]
74 [b-2 f' d-4 c] [b f' d-4 b-2] |
75 [g e' c-3 b] [a e'-5 c-3 a-1]
76 [fis-2 d' b-3 a] [g-1 d'-5 b-4 g-2] |
77 [e c'-5 a-4 g-3] [fis-2 c'-5 a-4 fis-2]
78 [d c'-5 b-4 a] [b-4 g-2 d'-5 f,-1] |
79 [g-4 e-2 f-1 d'-5] [c-4 b a g]
80 [f'-5 d-3 es-4 c-2] [fis,-1 es'-4 d-3 c-2] |
81 [b-1 d-5 b-3 g-1] [as-4-"cresc. e rall." f-2 g-3 d-1]
84 { \voiceone r [c8 b16] }
85 %%% urg urg ?{ \voicetwo [d,8 f-2] }
92 % two = \notes\relative c{
93 % two = \type Voice=three \notes\relative c{
94 two = \type Staff=bass \notes\relative c{
95 \property Voice . textstyle = "roman"
96 c4-5 e-3 g-\mordent^"(\\textsharp)" g,4 |
97 d'-\mordent-5 f-3 a-\mordent^"(\\textsharp)" a,4 |
98 e'-5 e'-\mordent-1 a,-4 b-\upprall |
99 c4 e,-4 fis gis-\downprall |
100 a4 c,-4 d e-\upprall |
101 f4-1 e d-3-\prall c |
102 g'-\mordent^"(\\textsharp)" g, g'-\mordent g, |
103 g'-\mordent g, g'-\mordent g, |
104 % % ugh f should be at upper staff
105 % g'-\mordent r r16 [g,-5( b-4 d] )f-1 s s s |
106 % g'-\mordent r r16 [g,-5( b-4 d \translator Staff=treble )f-1 ] s s s |
107 % \translator Staff=bass
108 % s [g-5( b-4 d-2] )f-1 s s s s \clef "violin"; [g-4 b-2 d-1]
109 % s s s s \clef bass; |
110 g' r s s | s s s s \clef bass; |
112 % { \voiceone g,,1 ~ g ~ g ~ g ~ g ~ g ~ g }
113 % { \voicetwo g,1 ~ g ~ g ~ g ~ g ~ g ~ g }
114 { \voicethree g1 ~ g ~ g ~ g ~ g ~ g ~ g }
115 { \voicefour g,1 ~ g ~ g ~ g ~ g ~ g ~ g }
125 treble_staff = \type Staff = treble <
130 bass_staff = \type Staff = bass <
137 grand_staff = \type GrandStaff <
145 % \include "preludes-paper.ly";
148 slur_slope_damping = 10.0;
149 % linewidth= 193.\mm;
151 gourlay_maxmeasures = 4.0;
154 minVerticalAlign = 3.0*\staffheight;
155 maxVerticalAlign = 3.0*\staffheight;
158 \midi{ \tempo 4 = 80; }