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";
12 % piece = "\\numfont 3";
14 % Pr"aludum in C Moll f"ur Laute
16 % Six Petits Preludes`
17 % Collection Johann Peter Kellner
19 composer = "Johann Sebastian Bach (1685-1750)";
21 copyright = "public domain";
27 one = \melodic \transpose c`` {
29 %# s(^c@ ^es@ ^g@ ^\p(\<@ ^\!@ ^)\!@ ^\>@)
30 t(c,es,g,^\p(\<@,\!,^)\!@,\>)
31 %# s(c es g ^(@ ^@ ^)@)
33 %# s(c f as ^(@ ^@ ^)@)
53 %# s(c fis a -"poco a poco cresc.")
54 t(c,fis,a,-"poco a poco cresc.")
71 r16\p [g` a` c] [b` g` b` g`] r g` r g`
72 %# s(a` c fis -"poco cresc.")
73 t(a`,c,fis,-"poco cresc.")
80 r16 [g`(\< b` d] [b` g` b` d] [es c a` )\!fis] |
82 {\voiceone g2.-\fermata\mf}
91 % c4 r [g8-.(\ped )es-.\*] |
156 treble_staff = \type Staff = treble <
161 bass_staff = \type Staff = bass <
168 grand_staff = \type GrandStaff <
178 % Semplice e non troppo legato
181 \midi{ \tempo 4 = 100; }