X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Ffeta-generic.mf;h=f2c90cdf616c78fe03e19c1f4da2747477811d6b;hb=616451c6b941e1948235c9c9d37489da5a86b260;hp=1fde0e32e44a5f43042b71e65581ba575c3ad1f9;hpb=225485917d3e66bd7eb907d6462e981ae1bd1654;p=lilypond.git diff --git a/mf/feta-generic.mf b/mf/feta-generic.mf index 1fde0e32e4..f2c90cdf61 100644 --- a/mf/feta-generic.mf +++ b/mf/feta-generic.mf @@ -1,10 +1,11 @@ % -% feta-generic.mf -- implement -% +% feta-generic.mf -- implement generic stuff: include lots of files, but don't +% set dims. +% % source file of the Feta (defintively not an abbreviation for Font-En-Tja) % music font % -% (c) 1997 Han-Wen Nienhuys +% (c) 1997--2009 Han-Wen Nienhuys % @@ -12,33 +13,45 @@ if test = -1: mode := smoke; fi -mode_setup; +staffsize# := design_size * pt#; +mode_setup; input feta-macros; -make_pen_stack; -make_picture_stack; input feta-params; +font_x_height staff_space#; + +%% this is a fallback so we can run the font without including feta-bolletjes. +black_notehead_width# := 1.0 staff_space#; +fet_beginfont ("feta", design_size, "fetaMusic"); if test = 0: input feta-eindelijk; input feta-toevallig; + input feta-arrow; input feta-puntje; input feta-bolletjes; input feta-schrift; input feta-banier; input feta-klef; -else: -% input feta-bolletjes; -% input feta-banier; -% input feta-eindelijk; -% input feta-klef; -% input feta-toevallig; -% input feta-schrift; -% input feta-schrift; + input feta-timesig; + input feta-pendaal; input feta-haak; + input feta-accordion; +else: + input feta-test-generic.mf; fi + +autometric_parameter ("staffsize", staffsize#); +autometric_parameter ("stafflinethickness", stafflinethickness#); +autometric_parameter ("staff_space", staff_space#); +autometric_parameter ("linethickness", linethickness#); +autometric_parameter ("black_notehead_width", black_notehead_width#); +autometric_parameter ("ledgerlinethickness", ledgerlinethickness#); +autometric_parameter ("blot_diameter", blot_diameter#); + +fet_endfont;