summaryrefslogtreecommitdiff
path: root/fonts/byzfonts/Alphabet/Ligs/X214_cT.mf
blob: a2ed96ed5e77c62c45fd324d294a23ac7377723a (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
beginchar(oct"214",em#,6cap#/7,dth#); "Ligature: cT";
 path p[];
 save ww,hh,dd;

 ww = w/5; hh = h/3; dd = d;
 b := .2ww;

 x0 = x2 = 2ww; x1 = 2.2ww;
 x3 = 1.75ww; x4 = 2.5ww;
 x5 = 3ww;
 y0 = -.7dd; y1 = .2hh;
 y2 = .1hh; y3 = .5hh;
 y4 = hh; y5 = .9hh;
 z6 = z1;

 penpos0(b,0);
 penpos1(b,0);
 penpos2(b,90);
 penpos3(.8b,0);
 penpos4(b,-90);
 penpos5(1.7b,-90);
 penpos6(b,angle(z2-z1)-90);

 penstroke z0e{up}..{up}z1e;
 penstroke z6e{left}..z2e..{up}z3e..{right}z4e..z5e;
 pickup pencircle scaled 1.7b;
 drawdot z5;

 endchar;