summaryrefslogtreecommitdiff
path: root/fonts/byzfonts/Alphabet/Witns/STX_plB2.mf
blob: ffbdcd4fcab4a6dab18e286919470f9bae41084e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
beginchar(oct"002",.5em#,.6cap#,0dth#); "B Martiria Hxou Plagiou B";
picture STX;
 path p[];

 z0 = (.5w,.5h);
 x1 = w - x2 = 1.2curve_sidebar;
 y1 = y2 = y0; 
 x3 = w - x4 = curve_sidebar;
 y3 = .7h;
 y4 = .3h;

 pickup pencircle scaled .8pt;
 p1 = flex(z3,z1,z0) & flex(z0,z2,z4);
 draw p1;
 STX = currentpicture;
 endchar;