X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-generic.mf;h=311b75d040fc5755ed96e758802f1a3ad3550421;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=7b9a5f0f8a6970cdbf0c90033b8c8045b9d9f3e5;hpb=cf47f46e677a1bf9ef1c08c40eb65938117d4953;p=lilypond.git diff --git a/mf/parmesan-generic.mf b/mf/parmesan-generic.mf index 7b9a5f0f8a..311b75d040 100644 --- a/mf/parmesan-generic.mf +++ b/mf/parmesan-generic.mf @@ -1,37 +1,42 @@ - -% -*-Fundamental-*- -% parmesan-generic.mf -- implement generic stuff: include lots of files, -% but don't set dims. +% -%-Fundamental-%- -*-Metafont-*- +% parmesan-generic.mf -- implement generic stuff: include lots of files, +% but don't set dimensions. % % source file of LilyPond's pretty-but-neat music font -% -% (c) 2002--2003 Juergen Reuter -% +% +% (c) 2002--2008 Juergen Reuter +% if test = -1: mode := smoke; -fi +fi; mode_setup; -% + +staffsize# := design_size * pt#; input feta-macros; input feta-params; -font_x_height staff_space#; -font_coding_scheme "parmesan music"; +input parmesan-macros; + + +font_x_height staff_space#; -if test = 0: - input parmesan-rests; - input parmesan-heads; - input parmesan-clefs; - input parmesan-custodes - input parmesan-accidentals; - input parmesan-flags; - input parmesan-timesig; - input parmesan-scripts; -else: +fet_beginfont ("parmesan", design_size, "parmesanMusic"); + if test = 0: + input parmesan-rests; + input parmesan-heads; + input parmesan-clefs; + input parmesan-custodes + input parmesan-accidentals; + input parmesan-flags; + input parmesan-timesig; + input parmesan-scripts; + input parmesan-dots; + else: -fi + fi; +fet_endfont;