* Documentation/user/lilypond-book.itely: fix parse error: @LaTeX
-> La@TeX
+ * mf/parmesan-heads.mf: draw_diamond_head: fixed pen width; added
+ missing lneo_mensural head; editorial cleanups
+
+ * lily/mensural-ligature.cc: added more comments
+
2004-08-26 Graham Percival <gperlist@shaw.ca>
* Documentation/user/examples.itely: second, third, fourth, and fifth sections added.
out = brew_flexa (me, delta_pitch, false,
flexa_width, thickness, true, DOWN);
break;
- case MLP_sc:
+ case MLP_sc: // mensural brevis head with right cauda
out = Font_interface::get_default_font (me)->find_by_name ("noteheads--2mensural");
break;
- case MLP_ss:
+ case MLP_ss: // mensural brevis head
out = Font_interface::get_default_font (me)->find_by_name ("noteheads--1mensural");
break;
- case MLP_cs:
+ case MLP_cs: // mensural brevis head with left cauda
out = Font_interface::get_default_font (me)->find_by_name ("noteheads-lmensural");
break;
case MLP_SS:
penlabels(6,7);
enddef;
+fet_beginchar("Left stemmed notehead", "lneo_mensural", "mensuralleftstemmedhead");
+ draw_neo_left_stemmed_head (2 staff_space#);
+fet_endchar;
+
%
% En wij presenteren U: de opvolgster van Emily
%
def draw_left_stemmed_head (expr wid) =
draw_brevis(wid);
- save theta;
-
x6 = x7 = stem_width/2;
y6 = y5;
y7 = y5 - 2.25staff_space;
draw z6 .. z7;
enddef;
-fet_beginchar("Left stemmed notehead", "lmensural", "mensuralleftstemmedhead");
- draw_left_stemmed_head (staff_space#)
-fet_endchar;
-
def draw_longa (expr wid) =
draw_brevis(wid);
-
x6 = x7 = head_width - stem_width/2;
y6 = y5;
y7 = y5 - 2.25staff_space;
draw z6 .. z7;
enddef;
+fet_beginchar("Left stemmed notehead", "lmensural", "mensuralleftstemmedhead");
+ draw_left_stemmed_head (staff_space#)
+fet_endchar;
+
fet_beginchar("Maxima notehead", "-3mensural", "mensuralmaximahead");
draw_longa (2.0 staff_space#)
fet_endchar;
save head_width, head_height;
head_height# = head_h;
head_width# / head_height# = tand(angle);
- define_pixels(head_width, head_height);
set_char_box (0, head_width#,
head_height#/2, head_height#/2);
charwx := head_width# / 2;
charwy := head_height# / 2 - linethickness#;
+ define_pixels(head_width, head_height);
pickup pencircle
- xscaled (min(blot_diameter, pen_w * head_width))
- yscaled (min(blot_diameter, pen_h * head_width))
+ xscaled (max(blot_diameter, pen_w * head_width))
+ yscaled (max(blot_diameter, pen_h * head_width))
rotated -angle;
%% FIXME: replace "xpart (top z2)" (and, analogously,