%
% source file of LilyPond's pretty-but-neat music font
%
-% (c) 1997--2006 Jan Nieuwenhuizen <janneke@gnu.org>
+% (c) 1997--2009 Jan Nieuwenhuizen <janneke@gnu.org>
% & Han-Wen Nienhuys <hanwen@xs4all.nl>
% & Juergen Reuter <reuter@ipd.uka.de>
%
if up:
bot y1 = -d;
- y2 = h;
+ top y2 = h;
rt x1 - fudge = 0;
x1 = x2;
draw_gridline (z1, z2, stemthick);
draw_gridline (z3, z4, stemthick);
+
+ labels (1, 2, 3, 4);
enddef;
-fet_beginchar ("Longa notehead", "u-2");
+fet_beginchar ("Longa notehead", "uM2");
draw_longa (true);
draw_staff (-2, 2, 0);
fet_endchar;
-fet_beginchar ("Longa notehead", "d-2");
+fet_beginchar ("Longa notehead", "dM2");
draw_longa (false);
draw_staff (-2, 2, 0);
if test > 0:
- fet_beginchar ("Longa notehead", "u-2");
+ fet_beginchar ("Longa notehead", "uM2");
draw_longa (true);
draw_staff (-2, 2, 0.5);
fet_endchar;
- fet_beginchar ("Longa notehead", "d-2");
+ fet_beginchar ("Longa notehead", "dM2");
draw_longa (false);
draw_staff (-2, 2, 0.5);
enddef;
-fet_beginchar ("Brevis notehead", "s-1");
+fet_beginchar ("Brevis notehead", "sM1");
draw_brevis;
draw_staff (-2, 2, 0);
if test > 0:
- fet_beginchar ("Brevis notehead", "s-1");
+ fet_beginchar ("Brevis notehead", "sM1");
draw_brevis;
draw_staff (-2, 2, 0.5);