summaryrefslogtreecommitdiff
path: root/fonts/byzfonts/XAP_xpo
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_xpo
Initial commit
Diffstat (limited to 'fonts/byzfonts/XAP_xpo')
-rw-r--r--fonts/byzfonts/XAP_xpo/CAN_trigorgon.mf15
-rw-r--r--fonts/byzfonts/XAP_xpo/EM_stavros.mf15
-rw-r--r--fonts/byzfonts/XAP_xpo/ESC_klasma.mf3
-rw-r--r--fonts/byzfonts/XAP_xpo/ETB_triargon.mf15
-rw-r--r--fonts/byzfonts/XAP_xpo/FS_koronis.mf14
-rw-r--r--fonts/byzfonts/XAP_xpo/GS_gorgon.mf13
-rw-r--r--fonts/byzfonts/XAP_xpo/RS_argon.mf14
-rw-r--r--fonts/byzfonts/XAP_xpo/US_diargon.mf15
-rw-r--r--fonts/byzfonts/XAP_xpo/X040_digorgon.mf14
-rw-r--r--fonts/byzfonts/XAP_xpo/x032_gorgoargon.mf18
-rw-r--r--fonts/byzfonts/XAP_xpo/x041_KAN.mf44
-rw-r--r--fonts/byzfonts/XAP_xpo/x050_diastoli.mf11
-rw-r--r--fonts/byzfonts/XAP_xpo/x051_BPA.mf4
-rw-r--r--fonts/byzfonts/XAP_xpo/x064_TAX.mf4
-rw-r--r--fonts/byzfonts/XAP_xpo/x065_XYM.mf4
-rw-r--r--fonts/byzfonts/XAP_xpo/x066_MTP.mf4
-rw-r--r--fonts/byzfonts/XAP_xpo/x067_MEC.mf4
17 files changed, 211 insertions, 0 deletions
diff --git a/fonts/byzfonts/XAP_xpo/CAN_trigorgon.mf b/fonts/byzfonts/XAP_xpo/CAN_trigorgon.mf
new file mode 100644
index 0000000000..1672895a86
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/CAN_trigorgon.mf
@@ -0,0 +1,15 @@
+beginchar(oct"030",.4em#,.5cap#,0dth#); "Trigorgon";
+picture TPIGOPGON;
+ path p[];
+
+ x0 = w; y0 = y1 = 7h/10;
+ x1 = x2 = 7w/10; y2 = y3 = .5h;
+ x3 = x4 = 2w/5;
+ y4 = y5 = 3h/10;
+ x5 = x6 = w/10; y6 = h/10;
+
+ p1 = z0--z1 & z1--z2 & z2--z3 & z3--z4 & z4--z5 & z5--z6;
+ pickup pencircle scaled .8pt;
+ draw p1;
+ TPIGOPGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/EM_stavros.mf b/fonts/byzfonts/XAP_xpo/EM_stavros.mf
new file mode 100644
index 0000000000..8cbd366133
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/EM_stavros.mf
@@ -0,0 +1,15 @@
+beginchar(oct"031",.4em#,.5cap#,0dth#); "Stavros";
+picture CTAYPOC;
+ path p[];
+
+ z0 = .5(w,h);
+ y1 = y2 = .5h;
+ x1 = 3w/10; x2 = 7w/10;
+
+ p1 = z1--z2;
+ p2 = p1 rotatedabout(z0,90);
+ pickup pencircle scaled .8pt;
+ draw p1;
+ draw p2;
+ CTAYPOC = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/ESC_klasma.mf b/fonts/byzfonts/XAP_xpo/ESC_klasma.mf
new file mode 100644
index 0000000000..fd2767f910
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/ESC_klasma.mf
@@ -0,0 +1,3 @@
+beginchar(oct"033",.8em#,cap#,0dth#); "Klasma";
+ addto currentpicture also KLACMA shifted (-.3w,0);
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/ETB_triargon.mf b/fonts/byzfonts/XAP_xpo/ETB_triargon.mf
new file mode 100644
index 0000000000..8b2966fcb8
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/ETB_triargon.mf
@@ -0,0 +1,15 @@
+beginchar(oct"027",.4em#,.5cap#,0dth#); "Triargon";
+picture TPIAPGON;
+ path p[];
+
+ y0 = y1 = 7h/10;
+ y2 = y3 = .5h;
+ x1 = x2 = .5w;
+ x0 = w/5; y4 = 3h/10;
+ x3 = x4 = 4w/5;
+
+ p1 = z0--z1 & z1--z2 & z2--z3 & z3--z4;
+ pickup pencircle scaled .8pt;
+ draw p1;
+ TPIAPGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/FS_koronis.mf b/fonts/byzfonts/XAP_xpo/FS_koronis.mf
new file mode 100644
index 0000000000..cf56372ce8
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/FS_koronis.mf
@@ -0,0 +1,14 @@
+beginchar(oct"034",.4em#,.5cap#,0dth#); "Koronis";
+picture KOPWNIC;
+ path p[];
+
+ x0 = x2 = .5w;
+ x1 = w - x3 = h/5;
+ y1 = y3 = y0 = .5h;
+ y2 = 4h/5;
+
+ pickup pencircle scaled pt;
+ draw flex(z1,z2,z3);
+ drawdot z0;
+ KOPWNIC = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/GS_gorgon.mf b/fonts/byzfonts/XAP_xpo/GS_gorgon.mf
new file mode 100644
index 0000000000..da2f07270d
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/GS_gorgon.mf
@@ -0,0 +1,13 @@
+beginchar(oct"035",.4em#,.5cap#,0dth#); "Gorgon";
+picture GOPGON;
+ path p[];
+
+ x4 = 2w/5;
+ y4 = y5 = 3h/10;
+ x5 = x6 = w/10; y6 = h/10;
+
+ p1 = z4--z5 & z5--z6;
+ pickup pencircle scaled .8pt;
+ draw p1;
+ GOPGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/RS_argon.mf b/fonts/byzfonts/XAP_xpo/RS_argon.mf
new file mode 100644
index 0000000000..728ad72a83
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/RS_argon.mf
@@ -0,0 +1,14 @@
+beginchar(oct"036",.4em#,.5cap#,0dth#); "Argon";
+picture APGON;
+ path p[];
+
+ y2 = y3 = .5h;
+ x2 = .5w;
+ y4 = 3h/10;
+ x3 = x4 = 4w/5;
+
+ p1 = z2--z3 & z3--z4;
+ pickup pencircle scaled .8pt;
+ draw p1;
+ APGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/US_diargon.mf b/fonts/byzfonts/XAP_xpo/US_diargon.mf
new file mode 100644
index 0000000000..e9d8d51efb
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/US_diargon.mf
@@ -0,0 +1,15 @@
+beginchar(oct"037",.4em#,.5cap#,0dth#); "Diargon";
+picture DIAPGON;
+ path p[];
+
+ y1 = 7h/10;
+ y2 = y3 = .5h;
+ x1 = x2 = .5w;
+ y4 = 3h/10;
+ x3 = x4 = 4w/5;
+
+ p1 = z1--z2 & z2--z3 & z3--z4;
+ pickup pencircle scaled .8pt;
+ draw p1;
+ DIAPGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/X040_digorgon.mf b/fonts/byzfonts/XAP_xpo/X040_digorgon.mf
new file mode 100644
index 0000000000..e8cd620343
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/X040_digorgon.mf
@@ -0,0 +1,14 @@
+beginchar(oct"040",.4em#,.5cap#,0dth#); "Digorgon";
+picture DIGOPGON;
+ path p[];
+
+ x2 = 7w/10; y2 = y3 = .5h;
+ x3 = x4 = 2w/5;
+ y4 = y5 = 3h/10;
+ x5 = x6 = w/10; y6 = h/10;
+
+ p1 = z2--z3 & z3--z4 & z4--z5 & z5--z6;
+ pickup pencircle scaled .8pt;
+ draw p1;
+ DIGOPGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x032_gorgoargon.mf b/fonts/byzfonts/XAP_xpo/x032_gorgoargon.mf
new file mode 100644
index 0000000000..ecbda38504
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x032_gorgoargon.mf
@@ -0,0 +1,18 @@
+beginchar(oct"032",.4em#,.5cap#,0dth#); "GorgoArgon";
+picture GOPGOAPGON;
+ path p[];
+
+ x0 = x1 = .5w;
+ y0 = h; y1 = 0;
+ y2 = y3 = .5h;
+ x2 = 1w/10;
+ y4 = 3h/10;
+ x3 = x4 = 2w/5;
+
+ p1 = z2--z3 & z3--z4;
+ p2 = p1 reflectedabout(z0,z1);
+ pickup pencircle scaled .8pt;
+ draw p1;
+ draw p2;
+ GOPGOAPGON = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x041_KAN.mf b/fonts/byzfonts/XAP_xpo/x041_KAN.mf
new file mode 100644
index 0000000000..41de8c5df8
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x041_KAN.mf
@@ -0,0 +1,44 @@
+beginchar(oct"041",.3em#,4cap#/7,dth#); "KANONIKH XPONIKH AGOGI";
+picture XPAH;
+numeric phi[];
+path p[];
+ save ww,hh,dd;
+
+ ww = w/3; hh = h/4; dd = d/2;
+ b := .2ww;
+
+x1 = x3 = 3ww - x2 = .2ww;
+x6 = x2;
+x4 = 3ww - x5 = .4ww;
+y2 = y4 = 2hh;
+y3 = 1.5hh;
+y1 = y5 = y6 = -2dd;
+
+p0 = z3{up}..{right}z4--z5{right}..z6;
+p1 = z1--z2;
+z0 = p1 intersectionpoint p0;
+z7 = z0;
+
+phi0 = angle direction 1.5 of p0;
+phi1 = angle direction 0 of p1;
+phi3 = angle direction 0 of p0;
+penpos0(2b,phi1+90);
+penpos3(2b,phi3+100);
+penpos4(2.5b,phi0+90);
+penpos7(2b,phi0+90);
+penpos5(1.8b,phi0+150);
+penpos6(2b,270);
+penpos1(2.5b,phi1+90);
+penpos2(2.5b,phi1+90);
+
+penstroke z3e{dir(phi3+20)}..z4e{dir-20}..z7e..{dir-20}z5e{right}..z6e;
+penstroke z1e..z0e..z2e;
+pickup pencircle scaled 2b;
+drawdot z6;
+pickup pencircle scaled 2.5b;
+drawdot z2;
+drawdot z1;
+
+XPAH = currentpicture;
+addto currentpicture also GOPGOAPGON shifted (-.1w,.45h);
+endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x050_diastoli.mf b/fonts/byzfonts/XAP_xpo/x050_diastoli.mf
new file mode 100644
index 0000000000..846cd998b6
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x050_diastoli.mf
@@ -0,0 +1,11 @@
+beginchar(oct"050",.8em#,cap#,0dth#); "Diastoli";
+picture DIACTOLH;
+ path p[];
+
+ x0 = x1 = .5w;
+ y0 = h - y1 = 0;
+
+ pickup pencircle scaled .8pt;
+ draw z0--z1;
+ DIACTOLH = currentpicture;
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x051_BPA.mf b/fonts/byzfonts/XAP_xpo/x051_BPA.mf
new file mode 100644
index 0000000000..5402ec066c
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x051_BPA.mf
@@ -0,0 +1,4 @@
+beginchar(oct"051",.5em#,.7cap#,1.5dth#); "BPADYTATH XPONIKH AGOGI";
+ addto currentpicture also TPIAPGON shifted(-.0w,.4h);
+ addto currentpicture also XPAH shifted(.3w,0h);
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x064_TAX.mf b/fonts/byzfonts/XAP_xpo/x064_TAX.mf
new file mode 100644
index 0000000000..a5a47d1e4a
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x064_TAX.mf
@@ -0,0 +1,4 @@
+beginchar(oct"064",.4em#,.7cap#,1.5dth#); "TAXEIA XPONIKH AGOGI";
+ addto currentpicture also GOPGON shifted(.4w,.5h);
+ addto currentpicture also XPAH shifted(.1w,0h);
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x065_XYM.mf b/fonts/byzfonts/XAP_xpo/x065_XYM.mf
new file mode 100644
index 0000000000..3d3d12ea20
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x065_XYM.mf
@@ -0,0 +1,4 @@
+beginchar(oct"065",.5em#,.7cap#,1.5dth#); "TAXYTATH XPONIKH AGOGI";
+ addto currentpicture also DIGOPGON shifted(.35w,.5h);
+ addto currentpicture also XPAH shifted(.1w,0h);
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x066_MTP.mf b/fonts/byzfonts/XAP_xpo/x066_MTP.mf
new file mode 100644
index 0000000000..279b061416
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x066_MTP.mf
@@ -0,0 +1,4 @@
+beginchar(oct"066",.4em#,.6cap#,1.5dth#); "METPIA XPONIKH AGOGI";
+ addto currentpicture also APGON shifted(-.3w,.4h);
+ addto currentpicture also XPAH shifted(.1w,0h);
+ endchar;
diff --git a/fonts/byzfonts/XAP_xpo/x067_MEC.mf b/fonts/byzfonts/XAP_xpo/x067_MEC.mf
new file mode 100644
index 0000000000..dcc634eaa6
--- /dev/null
+++ b/fonts/byzfonts/XAP_xpo/x067_MEC.mf
@@ -0,0 +1,4 @@
+beginchar(oct"067",.4em#,.7cap#,1.5dth#); "BPADEIA XPONIKH AGOGI";
+ addto currentpicture also DIAPGON shifted(-.3w,.4h);
+ addto currentpicture also XPAH shifted(.1w,0h);
+ endchar;