summaryrefslogtreecommitdiff
path: root/fonts/tengwar/tincotema.mf
blob: 2692b53e5407dbeaf1beb6417363fc3fe857fc7a (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
% Copyright 1988 Michael Urban
% Everyone is granted permission to copy, modify and redistribute
% this file, provided that a currently-dated copy of this
% copyright notice is included in the copy.
% License is granted to produce fonts based on the information
% in this file, provided that such fonts are redistributed
% without charge to any third party.

% SCCS ID @(#)tincotema.mf	1.1   10/1/86

beginchar("t", shortwidth,xht#,dep#); "The letter t (tinco)";
	pickup elvishpen;
	telco(leadgap,shortstem, stemdepth);
	luva (bowpoint, w, true);
endchar;

beginchar("d", 1em#,xht#,dep#); "The letter d (ando)";
	pickup elvishpen;
	telco(leadgap,shortstem, stemdepth);
	luva (bowpoint, bowsize*em, true);
	luva (bowpoint, w, true);
endchar;

beginchar("T", shortwidth, cap#, 0); "the ligature th (thule)";
	pickup elvishpen;
	telco(leadgap, longstem, stemdepth);
	luva (bowpoint, w, true);
endchar;

beginchar("D", 1em#, cap#, 0); "the ligature dh (anto)";
	pickup elvishpen;
	telco(leadgap, longstem, stemdepth);
	luva (bowpoint, bowsize*em, true);
	luva (bowpoint, w, true);
endchar;

beginchar (004, 1em#, cap#, dep#); "the word 'THE'";
	pickup elvishpen;
	telco(leadgap, longstem, stemdepth);
	luva (bowpoint, bowsize*em, true);
	luva (bowpoint, w, true);
endchar;

beginchar ("R", shortwidth, xht#, 0); "the weak letter R (ore)";
	pickup elvishpen;
	telco (leadgap, shortstem, stemdepth);
	luva (bowpoint, w, true);
endchar;

beginchar ("n", 1em#, xht#, 0); "the letter n (numen)";
	pickup elvishpen;
	telco(leadgap, shortstem, stemdepth);
	luva (bowpoint, bowsize*em, true);
	luva (bowpoint, w, true);
endchar;