4 define(comma, r16 [$1$4 $2 $3] [$2 $1 $2 $6$1] r $1$7 r $5$1 |)
5 define(s, ^comma(translit($*,^ @, ^,@))@)
6 define(t, r16 [$1$4 $2 $3] [$2 $1 $2 $6$1] r $1$7 r $5$1 |)
9 filename = "preludes-3.ly";
10 % Pr"aludum in C Moll f"ur Laute
12 % Six Petits Preludes`
13 % Collection Johann Peter Kellner
15 composer = "Johann Sebastian Bach (1685-1750)";
17 copyright = "public domain";
23 one = \notes \transpose c`` {
25 %# s(^c@ ^es@ ^g@ ^\p(\<@ ^\!@ ^)\!@ ^\>@)
26 t(c,es,g,^\p(\<@,\!,^)\!@,\>)
27 %# s(c es g ^(@ ^@ ^)@)
29 %# s(c f as ^(@ ^@ ^)@)
49 %# s(c fis a -"poco a poco cresc.")
50 t(c,fis,a,-"poco a poco cresc.")
67 r16\p [g` a` c] [b` g` b` g`] r g` r g`
68 %# s(a` c fis -"poco cresc.")
69 t(a`,c,fis,-"poco cresc.")
76 r16 [g`(\< b` d] [b` g` b` d] [es c a` )\!fis] |
78 {\voiceone g2.-\fermata\mf}
87 % c4 r [g8-.(\ped )es-.\*] |
152 treble_staff = \type Staff = treble <
157 bass_staff = \type Staff = bass <
164 grand_staff = \type GrandStaff <
174 % Semplice e non troppo legato
177 \midi{ \tempo 4 = 100; }