summaryrefslogtreecommitdiff
path: root/fonts/orkhun
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/orkhun
Initial commit
Diffstat (limited to 'fonts/orkhun')
l---------fonts/orkhun/README1
-rw-r--r--fonts/orkhun/README_Orkhun.txt22
-rw-r--r--fonts/orkhun/orhant.mf499
-rw-r--r--fonts/orkhun/orhant11.mf99
-rw-r--r--fonts/orkhun/orhant14.mf499
-rw-r--r--fonts/orkhun/orhant16.mf499
-rw-r--r--fonts/orkhun/orhant20.mf499
-rw-r--r--fonts/orkhun/orhant25.mf499
-rw-r--r--fonts/orkhun/rakhimov.pdfbin0 -> 149197 bytes
-rw-r--r--fonts/orkhun/rakhimov.tex427
10 files changed, 3044 insertions, 0 deletions
diff --git a/fonts/orkhun/README b/fonts/orkhun/README
new file mode 120000
index 0000000000..ba30bd03ed
--- /dev/null
+++ b/fonts/orkhun/README
@@ -0,0 +1 @@
+README_Orkhun.txt \ No newline at end of file
diff --git a/fonts/orkhun/README_Orkhun.txt b/fonts/orkhun/README_Orkhun.txt
new file mode 100644
index 0000000000..012a6a7f1e
--- /dev/null
+++ b/fonts/orkhun/README_Orkhun.txt
@@ -0,0 +1,22 @@
+ The Old Turkic System
+ Version 1.1
+ (c) Abdugafur A. Rakhimov
+
+The author used METAFONT to write in the Old Turkic script or Gokturk script or Orkhon script or Orkhon-Yenisey script.
+It can be used only as free fonts.
+
+See the PDF user guide
+
+Among the things which you should know:
+==========================
++ it is necessary to copy .gf, .pk, .tfm files in the folders:
+ ...\TEXMF\fonts\pk
+ ...\TEXMF\fonts\tfm
+ Or they can be copied in the catalogue (directory) in which you work
+
++ .gf, .pk, .tfm (ps, dvi) files you can to create, also, using .mf file
+
++ to write the text in old Turkic language you should use a command \font (it is direct in the text).
+==========================
+
+Further we plan to write a orkhun-package which will allow to work more conveniently with these fonts and will expand possibilities use of fonts. \ No newline at end of file
diff --git a/fonts/orkhun/orhant.mf b/fonts/orkhun/orhant.mf
new file mode 100644
index 0000000000..2335017efe
--- /dev/null
+++ b/fonts/orkhun/orhant.mf
@@ -0,0 +1,499 @@
+mode_def testing=
+ pixels_per_inch:=300*4;
+ blacker:=.1;
+ o_correction:=1;
+ fillin:=.01;
+ proofing:=2;
+ fontmaking:=0;
+ tracingtitles:=1;
+enddef;
+if unknown mode:
+mode:=testing; fi
+mode_setup;
+turningcheck := 0;
+
+if mode=testing: screenstrokes; fi
+
+% parameters that control what a wedge looks like.
+font_identifier := "bard";
+font_size 10pt#;
+u# := 1pt#;
+pw# := 2u#;
+runew# := 2pw#;
+runeh# := 4pw#;
+letter_fit# := 2pw#/3;
+font_normal_space := 2runew#;
+font_normal_stretch := 2runew#/3;
+font_normal_shrink := 4runew#/3;
+
+pen_thick# := u#/3;
+
+define_pixels(pw, runew, runeh, pen_thick, letter_fit)
+
+def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
+ --(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle)
+enddef;
+
+def runepen = pickup penoct scaled pen_thick rotated 45; enddef;
+
+def adjust_fit(expr left_adj, right_adj) =
+ l := -hround(left_adj*hppp)-letter_fit;
+ interim xoffset := -l;
+ charwd := charwd+2letter_fit# + left_adj + right_adj;
+ r := l+hround(charwd*hppp);
+ w := r-hround(right_adj*hppp) - letter_fit;
+enddef;
+
+extra_beginchar := extra_beginchar & "runepen;adjust_fit(0,0);";
+
+def makebox(text r) =
+ r((-letter_fit,0), (w+letter_fit,0));
+ r((-letter_fit,h), (w+letter_fit,h));
+ r((-letter_fit,0), (-letter_fit,h));
+ r((w+letter_fit,0), (w+letter_fit,h));
+ r((0,0), (0,h));
+ r((w,0), (w,h));
+ if charic<>0:
+ r((w+charic*hppp,h.o_),(w+charic*hppp,.5h.o_));
+ fi
+enddef;
+
+% ============================================
+% Number 0, 19.07.93 jhl
+% ============================================
+beginchar("T",pw#,runeh#,0);
+z3 = (w/2, 0); %z3 = (w, 0);
+z1 = (w/7, h/4); %z1 = (0, h/2);
+z2 = (w/2, h/2); %z2 = (w, h);
+z4 = (6w/7, h/4); %z4 = (2w, h/2);
+z6 = (0, 7h/10); %z6 = (-w/5, 4h/5);
+z7 = (w, 7h/10); %z7 = (11w/5, 4h/5);
+z5 = (w/2, h); %z5 = (w, 11h/6);
+draw z1--z2--z4--z3--z1;
+draw z2--z5--z6;
+draw z5--z7;
+endchar;
+
+beginchar("A",pw#,runeh#,0);
+z1 = (0, h/5); %z1 = (0, h/3);
+z2 = (w/2, 0); %z2 = (w, 0);
+z3 = (w/2, h); %z3 = (w, 11h/6);
+z4 = (w, 4h/5); %z4 = (2w, 3h/2);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("B",pw#,runeh#,0);
+z1 = (0, 0); %z1 = (w/4, 0);
+z2 = (w, 0); %z2 = (3w/4, 0);
+z3 = (-w/4, h/3); %z3 = (0, h/2);
+z7 = (5w/4, h/3); %z7 = (w, h/2);
+z5 = (w/2, h); %z5 = (w/2, h);
+z4 =.5[z3,z5]; %z4 =.5[z3,z5];
+z6 =.5[z5,z7]; %z6 =.5[z5,z7];
+draw z1--z6;
+draw z2--z4;
+draw z3--z5--z7;
+endchar;
+
+beginchar("G",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/3, 3h/4);
+z3 = (5w/6, 3h/10);
+z4 = (w, h);
+z5 = (4w/3, 7h/12);
+draw z1..z2..z4;
+draw z2{down}..{right}z3;
+draw z4{down}..z5;
+endchar;
+
+beginchar("d",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (4w/3, h);
+z3 = (-w/3, h);
+z4 = (4w/3, 0);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("D",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/3, h/4);
+z3 = (0, h/2);
+z4 = (w/3, 3h/4);
+z5 = (0, h);
+z6 = (w/2, -h/20);
+z7 = (w, h/4);
+z8 = (2w/3, h/2);
+z9 = (w, 3h/4);
+z10 = (w/2, 20h/19);
+draw z1--z2--z3--z4--z5;
+draw z6--z7--z8--z9--z10;
+endchar;
+
+beginchar("U",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1..z2;
+draw z2..z3;
+endchar;
+
+beginchar("O",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1{up}..{right}z2;
+draw z2{left}..{up}z3;
+endchar;
+
+beginchar("o",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, 19h/20);
+z3 = (w, h/2);
+z4 = (w, h);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("Z",pw#,runeh#,0);
+z1 = (-w/7, 0);
+z2 = (-w/7, h/2);
+z3 = (8w/7, h/2);
+z4 = (8w/7, h);
+z5 = (w/2, 0);
+z6 = (w/2, h);
+draw z1--z2--z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("t",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (w, 7h/10);
+z4 = (8w/7, 0);
+z5 = (0, h/2);
+z6 = (3w/4, h/4);
+draw z1--z2;
+draw z5--z3;
+draw z3..z6..z4;
+endchar;
+
+
+beginchar("Y",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (9w/10, h/2);
+draw z1--z2;
+draw z1..z3..z2;
+endchar;
+
+beginchar("y",pw#,runeh#,0);
+z1 = (w/2, h);
+z2 = (-w/6, 6h/7);
+z3 = (w/2, h/2);
+z4 = (7w/6, 6h/7);
+z5 = (9w/16, h/4);
+z6 = (30w/29, 0);
+z7 = (w, 12h/21);
+draw z1..z2..z3..z4..z1;
+draw z7..z5..z6;
+endchar;
+
+
+beginchar("l",pw#,runeh#,0);
+z1 = (0, h/5);
+z2 = (w/2, 0);
+z3 = (w/2, h);
+draw z1--z2--z3;
+endchar;
+
+beginchar("L",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+draw z1--z4--z2;
+draw z4--z3;
+endchar;
+
+
+beginchar("M",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h);
+z7 = (7w/4, h/2);
+z3 = (w, 3h/4);
+z4 = (w, h/4);
+z5 = (w/2, -h/9);
+z6 = (w/2, 10h/9);
+z8 = (w/6, 5h/8);
+z9 = (w/6, 3h/8);
+draw z1..z9..z3;
+draw z2..z8..z4;
+draw z6..z3..z7;
+draw z5..z4..z7;
+endchar;
+
+
+beginchar("N",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h/2);
+z3 = (w/2, 3h/8);
+z4 = (w/2, 0);
+z5 = (w/2, h);
+z6 = (w/2, 5h/8);
+z7 = (4w/3, h/2);
+z8 = (4w/3, h);
+draw z1--z2--z3;
+draw z4--z5;
+draw z6--z7--z8;
+endchar;
+
+beginchar("n",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (4w/3, h/2);
+z3 = (0, h);
+draw z1..z2..z3;
+endchar;
+
+beginchar("s",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+draw z1--z2;
+endchar;
+
+beginchar("S",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/2, h/2);
+z3 = (0, h);
+z4 = (6w/5, h);
+z5 = (5w/6, h/2);
+draw z1..{left}z2{left}..{right}z3;
+draw z5{left}..{right}z4;
+endchar;
+
+beginchar("P",pw#,runeh#,0);
+z1 = (3w/4, 0);
+z2 = (3w/4, h);
+z3 = (0, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("C",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (w/2, 2h/5);
+z3 = (w/2, h);
+z4 = (4w/3, 0);
+draw z1--z2--z3;
+draw z2--z4;
+endchar;
+
+beginchar("k",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/4, h/4);
+z3 = (5w/4, h/4);
+z4 = (w/2, h);
+draw z1--z2;
+draw z1--z4;
+draw z1--z3;
+endchar;
+
+beginchar("K",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (-w/4, 3h/8);
+z4 = (-w/4, 7h/8);
+z5 = (3w/4, 7h/8);
+z6 = (3w/4, 3h/8);
+z7 = (5w/4, h/2);
+z8 = (5w/4, 0);
+draw z1--z2;
+draw z4--z5;
+draw z3--z6;
+draw z5{down}..{right}z7;
+draw z6{down}..{right}z8;
+endchar;
+
+beginchar("r",pw#,runeh#,0);
+z1 = (w/2, 0); %z1 = (w/2, 0);
+z2 = (w/2, 5h/8); %z2 = (w/2, 3h/4);
+z3 = (0, h); %z3 = (w/8, h);
+z4 = (-w/2, 3h/4); %z4 = (-w/4, 3h/4);
+z5 = (w, h); %z5 = (7w/8, h);
+z6 = (3w/2, 3h/4); %z6 = (5w/4, 3h/4);
+draw z1--z2;
+draw z2--z3--z4;
+draw z2--z5--z6;
+endchar;
+
+beginchar("R",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (w, h);
+z3 = .5[z1,z2];
+z4 = (-w/8, 3h/8);
+z5 = (-w/2, h);
+z6 = (w/8, 3h/4);
+draw z1--z2;
+draw z3--z4;
+draw z4..z6..z5;
+%draw z4{up}..{left}z5;
+endchar;
+
+beginchar("v",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+z5 = (w/5, 5h/12);
+z6 = (4w/5, 5h/12);
+draw z1--z4--z2;
+draw z4--z3;
+draw z5--z6;
+endchar;
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, h/8);
+z2 = (w/2, 7h/8);
+pickup pencircle scaled 10;
+drawdot z1;
+drawdot z2;
+endchar;
+
+beginchar("m",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (w/2, 5h/8);
+z4 = (5w/4, h);
+z5 = (5w/4, 0);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("c",pw#,runeh#,0);
+z1 = (w/4, 0);
+z2 = (3w/4, h/4);
+z3 = (w/4, h/2);
+z4 = (3w/4, 3h/4);
+z5 = (w/4, h);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("Q",pw#,runeh#,0);
+z1 = (w/4, h/4);
+z2 = (3w/4, h/4);
+z3 = (3w/4, 3h/4);
+z4 = (w/4, 3h/4);
+z5 = (w/2, h/2);
+draw z1..z2..z3..z4..cycle;
+pickup pencircle scaled 10;
+drawdot z5;
+endchar;
+
+beginchar("z",pw#,runeh#,0);
+z1 = (19w/20, 0);
+z2 = (19w/20, h);
+z3 = .3[z1, z2];
+z4 = (w/20, 7h/8);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("V",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/4);
+z3 = (0, 3h/4);
+z4 = (0, h/4);
+z5 = (w, 3h/4);
+z6 = (0, h);
+draw z1..z2..z3;
+draw z4..z5..z6;
+endchar;
+
+beginchar("e",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+z3 = (w, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("a",pw#,runeh#,0);
+z1 = (0, h/12);
+z2 = (w/6, h/4);
+z3 = (w/4, 2h/3);
+z4 = (w, h/2);
+z5 = (w, 0);
+z6 = (w, h);
+draw z1..z2..z3;
+draw z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("w",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w, 0);
+z3 = (w, h);
+draw z1--z2--z3--z1;
+endchar;
+
+beginchar("g",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w/3, 3h/4);
+z3 = (0, h);
+z4 = (2w/3, 3h/4);
+z5 = (w, h/2);
+z6 = (w, h);
+z7 = (w/2, 0);
+z8 = (w/2, 5h/12);
+draw z1..z2..z3;
+draw z5..z4..z6;
+pickup pencircle scaled 9;
+draw z7--z8;
+endchar;
+
+beginchar("i",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (7w/8, 7h/8);
+z3 = (0, h);
+z4 = (0, 5h/8);
+z5 = (w, h/2);
+draw z1--z2;
+draw z2--z3;
+draw z4--z5;
+endchar;
+
+beginchar("b",pw#,runeh#,0);
+z1 = (w/5, 5h/12);
+z2 = (w/4, h/12);
+z3 = (3w/4, h/6);
+z4 = (w/8, h);
+draw z1..z2..z3..z4;
+endchar;
+
+beginchar("I",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/8, h);
+z3 = (9w/8, h);
+z4 = (w/2, h/2);
+z5 = (w/2, h);
+draw z4--z2;
+draw z4--z3;
+draw z4--z5;
+pickup pencircle scaled 7;
+draw z1--z4;
+endchar;
+
+
+end
+
+
+
+
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+drawdot z1;
+drawdot z2;
+endchar;
+
+
+
+
+
diff --git a/fonts/orkhun/orhant11.mf b/fonts/orkhun/orhant11.mf
new file mode 100644
index 0000000000..2725200e96
--- /dev/null
+++ b/fonts/orkhun/orhant11.mf
@@ -0,0 +1,99 @@
+mode_def testing=
+ pixels_per_inch:=300*4;
+ blacker:=.1;
+ o_correction:=1;
+ fillin:=.01;
+ proofing:=2;
+ fontmaking:=0;
+ tracingtitles:=1;
+enddef;
+if unknown mode:
+mode:=testing; fi
+mode_setup;
+turningcheck := 0;
+
+if mode=testing: screenstrokes; fi
+
+% parameters that control what a wedge looks like.
+font_identifier := "bard";
+font_size 11pt#;
+u# := 1.2pt#;
+pw# := 2u#;
+runew# := 2pw#;
+runeh# := 4pw#;
+letter_fit# := 2pw#/3;
+font_normal_space := 2runew#;
+font_normal_stretch := 2runew#/3;
+font_normal_shrink := 4runew#/3;
+
+pen_thick# := u#/3;
+
+define_pixels(pw, runew, runeh, pen_thick, letter_fit)
+
+def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
+ --(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle)
+enddef;
+
+def runepen = pickup penoct scaled pen_thick rotated 45; enddef;
+
+def adjust_fit(expr left_adj, right_adj) =
+ l := -hround(left_adj*hppp)-letter_fit;
+ interim xoffset := -l;
+ charwd := charwd+2letter_fit# + left_adj + right_adj;
+ r := l+hround(charwd*hppp);
+ w := r-hround(right_adj*hppp) - letter_fit;
+enddef;
+
+extra_beginchar := extra_beginchar & "runepen;adjust_fit(0,0);";
+
+def makebox(text r) =
+ r((-letter_fit,0), (w+letter_fit,0));
+ r((-letter_fit,h), (w+letter_fit,h));
+ r((-letter_fit,0), (-letter_fit,h));
+ r((w+letter_fit,0), (w+letter_fit,h));
+ r((0,0), (0,h));
+ r((w,0), (w,h));
+ if charic<>0:
+ r((w+charic*hppp,h.o_),(w+charic*hppp,.5h.o_));
+ fi
+enddef;
+
+% ============================================
+% Number 0, 19.07.93 jhl
+% ============================================
+beginchar("T",pw#,runeh#,0);
+z3 = (w/2, 0); %z3 = (w, 0);
+z1 = (w/7, h/4); %z1 = (0, h/2);
+z2 = (w/2, h/2); %z2 = (w, h);
+z4 = (6w/7, h/4); %z4 = (2w, h/2);
+z6 = (0, 7h/10); %z6 = (-w/5, 4h/5);
+z7 = (w, 7h/10); %z7 = (11w/5, 4h/5);
+z5 = (w/2, h); %z5 = (w, 11h/6);
+draw z1--z2--z4--z3--z1;
+draw z2--z5--z6;
+draw z5--z7;
+endchar;
+
+beginchar("A",pw#,runeh#,0);
+z1 = (0, h/5); %z1 = (0, h/3);
+z2 = (w/2, 0); %z2 = (w, 0);
+z3 = (w/2, h); %z3 = (w, 11h/6);
+z4 = (w, 4h/5); %z4 = (2w, 3h/2);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("B",pw#,runeh#,0);
+z1 = (0, 0); %z1 = (w/4, 0);
+z2 = (w, 0); %z2 = (3w/4, 0);
+z3 = (-w/4, h/3); %z3 = (0, h/2);
+z7 = (5w/4, h/3); %z7 = (w, h/2);
+z5 = (w/2, h); %z5 = (w/2, h);
+z4 =.5[z3,z5]; %z4 =.5[z3,z5];
+z6 =.5[z5,z7]; %z6 =.5[z5,z7];
+draw z1--z6;
+draw z2--z4;
+draw z3--z5--z7;
+endchar;
+end
+
+
diff --git a/fonts/orkhun/orhant14.mf b/fonts/orkhun/orhant14.mf
new file mode 100644
index 0000000000..457a931d25
--- /dev/null
+++ b/fonts/orkhun/orhant14.mf
@@ -0,0 +1,499 @@
+mode_def testing=
+ pixels_per_inch:=300*4;
+ blacker:=.1;
+ o_correction:=1;
+ fillin:=.01;
+ proofing:=2;
+ fontmaking:=0;
+ tracingtitles:=1;
+enddef;
+if unknown mode:
+mode:=testing; fi
+mode_setup;
+turningcheck := 0;
+
+if mode=testing: screenstrokes; fi
+
+% parameters that control what a wedge looks like.
+font_identifier := "bard";
+font_size 14pt#;
+u# := 1.4pt#;
+pw# := 2u#;
+runew# := 2pw#;
+runeh# := 4pw#;
+letter_fit# := 2pw#/3;
+font_normal_space := 2runew#;
+font_normal_stretch := 2runew#/3;
+font_normal_shrink := 4runew#/3;
+
+pen_thick# := u#/3;
+
+define_pixels(pw, runew, runeh, pen_thick, letter_fit)
+
+def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
+ --(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle)
+enddef;
+
+def runepen = pickup penoct scaled pen_thick rotated 45; enddef;
+
+def adjust_fit(expr left_adj, right_adj) =
+ l := -hround(left_adj*hppp)-letter_fit;
+ interim xoffset := -l;
+ charwd := charwd+2letter_fit# + left_adj + right_adj;
+ r := l+hround(charwd*hppp);
+ w := r-hround(right_adj*hppp) - letter_fit;
+enddef;
+
+extra_beginchar := extra_beginchar & "runepen;adjust_fit(0,0);";
+
+def makebox(text r) =
+ r((-letter_fit,0), (w+letter_fit,0));
+ r((-letter_fit,h), (w+letter_fit,h));
+ r((-letter_fit,0), (-letter_fit,h));
+ r((w+letter_fit,0), (w+letter_fit,h));
+ r((0,0), (0,h));
+ r((w,0), (w,h));
+ if charic<>0:
+ r((w+charic*hppp,h.o_),(w+charic*hppp,.5h.o_));
+ fi
+enddef;
+
+% ============================================
+% Number 0, 19.07.93 jhl
+% ============================================
+beginchar("T",pw#,runeh#,0);
+z3 = (w/2, 0); %z3 = (w, 0);
+z1 = (w/7, h/4); %z1 = (0, h/2);
+z2 = (w/2, h/2); %z2 = (w, h);
+z4 = (6w/7, h/4); %z4 = (2w, h/2);
+z6 = (0, 7h/10); %z6 = (-w/5, 4h/5);
+z7 = (w, 7h/10); %z7 = (11w/5, 4h/5);
+z5 = (w/2, h); %z5 = (w, 11h/6);
+draw z1--z2--z4--z3--z1;
+draw z2--z5--z6;
+draw z5--z7;
+endchar;
+
+beginchar("A",pw#,runeh#,0);
+z1 = (0, h/5); %z1 = (0, h/3);
+z2 = (w/2, 0); %z2 = (w, 0);
+z3 = (w/2, h); %z3 = (w, 11h/6);
+z4 = (w, 4h/5); %z4 = (2w, 3h/2);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("B",pw#,runeh#,0);
+z1 = (0, 0); %z1 = (w/4, 0);
+z2 = (w, 0); %z2 = (3w/4, 0);
+z3 = (-w/4, h/3); %z3 = (0, h/2);
+z7 = (5w/4, h/3); %z7 = (w, h/2);
+z5 = (w/2, h); %z5 = (w/2, h);
+z4 =.5[z3,z5]; %z4 =.5[z3,z5];
+z6 =.5[z5,z7]; %z6 =.5[z5,z7];
+draw z1--z6;
+draw z2--z4;
+draw z3--z5--z7;
+endchar;
+
+beginchar("G",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/3, 3h/4);
+z3 = (5w/6, 3h/10);
+z4 = (w, h);
+z5 = (4w/3, 7h/12);
+draw z1..z2..z4;
+draw z2{down}..{right}z3;
+draw z4{down}..z5;
+endchar;
+
+beginchar("d",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (4w/3, h);
+z3 = (-w/3, h);
+z4 = (4w/3, 0);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("D",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/3, h/4);
+z3 = (0, h/2);
+z4 = (w/3, 3h/4);
+z5 = (0, h);
+z6 = (w/2, -h/20);
+z7 = (w, h/4);
+z8 = (2w/3, h/2);
+z9 = (w, 3h/4);
+z10 = (w/2, 20h/19);
+draw z1--z2--z3--z4--z5;
+draw z6--z7--z8--z9--z10;
+endchar;
+
+beginchar("U",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1..z2;
+draw z2..z3;
+endchar;
+
+beginchar("O",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1{up}..{right}z2;
+draw z2{left}..{up}z3;
+endchar;
+
+beginchar("o",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, 19h/20);
+z3 = (w, h/2);
+z4 = (w, h);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("Z",pw#,runeh#,0);
+z1 = (-w/7, 0);
+z2 = (-w/7, h/2);
+z3 = (8w/7, h/2);
+z4 = (8w/7, h);
+z5 = (w/2, 0);
+z6 = (w/2, h);
+draw z1--z2--z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("t",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (w, 7h/10);
+z4 = (8w/7, 0);
+z5 = (0, h/2);
+z6 = (3w/4, h/4);
+draw z1--z2;
+draw z5--z3;
+draw z3..z6..z4;
+endchar;
+
+
+beginchar("Y",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (9w/10, h/2);
+draw z1--z2;
+draw z1..z3..z2;
+endchar;
+
+beginchar("y",pw#,runeh#,0);
+z1 = (w/2, h);
+z2 = (-w/6, 6h/7);
+z3 = (w/2, h/2);
+z4 = (7w/6, 6h/7);
+z5 = (9w/16, h/4);
+z6 = (30w/29, 0);
+z7 = (w, 12h/21);
+draw z1..z2..z3..z4..z1;
+draw z7..z5..z6;
+endchar;
+
+
+beginchar("l",pw#,runeh#,0);
+z1 = (0, h/5);
+z2 = (w/2, 0);
+z3 = (w/2, h);
+draw z1--z2--z3;
+endchar;
+
+beginchar("L",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+draw z1--z4--z2;
+draw z4--z3;
+endchar;
+
+
+beginchar("M",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h);
+z7 = (7w/4, h/2);
+z3 = (w, 3h/4);
+z4 = (w, h/4);
+z5 = (w/2, -h/9);
+z6 = (w/2, 10h/9);
+z8 = (w/6, 5h/8);
+z9 = (w/6, 3h/8);
+draw z1..z9..z3;
+draw z2..z8..z4;
+draw z6..z3..z7;
+draw z5..z4..z7;
+endchar;
+
+
+beginchar("N",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h/2);
+z3 = (w/2, 3h/8);
+z4 = (w/2, 0);
+z5 = (w/2, h);
+z6 = (w/2, 5h/8);
+z7 = (4w/3, h/2);
+z8 = (4w/3, h);
+draw z1--z2--z3;
+draw z4--z5;
+draw z6--z7--z8;
+endchar;
+
+beginchar("n",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (4w/3, h/2);
+z3 = (0, h);
+draw z1..z2..z3;
+endchar;
+
+beginchar("s",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+draw z1--z2;
+endchar;
+
+beginchar("S",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/2, h/2);
+z3 = (0, h);
+z4 = (6w/5, h);
+z5 = (5w/6, h/2);
+draw z1..{left}z2{left}..{right}z3;
+draw z5{left}..{right}z4;
+endchar;
+
+beginchar("P",pw#,runeh#,0);
+z1 = (3w/4, 0);
+z2 = (3w/4, h);
+z3 = (0, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("C",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (w/2, 2h/5);
+z3 = (w/2, h);
+z4 = (4w/3, 0);
+draw z1--z2--z3;
+draw z2--z4;
+endchar;
+
+beginchar("k",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/4, h/4);
+z3 = (5w/4, h/4);
+z4 = (w/2, h);
+draw z1--z2;
+draw z1--z4;
+draw z1--z3;
+endchar;
+
+beginchar("K",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (-w/4, 3h/8);
+z4 = (-w/4, 7h/8);
+z5 = (3w/4, 7h/8);
+z6 = (3w/4, 3h/8);
+z7 = (5w/4, h/2);
+z8 = (5w/4, 0);
+draw z1--z2;
+draw z4--z5;
+draw z3--z6;
+draw z5{down}..{right}z7;
+draw z6{down}..{right}z8;
+endchar;
+
+beginchar("r",pw#,runeh#,0);
+z1 = (w/2, 0); %z1 = (w/2, 0);
+z2 = (w/2, 5h/8); %z2 = (w/2, 3h/4);
+z3 = (0, h); %z3 = (w/8, h);
+z4 = (-w/2, 3h/4); %z4 = (-w/4, 3h/4);
+z5 = (w, h); %z5 = (7w/8, h);
+z6 = (3w/2, 3h/4); %z6 = (5w/4, 3h/4);
+draw z1--z2;
+draw z2--z3--z4;
+draw z2--z5--z6;
+endchar;
+
+beginchar("R",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (w, h);
+z3 = .5[z1,z2];
+z4 = (-w/8, 3h/8);
+z5 = (-w/2, h);
+z6 = (w/8, 3h/4);
+draw z1--z2;
+draw z3--z4;
+draw z4..z6..z5;
+%draw z4{up}..{left}z5;
+endchar;
+
+beginchar("v",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+z5 = (w/5, 5h/12);
+z6 = (4w/5, 5h/12);
+draw z1--z4--z2;
+draw z4--z3;
+draw z5--z6;
+endchar;
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, h/8);
+z2 = (w/2, 7h/8);
+pickup pencircle scaled 10;
+drawdot z1;
+drawdot z2;
+endchar;
+
+beginchar("m",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (w/2, 5h/8);
+z4 = (5w/4, h);
+z5 = (5w/4, 0);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("c",pw#,runeh#,0);
+z1 = (w/4, 0);
+z2 = (3w/4, h/4);
+z3 = (w/4, h/2);
+z4 = (3w/4, 3h/4);
+z5 = (w/4, h);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("Q",pw#,runeh#,0);
+z1 = (w/4, h/4);
+z2 = (3w/4, h/4);
+z3 = (3w/4, 3h/4);
+z4 = (w/4, 3h/4);
+z5 = (w/2, h/2);
+draw z1..z2..z3..z4..cycle;
+pickup pencircle scaled 10;
+drawdot z5;
+endchar;
+
+beginchar("z",pw#,runeh#,0);
+z1 = (19w/20, 0);
+z2 = (19w/20, h);
+z3 = .3[z1, z2];
+z4 = (w/20, 7h/8);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("V",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/4);
+z3 = (0, 3h/4);
+z4 = (0, h/4);
+z5 = (w, 3h/4);
+z6 = (0, h);
+draw z1..z2..z3;
+draw z4..z5..z6;
+endchar;
+
+beginchar("e",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+z3 = (w, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("a",pw#,runeh#,0);
+z1 = (0, h/12);
+z2 = (w/6, h/4);
+z3 = (w/4, 2h/3);
+z4 = (w, h/2);
+z5 = (w, 0);
+z6 = (w, h);
+draw z1..z2..z3;
+draw z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("w",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w, 0);
+z3 = (w, h);
+draw z1--z2--z3--z1;
+endchar;
+
+beginchar("g",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w/3, 3h/4);
+z3 = (0, h);
+z4 = (2w/3, 3h/4);
+z5 = (w, h/2);
+z6 = (w, h);
+z7 = (w/2, 0);
+z8 = (w/2, 5h/12);
+draw z1..z2..z3;
+draw z5..z4..z6;
+pickup pencircle scaled 9;
+draw z7--z8;
+endchar;
+
+beginchar("i",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (7w/8, 7h/8);
+z3 = (0, h);
+z4 = (0, 5h/8);
+z5 = (w, h/2);
+draw z1--z2;
+draw z2--z3;
+draw z4--z5;
+endchar;
+
+beginchar("b",pw#,runeh#,0);
+z1 = (w/5, 5h/12);
+z2 = (w/4, h/12);
+z3 = (3w/4, h/6);
+z4 = (w/8, h);
+draw z1..z2..z3..z4;
+endchar;
+
+beginchar("I",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/8, h);
+z3 = (9w/8, h);
+z4 = (w/2, h/2);
+z5 = (w/2, h);
+draw z4--z2;
+draw z4--z3;
+draw z4--z5;
+pickup pencircle scaled 7;
+draw z1--z4;
+endchar;
+
+
+end
+
+
+
+
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+drawdot z1;
+drawdot z2;
+endchar;
+
+
+
+
+
diff --git a/fonts/orkhun/orhant16.mf b/fonts/orkhun/orhant16.mf
new file mode 100644
index 0000000000..fdf9117a07
--- /dev/null
+++ b/fonts/orkhun/orhant16.mf
@@ -0,0 +1,499 @@
+mode_def testing=
+ pixels_per_inch:=300*4;
+ blacker:=.1;
+ o_correction:=1;
+ fillin:=.01;
+ proofing:=2;
+ fontmaking:=0;
+ tracingtitles:=1;
+enddef;
+if unknown mode:
+mode:=testing; fi
+mode_setup;
+turningcheck := 0;
+
+if mode=testing: screenstrokes; fi
+
+% parameters that control what a wedge looks like.
+font_identifier := "bard";
+font_size 16pt#;
+u# := 1.6pt#;
+pw# := 2u#;
+runew# := 2pw#;
+runeh# := 4pw#;
+letter_fit# := 2pw#/3;
+font_normal_space := 2runew#;
+font_normal_stretch := 2runew#/3;
+font_normal_shrink := 4runew#/3;
+
+pen_thick# := u#/3;
+
+define_pixels(pw, runew, runeh, pen_thick, letter_fit)
+
+def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
+ --(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle)
+enddef;
+
+def runepen = pickup penoct scaled pen_thick rotated 45; enddef;
+
+def adjust_fit(expr left_adj, right_adj) =
+ l := -hround(left_adj*hppp)-letter_fit;
+ interim xoffset := -l;
+ charwd := charwd+2letter_fit# + left_adj + right_adj;
+ r := l+hround(charwd*hppp);
+ w := r-hround(right_adj*hppp) - letter_fit;
+enddef;
+
+extra_beginchar := extra_beginchar & "runepen;adjust_fit(0,0);";
+
+def makebox(text r) =
+ r((-letter_fit,0), (w+letter_fit,0));
+ r((-letter_fit,h), (w+letter_fit,h));
+ r((-letter_fit,0), (-letter_fit,h));
+ r((w+letter_fit,0), (w+letter_fit,h));
+ r((0,0), (0,h));
+ r((w,0), (w,h));
+ if charic<>0:
+ r((w+charic*hppp,h.o_),(w+charic*hppp,.5h.o_));
+ fi
+enddef;
+
+% ============================================
+% Number 0, 19.07.93 jhl
+% ============================================
+beginchar("T",pw#,runeh#,0);
+z3 = (w/2, 0); %z3 = (w, 0);
+z1 = (w/7, h/4); %z1 = (0, h/2);
+z2 = (w/2, h/2); %z2 = (w, h);
+z4 = (6w/7, h/4); %z4 = (2w, h/2);
+z6 = (0, 7h/10); %z6 = (-w/5, 4h/5);
+z7 = (w, 7h/10); %z7 = (11w/5, 4h/5);
+z5 = (w/2, h); %z5 = (w, 11h/6);
+draw z1--z2--z4--z3--z1;
+draw z2--z5--z6;
+draw z5--z7;
+endchar;
+
+beginchar("A",pw#,runeh#,0);
+z1 = (0, h/5); %z1 = (0, h/3);
+z2 = (w/2, 0); %z2 = (w, 0);
+z3 = (w/2, h); %z3 = (w, 11h/6);
+z4 = (w, 4h/5); %z4 = (2w, 3h/2);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("B",pw#,runeh#,0);
+z1 = (0, 0); %z1 = (w/4, 0);
+z2 = (w, 0); %z2 = (3w/4, 0);
+z3 = (-w/4, h/3); %z3 = (0, h/2);
+z7 = (5w/4, h/3); %z7 = (w, h/2);
+z5 = (w/2, h); %z5 = (w/2, h);
+z4 =.5[z3,z5]; %z4 =.5[z3,z5];
+z6 =.5[z5,z7]; %z6 =.5[z5,z7];
+draw z1--z6;
+draw z2--z4;
+draw z3--z5--z7;
+endchar;
+
+beginchar("G",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/3, 3h/4);
+z3 = (5w/6, 3h/10);
+z4 = (w, h);
+z5 = (4w/3, 7h/12);
+draw z1..z2..z4;
+draw z2{down}..{right}z3;
+draw z4{down}..z5;
+endchar;
+
+beginchar("d",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (4w/3, h);
+z3 = (-w/3, h);
+z4 = (4w/3, 0);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("D",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/3, h/4);
+z3 = (0, h/2);
+z4 = (w/3, 3h/4);
+z5 = (0, h);
+z6 = (w/2, -h/20);
+z7 = (w, h/4);
+z8 = (2w/3, h/2);
+z9 = (w, 3h/4);
+z10 = (w/2, 20h/19);
+draw z1--z2--z3--z4--z5;
+draw z6--z7--z8--z9--z10;
+endchar;
+
+beginchar("U",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1..z2;
+draw z2..z3;
+endchar;
+
+beginchar("O",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1{up}..{right}z2;
+draw z2{left}..{up}z3;
+endchar;
+
+beginchar("o",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, 19h/20);
+z3 = (w, h/2);
+z4 = (w, h);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("Z",pw#,runeh#,0);
+z1 = (-w/7, 0);
+z2 = (-w/7, h/2);
+z3 = (8w/7, h/2);
+z4 = (8w/7, h);
+z5 = (w/2, 0);
+z6 = (w/2, h);
+draw z1--z2--z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("t",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (w, 7h/10);
+z4 = (8w/7, 0);
+z5 = (0, h/2);
+z6 = (3w/4, h/4);
+draw z1--z2;
+draw z5--z3;
+draw z3..z6..z4;
+endchar;
+
+
+beginchar("Y",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (9w/10, h/2);
+draw z1--z2;
+draw z1..z3..z2;
+endchar;
+
+beginchar("y",pw#,runeh#,0);
+z1 = (w/2, h);
+z2 = (-w/6, 6h/7);
+z3 = (w/2, h/2);
+z4 = (7w/6, 6h/7);
+z5 = (9w/16, h/4);
+z6 = (30w/29, 0);
+z7 = (w, 12h/21);
+draw z1..z2..z3..z4..z1;
+draw z7..z5..z6;
+endchar;
+
+
+beginchar("l",pw#,runeh#,0);
+z1 = (0, h/5);
+z2 = (w/2, 0);
+z3 = (w/2, h);
+draw z1--z2--z3;
+endchar;
+
+beginchar("L",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+draw z1--z4--z2;
+draw z4--z3;
+endchar;
+
+
+beginchar("M",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h);
+z7 = (7w/4, h/2);
+z3 = (w, 3h/4);
+z4 = (w, h/4);
+z5 = (w/2, -h/9);
+z6 = (w/2, 10h/9);
+z8 = (w/6, 5h/8);
+z9 = (w/6, 3h/8);
+draw z1..z9..z3;
+draw z2..z8..z4;
+draw z6..z3..z7;
+draw z5..z4..z7;
+endchar;
+
+
+beginchar("N",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h/2);
+z3 = (w/2, 3h/8);
+z4 = (w/2, 0);
+z5 = (w/2, h);
+z6 = (w/2, 5h/8);
+z7 = (4w/3, h/2);
+z8 = (4w/3, h);
+draw z1--z2--z3;
+draw z4--z5;
+draw z6--z7--z8;
+endchar;
+
+beginchar("n",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (4w/3, h/2);
+z3 = (0, h);
+draw z1..z2..z3;
+endchar;
+
+beginchar("s",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+draw z1--z2;
+endchar;
+
+beginchar("S",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/2, h/2);
+z3 = (0, h);
+z4 = (6w/5, h);
+z5 = (5w/6, h/2);
+draw z1..{left}z2{left}..{right}z3;
+draw z5{left}..{right}z4;
+endchar;
+
+beginchar("P",pw#,runeh#,0);
+z1 = (3w/4, 0);
+z2 = (3w/4, h);
+z3 = (0, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("C",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (w/2, 2h/5);
+z3 = (w/2, h);
+z4 = (4w/3, 0);
+draw z1--z2--z3;
+draw z2--z4;
+endchar;
+
+beginchar("k",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/4, h/4);
+z3 = (5w/4, h/4);
+z4 = (w/2, h);
+draw z1--z2;
+draw z1--z4;
+draw z1--z3;
+endchar;
+
+beginchar("K",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (-w/4, 3h/8);
+z4 = (-w/4, 7h/8);
+z5 = (3w/4, 7h/8);
+z6 = (3w/4, 3h/8);
+z7 = (5w/4, h/2);
+z8 = (5w/4, 0);
+draw z1--z2;
+draw z4--z5;
+draw z3--z6;
+draw z5{down}..{right}z7;
+draw z6{down}..{right}z8;
+endchar;
+
+beginchar("r",pw#,runeh#,0);
+z1 = (w/2, 0); %z1 = (w/2, 0);
+z2 = (w/2, 5h/8); %z2 = (w/2, 3h/4);
+z3 = (0, h); %z3 = (w/8, h);
+z4 = (-w/2, 3h/4); %z4 = (-w/4, 3h/4);
+z5 = (w, h); %z5 = (7w/8, h);
+z6 = (3w/2, 3h/4); %z6 = (5w/4, 3h/4);
+draw z1--z2;
+draw z2--z3--z4;
+draw z2--z5--z6;
+endchar;
+
+beginchar("R",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (w, h);
+z3 = .5[z1,z2];
+z4 = (-w/8, 3h/8);
+z5 = (-w/2, h);
+z6 = (w/8, 3h/4);
+draw z1--z2;
+draw z3--z4;
+draw z4..z6..z5;
+%draw z4{up}..{left}z5;
+endchar;
+
+beginchar("v",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+z5 = (w/5, 5h/12);
+z6 = (4w/5, 5h/12);
+draw z1--z4--z2;
+draw z4--z3;
+draw z5--z6;
+endchar;
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, h/8);
+z2 = (w/2, 7h/8);
+pickup pencircle scaled 10;
+drawdot z1;
+drawdot z2;
+endchar;
+
+beginchar("m",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (w/2, 5h/8);
+z4 = (5w/4, h);
+z5 = (5w/4, 0);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("c",pw#,runeh#,0);
+z1 = (w/4, 0);
+z2 = (3w/4, h/4);
+z3 = (w/4, h/2);
+z4 = (3w/4, 3h/4);
+z5 = (w/4, h);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("Q",pw#,runeh#,0);
+z1 = (w/4, h/4);
+z2 = (3w/4, h/4);
+z3 = (3w/4, 3h/4);
+z4 = (w/4, 3h/4);
+z5 = (w/2, h/2);
+draw z1..z2..z3..z4..cycle;
+pickup pencircle scaled 10;
+drawdot z5;
+endchar;
+
+beginchar("z",pw#,runeh#,0);
+z1 = (19w/20, 0);
+z2 = (19w/20, h);
+z3 = .3[z1, z2];
+z4 = (w/20, 7h/8);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("V",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/4);
+z3 = (0, 3h/4);
+z4 = (0, h/4);
+z5 = (w, 3h/4);
+z6 = (0, h);
+draw z1..z2..z3;
+draw z4..z5..z6;
+endchar;
+
+beginchar("e",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+z3 = (w, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("a",pw#,runeh#,0);
+z1 = (0, h/12);
+z2 = (w/6, h/4);
+z3 = (w/4, 2h/3);
+z4 = (w, h/2);
+z5 = (w, 0);
+z6 = (w, h);
+draw z1..z2..z3;
+draw z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("w",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w, 0);
+z3 = (w, h);
+draw z1--z2--z3--z1;
+endchar;
+
+beginchar("g",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w/3, 3h/4);
+z3 = (0, h);
+z4 = (2w/3, 3h/4);
+z5 = (w, h/2);
+z6 = (w, h);
+z7 = (w/2, 0);
+z8 = (w/2, 5h/12);
+draw z1..z2..z3;
+draw z5..z4..z6;
+pickup pencircle scaled 9;
+draw z7--z8;
+endchar;
+
+beginchar("i",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (7w/8, 7h/8);
+z3 = (0, h);
+z4 = (0, 5h/8);
+z5 = (w, h/2);
+draw z1--z2;
+draw z2--z3;
+draw z4--z5;
+endchar;
+
+beginchar("b",pw#,runeh#,0);
+z1 = (w/5, 5h/12);
+z2 = (w/4, h/12);
+z3 = (3w/4, h/6);
+z4 = (w/8, h);
+draw z1..z2..z3..z4;
+endchar;
+
+beginchar("I",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/8, h);
+z3 = (9w/8, h);
+z4 = (w/2, h/2);
+z5 = (w/2, h);
+draw z4--z2;
+draw z4--z3;
+draw z4--z5;
+pickup pencircle scaled 7;
+draw z1--z4;
+endchar;
+
+
+end
+
+
+
+
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+drawdot z1;
+drawdot z2;
+endchar;
+
+
+
+
+
diff --git a/fonts/orkhun/orhant20.mf b/fonts/orkhun/orhant20.mf
new file mode 100644
index 0000000000..254f71df18
--- /dev/null
+++ b/fonts/orkhun/orhant20.mf
@@ -0,0 +1,499 @@
+mode_def testing=
+ pixels_per_inch:=300*4;
+ blacker:=.1;
+ o_correction:=1;
+ fillin:=.01;
+ proofing:=2;
+ fontmaking:=0;
+ tracingtitles:=1;
+enddef;
+if unknown mode:
+mode:=testing; fi
+mode_setup;
+turningcheck := 0;
+
+if mode=testing: screenstrokes; fi
+
+% parameters that control what a wedge looks like.
+font_identifier := "bard";
+font_size 20pt#;
+u# := 2pt#;
+pw# := 2u#;
+runew# := 2pw#;
+runeh# := 4pw#;
+letter_fit# := 2pw#/3;
+font_normal_space := 2runew#;
+font_normal_stretch := 2runew#/3;
+font_normal_shrink := 4runew#/3;
+
+pen_thick# := u#/3;
+
+define_pixels(pw, runew, runeh, pen_thick, letter_fit)
+
+def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
+ --(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle)
+enddef;
+
+def runepen = pickup penoct scaled pen_thick rotated 45; enddef;
+
+def adjust_fit(expr left_adj, right_adj) =
+ l := -hround(left_adj*hppp)-letter_fit;
+ interim xoffset := -l;
+ charwd := charwd+2letter_fit# + left_adj + right_adj;
+ r := l+hround(charwd*hppp);
+ w := r-hround(right_adj*hppp) - letter_fit;
+enddef;
+
+extra_beginchar := extra_beginchar & "runepen;adjust_fit(0,0);";
+
+def makebox(text r) =
+ r((-letter_fit,0), (w+letter_fit,0));
+ r((-letter_fit,h), (w+letter_fit,h));
+ r((-letter_fit,0), (-letter_fit,h));
+ r((w+letter_fit,0), (w+letter_fit,h));
+ r((0,0), (0,h));
+ r((w,0), (w,h));
+ if charic<>0:
+ r((w+charic*hppp,h.o_),(w+charic*hppp,.5h.o_));
+ fi
+enddef;
+
+% ============================================
+% Number 0, 19.07.93 jhl
+% ============================================
+beginchar("T",pw#,runeh#,0);
+z3 = (w/2, 0); %z3 = (w, 0);
+z1 = (w/7, h/4); %z1 = (0, h/2);
+z2 = (w/2, h/2); %z2 = (w, h);
+z4 = (6w/7, h/4); %z4 = (2w, h/2);
+z6 = (0, 7h/10); %z6 = (-w/5, 4h/5);
+z7 = (w, 7h/10); %z7 = (11w/5, 4h/5);
+z5 = (w/2, h); %z5 = (w, 11h/6);
+draw z1--z2--z4--z3--z1;
+draw z2--z5--z6;
+draw z5--z7;
+endchar;
+
+beginchar("A",pw#,runeh#,0);
+z1 = (0, h/5); %z1 = (0, h/3);
+z2 = (w/2, 0); %z2 = (w, 0);
+z3 = (w/2, h); %z3 = (w, 11h/6);
+z4 = (w, 4h/5); %z4 = (2w, 3h/2);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("B",pw#,runeh#,0);
+z1 = (0, 0); %z1 = (w/4, 0);
+z2 = (w, 0); %z2 = (3w/4, 0);
+z3 = (-w/4, h/3); %z3 = (0, h/2);
+z7 = (5w/4, h/3); %z7 = (w, h/2);
+z5 = (w/2, h); %z5 = (w/2, h);
+z4 =.5[z3,z5]; %z4 =.5[z3,z5];
+z6 =.5[z5,z7]; %z6 =.5[z5,z7];
+draw z1--z6;
+draw z2--z4;
+draw z3--z5--z7;
+endchar;
+
+beginchar("G",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/3, 3h/4);
+z3 = (5w/6, 3h/10);
+z4 = (w, h);
+z5 = (4w/3, 7h/12);
+draw z1..z2..z4;
+draw z2{down}..{right}z3;
+draw z4{down}..z5;
+endchar;
+
+beginchar("d",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (4w/3, h);
+z3 = (-w/3, h);
+z4 = (4w/3, 0);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("D",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/3, h/4);
+z3 = (0, h/2);
+z4 = (w/3, 3h/4);
+z5 = (0, h);
+z6 = (w/2, -h/20);
+z7 = (w, h/4);
+z8 = (2w/3, h/2);
+z9 = (w, 3h/4);
+z10 = (w/2, 20h/19);
+draw z1--z2--z3--z4--z5;
+draw z6--z7--z8--z9--z10;
+endchar;
+
+beginchar("U",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1..z2;
+draw z2..z3;
+endchar;
+
+beginchar("O",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1{up}..{right}z2;
+draw z2{left}..{up}z3;
+endchar;
+
+beginchar("o",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, 19h/20);
+z3 = (w, h/2);
+z4 = (w, h);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("Z",pw#,runeh#,0);
+z1 = (-w/7, 0);
+z2 = (-w/7, h/2);
+z3 = (8w/7, h/2);
+z4 = (8w/7, h);
+z5 = (w/2, 0);
+z6 = (w/2, h);
+draw z1--z2--z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("t",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (w, 7h/10);
+z4 = (8w/7, 0);
+z5 = (0, h/2);
+z6 = (3w/4, h/4);
+draw z1--z2;
+draw z5--z3;
+draw z3..z6..z4;
+endchar;
+
+
+beginchar("Y",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (9w/10, h/2);
+draw z1--z2;
+draw z1..z3..z2;
+endchar;
+
+beginchar("y",pw#,runeh#,0);
+z1 = (w/2, h);
+z2 = (-w/6, 6h/7);
+z3 = (w/2, h/2);
+z4 = (7w/6, 6h/7);
+z5 = (9w/16, h/4);
+z6 = (30w/29, 0);
+z7 = (w, 12h/21);
+draw z1..z2..z3..z4..z1;
+draw z7..z5..z6;
+endchar;
+
+
+beginchar("l",pw#,runeh#,0);
+z1 = (0, h/5);
+z2 = (w/2, 0);
+z3 = (w/2, h);
+draw z1--z2--z3;
+endchar;
+
+beginchar("L",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+draw z1--z4--z2;
+draw z4--z3;
+endchar;
+
+
+beginchar("M",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h);
+z7 = (7w/4, h/2);
+z3 = (w, 3h/4);
+z4 = (w, h/4);
+z5 = (w/2, -h/9);
+z6 = (w/2, 10h/9);
+z8 = (w/6, 5h/8);
+z9 = (w/6, 3h/8);
+draw z1..z9..z3;
+draw z2..z8..z4;
+draw z6..z3..z7;
+draw z5..z4..z7;
+endchar;
+
+
+beginchar("N",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h/2);
+z3 = (w/2, 3h/8);
+z4 = (w/2, 0);
+z5 = (w/2, h);
+z6 = (w/2, 5h/8);
+z7 = (4w/3, h/2);
+z8 = (4w/3, h);
+draw z1--z2--z3;
+draw z4--z5;
+draw z6--z7--z8;
+endchar;
+
+beginchar("n",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (4w/3, h/2);
+z3 = (0, h);
+draw z1..z2..z3;
+endchar;
+
+beginchar("s",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+draw z1--z2;
+endchar;
+
+beginchar("S",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/2, h/2);
+z3 = (0, h);
+z4 = (6w/5, h);
+z5 = (5w/6, h/2);
+draw z1..{left}z2{left}..{right}z3;
+draw z5{left}..{right}z4;
+endchar;
+
+beginchar("P",pw#,runeh#,0);
+z1 = (3w/4, 0);
+z2 = (3w/4, h);
+z3 = (0, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("C",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (w/2, 2h/5);
+z3 = (w/2, h);
+z4 = (4w/3, 0);
+draw z1--z2--z3;
+draw z2--z4;
+endchar;
+
+beginchar("k",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/4, h/4);
+z3 = (5w/4, h/4);
+z4 = (w/2, h);
+draw z1--z2;
+draw z1--z4;
+draw z1--z3;
+endchar;
+
+beginchar("K",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (-w/4, 3h/8);
+z4 = (-w/4, 7h/8);
+z5 = (3w/4, 7h/8);
+z6 = (3w/4, 3h/8);
+z7 = (5w/4, h/2);
+z8 = (5w/4, 0);
+draw z1--z2;
+draw z4--z5;
+draw z3--z6;
+draw z5{down}..{right}z7;
+draw z6{down}..{right}z8;
+endchar;
+
+beginchar("r",pw#,runeh#,0);
+z1 = (w/2, 0); %z1 = (w/2, 0);
+z2 = (w/2, 5h/8); %z2 = (w/2, 3h/4);
+z3 = (0, h); %z3 = (w/8, h);
+z4 = (-w/2, 3h/4); %z4 = (-w/4, 3h/4);
+z5 = (w, h); %z5 = (7w/8, h);
+z6 = (3w/2, 3h/4); %z6 = (5w/4, 3h/4);
+draw z1--z2;
+draw z2--z3--z4;
+draw z2--z5--z6;
+endchar;
+
+beginchar("R",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (w, h);
+z3 = .5[z1,z2];
+z4 = (-w/8, 3h/8);
+z5 = (-w/2, h);
+z6 = (w/8, 3h/4);
+draw z1--z2;
+draw z3--z4;
+draw z4..z6..z5;
+%draw z4{up}..{left}z5;
+endchar;
+
+beginchar("v",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+z5 = (w/5, 5h/12);
+z6 = (4w/5, 5h/12);
+draw z1--z4--z2;
+draw z4--z3;
+draw z5--z6;
+endchar;
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, h/8);
+z2 = (w/2, 7h/8);
+pickup pencircle scaled 10;
+drawdot z1;
+drawdot z2;
+endchar;
+
+beginchar("m",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (w/2, 5h/8);
+z4 = (5w/4, h);
+z5 = (5w/4, 0);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("c",pw#,runeh#,0);
+z1 = (w/4, 0);
+z2 = (3w/4, h/4);
+z3 = (w/4, h/2);
+z4 = (3w/4, 3h/4);
+z5 = (w/4, h);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("Q",pw#,runeh#,0);
+z1 = (w/4, h/4);
+z2 = (3w/4, h/4);
+z3 = (3w/4, 3h/4);
+z4 = (w/4, 3h/4);
+z5 = (w/2, h/2);
+draw z1..z2..z3..z4..cycle;
+pickup pencircle scaled 10;
+drawdot z5;
+endchar;
+
+beginchar("z",pw#,runeh#,0);
+z1 = (19w/20, 0);
+z2 = (19w/20, h);
+z3 = .3[z1, z2];
+z4 = (w/20, 7h/8);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("V",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/4);
+z3 = (0, 3h/4);
+z4 = (0, h/4);
+z5 = (w, 3h/4);
+z6 = (0, h);
+draw z1..z2..z3;
+draw z4..z5..z6;
+endchar;
+
+beginchar("e",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+z3 = (w, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("a",pw#,runeh#,0);
+z1 = (0, h/12);
+z2 = (w/6, h/4);
+z3 = (w/4, 2h/3);
+z4 = (w, h/2);
+z5 = (w, 0);
+z6 = (w, h);
+draw z1..z2..z3;
+draw z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("w",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w, 0);
+z3 = (w, h);
+draw z1--z2--z3--z1;
+endchar;
+
+beginchar("g",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w/3, 3h/4);
+z3 = (0, h);
+z4 = (2w/3, 3h/4);
+z5 = (w, h/2);
+z6 = (w, h);
+z7 = (w/2, 0);
+z8 = (w/2, 5h/12);
+draw z1..z2..z3;
+draw z5..z4..z6;
+pickup pencircle scaled 9;
+draw z7--z8;
+endchar;
+
+beginchar("i",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (7w/8, 7h/8);
+z3 = (0, h);
+z4 = (0, 5h/8);
+z5 = (w, h/2);
+draw z1--z2;
+draw z2--z3;
+draw z4--z5;
+endchar;
+
+beginchar("b",pw#,runeh#,0);
+z1 = (w/5, 5h/12);
+z2 = (w/4, h/12);
+z3 = (3w/4, h/6);
+z4 = (w/8, h);
+draw z1..z2..z3..z4;
+endchar;
+
+beginchar("I",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/8, h);
+z3 = (9w/8, h);
+z4 = (w/2, h/2);
+z5 = (w/2, h);
+draw z4--z2;
+draw z4--z3;
+draw z4--z5;
+pickup pencircle scaled 7;
+draw z1--z4;
+endchar;
+
+
+end
+
+
+
+
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+drawdot z1;
+drawdot z2;
+endchar;
+
+
+
+
+
diff --git a/fonts/orkhun/orhant25.mf b/fonts/orkhun/orhant25.mf
new file mode 100644
index 0000000000..90fc9796ca
--- /dev/null
+++ b/fonts/orkhun/orhant25.mf
@@ -0,0 +1,499 @@
+mode_def testing=
+ pixels_per_inch:=300*4;
+ blacker:=.1;
+ o_correction:=1;
+ fillin:=.01;
+ proofing:=2;
+ fontmaking:=0;
+ tracingtitles:=1;
+enddef;
+if unknown mode:
+mode:=testing; fi
+mode_setup;
+turningcheck := 0;
+
+if mode=testing: screenstrokes; fi
+
+% parameters that control what a wedge looks like.
+font_identifier := "bard";
+font_size 25pt#;
+u# := 2.5pt#;
+pw# := 2u#;
+runew# := 2pw#;
+runeh# := 4pw#;
+letter_fit# := 2pw#/3;
+font_normal_space := 2runew#;
+font_normal_stretch := 2runew#/3;
+font_normal_shrink := 4runew#/3;
+
+pen_thick# := u#/3;
+
+define_pixels(pw, runew, runeh, pen_thick, letter_fit)
+
+def penoct = makepen((.866,.5)--(.5,.866)--(-.5,.866)--(-.866,.5)
+ --(-.866,-.5)--(-.5,-.866)--(.5,-.866)--(.866,-.5)--cycle)
+enddef;
+
+def runepen = pickup penoct scaled pen_thick rotated 45; enddef;
+
+def adjust_fit(expr left_adj, right_adj) =
+ l := -hround(left_adj*hppp)-letter_fit;
+ interim xoffset := -l;
+ charwd := charwd+2letter_fit# + left_adj + right_adj;
+ r := l+hround(charwd*hppp);
+ w := r-hround(right_adj*hppp) - letter_fit;
+enddef;
+
+extra_beginchar := extra_beginchar & "runepen;adjust_fit(0,0);";
+
+def makebox(text r) =
+ r((-letter_fit,0), (w+letter_fit,0));
+ r((-letter_fit,h), (w+letter_fit,h));
+ r((-letter_fit,0), (-letter_fit,h));
+ r((w+letter_fit,0), (w+letter_fit,h));
+ r((0,0), (0,h));
+ r((w,0), (w,h));
+ if charic<>0:
+ r((w+charic*hppp,h.o_),(w+charic*hppp,.5h.o_));
+ fi
+enddef;
+
+% ============================================
+% Number 0, 19.07.93 jhl
+% ============================================
+beginchar("T",pw#,runeh#,0);
+z3 = (w/2, 0); %z3 = (w, 0);
+z1 = (w/7, h/4); %z1 = (0, h/2);
+z2 = (w/2, h/2); %z2 = (w, h);
+z4 = (6w/7, h/4); %z4 = (2w, h/2);
+z6 = (0, 7h/10); %z6 = (-w/5, 4h/5);
+z7 = (w, 7h/10); %z7 = (11w/5, 4h/5);
+z5 = (w/2, h); %z5 = (w, 11h/6);
+draw z1--z2--z4--z3--z1;
+draw z2--z5--z6;
+draw z5--z7;
+endchar;
+
+beginchar("A",pw#,runeh#,0);
+z1 = (0, h/5); %z1 = (0, h/3);
+z2 = (w/2, 0); %z2 = (w, 0);
+z3 = (w/2, h); %z3 = (w, 11h/6);
+z4 = (w, 4h/5); %z4 = (2w, 3h/2);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("B",pw#,runeh#,0);
+z1 = (0, 0); %z1 = (w/4, 0);
+z2 = (w, 0); %z2 = (3w/4, 0);
+z3 = (-w/4, h/3); %z3 = (0, h/2);
+z7 = (5w/4, h/3); %z7 = (w, h/2);
+z5 = (w/2, h); %z5 = (w/2, h);
+z4 =.5[z3,z5]; %z4 =.5[z3,z5];
+z6 =.5[z5,z7]; %z6 =.5[z5,z7];
+draw z1--z6;
+draw z2--z4;
+draw z3--z5--z7;
+endchar;
+
+beginchar("G",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/3, 3h/4);
+z3 = (5w/6, 3h/10);
+z4 = (w, h);
+z5 = (4w/3, 7h/12);
+draw z1..z2..z4;
+draw z2{down}..{right}z3;
+draw z4{down}..z5;
+endchar;
+
+beginchar("d",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (4w/3, h);
+z3 = (-w/3, h);
+z4 = (4w/3, 0);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("D",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/3, h/4);
+z3 = (0, h/2);
+z4 = (w/3, 3h/4);
+z5 = (0, h);
+z6 = (w/2, -h/20);
+z7 = (w, h/4);
+z8 = (2w/3, h/2);
+z9 = (w, 3h/4);
+z10 = (w/2, 20h/19);
+draw z1--z2--z3--z4--z5;
+draw z6--z7--z8--z9--z10;
+endchar;
+
+beginchar("U",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1..z2;
+draw z2..z3;
+endchar;
+
+beginchar("O",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/2);
+z3 = (0, h);
+draw z1{up}..{right}z2;
+draw z2{left}..{up}z3;
+endchar;
+
+beginchar("o",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, 19h/20);
+z3 = (w, h/2);
+z4 = (w, h);
+draw z1--z2--z3--z4;
+endchar;
+
+beginchar("Z",pw#,runeh#,0);
+z1 = (-w/7, 0);
+z2 = (-w/7, h/2);
+z3 = (8w/7, h/2);
+z4 = (8w/7, h);
+z5 = (w/2, 0);
+z6 = (w/2, h);
+draw z1--z2--z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("t",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (w, 7h/10);
+z4 = (8w/7, 0);
+z5 = (0, h/2);
+z6 = (3w/4, h/4);
+draw z1--z2;
+draw z5--z3;
+draw z3..z6..z4;
+endchar;
+
+
+beginchar("Y",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (0, h);
+z3 = (9w/10, h/2);
+draw z1--z2;
+draw z1..z3..z2;
+endchar;
+
+beginchar("y",pw#,runeh#,0);
+z1 = (w/2, h);
+z2 = (-w/6, 6h/7);
+z3 = (w/2, h/2);
+z4 = (7w/6, 6h/7);
+z5 = (9w/16, h/4);
+z6 = (30w/29, 0);
+z7 = (w, 12h/21);
+draw z1..z2..z3..z4..z1;
+draw z7..z5..z6;
+endchar;
+
+
+beginchar("l",pw#,runeh#,0);
+z1 = (0, h/5);
+z2 = (w/2, 0);
+z3 = (w/2, h);
+draw z1--z2--z3;
+endchar;
+
+beginchar("L",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+draw z1--z4--z2;
+draw z4--z3;
+endchar;
+
+
+beginchar("M",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h);
+z7 = (7w/4, h/2);
+z3 = (w, 3h/4);
+z4 = (w, h/4);
+z5 = (w/2, -h/9);
+z6 = (w/2, 10h/9);
+z8 = (w/6, 5h/8);
+z9 = (w/6, 3h/8);
+draw z1..z9..z3;
+draw z2..z8..z4;
+draw z6..z3..z7;
+draw z5..z4..z7;
+endchar;
+
+
+beginchar("N",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (-w/3, h/2);
+z3 = (w/2, 3h/8);
+z4 = (w/2, 0);
+z5 = (w/2, h);
+z6 = (w/2, 5h/8);
+z7 = (4w/3, h/2);
+z8 = (4w/3, h);
+draw z1--z2--z3;
+draw z4--z5;
+draw z6--z7--z8;
+endchar;
+
+beginchar("n",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (4w/3, h/2);
+z3 = (0, h);
+draw z1..z2..z3;
+endchar;
+
+beginchar("s",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+draw z1--z2;
+endchar;
+
+beginchar("S",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w/2, h/2);
+z3 = (0, h);
+z4 = (6w/5, h);
+z5 = (5w/6, h/2);
+draw z1..{left}z2{left}..{right}z3;
+draw z5{left}..{right}z4;
+endchar;
+
+beginchar("P",pw#,runeh#,0);
+z1 = (3w/4, 0);
+z2 = (3w/4, h);
+z3 = (0, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("C",pw#,runeh#,0);
+z1 = (-w/3, 0);
+z2 = (w/2, 2h/5);
+z3 = (w/2, h);
+z4 = (4w/3, 0);
+draw z1--z2--z3;
+draw z2--z4;
+endchar;
+
+beginchar("k",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/4, h/4);
+z3 = (5w/4, h/4);
+z4 = (w/2, h);
+draw z1--z2;
+draw z1--z4;
+draw z1--z3;
+endchar;
+
+beginchar("K",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (-w/4, 3h/8);
+z4 = (-w/4, 7h/8);
+z5 = (3w/4, 7h/8);
+z6 = (3w/4, 3h/8);
+z7 = (5w/4, h/2);
+z8 = (5w/4, 0);
+draw z1--z2;
+draw z4--z5;
+draw z3--z6;
+draw z5{down}..{right}z7;
+draw z6{down}..{right}z8;
+endchar;
+
+beginchar("r",pw#,runeh#,0);
+z1 = (w/2, 0); %z1 = (w/2, 0);
+z2 = (w/2, 5h/8); %z2 = (w/2, 3h/4);
+z3 = (0, h); %z3 = (w/8, h);
+z4 = (-w/2, 3h/4); %z4 = (-w/4, 3h/4);
+z5 = (w, h); %z5 = (7w/8, h);
+z6 = (3w/2, 3h/4); %z6 = (5w/4, 3h/4);
+draw z1--z2;
+draw z2--z3--z4;
+draw z2--z5--z6;
+endchar;
+
+beginchar("R",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (w, h);
+z3 = .5[z1,z2];
+z4 = (-w/8, 3h/8);
+z5 = (-w/2, h);
+z6 = (w/8, 3h/4);
+draw z1--z2;
+draw z3--z4;
+draw z4..z6..z5;
+%draw z4{up}..{left}z5;
+endchar;
+
+beginchar("v",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/5, h);
+z3 = (6w/5, h);
+z4 = (w/2, h/2);
+z5 = (w/5, 5h/12);
+z6 = (4w/5, 5h/12);
+draw z1--z4--z2;
+draw z4--z3;
+draw z5--z6;
+endchar;
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, h/8);
+z2 = (w/2, 7h/8);
+pickup pencircle scaled 10;
+drawdot z1;
+drawdot z2;
+endchar;
+
+beginchar("m",pw#,runeh#,0);
+z1 = (-w/4, 0);
+z2 = (-w/4, h);
+z3 = (w/2, 5h/8);
+z4 = (5w/4, h);
+z5 = (5w/4, 0);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("c",pw#,runeh#,0);
+z1 = (w/4, 0);
+z2 = (3w/4, h/4);
+z3 = (w/4, h/2);
+z4 = (3w/4, 3h/4);
+z5 = (w/4, h);
+draw z1--z2--z3--z4--z5;
+endchar;
+
+beginchar("Q",pw#,runeh#,0);
+z1 = (w/4, h/4);
+z2 = (3w/4, h/4);
+z3 = (3w/4, 3h/4);
+z4 = (w/4, 3h/4);
+z5 = (w/2, h/2);
+draw z1..z2..z3..z4..cycle;
+pickup pencircle scaled 10;
+drawdot z5;
+endchar;
+
+beginchar("z",pw#,runeh#,0);
+z1 = (19w/20, 0);
+z2 = (19w/20, h);
+z3 = .3[z1, z2];
+z4 = (w/20, 7h/8);
+draw z1--z2;
+draw z3--z4;
+endchar;
+
+beginchar("V",pw#,runeh#,0);
+z1 = (0, 0);
+z2 = (w, h/4);
+z3 = (0, 3h/4);
+z4 = (0, h/4);
+z5 = (w, 3h/4);
+z6 = (0, h);
+draw z1..z2..z3;
+draw z4..z5..z6;
+endchar;
+
+beginchar("e",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+z3 = (w, 4h/5);
+draw z1--z2--z3;
+endchar;
+
+beginchar("a",pw#,runeh#,0);
+z1 = (0, h/12);
+z2 = (w/6, h/4);
+z3 = (w/4, 2h/3);
+z4 = (w, h/2);
+z5 = (w, 0);
+z6 = (w, h);
+draw z1..z2..z3;
+draw z3--z4;
+draw z5--z6;
+endchar;
+
+beginchar("w",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w, 0);
+z3 = (w, h);
+draw z1--z2--z3--z1;
+endchar;
+
+beginchar("g",pw#,runeh#,0);
+z1 = (0, h/2);
+z2 = (w/3, 3h/4);
+z3 = (0, h);
+z4 = (2w/3, 3h/4);
+z5 = (w, h/2);
+z6 = (w, h);
+z7 = (w/2, 0);
+z8 = (w/2, 5h/12);
+draw z1..z2..z3;
+draw z5..z4..z6;
+pickup pencircle scaled 9;
+draw z7--z8;
+endchar;
+
+beginchar("i",pw#,runeh#,0);
+z1 = (w, 0);
+z2 = (7w/8, 7h/8);
+z3 = (0, h);
+z4 = (0, 5h/8);
+z5 = (w, h/2);
+draw z1--z2;
+draw z2--z3;
+draw z4--z5;
+endchar;
+
+beginchar("b",pw#,runeh#,0);
+z1 = (w/5, 5h/12);
+z2 = (w/4, h/12);
+z3 = (3w/4, h/6);
+z4 = (w/8, h);
+draw z1..z2..z3..z4;
+endchar;
+
+beginchar("I",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (-w/8, h);
+z3 = (9w/8, h);
+z4 = (w/2, h/2);
+z5 = (w/2, h);
+draw z4--z2;
+draw z4--z3;
+draw z4--z5;
+pickup pencircle scaled 7;
+draw z1--z4;
+endchar;
+
+
+end
+
+
+
+
+
+beginchar(":",pw#,runeh#,0);
+z1 = (w/2, 0);
+z2 = (w/2, h);
+drawdot z1;
+drawdot z2;
+endchar;
+
+
+
+
+
diff --git a/fonts/orkhun/rakhimov.pdf b/fonts/orkhun/rakhimov.pdf
new file mode 100644
index 0000000000..242b925572
--- /dev/null
+++ b/fonts/orkhun/rakhimov.pdf
Binary files differ
diff --git a/fonts/orkhun/rakhimov.tex b/fonts/orkhun/rakhimov.tex
new file mode 100644
index 0000000000..9504fa9cf1
--- /dev/null
+++ b/fonts/orkhun/rakhimov.tex
@@ -0,0 +1,427 @@
+\documentclass[11pt]{article}
+
+\makeatletter
+\newlength{\myFootnoteWidth}
+\newlength{\myFootnoteLabel}
+\setlength{\myFootnoteLabel}{0.6em}% <-- can be changed to any valid value
+\renewcommand{\@makefntext}[1]{%
+ \setlength{\myFootnoteWidth}{\columnwidth}%
+ \addtolength{\myFootnoteWidth}{-\myFootnoteLabel}%
+ \noindent\makebox[\myFootnoteLabel][r]{\@makefnmark \ }%
+ \parbox[t]{\myFootnoteWidth}{#1}%
+}
+\makeatother
+
+\makeatletter
+\renewcommand\footnoterule{%
+ \vspace{1.5em}% <-- one line space between text and footnoterule
+ \kern-3\p@\hrule\@width.4\columnwidth%
+ \kern2.6\p@}
+\makeatother
+
+
+\usepackage[dvips]{graphicx}
+\usepackage{amssymb}
+
+\usepackage[usenames]{color}
+\usepackage{colortbl}
+
+\usepackage{verbatim}
+\usepackage{multicol}
+
+\def\4tex{\raisebox{-0.7mm}{\sf 4}$\!$\TeX{}}
+\def\latex{(L\hspace*{-1.35mm}\raisebox{1.0mm}{\footnotesize\sc a})\TeX{}}
+
+
+\textwidth 6.2in
+\textheight 8.0in
+\oddsidemargin 0mm
+\evensidemargin 0mm
+
+\font\mf=logo10
+
+\font\mfsl=logosl10
+\hyphenchar\mf=-1
+\hyphenchar\mfsl=-1
+% A way to get a hyphen, courtesy of Karl Berry.
+\newcommand{\MF}{{\mf META}\-{\mf FONT\/}}
+\newcommand{\MFSL}{{\mfsl META}\-{\mfsl FONT\/}}
+
+\newcommand{\MP}{{\mf META}\-{\mf POST\/}}
+\newcommand{\MPSL}{{\mfsl META}\-{\mfsl POST\/}}
+
+\newfont{\acayipfont}{cmff10}
+
+\newfont{\wasytwenty}{wasy10 at 20pt}
+\newcommand{\bigtelephone}{\hbox{\wasytwenty\symbol{7}}}
+
+\newfont{\buyukacafont}{cmff10 at 20pt}
+\newfont{\buyukfont}{cmff10 scaled 2500}
+\newfont{\kucukfont}{cmff10 scaled 700}
+\newfont{\initial}{cmr10 at 48pt}
+\usepackage{wrapfig}
+
+\usepackage{makeidx}
+\makeindex
+
+
+\begin{document}
+
+\thispagestyle{empty}
+
+\font\letteror=orhant
+\font\letteroor=orhant14
+\font\letterooor=orhant16
+\font\letteroooor=orhant20
+\font\letterooooor=orhant25
+%\font\letteroooooor=orhant11
+
+
+
+\newbox{\literaT}
+\savebox{\literaT}{\hbox{\initial T}}
+
+%{\bf \huge Old Turkic script or Orkhon-Yenisey script.}\\
+\begin{center}
+{\bf \huge The Old Turkic Script}\\[6mm]
+
+{\bf Abdugafur A. Rakhimov}\\[10mm]
+
+\end{center}
+
+\noindent {\sf \large In brief about history of Script.}\\[- 2mm]
+
+.\vspace*{-0.25cm}
+\begin{wrapfigure}{l}{0.75\wd\literaT}
+\vbox to 0.4\ht\literaT{%
+ \vss \usebox{\literaT}%
+ \vspace*{-0.2\ht\literaT}%
+}
+\end{wrapfigure}
+he ORHONO-YENISEI INSCRIPTIONS, the most ancient writings, monuments of the Turkic people.
+In 1696-1722 years these inscriptions are opened by Russian scientists S.Remezov, F.Stralenberg,
+D.Messershmid in top of the current of the Yenisei. In 1889, on the rivers Orkhons (Mongolia)
+by Í.M.Jadrintsev is opened. In 1893, these inscriptions are decoded by the Danish linguist
+V.Tomsen. And for the first time are read by Russian linguist V.V.Radlov (1894).
+The Orhono-yenisei inscriptions concern by 7-11 centuries. Seven groups the Orhono-Yenisei
+inscriptions are known: Baikal, Yenisei, Mongolian, Altai, East Turkistan, Central Asian,
+and East European. Accordingly they belong to the breeding the union of the Kurgan,
+the empire of the Kirghiz, the empire of the East Turkic, the empire of the West Turkic,
+the empire of the Uigur (in Mongolia), the state of the Uigur (in East Turkistan), Khazars
+(Chazars) and Pechenegs. On a genre accessory are allocated: historically-biographic
+stone-letters texts of Mongolia; lyrics of texts of Yenisei; legal documents,
+magic and religious texts (on a paper) from East Turkistan; memorable inscriptions on
+rocks, stones and structures; labels on household subjects. The inscriptions of Mongolia
+stating history 2nd East Turkic and the empire of the Uigur have the greatest historical value.
+\\[2mm]
+
+\noindent {\sf \large The Font Base.}\\[-1mm]
+
+It is known, that \latex{} use only the fonts which have specially been written by Donald Knut
+in the language of the \MFSL{} Program. Here, we also used \MFSL{} what to create the Old Turkic script
+(Gokturk script or Orkhon script or Orkhon-Yenisey script). This font can be used only freely.\\[-1mm]
+
+In the ZIP-file there are .gf, .pk, .tfm files which it is necessary to copy corresponding folders in your
+\latex{} program:\\[-2mm]
+
+\hspace{3.0cm} \verb!...\TEXMF\fonts\pk!
+
+\hspace{3.0cm} \verb!...\TEXMF\fonts\tfm!\\[-2mm]
+
+It is easy see, that these files make such sizes of fonts as 10pt, 11pt,
+14pt, 16pt, 20pt and 25pt. But, using the .mf file and setting the necessary values variable "u" (in the .mf file) you can create
+the necessary sizes of fonts (i.e. .gf, .pk, .tfm files you can to create, also, using .mf file).
+In this case, of course, you should compile your .mf file (with new parametre of "u") on the \MFSL{} Program.\\[-3mm]
+
+{\footnotesize
+\begin{verbatim}
+ ..\BIN\win32\mf \mode=ljfour; mode_setup; input orhun.mf
+ ..\BIN\win32\gftodvi orhun.600gf
+ ..\BIN\win32\gftopk orhun.600gf
+ ..\BIN\win32\dvips orhun.dvi
+\end{verbatim}
+}
+
+\vspace{0.3cm}
+
+\noindent Then, the necessary font to appear in expansions .gf, .pk, .tfm. Moreover, these files can be copied in
+the catalogue (directory) in which you work.\\[2mm]
+
+\noindent {\sf \large To use the Orkhon-Yenisey script in the text.}\\[-2mm]
+
+To write the text in old Turkic language you should use the \TeX{}-command: \verb!\font!.
+For example,
+
+\vspace{0.3cm}
+
+{\small
+\noindent
+\begin{minipage}{4.3in}
+\begin{verbatim}
+\font\letteror=orhun
+
+{\letteror ABGdDOUoZt}
+
+{\letteror TYylLMnNsS}
+
+{\letteror PCkKrRvmcQ}
+
+{\letteror zVeawgibI:}
+\end{verbatim}
+\end{minipage}
+\begin{minipage}{2.5in}
+\begin{tabular}{|l|}
+\hline\\
+{\letterooooor ABGdDOUoZt}\\[3mm]
+{\letterooooor TYylLMnNsS}\\[3mm]
+{\letterooooor PCkKrRvmcQ}\\[3mm]
+{\letterooooor zVeawgibI:}\\[3mm]
+\hline
+\end{tabular}
+\end{minipage}
+}
+
+\vspace{0.5cm}
+
+\noindent So the following historical text is written
+
+\vspace{0.5cm}
+
+\noindent {\bf The monument of the TONYUKUK } ({\small The second stone, northern a part})\\[0.3cm]
+
+\hfill {\letterooor VOTAGLeBMZoNB:rsretrkY:RSMngZa:ngasertLe}\\[-2mm]
+
+\hfill {\letterooor rsrMtrkYNB:RSMngZa:kk}\\[-2mm]
+
+\hfill {\letterooor AMynDOb:AMyDOb:AtNery:nDObresKrot:ngangPa}\\[-2mm]
+
+\hfill {\letterooor :etreCtrkYede:AMyesei:}\\[-2mm]
+
+\hfill {\letterooor ot:ngangPa:NCokQgZa:kkVOTAGLeB:ngasrtLe}\\[-2mm]
+
+\hfill {\letterooor ObekDeROY:nDObresKr}\\[-2mm]
+
+\hfill {\letterooor odGe:gnDObZgO:gnDObresKrot:nga:AGLeBKrot}\\[-2mm]
+
+\hfill {\letterooor RURlU}
+
+\vspace{0.5cm}
+
+\noindent To write the text in Orkhon script, certainly, we should knowd Old Turkic alphabet.
+In the following table this alphabet is given
+
+\vspace{0.75cm}
+
+\hspace*{-1.0cm}
+\begin{tabular}{ll|ll|ll}
+\hline
+{\scriptsize O-Y} & {\small sound} & {\scriptsize O-Y} & {\small sound} & {\scriptsize O-Y} & {\small sound}\\[1mm]
+\hline
+& & & \\[-3mm]
+{\letterooor A}&\verb!a!, \verb!e! &{\letterooor a}&\verb!k! ({\scriptsize with} {\small \verb!a!} ) & {\letterooor R} & \verb!r! {\scriptsize (with thick vowels)}\\[2mm]
+
+{\letterooor B}&\verb!b! {\scriptsize (with thin vowels)} &{\letterooor w}&\verb!k! ({\scriptsize with hard} {\small \verb!i!} ) & {\letterooor r} & \verb!r! {\scriptsize (with thin vowels)}\\[2mm]
+
+{\letterooor b}&\verb!b! {\scriptsize (with thick vowels)} &{\letterooor l}&\verb!L! {\scriptsize (with thick vowels)} & {\letterooor S} & \verb!s! {\scriptsize (with thick vowels)}\\[2mm]
+
+{\letterooor C}&\verb!-ch (j)! {\scriptsize (in the end a word)} &{\letterooor L}&\verb!L! {\scriptsize (with thin vowels)} & {\letterooor s} & \verb!s! {\scriptsize (with thin vowels)}\\[2mm]
+
+{\letterooor I}&\verb!ich!,\verb! ic! &{\letterooor m}&\verb!-it! {\scriptsize (in the end a word)} & {\letterooor v} & \verb!-sh! {\scriptsize (in the end a word)}\\[2mm]
+
+{\letterooor D}&\verb!d! {\scriptsize (with thick vowels)} &{\letterooor M}&\verb!-m! {\scriptsize (in the end a word)} & {\letterooor T} & \verb!t! {\scriptsize (with thick vowels)}\\[2mm]
+
+{\letterooor d}&\verb!d! {\scriptsize (with thin vowels)} &{\letterooor n}&\verb!n! {\scriptsize (with thick vowels)} & {\letterooor t} & \verb!t! {\scriptsize (with thin vowels)}\\[2mm]
+
+{\letterooor G}&\verb!g! {\scriptsize (with thin vowels)} &{\letterooor N}&\verb!n! {\scriptsize (with thin vowels)} & {\letterooor O} & \verb!o!, \verb!u!\\[2mm]
+
+{\letterooor g}&\verb!g! {\scriptsize (with thick vowels)} &{\letterooor z}&\verb!-ng! {\scriptsize (in the end a word)} & {\letterooor U} & \verb!o!, \verb!u!\\[2mm]
+
+{\letterooor e}& i, \ {\scriptsize the closed} {\small \verb!e! } &{\letterooor V}&\verb!-ny! {\scriptsize (in the end a word)} & {\letterooor o} & \verb!o'!, {\scriptsize the soft} {\small \verb!u!} \\[2mm]
+
+{\letterooor i}&\verb!k! ({\small \verb!e!,} {\scriptsize with \verb!i!} ) &{\letterooor c}&\verb!-nch(j)! {\scriptsize (in the end a word)} & {\letterooor Y} & \verb!y! {\scriptsize (with thick vowels)}\\[2mm]
+
+{\letterooor K}&\verb!k! (\verb!o'!, {\scriptsize with the soft} {\small \verb!u!} ) &{\letterooor Q}&\verb!-nt(d)! {\scriptsize (in the end a word)} & {\letterooor y} & \verb!y! {\scriptsize (with thin vowels)}\\[2mm]
+
+{\letterooor k}&\verb!k! ({\scriptsize with} {\small \verb!o!, \verb!u! } ) &{\letterooor P}&\verb!-p! {\scriptsize (in the end a word)} & {\letterooor Z} & \verb!-z! {\scriptsize (in the end a word)}\\[2mm]
+\hline
+\end{tabular}
+
+\vspace{1.0cm}
+
+\noindent In the keyboard the Orkhon script are typed as follows
+
+\vspace{0.45cm}
+
+{
+%\small
+\scriptsize
+
+\vspace*{0.5cm}
+
+\hspace*{-2.3cm}
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+Q&{\letteror Q}\\[2mm]
+q&\phantom{{\letteror w} }
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+W&\phantom{{\letteror w} }\\[2mm]
+w&{\letteror w}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+E&\phantom{{\letteror w} }\\[2mm]
+e&{\letteror e}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+R&{\letteror R}\\[2mm]
+r&{\letteror r}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+T&{\letteror T}\\[2mm]
+t&{\letteror t}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+Y&{\letteror Y}\\[2mm]
+y&{\letteror y}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+U&{\letteror U}\\[2mm]
+u&\phantom{{\letteror w} }
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+I&{\letteror I}\\[2mm]
+i&{\letteror i}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+O&{\letteror O}\\[2mm]
+o&{\letteror o}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+P&{\letteror P}\\[2mm]
+p&\phantom{{\letteror w} }
+\end{tabular} }
+
+\vspace*{0.2cm}
+
+\hspace*{-1.0cm}
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+A&{\letteror A}\\[2mm]
+a&{\letteror a}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+S&{\letteror S}\\[2mm]
+s&{\letteror s}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+D&{\letteror D}\\[2mm]
+d&{\letteror d}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+F&\phantom{{\letteror K}}\\[2mm]
+f&\phantom{{\letteror K}}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+G&{\letteror G}\\[2mm]
+g&{\letteror g}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+H&\phantom{{\letteror K}}\\[2mm]
+h&\phantom{{\letteror K}}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+J&\phantom{{\letteror K}}\\[2mm]
+j&\phantom{{\letteror K}}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+K&{\letteror K}\\[2mm]
+k&{\letteror k}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+L&{\letteror L}\\[2mm]
+l&{\letteror l}
+\end{tabular} }
+
+\vspace*{0.25cm}
+
+\hspace*{-0.25cm}
+\hspace*{0.75cm} \fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+Z&{\letteror Z}\\[2mm]
+z&{\letteror z}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+X&\phantom{{\letteror K}}\\[2mm]
+x&\phantom{{\letteror K}}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+C&{\letteror C}\\[2mm]
+c&{\letteror c}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+V&{\letteror V}\\[2mm]
+v&{\letteror v}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+B&{\letteror B}\\[2mm]
+b&{\letteror b}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+N&{\letteror N}\\[2mm]
+n&{\letteror n}
+\end{tabular} }
+\fcolorbox[rgb]{.1,.1,.1}{.9,.9,.9}{
+\begin{tabular}{lr}
+M&{\letteror M}\\[2mm]
+m&{\letteror m}
+\end{tabular} }
+
+}
+
+%\vspace*{0.5cm}
+
+\newpage
+
+\noindent {\sf \large The conclusion.}\\[-3mm]
+
+\noindent Further we plan to write a orkhun-package which will allow to work more conveniently with these fonts and will expand possibilities use of fonts.
+On all questions and wishes, we ask you to address to the address written more low. We will be very glad to have your valuable remarks and wishes.\\[1mm]
+
+\noindent {\sf \large Acknowledgements.}\\[-3mm]
+
+\noindent I would like to thank the members of the Mathematical Department of the Karadeniz Technical University, for hospitality while this work was being done.
+In particular I am grateful to my friend to professor {\bf Vam\i k Kadimo\u glu} for helpful conversations.\\[-1mm]
+
+
+
+
+\medskip \smallskip Prof.Dr. {\bf Abdugafur Rakhimov} \newline
+The Tashkent institute of railways and engineering. Tashkent, Uzbekistan\newline
+The Karadeniz Technical University, Trabzon, Turkey\newline
+E-mail: rakhimov@ktu.edu.tr ; \ rakhimov2002@yahoo.com ; \ gafur\_rakhimov@yahoo.com
+
+
+
+\end{document}