summaryrefslogtreecommitdiff
path: root/fonts/thai/rmit/chare3.mf
blob: b5d9d1e9e06464c4138797c3dde98e536e59f1f1 (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
beginthaichar("AI", "E3", "aj", 3thin# + dia# + 2thin# + thick# + dia# + thin#, normht# + uvgap# + uvht#, 0);
	b_def(1, thick, 0);
	penpos2(thick, 0);
	penpos3(thin, 90);
	penpos4(thin, 180);
	penpos5(thin, 270);
	penpos6(thin, 0);
	penpos7(thin, 90);
	penpos8(thin, 180);

	x1rt = rightmost;
	x2l = x1lft;
	x3 = 1/2[x4l, x2l];
	x4r = leftmost;
	x5 = x7 = 1/2[x4l, x2l];
	x6l = x8l + dia;
	x5 = 1/2[x6, x8];
	y1bot = 0;
	y3r = normht + uvgap + uvht;
	y2 = y4 = y3l - curveht;
	y5r = y4 - curveht;
	y5l + dia = y7l;
	y8 = y6 = 1/2[y5, y7];

	filldraw b_path(1) -- z2r{up} .. z3r{left} .. z4r{down} .. z5r{right}
		.. z6r{up} .. z7r{left} .. z8r{down} .. z5r{right}
		-- z5l{left} .. z8l{up} .. z7l{right} .. z6l{down}
		.. z5l{left} .. z4l{up} .. z3l{right} .. z2l{down} -- cycle;
	penlabels(1,2);
endthaichar;