summaryrefslogtreecommitdiff
path: root/fonts/byzfonts/XAP_pos/x000_xamili.mf
blob: 2b9b54ecb48ff7e71690544ae391032b05f2b02c (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
beginchar(oct"000",.8em#,5cap#/7,.5dth#); "Xamili";
 picture XAMHLH, scXAMHLH;
 path p[];

 save ww,hh,dd;
 ww = w/8; hh = h/5; dd = d;

 x3 = 2ww; y0 = 3.4hh;
 y1 = 3.6hh; x0 = 1.5ww; 
 x2 = 1.3ww; y2 = .5hh;
 x4 = 3ww; 
 x5 = x6 = 8ww - x1 = 7.5ww;
 y3 = y5 = y4 = -.2dd; 
 y7 = y6 = 0;
 x7 = 2.5ww;
 y8 = y9 = .5hh;
 y10 = y11 = -.5dd;
 x8 = 4.5ww; x9 = 5.5ww;
 x10 = 4.7ww; x11 = 5.7ww;

 p0 = z0--z1{down}..z2{z4-z1}..{curl 0}z3--z5--z6--z7{z1-z5}..{up}z0
 ..cycle;
 p1 = z8--z9--z11--z10--z8..cycle;
 fill p0; fill p1;
 XAMHLH = currentpicture;
 clearit;
 p2 = p1 scaled 1.4;
 p3 = p0 scaled 1.4;
 fill p3; fill p2;
 scXAMHLH = currentpicture;
 clearit;
 addto currentpicture also XAMHLH;
 endchar;