summaryrefslogtreecommitdiff
path: root/fonts/greek/kd/mf/kdgreek.mf
blob: 0f4702eb002aa321b9c20e913ea1eec8f69a0d4d (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
%
% ======================================================================
%		   KD Classical Greek Family of Fonts
%		   ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
%
%	A set of MF source fonts for use with TeX version 3.0 or higher
%	accompanied with macros and hyphenation tables to facilitate
%	the typesetting of greek texts
%
%	This piece of work is partially based on original work of
%	Sylvio Levi (design of an excellent set of fonts)  
%	and Yianni Haralambous (ideas about macros other fonts).
%
%	This file is part of the greektex package and abides to 
%	copyright laws of the GNU general public software licence
%
%	You are allowed to use or modify this file as long as the 
%	original authors are clearly mentioned. It is ILLEGAL to sell
%	any part of this work or work derived from it. You may not
%	charge for this work except to cover for reasonable media 
%	expensess.
%
%	K J Dryllerakis (C) 1991-1992 
%
% ======================================================================
%
% Computer Classic Greek Family of Fonts
%	Adapted by K J Dryllerakis
%
if ligs>1: font_coding_scheme:="TeX greek text";
else: font_coding_scheme:="TeX greek typewriter text";fi

mode_setup; font_setup;

readfrom("kdaccent");	% accents
if italics:
	readfrom("kdilower");
	readfrom("kdidigit");
else:
	readfrom("kdlower");
	readfrom("kddigits");
fi
if ligs>0:
	readfrom("kdlig");
else:
	readfrom("kdligcom");
fi
readfrom("kdupper");
readfrom("kdpunct");

font_slant slant; font_x_height x_height#;
if monospace: font_normal_space 9u#; % no stretching or shrinking
font_quad 18u#; font_extra_space 9u#;
else: font_normal_space 6u#+2letter_fit#; 
font_normal_stretch 3u#; font_normal_shrink 2u#;
font_quad 18u#+4letter_fit#; font_extra_space 2u#;fi


bye.