X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=mf%2Ffeta-beugel.mf;h=c61f756d38273c14a0300065c38c005dc6282dc8;hb=b535b623598d6dec042edc50961fe1baa14a54a2;hp=6340f1fc6b6b6aceb15e55045bd5757dead4715e;hpb=75841a65b28da667aa69a14a22d8f372dfa9dfa6;p=lilypond.git diff --git a/mf/feta-beugel.mf b/mf/feta-beugel.mf index 6340f1fc6b..c61f756d38 100644 --- a/mf/feta-beugel.mf +++ b/mf/feta-beugel.mf @@ -4,9 +4,34 @@ % source file of the Feta (not an acronym for Font-En-Tja) % pretty-but-neat music font % -% (c) 1997--2005 Han-Wen Nienhuys +% (c) 1997--2009 Han-Wen Nienhuys % Jan Nieuwenhuizen + +% We have to reduce the pixel-per-point value to +% support large brace glyphs in case we are using MetaPost +% (which by default sets `hppp' to 49.80244, regardless of +% the used `mag' value) + +if known miterlimit: + bpppix_ := 0.2; % ten times larger than original + + numeric mm, pt, dd, bp, cm, pc, cc, in; + + mm * bpppix_ = 2.83464; + pt * bpppix_ = 0.99626; + dd * bpppix_ = 1.06601; + bp * bpppix_ = 1; + cm * bpppix_ = 28.34645; + pc * bpppix_ = 11.95517; + cc * bpppix_ = 12.79213; + in * bpppix_ = 72; + + hppp := pt; + vppp := pt; +fi; + + input feta-autometric; input feta-macros; @@ -100,8 +125,8 @@ for i := 0 step 1 until font_count: y := y + increment; if y > infinity / hppp: message "Resolution and/or magnification is too high"; - message "HPP: "& decimal hpp &" Y: " & y; - error "please report to "; + message "HPPP: "& decimal hppp &" Y: " & decimal y; + errmessage "please report to "; fi; % x should be about one staff space, taking brace to have