summaryrefslogtreecommitdiff
path: root/fonts/byzfonts/XAP_poi
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /fonts/byzfonts/XAP_poi
Initial commit
Diffstat (limited to 'fonts/byzfonts/XAP_poi')
-rw-r--r--fonts/byzfonts/XAP_poi/X052_eteron.mf32
-rw-r--r--fonts/byzfonts/XAP_poi/X053_antikenoma.mf24
-rw-r--r--fonts/byzfonts/XAP_poi/X054_omalon.mf18
-rw-r--r--fonts/byzfonts/XAP_poi/X055_varia.mf39
-rw-r--r--fonts/byzfonts/XAP_poi/X056_psifiston.mf19
-rw-r--r--fonts/byzfonts/XAP_poi/X057_endofonon.mf36
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;