summaryrefslogtreecommitdiff
path: root/fonts/eiad/source/eiadcsc10.mf
blob: f1bbcc93f1e68f5ea3e3a9ec1df4bddf13209e21 (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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
%% This file is public domain.
%% Originally written 1998, Ivan A Derzhanski.
%% Notice added by Clea F. Rees 2009/01/06.
%% 
% Irish Caps and Small Caps 10 point
if unknown cmbase: input cmbase fi
 
design_size := 10;
font_identifier:="EIADCSC"; font_size design_size * pt#;
 
% first come parameters used to set the uppercase letters
% (including some for lowercase that aren't actually used)
% These parameters are nearly the same as the Computer Modern Roman
% parameters.
 
input c-cmr;
 
u#:=                      % unit width
    ((u#*360pt#) + (design_size * 1))/360pt#;
 
letter_fit#:=             % extra space added to all sidebars
    ((letter_fit#*360pt#) + (design_size * 5))/360pt#;
 
ligs:=1;                  % level of ligatures to be included
 
% now come replacements used to set the lowercase caps
 
lower.u#:=                % unit width
    (u#*360pt#*16)/(21*360pt#);
 
lower.width_adj#:=        % width adjustment for certain characters
    width_adj#;
 
lower.cap_serif_fit#:=    % extra sidebar near uppercase serifs
    (cap_serif_fit#*360pt#*4)/(5*360pt#);
 
lower.letter_fit#:=       % extra space added to all sidebars
    (letter_fit#*36pt#*24)/(5*360pt#);
 
lower.body_height#:=      % height of tallest characters
    (body_height#*36pt#*20.0)/(27.0*36pt#);
 
lower.cap_height#:=       % height of caps
    (cap_height#*36pt#*18.5)/(24.6*36pt#);
 
lower.x_height#:=         % height of lowercase without ascenders
    (x_height#*36pt#*116)/(155*36pt#);
 
lower.bar_height#:=       % height of crossbar in lowercase e
    (bar_height#*36pt#*65)/(87*36pt#);
 
lower.comma_depth#:=      % depth of comma below baseline
    (comma_depth#*36pt#*52)/(70*36pt#);
 
lower.stem#:=             % lowercase stem breadth
    (stem#*360pt#*21)/(25*360pt#);
 
lower.flare#:=            % diameter of bulbs or breadth of terminals
    (flare#*360pt#*25)/(33*360pt#);
 
lower.cap_hair#:=         % uppercase hairline breadth
    (cap_hair#*36pt#*91)/(11*360pt#);
 
lower.cap_stem#:=         % uppercase stem breadth
    (cap_stem#*360pt#*26)/(32*360pt#);
 
lower.cap_curve#:=        % uppercase curve breadth
    (cap_curve#*360pt#*31)/(37*360pt#);
 
lower.cap_ess#:=          % breadth in middle of uppercase s
    (cap_ess#*360pt#*28)/(35*360pt#);
 
lower.cap_jut#:=          % protrusion of uppercase serifs
    (cap_jut#*360pt#*26)/(37*360pt#);
 
lower.beak_jut#:=         % horizontal protrusion of beak serifs
    (beak_jut#*360pt#*7)/(10*360pt#);
 
lower.beak#:=             % vertical protrusion of beak serifs
    (beak#*36pt#*52)/(7*360pt#);
 
lower.slab#:=             % serif and arm thickness
    (slab#*36pt#*91)/(11*360pt#);
 
lower.cap_bar#:=          % uppercase bar thickness
    (cap_bar#*36pt#*91)/(11*360pt#);
 
lower.cap_band#:=         % uppercase thickness above/below lobes
    (cap_band#*36pt#*91)/(11*360pt#);
 
lower.cap_notch_cut#:=    % max breadth above/below uppercase notches
    cap_notch_cut#;
 
lower.o#:=                % amount of overshoot for curves
    (o#*360pt#*5)/(8*360pt#);
 
lower.apex_o#:=           % amount of overshoot for diagonal junctions
    (apex_o#*360pt#*4)/(8*360pt#);
 
lower.fudge:=             % factor applied to weights of heavy characters
    fudge;
 
generate gaec7cb      % switch to the driver file