X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Ffeta-autometric.mf;h=50ac474f54cacdaed67cabe1a1de264a7fa0665b;hb=926115ff42def8bc1ce767029e4f03c8072994ba;hp=921053ec797c484787984d5c6691d570303ef4c8;hpb=5842c0a15dc9683fc74996c6703ea33d4dd43ad0;p=lilypond.git diff --git a/mf/feta-autometric.mf b/mf/feta-autometric.mf index 921053ec79..50ac474f54 100644 --- a/mf/feta-autometric.mf +++ b/mf/feta-autometric.mf @@ -1,15 +1,25 @@ +% Feta (not the Font-En-Tja) music font -- administrative MF routines +% This file is part of LilyPond, the GNU music typesetter. % -% autometric.mf -- administrative MF routines +% Copyright (C) 1997--2015 Han-Wen Nienhuys +% Jan Nieuwenhuizen % -% source file of the Feta (not an acronym for Font-En-Tja) -% pretty-but-neat music font +% These macros help create ascii logging output +% to automate generation of the lily tables. +% The output should be parsed by the mf-to-table script. % -% (c) 1997--2007 Han-Wen Nienhuys -% Jan Nieuwenhuizen +% The LilyPond font is free software: you can redistribute it and/or modify +% it under the terms of the GNU General Public License as published by +% the Free Software Foundation, either version 3 of the License, or +% (at your option) any later version, or under the SIL Open Font License. % -% these macros help create ascii logging output -% to automate generation of lily tables and tex backend -% The output should be parsed by the mf-to-table script +% LilyPond is distributed in the hope that it will be useful, +% but WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +% GNU General Public License for more details. +% +% You should have received a copy of the GNU General Public License +% along with LilyPond. If not, see . message "******************************************************"; @@ -125,13 +135,19 @@ def set_char_box (expr b_sharp, w_sharp, d_sharp, h_sharp) = charwx := charwd; charwy := 0; - % additions for mf2pt1 + % additions for mf2pt1 (`bbox' is called `glyph_dimensions' starting + % with version 2.4.2) if known bp_per_pixel: special "% MF2PT1: bbox " & to_bp (-b) & " " & to_bp (-d) & " " & to_bp (w) & " " & to_bp (h); + special "% MF2PT1: glyph_dimensions " + & to_bp (-b) & " " + & to_bp (-d) & " " + & to_bp (w) & " " + & to_bp (h); special "% MF2PT1: font_size " & decimal designsize; special "% MF2PT1: font_slant " & decimal font_slant_; @@ -180,7 +196,7 @@ enddef; % -% we leave the ctrl characters alone. +% we leave the ctrl characters alone % code := 32;