X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-rests.mf;h=060307db7133da96b959cc07a812e8717c53a1d1;hb=14584456396e24d2e3559d450e584621db043e6c;hp=1d08c0b9a7d8d58d368a592a875da30db449c6fa;hpb=9876c67550ff67fc5d9f50fbf4769b00b40dcc15;p=lilypond.git diff --git a/mf/parmesan-rests.mf b/mf/parmesan-rests.mf index 1d08c0b9a7..060307db71 100644 --- a/mf/parmesan-rests.mf +++ b/mf/parmesan-rests.mf @@ -3,13 +3,13 @@ % % source file of LilyPond's pretty-but-neat music font % -% (c) 2001--2006 Juergen Reuter +% (c) 2001--2009 Juergen Reuter % % Neo-mensural rests originally by % Christian Mondrup and Mats Bengtsson. % -fet_begingroup("rests") +fet_begingroup ("rests") %%%%%%%% @@ -38,7 +38,7 @@ def neomens_half_block_rest = enddef; -fet_beginchar ("Neo-mensural maxima rest", "-3neomensural"); +fet_beginchar ("Neo-mensural maxima rest", "M3neomensural"); set_char_box (0, 3 neomens_block_rest_x#, neomens_block_rest_y#, neomens_block_rest_y#); @@ -49,7 +49,7 @@ fet_beginchar ("Neo-mensural maxima rest", "-3neomensural"); fet_endchar; -fet_beginchar ("Neo-mensural longa rest", "-2neomensural"); +fet_beginchar ("Neo-mensural longa rest", "M2neomensural"); set_char_box (0, neomens_block_rest_x#, neomens_block_rest_y#, neomens_block_rest_y#); @@ -58,7 +58,7 @@ fet_beginchar ("Neo-mensural longa rest", "-2neomensural"); fet_endchar; -fet_beginchar ("Neo-mensural breve rest", "-1neomensural"); +fet_beginchar ("Neo-mensural breve rest", "M1neomensural"); set_char_box (0, neomens_block_rest_x#, 0, neomens_block_rest_y#); @@ -186,11 +186,11 @@ fet_beginchar ("Neo-mensural 16th rest", "4neomensural"); rt x3 = w; top y3 = h; lft x4 = 0; - bot y4 = h/2; + bot y4 = h / 2; rt x5 = w; - top y5 = 5/8h; + top y5 = 5/8 h; lft x6 = 0; - bot y6 = h/8; + bot y6 = h / 8; z11 = z1 - stafflinethickness * unitvector (z2 - z1); z14 = z4 + stafflinethickness * unitvector (z4 - z3); @@ -252,9 +252,9 @@ define_pixels (mens_block_rest_y, mens_half_block_rest_y, pen_width, pen_height); -fet_beginchar ("Mensural maxima rest", "-3mensural"); +fet_beginchar ("Mensural maxima rest", "M3mensural"); set_char_box (0, pen_width#, - mens_block_rest_y#, 2mens_block_rest_y#); + mens_block_rest_y#, 2 mens_block_rest_y#); pickup pencircle xscaled pen_width yscaled pen_height @@ -265,7 +265,7 @@ fet_beginchar ("Mensural maxima rest", "-3mensural"); fet_endchar; -fet_beginchar ("Mensural longa rest", "-2mensural"); +fet_beginchar ("Mensural longa rest", "M2mensural"); set_char_box (0, pen_width#, mens_block_rest_y#, mens_block_rest_y#); @@ -278,7 +278,7 @@ fet_beginchar ("Mensural longa rest", "-2mensural"); fet_endchar; -fet_beginchar ("Mensural breve rest", "-1mensural"); +fet_beginchar ("Mensural breve rest", "M1mensural"); set_char_box (0, pen_width#, 0, mens_block_rest_y#); @@ -317,7 +317,7 @@ fet_beginchar ("Mensural half rest", "1mensural"); fet_endchar; -mensrestsize# = .8staff_space#; +mensrestsize# = .8 staff_space#; fet_beginchar ("Mensural 4th rest", "2mensural"); @@ -345,7 +345,9 @@ fet_beginchar ("Mensural 4th rest", "2mensural"); labels (1, 2, 3, 4); fet_endchar; - +% +% FIXME: The left sharp corner produces ugly results at lower resolutions. +% fet_beginchar ("Mensural 8th rest", "3mensural"); set_char_box (0, mensrestsize#, 0, mensrestsize#); @@ -375,6 +377,9 @@ fet_endchar; % FIXME: So far, I have never seen a semifusa rest printed. Hence, % the shape of this font character is currently pure invention. --jr % +% +% FIXME: The left sharp corner produces ugly results at lower resolutions. +% fet_beginchar ("Mensural 16th rest", "4mensural"); set_char_box (0, mensrestsize#, 0, staff_space#);