diff options
Diffstat (limited to 'fonts/byzfonts/XAP_poi')
-rw-r--r-- | fonts/byzfonts/XAP_poi/X052_eteron.mf | 32 | ||||
-rw-r--r-- | fonts/byzfonts/XAP_poi/X053_antikenoma.mf | 24 | ||||
-rw-r--r-- | fonts/byzfonts/XAP_poi/X054_omalon.mf | 18 | ||||
-rw-r--r-- | fonts/byzfonts/XAP_poi/X055_varia.mf | 39 | ||||
-rw-r--r-- | fonts/byzfonts/XAP_poi/X056_psifiston.mf | 19 | ||||
-rw-r--r-- | fonts/byzfonts/XAP_poi/X057_endofonon.mf | 36 |
6 files changed, 168 insertions, 0 deletions
diff --git a/fonts/byzfonts/XAP_poi/X052_eteron.mf b/fonts/byzfonts/XAP_poi/X052_eteron.mf new file mode 100644 index 0000000000..9a8923e211 --- /dev/null +++ b/fonts/byzfonts/XAP_poi/X052_eteron.mf @@ -0,0 +1,32 @@ +beginchar(oct"052",.8em#,5cap#/7,0dth#); "Eteron"; +picture ETEPON; +path p[]; + + save ww,hh,Diam; + ww = w/8; hh = h/5; + Diam = 2ww; + z0 = (4ww,2.5hh); + z1 = (1.6ww,4.1hh); + z2 = (0,2.4hh); + z3 = (2.2ww,3.1hh); + z4 = (5.8ww,1.9hh); + z5 = (7.5ww,3.4hh); + z6 = (3ww,4hh); + z7 = (.5ww,2hh); + z8 = (8ww,5hh); + z9 = (8ww,4hh); + z10 = (7ww,3.5hh); + y11 = y12 = 3.5hh; + x11 = 2.5ww; x12 = 5.5ww; + + p2 = z1{z7-z1}..z2; + p3 = z2{z6-z2}..controls z3..z0..controls z4..z5; + p4 = z5{z8-z5}..z10..{z9-z5}z5; + + pickup pencircle scaled .8pt; + draw p2; + draw p3; + draw p4; + + ETEPON = currentpicture; + endchar; diff --git a/fonts/byzfonts/XAP_poi/X053_antikenoma.mf b/fonts/byzfonts/XAP_poi/X053_antikenoma.mf new file mode 100644 index 0000000000..e291c21f65 --- /dev/null +++ b/fonts/byzfonts/XAP_poi/X053_antikenoma.mf @@ -0,0 +1,24 @@ +beginchar(oct"053",.8em#,cap#,0dth#); "Antikenoma"; +picture ANTIKENWMA; + path p[]; + + z0 = (0,.5h); + z1 = (7w/8,.5h); + z2 = (6.5w/8,1.8h/5); + z3 = (5.3w/8,1.5h/5); + z4 = (.5[x0,x1],.55h); + + p1 = z0..z4..z1; + z5 = point 1.5 of p1; + z6 = point 1.75 of p1; + z7 = (.7[x5,x6],.4[y6,y2]); + p2 = z1{z1-z4}..z2{z3-z2}..z3; + p4 = reverse subpath (0,2) of p2; + p5 = reverse subpath (1,2) of p1; + p3 = z4{z1-z4}..{z2-z5}z7{z2-z6}..{z3-z7}z3..p4..p5..cycle; + pickup pencircle scaled .4pt; + draw p1; + draw p2; + fill p3; + ANTIKENWMA = currentpicture; + endchar; diff --git a/fonts/byzfonts/XAP_poi/X054_omalon.mf b/fonts/byzfonts/XAP_poi/X054_omalon.mf new file mode 100644 index 0000000000..edb3665a88 --- /dev/null +++ b/fonts/byzfonts/XAP_poi/X054_omalon.mf @@ -0,0 +1,18 @@ +beginchar(oct"054",.8em#,cap#,0dth#); "Omalon"; +picture OMALON; + path p[]; + + y3 = y4 = h - y1 = 9h/25; + y2 = y1; x3 = 14w/20; + x1 = 13w/20; + x2 = 16w/20; x4 = 11w/20; + z5 = .5[z1,z4]; + x0 = 0; y0 = y5; + p1 = z1--z2--z3--z4--cycle; + p2 = z0--z5; + + pickup pencircle scaled .8pt; + fill p1; + draw p2; + OMALON = currentpicture; + endchar; diff --git a/fonts/byzfonts/XAP_poi/X055_varia.mf b/fonts/byzfonts/XAP_poi/X055_varia.mf new file mode 100644 index 0000000000..cb882c908f --- /dev/null +++ b/fonts/byzfonts/XAP_poi/X055_varia.mf @@ -0,0 +1,39 @@ +beginchar(oct"055",.5em#,cap#,1.5dth#); "Varia"; +picture BAPEIA, scBAPEIA; +path p[]; + + save ww,hh,dd; + ww = w/5; hh = h/7; dd = d/3; + + x0 = .2ww; x4 = 4.5ww; + y0 = 6.1hh; y3 = y4 = -2.0dd; + x8 = x1 = .6ww; y1 = 1.5hh; + x2 = 1.4ww; y2 = -.5dd; + x3 = 4.4ww; + x7 = x6 = 1.75ww; y5 = -1dd; + y6 = 0; x5 = 2.3ww; + y7 = 5.8hh; y8 = 5.7hh; + x9 = .7ww; y9 = y7; + x10 = .5[x8,x7]; + y10 = .5[y8,y1]; + + p1 = z0..controls z9..z8; + p2 = z8--z1; + p3 = flex(z1,z2,z3); + p4 = z3--z4; + p5 = z4..controls z5..z6; + p6 = z6--z7; + p7 = z7--z0; + + p8 = p1 & p2 & p3 & p4 & p5 & p6 & p7 & cycle; + p10 = p8 rotatedaround(z10,10); + fill p10; + BAPEIA = currentpicture; + clearit; + p9 = p8 yscaled 1.4; + p11 = p9 rotatedaround(z10,10); + fill p11; + scBAPEIA = currentpicture; + clearit; + addto currentpicture also BAPEIA; + endchar; diff --git a/fonts/byzfonts/XAP_poi/X056_psifiston.mf b/fonts/byzfonts/XAP_poi/X056_psifiston.mf new file mode 100644 index 0000000000..dd9db0283c --- /dev/null +++ b/fonts/byzfonts/XAP_poi/X056_psifiston.mf @@ -0,0 +1,19 @@ +beginchar(oct"056",.8em#,cap#,0dth#); "Psifiston"; +picture UHFICTON; + path p[]; + + z0 = (0,.5w); + z2 = (7w/16,6h/25); + z3 = (15w/16,7h/10); + z8 = (w/40,.55h); + z6 = (6w/16,2.7h/10); + z4 = (13w/16,7h/10); + z5 = (5.7w/8,3h/5); + + p1 = flex(z0,z2,z3); + p2 = flex(z5,z6,z8); + p3 = z3..z4..z5; + p4 = z8--z0; + fill p1 & p3 & p2 & p4 & cycle; + UHFICTON = currentpicture; + endchar; diff --git a/fonts/byzfonts/XAP_poi/X057_endofonon.mf b/fonts/byzfonts/XAP_poi/X057_endofonon.mf new file mode 100644 index 0000000000..d59effaaf7 --- /dev/null +++ b/fonts/byzfonts/XAP_poi/X057_endofonon.mf @@ -0,0 +1,36 @@ +beginchar(oct"057",.8em#,5cap#/7,0dth#); "Endofonon"; +picture ENDOFWNON; +path p[]; + + save ww,hh,Diam; + ww = w/8; hh = h/5; + Diam = 2ww; + z0 = (4ww,2.5hh); + z1 = (1.6ww,4.1hh); + z2 = (0,2.4hh); + z3 = (2.2ww,3.1hh); + z4 = (5.8ww,1.9hh); + z5 = (7.5ww,3.4hh); + z6 = (3ww,4hh); + z7 = (.5ww,2hh); + z8 = (8ww,5hh); + z9 = (8ww,4hh); + z10 = (7ww,3.5hh); + y11 = y12 = 3.5hh; + x11 = 2.5ww; x12 = 5.5ww; + + p1 = fullcircle scaled Diam shifted (z0); + p2 = z1{z7-z1}..z2; + p3 = z2{z6-z2}..controls z3..z0..controls z4..z5; + p4 = z5{z8-z5}..z10..{z9-z5}z5; + + pickup pencircle scaled .8pt; + draw p1; + draw p2; + draw p3; + draw p4; + filldraw fullcircle scaled .35ww shifted (z11); + filldraw fullcircle scaled .35ww shifted (z12); + + ENDOFWNON = currentpicture; + endchar; |