blob: 6ffb53aad5134259919acc8de565f5aa14ccde85 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
% -%-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--2009 Juergen Reuter <reuter@ipd.uka.de>
%
if test = -1:
mode := smoke;
fi;
mode_setup;
staffsize# := design_size * pt#;
input feta-macros;
input feta-params;
input parmesan-macros;
font_x_height staff_space#;
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;
fet_endfont;
|