summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/fonts/archaic
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-09-08 00:00:54 +0000
committerKarl Berry <karl@freefriends.org>2006-09-08 00:00:54 +0000
commit99bebf5ca1a722256a732d6cd630b1a2165b85d7 (patch)
tree24759c8e2c931963a38badf1b0d1e38276bdba21 /Master/texmf-dist/source/fonts/archaic
parent5c6d8279370b75ec409c087237a798f1fe547cf1 (diff)
archaic update for sarabian, archaicprw.map (10feb06)
git-svn-id: svn://tug.org/texlive/trunk@2101 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/fonts/archaic')
-rw-r--r--Master/texmf-dist/source/fonts/archaic/phoenician.dtx153
-rw-r--r--Master/texmf-dist/source/fonts/archaic/phoenician.ins4
-rw-r--r--Master/texmf-dist/source/fonts/archaic/protosem.dtx22
-rw-r--r--Master/texmf-dist/source/fonts/archaic/protosem.ins9
-rw-r--r--Master/texmf-dist/source/fonts/archaic/sarabian.dtx1046
-rw-r--r--Master/texmf-dist/source/fonts/archaic/sarabian.ins90
6 files changed, 1240 insertions, 84 deletions
diff --git a/Master/texmf-dist/source/fonts/archaic/phoenician.dtx b/Master/texmf-dist/source/fonts/archaic/phoenician.dtx
index a7780a1400f..23435aeb82f 100644
--- a/Master/texmf-dist/source/fonts/archaic/phoenician.dtx
+++ b/Master/texmf-dist/source/fonts/archaic/phoenician.dtx
@@ -3,7 +3,7 @@
% phoenician.dtx
%
% Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
-% Copyright 1999--2005 Peter R. Wilson
+% Copyright 1999--2006 Peter R. Wilson
%
% This work may be distributed and/or modified under the
% conditions of the Latex Project Public License, either
@@ -101,10 +101,12 @@
% \changes{v1.0}{1999/03/14}{First public release}
% \changes{v2.0}{2000/10/01}{Major changes to practically everything}
% \changes{v2.1}{2005/04/04}{Minor circumstances and Type1}
+% \changes{v2.2}{2006/02/05}{Changes to two characters plus some fixes}
%
% \def\fileversion{v1.0} \def\filedate{1999/03/14}
% \def\fileversion{v2.0} \def\filedate{2000/10/01}
% \def\fileversion{v2.1} \def\filedate{2005/04/04}
+% \def\fileversion{v2.2} \def\filedate{2006/02/05}
% \newcommand*{\Lpack}[1]{\textsf {#1}} ^^A typeset a package
% \newcommand*{\Lopt}[1]{\textsf {#1}} ^^A typeset an option
% \newcommand*{\file}[1]{\texttt {#1}} ^^A typeset a file
@@ -415,7 +417,7 @@
% Specify the font size.
% \begin{macrocode}
-font_identifier:="phoenician"; font_size 10pt#;
+font_identifier:="Archaic-Phoenician"; font_size 10pt#;
% \end{macrocode}
%
@@ -470,7 +472,7 @@ font_quad:=10pt#; % an em
%
% \begin{macrocode}
-font_coding_scheme:="Phoenician glyphs";
+font_coding_scheme:="Archaic-Phoenician";
mode_setup;
% \end{macrocode}
@@ -553,8 +555,7 @@ let cmchar=\;
% \begin{macro}{'}
% The Phoenician \textit{alpeh} (ox), which is like our A but tilted.
% \begin{macrocode}
-
-cmchar "Phoenician letter alpeh (')";
+cmchar "Phoenician letter aleph (')";
beginglyph("'",0.6);
x3=rightloc; y3=0.5h; % apex
x1=0.1[leftloc, rightloc]; y1=0.1h; % bottom leg end
@@ -573,10 +574,9 @@ endchar;
% \end{macro}
%
% \begin{macro}{a}
-% The Phoenician \textit{alpeh} (ox), which is like our A but tilted.
+% The Phoenician \textit{aleph} (ox), which is like our A but tilted.
% \begin{macrocode}
-
-cmchar "Phoenician letter alpeh (a)";
+cmchar "Phoenician letter aleph (a)";
beginglyph("a",0.6);
x3=rightloc; y3=0.5h; % apex
x1=0.1[leftloc, rightloc]; y1=0.1h; % bottom leg end
@@ -597,7 +597,6 @@ endchar;
% \begin{macro}{b}
% The Phoenician \textit{beth} (house), somewhat like a modern P.
% \begin{macrocode}
-
cmchar "Phoenician letter beth (b)";
beginglyph("b",0.6);
x1=x3=0.2[leftloc, rightloc];
@@ -614,7 +613,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{g}
% The Phoenician \textit{gimel} (camel). Like a broken topped T.
% \begin{macrocode}
-
cmchar "Phoenician letter gimel (g)";
beginglyph("g", 0.6);
x3=leftloc; x1=x2=midloc; x4=rightloc;
@@ -630,7 +628,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{D}
% The Phoenician \textit{daleth} (door); it's like the Greek \textit{delta} ($\Delta$).
% \begin{macrocode}
-
cmchar "Phoenician letter daleth (d)";
beginglyph("d",0.6);
x1=leftloc; x2=rightloc; x3=midloc;
@@ -644,7 +641,6 @@ labels(1,2,3); endchar;
% \begin{macro}{h}
% The Phoenician \textit{he} (window?), like a droopy E.
% \begin{macrocode}
-
cmchar "Phoenician letter he (h)";
beginglyph("h",0.6);
numeric alpha;
@@ -665,7 +661,6 @@ labels(1,2,3,4,5,6,7); endchar;
% This is one of forms of the Phoenician \textit{vau} (nail).
% It's like a 2-armed E.
% \begin{macrocode}
-
cmchar "Phoenician letter vau (f)";
beginglyph("f",0.6);
numeric alpha;
@@ -685,7 +680,6 @@ labels(1,2,3,4,5,6,7); endchar;
% \begin{macro}{z}
% The Phoenician \textit{zayin} (dagger?). It looks like a modern seriffed I.
% \begin{macrocode}
-
cmchar "Phoenician letter zayin (z)";
beginglyph("z",0.2);
x1=x2=midloc;
@@ -704,10 +698,10 @@ labels(1,2); endchar;
%
%
% \begin{macro}{H}
-% The Phoenician \textit{cheth} (fence?). It looks like a rectangle with two horizontal
-% internal bars.
+% The Phoenician \textit{cheth} (fence?). It looks like a rectangle with
+% one horizontal internal bar.
+% \changes{v2.2}{2006/02/05}{Deleted one bar from (c)heth}
% \begin{macrocode}
-
cmchar "Phoenician letter cheth (H)";
beginglyph("H", 0.6);
numeric alpha;
@@ -716,11 +710,9 @@ x4=x6=leftloc;
x1=x3=rightloc;
bot y1=-o; top y6=h;
y3=y6-alpha*h; y4=y1+alpha*h;
-z2=0.35[z1,z3]; z5=0.35[z4,z6]; % ends of one bar
-z7=0.65[z1,z3]; z8=0.65[z4,z6]; % other bar
+z2=0.5[z1,z3]; z5=0.5[z4,z6];
draw z1--z3--z6--z4--cycle; % outer boundary
-draw z2--z5; draw z7--z8; % the bars
-
+draw z2--z5; % bar
labels(1,2,3,4,5,6); endchar;
% \end{macrocode}
@@ -729,7 +721,6 @@ labels(1,2,3,4,5,6); endchar;
% \begin{macro}{Thet}
% The Phoenician \textit{thet}. It's a precursor of the Greek \textit{theta} ($\Theta$).
% \begin{macrocode}
-
cmchar "Phoenician letter thet (T)";
beginglyph("T",1.0);
path p;
@@ -753,14 +744,18 @@ labels(1,2,3,4,11,12,13,14); endchar;
%
% \begin{macro}{y}
% The Phoenician \textit{yod} (hand).
+% A bit like a leaning F with a reversed leaning L.
+% \changes{v2.2}{2006/02/05}{Completely changed yod --- it was horribly wrong}
% \begin{macrocode}
-
cmchar "Phoenician letter yod (y)";
-beginglyph("y",0.2);
-x1=x2=midloc;
-bot y1=-o; top y2=h;
-draw z1--z2;
-labels(1,2); endchar;
+beginglyph("y",0.6);
+x1=rightloc; y1=0.7h; % end top arm
+x4=leftloc; y4=0.25h; % end bottom arm
+x2=1/3[x1,x4]; y2=h; % top
+x3=1/4[x4,x1]; y3=0; % bottom
+z5=5/8[z3,z2]; z5-z6 = 0.6(z2-z1); % middle arm
+draw z1--z2--z3--z4; draw z5--z6;
+labels (1,2,3,4,5,6); endchar;
% \end{macrocode}
% \end{macro}
@@ -769,7 +764,6 @@ labels(1,2); endchar;
% \begin{macro}{k}
% The Phoenician \textit{kaph} (palm of the hand).
% \begin{macrocode}
-
cmchar "Phoenician letter kaph (k)";
beginglyph("k",0.6);
numeric alpha;
@@ -787,13 +781,11 @@ labels(1,2,3,4,5); endchar;
% \end{macro}
%
% \begin{macro}{l}
-% The Phoenician \textit{lamed} (ox goad).
+% The letter \textit{lamed} (ox goad) which is asymmetrical.
% \begin{macrocode}
-
-cmchar "Phoenician letter lamed (l)";
+cmchar "Phoenician lamed (l)";
beginglyph("l",0.4);
-x2=x3=leftloc;
-x1=rightloc;
+x1=leftloc; x2=x3=rightloc;
bot y2=-o;
y1=.3h;
y3=h;
@@ -828,7 +820,6 @@ labels(1,2,3,4,5,6); endchar;
% \begin{macro}{n}
% The Phoenician \textit{nun} (fish).
% \begin{macrocode}
-
cmchar "Phoenician letter nun (n)";
beginglyph("n",0.6);
x1=rightloc;
@@ -848,7 +839,6 @@ labels(1,2,3,4); endchar;
% The Phoenician \textit{samech} (post).
% It is a progenitor of the Greek \textit{xi} ($\Xi$).
% \begin{macrocode}
-
cmchar "Phoenician letter samekh (s)";
beginglyph("s", 0.6);
x1= x2 = midloc;
@@ -868,7 +858,6 @@ labels(1,2,3,4,5,6,7,8); endchar;
% \begin{macro}{o}
% The Phoenician \textit{ayin} (eye).
% \begin{macrocode}
-
cmchar "Phoenician letter ayin (o)";
beginglyph("o",1.0);
x1=leftloc; x3=rightloc;
@@ -884,7 +873,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{`}
% The Phoenician \textit{ayin} (eye).
% \begin{macrocode}
-
cmchar "Phoenician letter ayin (`)";
beginglyph("`",1.0);
x1=leftloc; x3=rightloc;
@@ -900,7 +888,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{p}
% The Phoenician \textit{pe} (mouth).
% \begin{macrocode}
-
cmchar "Phoenician letter pe (p)";
beginglyph("p", 0.4);
x1=rightloc; x2=x3=leftloc;
@@ -915,7 +902,6 @@ labels(1,2,3); endchar;
% \begin{macro}{x}
% The Phoenician \textit{tsade}.
% \begin{macrocode}
-
cmchar "Phoenician letter tsade (x)";
beginglyph("x", 0.6);
x1=x2=rightloc;
@@ -935,7 +921,6 @@ labels(1,2,3,4,5); endchar;
% \begin{macro}{q}
% The Phoenician \textit{qoph} (knot?).
% \begin{macrocode}
-
cmchar "Phoenician letter qoph (q)";
beginglyph("q",0.6);
numeric alpha;
@@ -957,7 +942,6 @@ labels(1,2,3,4,5); endchar;
% \begin{macro}{r}
% The Phoenician \textit{resh} (head). It looks a little like a P.
% \begin{macrocode}
-
cmchar "Phoenician letter resh(r)";
beginglyph("r", 0.4);
x1=x2=x3=leftloc; x4=rightloc;
@@ -973,7 +957,6 @@ labels(1,2,3,4); endchar;
% The Phoenician \textit{shin} (teeth). It's like a Greek \textit{sigma} ($\Sigma$)
% lying on its side.
% \begin{macrocode}
-
cmchar "Phoenician letter shin (S)";
beginglyph("S", 0.6);
z1=(leftloc,h); z5=(rightloc,h);
@@ -990,7 +973,6 @@ labels(1,2,3,4,5); endchar;
% \begin{macro}{t}
% The Phoenician \textit{tav} (mark).
% \begin{macrocode}
-
cmchar "Phoenician letter tav (t)";
beginglyph("t", 0.5);
x1=x2=midloc;
@@ -1001,14 +983,12 @@ draw z1--z2; % the stem
draw z3--z4; % the crossbar
labels(1,2,3,4); endchar;
-
% \end{macrocode}
% \end{macro}
%
% \begin{macro}{w}
% Another form of the Phoenician \textit{vau}.
% \begin{macrocode}
-
cmchar "Phoenician letter vau (w)";
beginglyph("w", 0.6);
x1=x2=midloc;
@@ -1017,10 +997,8 @@ bot y1=0; y2=0.6h;
y3=y4=h;
draw z1--z2; % the stem
draw z3--z2--z4; % the crossbar
-
labels(1,2,3,4); endchar;
-
% \end{macrocode}
% \end{macro}
%
@@ -1032,10 +1010,31 @@ labels(1,2,3,4); endchar;
% need not be coded.
%
%
+% \begin{macro}{A}
+% The Phoenician \textit{aleph} (ox), which is like our A but tilted.
+% \changes{v2.2}{2006/02/05}{Added the missing R-L aleph}
+% \begin{macrocode}
+cmchar "Phoenician letter R-L aleph (A)";
+beginglyph("A",0.6);
+x3=leftloc; y3=0.5h; % apex
+x1=0.1[rightloc,leftloc]; y1=0.1h; % end bottom leg
+z2=(rightloc,0.9h); % end top leg
+x7=0.7[rightloc,leftloc]; y7=0; % construction points
+x6=0.2[rightloc,leftloc]; y6=h;
+z4'= whatever[z1,z3] = whatever[z7,z6]; % bottom leg intersection
+z5'= whatever[z2,z3] = whatever[z7,z6]; % top leg intersection
+z4 = 1.2[z5', z4']; z5 = 1.1[z4', z5'];
+draw z1--z3--z2; % the legs
+draw z4--z5; % the bar
+labels(1,2,3,4,4',5,5',6,7);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
% \begin{macro}{B}
-% The letter B, which is asymmetrical.
+% The letter beth, which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L b (B)";
beginglyph("B",0.6);
x1=x3=0.2[rightloc, leftloc];
@@ -1052,7 +1051,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{G}
% The letter G which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L g (G)";
beginglyph("G", 0.6);
x3=rightloc; x1=x2=midloc; x4=leftloc;
@@ -1068,7 +1066,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{e}
% The letter he which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L he (e)";
beginglyph("e",0.6);
numeric alpha;
@@ -1087,7 +1084,6 @@ labels(1,2,3,4,5,6,7); endchar;
% \begin{macro}{F}
% The letter vau (f) which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L f-vau (F)";
beginglyph("F",0.6);
numeric alpha;
@@ -1106,8 +1102,8 @@ labels(1,2,3,4,5,6,7); endchar;
%
% \begin{macro}{E}
% The letter heth which is asymmetrical.
+% \changes{v2.2}{2006/02/05}{Deleted one bar from L-R heth}
% \begin{macrocode}
-
cmchar "Phoenician R-L heth (E)";
beginglyph("E", 0.6);
numeric alpha;
@@ -1115,20 +1111,38 @@ alpha:=0.1;
x1=x3=leftloc; x4=x6=rightloc;
bot y1=-o; top y6=h;
y3=y6-alpha*h; y4=y1+alpha*h;
-z2=0.35[z1,z3]; z5=0.35[z4,z6];
-z7=0.65[z1,z3]; z8=0.65[z4,z6];
+z2=0.5[z1,z3]; z5=0.5[z4,z6];
draw z1--z3--z6--z4--cycle; % outer boundary
-draw z2--z5; draw z7--z8; % bars
+draw z2--z5; % bar
labels(1,2,3,4,5,6,7,8); endchar;
% \end{macrocode}
% \end{macro}
%
%
+%
+% \begin{macro}{Y}
+% The Phoenician \textit{yod} (hand), which is asymetrical.
+% A bit like a leaning F with a reversed leaning L.
+% \changes{v2.2}{2006/02/05}{Added L-R yod}
+% \begin{macrocode}
+cmchar "Phoenician letter L-R yod (Y)";
+beginglyph("Y",0.6);
+x1=leftloc; y1=0.7h; % end top arm
+x4=rightloc; y4=0.25h; % end bottom arm
+x2=1/3[x1,x4]; y2=h; % top
+x3=1/4[x4,x1]; y3=0; % bottom
+z5=5/8[z3,z2]; z5-z6 = 0.6(z2-z1); % middle arm
+draw z1--z2--z3--z4; draw z5--z6;
+labels (1,2,3,4,5,6); endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+%
% \begin{macro}{K}
% The letter kaph which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L kaph (K)";
beginglyph("K",0.6);
numeric alpha;
@@ -1146,12 +1160,12 @@ labels(1,2,3,4,5); endchar;
% \end{macro}
%
% \begin{macro}{L}
-% The letter lamed which is asymmetrical.
+% The Phoenician \textit{lamed} (ox goad) which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L lamed (L)";
beginglyph("L",0.4);
-x1=leftloc; x2=x3=rightloc;
+x2=x3=leftloc;
+x1=rightloc;
bot y2=-o;
y1=.3h;
y3=h;
@@ -1165,7 +1179,6 @@ labels(1,2,3); endchar;
% \begin{macro}{M}
% The letter mem which is asymmetrical.
% \begin{macrocode}
-
cmchar"Phoenician R-L mem (M)";
beginglyph("M",1.0);
x1=leftloc;
@@ -1186,7 +1199,6 @@ labels(1,2,3,4,5,6); endchar;
% \begin{macro}{N}
% The letter nun which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L nun (N)";
beginglyph("N",0.6);
x1=leftloc;
@@ -1205,7 +1217,6 @@ labels(1,2,3,4); endchar;
% \begin{macro}{P}
% The letter pe which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L pe (P)";
beginglyph("P", 0.4);
x1=leftloc; x2=x3=rightloc;
@@ -1221,7 +1232,6 @@ labels(1,2,3); endchar;
% \begin{macro}{X}
% The Phoenician \textit{tsade} which is asymmetrical.
% \begin{macrocode}
-
cmchar "Phoenician R-L tsade (X)";
beginglyph("X", 0.6);
x1=x2=leftloc;
@@ -1292,10 +1302,12 @@ end
%
% Announce the name and version of the package, which requires
% \LaTeXe{}.
+% \changes{v1.2}{2006/02/05}{Added code for L-R yod}
% \begin{macrocode}
%<*usc>
\NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{phoenician}[2000/10/01 v1.1 package for Phoenician fonts]
+%%%\ProvidesPackage{phoenician}[2000/10/01 v1.1 package for Phoenician fonts]
+\ProvidesPackage{phoenician}[2006/02/05 v1.2 package for Phoenician fonts]
% \end{macrocode}
%
%
@@ -1316,8 +1328,10 @@ end
% The commands for the signs.
% \begin{macrocode}
-\chardef\Arq=`' \chardef\ARrq=`' \chardef\Aaleph=`a \chardef\ARaleph=`a
-\chardef\Aa=`a \chardef\ARa=`a
+%%%\chardef\Arq=`' \chardef\ARrq=`' \chardef\Aaleph=`a \chardef\ARaleph=`a
+%%%\chardef\Aa=`a \chardef\ARa=`a
+\chardef\Arq=`' \chardef\ARrq=`' \chardef\Aaleph=`a \chardef\ARaleph=`A
+\chardef\Aa=`a \chardef\ARa=`A
\chardef\Ab=`b \chardef\ARb=`B \chardef\Abeth=`b \chardef\ARbeth=`B
\chardef\Ag=`g \chardef\ARg=`G \chardef\Agimel=`g \chardef\ARgimel=`G
\chardef\Ad=`d \chardef\ARd=`d \chardef\Adaleth=`d \chardef\ARdaleth=`d
@@ -1326,7 +1340,8 @@ end
\chardef\Az=`z \chardef\ARz=`z \chardef\Azayin=`z \chardef\ARzayin=`z
\chardef\Ahd=`H \chardef\ARhd=`E \chardef\Aheth=`H \chardef\ARheth=`E
\chardef\Atd=`T \chardef\ARtd=`T \chardef\Ateth=`T \chardef\ARteth=`T
-\chardef\Ay=`y \chardef\ARy=`y \chardef\Ayod=`y \chardef\ARyod=`y
+%%%\chardef\Ay=`y \chardef\ARy=`y \chardef\Ayod=`y \chardef\ARyod=`y
+\chardef\Ay=`y \chardef\ARy=`Y \chardef\Ayod=`y \chardef\ARyod=`Y
\chardef\Ak=`k \chardef\ARk=`K \chardef\Akaph=`k \chardef\ARkaph=`K
\chardef\Al=`l \chardef\ARl=`L \chardef\Alamed=`l \chardef\ARlamed=`L
\chardef\Am=`m \chardef\ARm=`M \chardef\Amem=`m \chardef\ARmem=`M
diff --git a/Master/texmf-dist/source/fonts/archaic/phoenician.ins b/Master/texmf-dist/source/fonts/archaic/phoenician.ins
index 49c23384879..ee428d8b4ef 100644
--- a/Master/texmf-dist/source/fonts/archaic/phoenician.ins
+++ b/Master/texmf-dist/source/fonts/archaic/phoenician.ins
@@ -1,6 +1,6 @@
%% phoenician.ins
%% Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
-%% Copyright 1999--2005 Peter R. Wilson
+%% Copyright 1999--2006 Peter R. Wilson
%%
%% This work may be distributed and/or modified under the
%% conditions of the Latex Project Public License, either
@@ -25,7 +25,7 @@
\preamble
------------------------------------------------------------------
Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
- Copyright 1999--2005 Peter R. Wilson
+ Copyright 1999--2006 Peter R. Wilson
This work may be distributed and/or modified under the
conditions of the Latex Project Public License, either
diff --git a/Master/texmf-dist/source/fonts/archaic/protosem.dtx b/Master/texmf-dist/source/fonts/archaic/protosem.dtx
index 5bbcb0b9c8c..11d589027b0 100644
--- a/Master/texmf-dist/source/fonts/archaic/protosem.dtx
+++ b/Master/texmf-dist/source/fonts/archaic/protosem.dtx
@@ -20,6 +20,7 @@
%
%<*driver>
\documentclass[twoside]{ltxdoc}
+\usepackage{docmfp}
\usepackage{url}
\usepackage[draft=false,
plainpages=false,
@@ -100,11 +101,13 @@
%
% \changes{v1.0}{1999/03/14}{First public release}
% \changes{v1.1}{2000/09/30}{Minor changes to glyph encodings}
-% \changes{v1.2}{2005/03/18}{Updated details}
+% \changes{v1.2}{2005/03/18}{Updated details, added map file}
+% \changes{v1.3}{2005/07/21}{Minor fixes}
%
% \def\fileversion{v1.0} \def\filedate{1999/03/14}
% \def\fileversion{v1.1} \def\filedate{2000/09/30}
% \def\fileversion{v1.2} \def\filedate{2005/03/18}
+% \def\fileversion{v1.3} \def\filedate{2005/07/21}
% \newcommand*{\Lpack}[1]{\textsf {#1}} ^^A typeset a package
% \newcommand*{\Lopt}[1]{\textsf {#1}} ^^A typeset an option
% \newcommand*{\file}[1]{\texttt {#1}} ^^A typeset a file
@@ -226,7 +229,7 @@
% \textit{b} & betu & house & b & |\Ab| |\Abeth| & B & |\AAb| |\AAbeth| \\
% \textit{g} & & throw-stick? & g & |\Ag| |\Agimel| & & \\
% \textit{d} & & fish & d & |\Ad| |\Adaleth| & D & |\AAd| |\AAdaleth| \\
-% \textit{h} & & man? & e & |\Ae| |\Ahe| & E & |\AAe| |\AAhe| \\
+% \textit{h} & & man? & e & |\Ah| |\Ahe| & E & |\AAh| |\AAhe| \\
% \textit{w} & wawwu & hook/peg & w & |\Aw| |\Avav| & & \\
% \textit{z} & & & z & |\Az| |\Azayin| & & \\
% \textit{\d{h}} & hotu & fence & h & |\Ahd| |\Aheth| & H & |\AAhd| |\AAheth| \\
@@ -485,7 +488,7 @@ draw z1--z2--z3--z4--z5--cycle; % head
draw z10--z11; % eye
draw z2{left}..z6{up}; % a horn
draw z3..z7{up}; % other horn
-labels(1,2,3,4,,5,,6,7,10);
+labels(1,2,3,4,5,6,7,10);
endchar;
% \end{macrocode}
@@ -511,7 +514,7 @@ draw z1--z2--z3--z4--z5--cycle; % head
draw z10--z11; % eye
draw z2{left}..z6{up}; % a horn
draw z3..z7{up}; % other horn
-labels(1,2,3,4,,5,,6,7,10);
+labels(1,2,3,4,5,6,7,10);
endchar;
% \end{macrocode}
@@ -537,7 +540,7 @@ draw z1--z2--z3--z4--z5--cycle; % head
draw z10--z11; % eye
draw z2{right}..z6{up}; % a horn
draw z3..z7{up}; % other horn
-labels(1,2,3,4,,5,,6,7,10);
+labels(1,2,3,4,5,6,7,10);
endchar;
% \end{macrocode}
@@ -1379,9 +1382,9 @@ end
%
%
% \begin{macro}{\protofamily}
-% Selects the font family in the OT1 encoding.
+% Selects the font family in the T1 encoding.
% \begin{macrocode}
-\newcommand{\protofamily}{\usefont{OT1}{proto}{m}{n}}
+\newcommand{\protofamily}{\usefont{T1}{proto}{m}{n}}
% \end{macrocode}
% \end{macro}
%
@@ -1394,6 +1397,7 @@ end
% \end{macro}
%
% The commands for the signs.
+% \changes{v1.3}{2005/07/21}{Changed \cs{Amum} to \cs{Amem}}
% \begin{macrocode}
\chardef\Arq=`'
\chardef\Aa=`a \chardef\Aaleph=`a
@@ -1408,7 +1412,7 @@ end
\chardef\Ay=`y \chardef\Ayod=`y
\chardef\Ak=`k \chardef\Akaph=`k
\chardef\Al=`l \chardef\Alamed=`l
-\chardef\Am=`m \chardef\Amum=`m
+\chardef\Am=`m \chardef\Amem=`m
\chardef\An=`n \chardef\Anun=`n
\chardef\Alq=``
\chardef\Ao=`o \chardef\Aayin=`o
@@ -1497,7 +1501,7 @@ end
% \section{The Postscript Type1 map} \label{sec:map}
%
% Just one line.
-%
+% \changes{v1.2}{2005/03/18}{Added map file}
% \begin{macrocode}
%<*map>
proto10 Archaic-ProtoSemitic <proto10.pfb
diff --git a/Master/texmf-dist/source/fonts/archaic/protosem.ins b/Master/texmf-dist/source/fonts/archaic/protosem.ins
index 4991ebe85d2..8fdd0c07c1a 100644
--- a/Master/texmf-dist/source/fonts/archaic/protosem.ins
+++ b/Master/texmf-dist/source/fonts/archaic/protosem.ins
@@ -47,8 +47,8 @@
%%% \Msg{*** Generating the driver file ***}
%%% \generateFile{protosem.drv}{t}{\from{protosem.dtx}{driver}}
-%%% \Msg{*** Generating the Metafont files ***}
-%%% \usepostamble\empty
+%%%\Msg{*** Generating the Metafont files ***}
+%%%\usepostamble\empty
%%%\generateFile{proto10.mf}{t}{\from{protosem.dtx}{up}}
\Msg{*** Generating the Font Definition files ***}
@@ -65,11 +65,11 @@
\Msg{*** Generating the Postscript Type1 map files ***}
\usepreamble\empty
\usepostamble\empty
-\generateFile{proto10.map}{t}{\from{protosem.dtx}{map}}
+\generateFile{protosem.map}{t}{\from{protosem.dtx}{map}}
\Msg{***********************************************************}
\Msg{*}
-\Msg{* To finish the installation you have to move the following}
+\Msg{* To continue the installation you have to move the following}
\Msg{* files into directories searched by TeX:}
\Msg{*}
%%\Msg{* Move these into the font source area:}
@@ -82,6 +82,7 @@
\Msg{* \space\space t1proto.fd}
\Msg{* \space\space protosem.sty}
\Msg{*}
+\Msg{* Further installation instructions are in the README}
\Msg{*}
\Msg{* To produce the documentation run the files ending with}
\Msg{* `.dtx' through LaTeX.}
diff --git a/Master/texmf-dist/source/fonts/archaic/sarabian.dtx b/Master/texmf-dist/source/fonts/archaic/sarabian.dtx
new file mode 100644
index 00000000000..95d89748c45
--- /dev/null
+++ b/Master/texmf-dist/source/fonts/archaic/sarabian.dtx
@@ -0,0 +1,1046 @@
+% \iffalse meta-comment
+%
+% sarabian.dtx
+%
+% Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
+% Copyright 1999--2005 Peter R. Wilson
+%
+% This work may be distributed and/or modified under the
+% conditions of the Latex Project Public License, either
+% version 1.3 of this license or (at your option) any
+% later version.
+% The latest version of the license is in
+% http://www.latex-project.org/lppl.txt
+% and version 1.3 or later is part of all distributions of
+% LaTeX version 2003/06/01 or later.
+%
+% This work has the LPPL maintenance status "author-maintained".
+%
+% This work consists of the files listed in the README file.
+%
+%<*driver>
+\documentclass[twoside]{ltxdoc}
+\usepackage{url}
+\usepackage[draft=false,
+ plainpages=false,
+ pdfpagelabels,
+ bookmarksnumbered,
+ hyperindex=false
+ ]{hyperref}
+\providecommand{\phantomsection}{}
+\OnlyDescription %% comment this out for the full glory
+\EnableCrossrefs
+\CodelineIndex
+\setcounter{StandardModuleDepth}{1}
+\makeatletter
+ \@mparswitchfalse
+ \DeclareTextCommand{\SAunder}{OT1}[1]%
+ {{\o@lign{\relax#1\crcr\hidewidth\sh@ft{29}%
+ \vbox to.2ex{\hbox{\char21}\vss}\hidewidth}}}
+\makeatother
+\renewcommand{\MakeUppercase}[1]{#1}
+\pagestyle{headings}
+\newenvironment{addtomargins}[1]{%
+ \begin{list}{}{%
+ \topsep 0pt%
+ \addtolength{\leftmargin}{#1}%
+ \addtolength{\rightmargin}{#1}%
+ \listparindent \parindent
+ \itemindent \parindent
+ \parsep \parskip}%
+ \item[]}{\end{list}}
+\begin{document}
+ \raggedbottom
+ \DocInput{sarabian.dtx}
+\end{document}
+%</driver>
+%
+% \fi
+%
+% \CheckSum{177}
+%
+% \DoNotIndex{\',\.,\@M,\@@input,\@addtoreset,\@arabic,\@badmath}
+% \DoNotIndex{\@centercr,\@cite}
+% \DoNotIndex{\@dotsep,\@empty,\@float,\@gobble,\@gobbletwo,\@ignoretrue}
+% \DoNotIndex{\@input,\@ixpt,\@m}
+% \DoNotIndex{\@minus,\@mkboth,\@ne,\@nil,\@nomath,\@plus,\@set@topoint}
+% \DoNotIndex{\@tempboxa,\@tempcnta,\@tempdima,\@tempdimb}
+% \DoNotIndex{\@tempswafalse,\@tempswatrue,\@viipt,\@viiipt,\@vipt}
+% \DoNotIndex{\@vpt,\@warning,\@xiipt,\@xipt,\@xivpt,\@xpt,\@xviipt}
+% \DoNotIndex{\@xxpt,\@xxvpt,\\,\ ,\addpenalty,\addtolength,\addvspace}
+% \DoNotIndex{\advance,\Alph,\alph}
+% \DoNotIndex{\arabic,\ast,\begin,\begingroup,\bfseries,\bgroup,\box}
+% \DoNotIndex{\bullet}
+% \DoNotIndex{\cdot,\cite,\CodelineIndex,\cr,\day,\DeclareOption}
+% \DoNotIndex{\def,\DisableCrossrefs,\divide,\DocInput,\documentclass}
+% \DoNotIndex{\DoNotIndex,\egroup,\ifdim,\else,\fi,\em,\endtrivlist}
+% \DoNotIndex{\EnableCrossrefs,\end,\end@dblfloat,\end@float,\endgroup}
+% \DoNotIndex{\endlist,\everycr,\everypar,\ExecuteOptions,\expandafter}
+% \DoNotIndex{\fbox}
+% \DoNotIndex{\filedate,\filename,\fileversion,\fontsize,\framebox,\gdef}
+% \DoNotIndex{\global,\halign,\hangindent,\hbox,\hfil,\hfill,\hrule}
+% \DoNotIndex{\hsize,\hskip,\hspace,\hss,\if@tempswa,\ifcase,\or,\fi,\fi}
+% \DoNotIndex{\ifhmode,\ifvmode,\ifnum,\iftrue,\ifx,\fi,\fi,\fi,\fi,\fi}
+% \DoNotIndex{\input}
+% \DoNotIndex{\jobname,\kern,\leavevmode,\let,\leftmark}
+% \DoNotIndex{\list,\llap,\long,\m@ne,\m@th,\mark,\markboth,\markright}
+% \DoNotIndex{\month,\newcommand,\newcounter,\newenvironment}
+% \DoNotIndex{\NeedsTeXFormat,\newdimen}
+% \DoNotIndex{\newlength,\newpage,\nobreak,\noindent,\null,\number}
+% \DoNotIndex{\numberline,\OldMakeindex,\OnlyDescription,\p@}
+% \DoNotIndex{\pagestyle,\par,\paragraph,\paragraphmark,\parfillskip}
+% \DoNotIndex{\penalty,\PrintChanges,\PrintIndex,\ProcessOptions}
+% \DoNotIndex{\protect,\ProvidesClass,\raggedbottom,\raggedright}
+% \DoNotIndex{\refstepcounter,\relax,\renewcommand,\reset@font}
+% \DoNotIndex{\rightmargin,\rightmark,\rightskip,\rlap,\rmfamily,\roman}
+% \DoNotIndex{\roman,\secdef,\selectfont,\setbox,\setcounter,\setlength}
+% \DoNotIndex{\settowidth,\sfcode,\skip,\sloppy,\slshape,\space}
+% \DoNotIndex{\symbol,\the,\trivlist,\typeout,\tw@,\undefined,\uppercase}
+% \DoNotIndex{\usecounter,\usefont,\usepackage,\vfil,\vfill,\viiipt}
+% \DoNotIndex{\viipt,\vipt,\vskip,\vspace}
+% \DoNotIndex{\wd,\xiipt,\year,\z@}
+%
+% \changes{v1.0}{2000/09/30}{First public release}
+% \changes{v1.1}{2005/11/12}{Added map file}
+%
+% \def\fileversion{v1.0}
+% \def\filedate{2000/09/30}
+% \def\fileversion{v1.1}
+% \def\filedate{2005/11/12}
+% \newcommand*{\Lpack}[1]{\textsf {#1}} ^^A typeset a package
+% \newcommand*{\Lopt}[1]{\textsf {#1}} ^^A typeset an option
+% \newcommand*{\file}[1]{\texttt {#1}} ^^A typeset a file
+% \newcommand*{\Lcount}[1]{\textsl {\small#1}} ^^A typeset a counter
+% \newcommand*{\pstyle}[1]{\textsl {#1}} ^^A typeset a pagestyle
+% \newcommand*{\Lenv}[1]{\texttt {#1}} ^^A typeset an environment
+% \newcommand{\BC}{\textsc{bc}}
+% \newcommand{\AD}{\textsc{ad}}
+% \newcommand{\thisfont}{South Arabian}
+%
+% \title{The \Lpack{South Arabian} fonts\thanks{This
+% file has version number \fileversion, last revised
+% \filedate.}}
+%
+% \author{%
+% Peter Wilson\thanks{\texttt{herries dot press at earthlink dot net}}\\
+% Herries Press}
+%
+% \date{\filedate}
+% \maketitle
+% \begin{abstract}
+% The \Lpack{sarabian} package provides a set of fonts, created by
+% Alan Stanier, and LaTeX files for typesetting the
+% \thisfont{} alphabet which was used around 600~\BC{} in some of the
+% ancient kingdoms of Southern Arabia.
+% \end{abstract}
+% \tableofcontents
+%
+%
+%
+% \section{Introduction}
+%
+% The Phoenician alphabet and characters is a direct ancestor of our modern day
+% Latin alphabet and fonts.
+% The font presented here is one of a series of fonts intended to show how
+% the modern Latin alphabet has evolved from its original Phoenician form
+% to its present day appearance.
+%
+% This manual is typeset according to the conventions of the
+% \LaTeX{} \textsc{docstrip} utility which enables the automatic
+% extraction of the \LaTeX{} macro source files~\cite{GOOSSENS94}.
+%
+% Section~\ref{sec:usc} describes the usage of the package.
+% Commented code for the fonts is in Sections~\ref{sec:mf} and~\ref{sec:fd}
+% and source code for the package is in Section~\ref{sec:code}.
+%
+% \subsection{An alphabetic tree}
+%
+% Scholars are reasonably agreed that all the world's alphabets are descended
+% from a Semitic alphabet invented about 1600~\BC{} in the Middle
+% East~\cite{DRUCKER95}. The word `Semitic' refers
+% to the family of languages used in the geographical area from
+% Sinai in the south, up the Mediterranean coast to Asia Minor in the north and
+% west to the valley of the Euphrates.
+%
+% The Phoenician alphabet was stable by about 1100~\BC{} and the script was
+% written right to left. In earlier times the writing direction was variable,
+% and so were
+% the shapes and orientation of the characters. The alphabet consisted of
+% 22 letters and they were named after things. For example, their first two
+% letters were called \textit{aleph} (ox), and \textit{beth} (house).
+% The Phoenician script had
+% only one case --- unlike our modern fonts which have both upper- and
+% lower-cases. In modern terms the Phoenician abecedary was: \\
+% A B G D E Y Z H $\Theta$ I K L M N X O P ts Q R S T \\
+% where the `Y' (\textit{vau}) character was sometimes written as `F', and
+% `ts' stands for the \textit{tsade} character.
+%
+% The Greek alphabet is one of the descendants of the Phoenician alphabet;
+% another was Aramaic which is the ancestor of the Arabic, Persian and Indian
+% scripts.
+% Initially Greek was written right to left but around the 6th C~\BC{} became
+% \textit{boustrophedron}, meaning that the lines
+% alternated in direction. At about 500~\BC{} the writing direction stabilised
+% as left to
+% right. The Greeks modified the Phoenician alphabet to match the vocalisation
+% of their language. They kept the Phoenician names of the letters, suitably
+% `greekified', so \textit{aleph} became the familar \textit{alpha} and
+% \textit{beth} became \textit{beta}. At this
+% point the names of the letters had no meaning. Their were several variants
+% of the Greek character glyphs until they were finally fixed in Athens in
+% 403~\BC.
+% The Greeks did not develop a lower-case
+% script until about 600--700~\AD.
+%
+% The Etruscans based their alphabet on the Greek one, and again modified it.
+% However, the Etruscans wrote right to left, so their borrowed characters are
+% mirror images of the original Greek ones. Like the Phoenicians, the Etruscan
+% script consisted of only one case; they died out before ever needing a
+% lower-case script. The Etruscan script was used up until the first century
+% \AD, even though the Etruscans themselves had dissapeared by that time.
+%
+%
+% In turn, the Romans based their alphabet on the Etruscan one, but as they
+% wrote left to right, the characters were again mirrored (although the early
+% Roman inscriptions are boustrophedron).
+%
+% As the English alphabet is descended from the Roman alphabet
+% it has a pedigree of some three and a half thousand years.
+%
+% \section{The \Lpack{sarabian} package} \label{sec:usc}
+%
+% The \thisfont{} alphabet provided by this package is a descendent
+% of the Proto-Siniatic or Proto-Canaanite scripts~\cite{HEALEY90}.
+% It was used for about 1000 years, from roughly 600~\BC, in Southern
+% Arabia.
+%
+% The alphabet consisted of 29 letters, but the ordering has no
+% relationship to either the Semitic alphabets nor our modern day one.
+% Table~\ref{tab} lists, in \thisfont{} alphabetic order, the transliterated
+% values of the script. Note that there are many consonontal sounds
+% represented that we no longer use. These are the letters with diacritics.
+%
+% \begin{table}
+% \centering
+% \caption{The \thisfont{} alphabet}\label{tab}
+% \begin{tabular}{ccl} \hline
+% Value & ASCII & Command \\ \hline
+% \textit{h} & h & |\SAh| \\
+% \textit{l} & l & |\SAl| \\
+% \textit{\d{h}} & H & |\SAhd| \\
+% \textit{m} & m & |\SAm| \\
+% \textit{q} & q & |\SAq| \\
+% \textit{w} & w & |\SAw| \\
+% \textit{\v{s}} & S & |\SAsv| \\
+% \textit{r} & r & |\SAr| \\
+% \textit{b} & b & |\SAb| \\
+% \textit{t} & t & |\SAt| \\
+% \textit{s} & s & |\SAs| \\
+% \textit{k} & k & |\SAk| \\
+% \textit{n} & n & |\SAn| \\
+% \textit{\SAunder{h}}& I & |\SAhu| \\
+% \textit{\'{s}} & X & |\SAsa| \\
+% \textit{f} & f & |\SAf| \\
+% \textit{'} & ' a & |\SArq| |\SAa| \\
+% \textit{`} & ` o & |\SAlq| |\SAo| \\
+% \textit{\d{d}} & B & |\SAdd| \\
+% \textit{g} & g & |\SAg| \\
+% \textit{d} & d & |\SAd| \\
+% \textit{\'{g}} & G & |\SAga| \\
+% \textit{\d{t}} & T & |\SA|td \\
+% \textit{z} & z & |\SAz| \\
+% \textit{\b{d}} & D & |\SAdb| \\
+% \textit{y} & y & |\SAy| \\
+% \textit{\b{t}} & J & |\SAtb| \\
+% \textit{\d{s}} & x & |\SAsd| \\
+% \textit{\d{z}} & Z & |\SAzd| \\
+% \hline
+% \end{tabular}
+% \end{table}
+%
+% The font provided was developed originally by Alan Stanier of
+% Essex University. I have made very minor alterations to make it
+% easier to use with the LaTeX font selection system.
+%
+%
+% \DescribeMacro{\sarabfamily}
+% This command selects the \thisfont{} font family. The family name is |sarab|.
+%
+% \DescribeMacro{\textsarab}
+% The command |\textsarab{|\meta{text}|}| typesets \meta{text} in the
+% \thisfont{} font.
+%
+% I have provided two means of accessing the \thisfont{} glyphs:
+% (a) by ASCII characters, and (b) via commands. These are shown
+% in Table~\ref{tab}.
+%
+% \DescribeMacro{\translitsarab}
+% The command |\translitsarab{|\meta{commands}|}| will typeset the transliteration
+% of the \thisfont{} character commands (those in the third column of
+% Table~\ref{tab}).
+%
+% \DescribeMacro{\translitsarabfont}
+% The font used for the transliteration is defined by this macro,
+% which is initialised to an italic font (i.e., |\itshape|).
+%
+% \StopEventually{
+% \bibliographystyle{alpha}
+% \begin{thebibliography}{GMS94}
+%
+% \bibitem[Dav97]{DAVIES97}
+% W. V. Davies.
+% \newblock \emph{Reading the Past: Egyptian Hieroglyphs}.
+% \newblock University of California Press/British Museum, 1997.
+% \newblock (ISBN 0-520-06287-6)
+%
+% \bibitem[Dru95]{DRUCKER95}
+% Johanna Drucker.
+% \newblock \emph{The Alphabetic Labyrinth}.
+% \newblock Thames and Hudson, 1995.
+%
+% \bibitem[Fir93]{FIRMAGE93}
+% Richard A.~Firmage.
+% \newblock \emph{The Alphabet Abecedarium}.
+% \newblock David R.~Goodine, 1993.
+%
+%
+% \bibitem[GMS94]{GOOSSENS94}
+% Michel Goossens, Frank Mittelbach, and Alexander Samarin.
+% \newblock \emph{The LaTeX Companion}.
+% \newblock Addison-Wesley Publishing Company, 1994.
+%
+% \bibitem[Hea90]{HEALEY90}
+% John F.~Healey.
+% \newblock \emph{Reading the Past: The Early Alphabet}.
+% \newblock University of California Press/British Museum, 1990.
+% \newblock (ISBN 0-520-07309-6)
+%
+% \end{thebibliography}
+% \PrintIndex
+% }
+%
+%
+% \section{The Metafont code} \label{sec:mf}
+%
+% The code is all in a single file. It is principally Alan Stanier's code, except
+% that I have made a few slight modifications to make it easier to use with
+% the automatic font generation usually employed by modern LaTeX systems.
+%
+% Start off by naming the file and including Stanier's comments.
+%
+% \begin{macrocode}
+%<*up>
+%%% SARAB10.MF South Arabian font 10 point design size.
+
+%%% This font was designed by Alan M Stanier ( alan@essex.ac.uk ),
+%%% at Essex University Computer Service, Colchester, Essex CO4 3EA. England.
+%%%
+%%% If you make significant additions or improvements to the font,
+%%% please email me an updated version
+%%%
+%%% This font was used for several languages in Southern Arabia in the
+%%% second millenium BC
+%%%
+
+% \end{macrocode}
+%
+% The next part of the original file looked like this:
+% \begin{verbatim}
+% mg:=1.0; % CHANGE THIS TO GET DIFFERENT SIZES OF FONT (font size = 10*mg pt)
+%
+% mode_setup;
+% xpensize#:=mg*0.8pt;
+% ypensize#:=mg*0.2pt;
+% height#:=mg*10pt#;
+% width#:=mg*7pt#;
+% narrow#:=mg*5.3pt#;
+% \end{verbatim}
+% but this didn't seem to appeal to MetaFont very much, so I replaced it with:
+% \begin{macrocode}
+mode_setup;
+font_identifier:="sarabian";
+font_size:= 10pt#; % nominally, a 10pt font
+font_normal_space:=7pt#; % width of a blank space
+font_normal_shrink:=.9pt#; % width correction for blank space
+font_x_height:=4.5pt#; % height of one ex
+font_quad:=10pt#; % an em
+
+numeric pmg; pmg:=0.8; % a scale factor
+
+xpensize#:=pmg*0.8pt;
+ypensize#:=pmg*0.2pt;
+height#:=pmg*10pt#;
+width#:=pmg*7pt#;
+narrow#:=pmg*5.3pt#;
+
+mg#:= pmg*0.3pt#;
+define_pixels(mg);
+
+numeric cscale; % scale factor for original circles
+cscale# := mg#;
+define_pixels(cscale);
+let cmchar=\;
+
+% \end{macrocode}
+% Now continue with the original code.
+% \begin{macrocode}
+
+define_pixels(height,width,narrow);
+def getpen = pickup pencircle xscaled xpensize# yscaled ypensize# rotated 30 enddef;
+
+% \end{macrocode}
+% That finishes the simple set up. The rest of the code is for creating
+% the character glyphs. It is Stanier's code, except that where he had a
+% statement like: \\
+% |draw fullcircle scaled 10 shifted(...);| \\
+% I modifed it to: \\
+% |draw fullcircle scaled(10cscale) shifted(...);| \\
+% I also put a |cmchar "comment";| before each glyph code.
+
+% Note that the
+% encoding I use is not the same as Stanier's but does match the encoding
+% I use for my other archaic fonts.
+%
+% \begin{macro}{h}
+% The \thisfont{} letter \textit{h}.
+% \begin{macrocode}
+
+cmchar "letter h";
+beginchar("h",width#,height#,0);
+ getpen;
+ draw (0,mg*30){down} .. (mg*7.5,mg*15){right} .. (mg*15,mg*30){up};
+ draw (mg*7.5,mg*15) -- (mg*7.5,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{l}
+% The \thisfont{} letter \textit{l}.
+% \begin{macrocode}
+
+cmchar "letter l";
+beginchar("l",width#,height#,0);
+ getpen;
+ draw (0,mg*15) -- (mg*15,mg*30) -- (mg*15,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{H}
+% The \thisfont{} letter \textit{\d{h}}.
+% \begin{macrocode}
+
+cmchar "letter h sub dot (coded as H)";
+beginchar("H",width#,height#,0);
+ getpen;
+ draw (0,mg*30){down} .. (mg*7.5,mg*15){right} .. (mg*15,mg*30){up};
+ draw (mg*7.5,mg*30) -- (mg*7.5,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{m}
+% The \thisfont{} letter \textit{m}.
+% \begin{macrocode}
+
+cmchar "letter m";
+beginchar("m",width#,height#,0);
+ getpen;
+ draw (mg*15,mg*30) -- (mg*15,0) -- (0,mg*7.5) -- (mg*15,mg*15) --
+ (0,mg*22.5) -- (mg*15,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{q}
+% The \thisfont{} letter \textit{q}.
+% \begin{macrocode}
+
+cmchar "letter q";
+beginchar("q",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*15);
+ draw (mg*5,mg*20) -- (mg*5,mg*30);
+ draw (mg*5,mg*10) -- (mg*5,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{w}
+% The \thisfont{} letter \textit{w}.
+% \begin{macrocode}
+
+cmchar "letter w";
+beginchar("w",width#,height#,0);
+ getpen;
+ draw fullcircle scaled (15cscale) shifted(mg*7.5,mg*15);
+ draw (mg*7.5,mg*7.5) -- (mg*7.5,mg*22.5);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{S}
+% The \thisfont{} letter \textit{\v{s}}.
+% \begin{macrocode}
+
+cmchar "letter s sup v (coded as S)";
+beginchar("S",width#,height#,0);
+ getpen;
+ draw (0,0) -- (0,mg*15) -- (mg*15,mg*15) -- (mg*15,0);
+ draw (mg*7.5,mg*15) -- (mg*7.5,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{r}
+% The \thisfont{} letter \textit{r}.
+% \begin{macrocode}
+
+cmchar "letter r";
+beginchar("r",width#,height#,0);
+ getpen;
+ draw (0,mg*30){right} .. (mg*15,mg*15){down} .. (0,0){left};
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{b}
+% The \thisfont{} letter \textit{b}.
+% \begin{macrocode}
+
+cmchar "letter b";
+beginchar("b",width#,height#,0);
+ getpen;
+ draw (0,0) -- (0,mg*30) -- (mg*15,mg*30) -- (mg*15,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{t}
+% The \thisfont{} letter \textit{t}.
+% \begin{macrocode}
+
+cmchar "letter t";
+beginchar("t",width#,height#,0);
+ getpen;
+ draw (0,0) -- (mg*15,mg*30);
+ draw (0,mg*30) -- (mg*15,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{s}
+% The \thisfont{} letter \textit{s}.
+% \begin{macrocode}
+
+cmchar "letter s";
+beginchar("s",width#,height#,0);
+ getpen;
+ draw (0,0) -- (mg*15,mg*15) -- (0,mg*30);
+ draw (mg*15,0) -- (0,mg*15) -- (mg*15,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{k}
+% The \thisfont{} letter \textit{k}.
+% \begin{macrocode}
+
+cmchar "letter k";
+beginchar("k",width#,height#,0);
+ getpen;
+ draw (0,0) -- (0,mg*15) -- (mg*15,mg*15) -- (mg*15,0);
+ draw (0,mg*15) -- (mg*7.5,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{n}
+% The \thisfont{} letter \textit{n}.
+% \begin{macrocode}
+
+cmchar "letter n";
+beginchar("n",width#,height#,0);
+ getpen;
+ draw (0,mg*30) -- (0,mg*15) -- (mg*15,mg*15) -- (mg*15,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{I}
+% The \thisfont{} letter \textit{$h_u$}.
+% \begin{macrocode}
+
+cmchar "letter h sub u (coded as H)";
+%%beginchar("1",width#,height#,0);
+beginchar("I",width#,height#,0);
+ getpen;
+ draw (0,mg*30){down} .. (mg*7.5,mg*15){right} .. (mg*15,mg*30){up};
+ draw (mg*7.5,mg*15) -- (mg*7.5,mg*7.5) -- (mg*15,mg*7.5) -- (mg*15,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{X}
+% The \thisfont{} letter \textit{\'{s}}.
+% \begin{macrocode}
+
+cmchar "letter s acute (coded as X)";
+%%beginchar("2",width#,height#,0);
+beginchar("X",width#,height#,0);
+ getpen;
+ draw (0,0) -- (mg*15,mg*7.5) -- (0,mg*15) --
+ (mg*15,mg*22.5) -- (0,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{f}
+% The \thisfont{} letter \textit{f}.
+% \begin{macrocode}
+
+cmchar "letter f";
+beginchar("f",width#,height#,0);
+ getpen;
+ draw (0,mg*15) -- (mg*7.5,0) -- (mg*15,mg*15) -- (mg*7.5,mg*30)
+ -- (0,mg*15);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{`}
+% The \thisfont{} letter \textit{`} (semitic ayin).
+% \begin{macrocode}
+
+cmchar "letter `";
+beginchar("`",width#,height#,0);
+ getpen;
+ draw (0,0) -- (0,mg*15) -- (mg*15,mg*15) -- (mg*15,0);
+ draw (mg*7.5,mg*15) -- (mg*7.5,mg*22.5) -- (0,mg*22.5) -- (0,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{o}
+% The \thisfont{} letter \textit{`} (semitic ayin).
+% \begin{macrocode}
+
+cmchar "letter ` (coded as o)";
+beginchar("o",width#,height#,0);
+ getpen;
+ draw (0,0) -- (0,mg*15) -- (mg*15,mg*15) -- (mg*15,0);
+ draw (mg*7.5,mg*15) -- (mg*7.5,mg*22.5) -- (0,mg*22.5) -- (0,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{'}
+% The \thisfont{} letter \textit{'} (semitic aleph).
+% \begin{macrocode}
+
+cmchar "letter '";
+beginchar("'",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*10);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{a}
+% The \thisfont{} letter \textit{'} (semitic aleph).
+% \begin{macrocode}
+
+cmchar "letter ' (coded as a)";
+beginchar("a",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*10);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{B}
+% The \thisfont{} letter \textit{\d{d}}.
+% \begin{macrocode}
+
+cmchar "letter d sub dot (coded as B)";
+%%beginchar("D",width#,height#,0);
+beginchar("B",width#,height#,0);
+ getpen;
+ draw (0,0) -- (mg*15,0) -- (mg*15,mg*30) -- (0,mg*30) -- (0,0);
+ draw (0,mg*15) -- (mg*15,mg*15);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{g}
+% The \thisfont{} letter \textit{g}.
+% \begin{macrocode}
+
+cmchar "letter g";
+beginchar("g",width#,height#,0);
+ getpen;
+ draw (0,mg*30) -- (mg*15,mg*30) -- (mg*15,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{d}
+% The \thisfont{} letter \textit{d}.
+% \begin{macrocode}
+
+cmchar "letter d";
+beginchar("d",narrow#,height#,0);
+ getpen;
+ draw (0,mg*10) -- (0,mg*20) -- (mg*10,mg*15) -- (0,mg*10);
+ draw (mg*10,0) -- (mg*10,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{G}
+% The \thisfont{} letter \textit{\'{g}}.
+% \begin{macrocode}
+
+cmchar "letter g acute (coded as G)";
+beginchar("G",width#,height#,0);
+ getpen;
+ draw (0,mg*25) -- (mg*5,mg*30) -- (mg*15,mg*30) -- (mg*15,0);
+ draw (mg*5,0) -- (mg*5,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{T}
+% The \thisfont{} letter \textit{\d{t}}.
+% \begin{macrocode}
+
+cmchar "letter t sub dot (coded as T)";
+beginchar("T",width#,height#,0);
+ getpen;
+ draw (0,0) -- (mg*15,0) -- (mg*15,mg*30) -- (0,mg*30) -- (0,0);
+ draw (mg*7.5,0) -- (mg*7.5,mg*30);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{z}
+% The \thisfont{} letter \textit{z}.
+% \begin{macrocode}
+
+cmchar "letter z";
+beginchar("z",width#,height#,0);
+ getpen;
+ draw (0,0) -- (mg*15,mg*30) -- (0,mg*30) --
+ (mg*15,0) -- (0,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{D}
+% The \thisfont{} letter \textit{\b{d}}.
+% \begin{macrocode}
+
+cmchar "letter d sub bar (coded as D)";
+%%beginchar("5",width#,height#,0);
+beginchar("D",width#,height#,0);
+ getpen;
+ draw (0,0) -- (0,mg*30);
+ draw (mg*15,0) -- (mg*15,mg*30);
+ draw (0,mg*12.5) -- (mg*15,mg*12.5);
+ draw (0,mg*17.5) -- (mg*15,mg*17.5);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{y}
+% The \thisfont{} letter \textit{y}.
+% \begin{macrocode}
+
+cmchar "letter y";
+beginchar("y",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*25);
+ draw (mg*5,mg*20) -- (mg*5,0);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{J}
+% The \thisfont{} letter \textit{\b{t}}.
+% \begin{macrocode}
+
+cmchar "letter t sub bar (coded as J)";
+%%beginchar("4",narrow#,height#,0);
+beginchar("J",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*25);
+ draw (mg*5,mg*20) -- (mg*5,mg*10);
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*5);
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{x}
+% The \thisfont{} letter \textit{\d{s}}.
+% \begin{macrocode}
+
+cmchar "letter s sub dot (coded as x)";
+%%beginchar("3",narrow#,height#,0);
+beginchar("x",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*25);
+ draw (mg*5,mg*20) -- (mg*5,mg*10);
+ draw (0,0){up} .. (mg*5,mg*10){right} .. (mg*10,0){down};
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{Z}
+% The \thisfont{} letter \textit{\d{z}}.
+% \begin{macrocode}
+
+cmchar "letter z sub dot (coded as Z)";
+beginchar("Z",narrow#,height#,0);
+ getpen;
+ draw fullcircle scaled (10cscale) shifted(mg*5,mg*25);
+ draw (mg*5,mg*20) -- (mg*5,0);
+ draw (mg*5,mg*10){right} .. (mg*10,0){down};
+endchar;
+
+% \end{macrocode}
+% \end{macro}
+%
+% The end of the glyphs, and file.
+% \begin{macrocode}
+
+end
+
+%</up>
+% \end{macrocode}
+%
+%
+%
+%
+% \section{The font definition files} \label{sec:fd}
+%
+% \begin{macrocode}
+%<*fdot1>
+\DeclareFontFamily{OT1}{sarab}{}
+ \DeclareFontShape{OT1}{sarab}{m}{n}{ <-> sarab10 }{}
+ \DeclareFontShape{OT1}{sarab}{bx}{n}{ <-> sub sarab/m/n }{}
+ \DeclareFontShape{OT1}{sarab}{b}{n}{ <-> sub sarab/m/n }{}
+ \DeclareFontShape{OT1}{sarab}{m}{sl}{ <-> sub sarab/m/n }{}
+ \DeclareFontShape{OT1}{sarab}{m}{it}{ <-> sub sarab/m/n }{}
+%</fdot1>
+% \end{macrocode}
+%
+%
+% \begin{macrocode}
+%<*fdt1>
+\DeclareFontFamily{T1}{sarab}{}
+ \DeclareFontShape{T1}{sarab}{m}{n}{ <-> sarab10 }{}
+ \DeclareFontShape{T1}{sarab}{bx}{n}{ <-> sub sarab/m/n }{}
+ \DeclareFontShape{T1}{sarab}{b}{n}{ <-> sub sarab/m/n }{}
+ \DeclareFontShape{T1}{sarab}{m}{sl}{ <-> sub sarab/m/n }{}
+ \DeclareFontShape{T1}{sarab}{m}{it}{ <-> sub sarab/m/n }{}
+%</fdt1>
+% \end{macrocode}
+%
+% \section{The \Lpack{sarabian} package code} \label{sec:code}
+%
+% Announce the name and version of the package, which requires
+% \LaTeXe{}.
+% \begin{macrocode}
+%<*usc>
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{sarabian}[2005/11/12 v1.1 package for South Arabian fonts]
+% \end{macrocode}
+%
+%
+% \begin{macro}{\sarabfamily}
+% Selects the font family in the T1 encoding.
+% \changes{v1.1}{2005/11/12}{Changed default encoding from OT1 to T1}
+% \begin{macrocode}
+\newcommand{\sarabfamily}{\usefont{T1}{sarab}{m}{n}}
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\textsarab}
+% Text command for the font family.
+% \begin{macrocode}
+\DeclareTextFontCommand{\textsarab}{\sarabfamily}
+
+% \end{macrocode}
+% \end{macro}
+%
+% The commands for the signs.
+% \begin{macrocode}
+\chardef\SArq=`'
+\chardef\SAa=`a
+\chardef\SAb=`b
+\chardef\SAg=`g
+\chardef\SAd=`d
+\chardef\SAh=`h
+\chardef\SAw=`w
+\chardef\SAz=`z
+\chardef\SAhd=`H
+\chardef\SAtd=`T
+\chardef\SAy=`y
+\chardef\SAk=`k
+\chardef\SAl=`l
+\chardef\SAm=`m
+\chardef\SAn=`n
+\chardef\SAs=`s
+\chardef\SAf=`f
+\chardef\SAlq=``
+\chardef\SAo=`o
+\chardef\SAsd=`x
+\chardef\SAq=`q
+\chardef\SAr=`r
+\chardef\SAsv=`S
+\chardef\SAt=`t
+\chardef\SAhu=`I
+\chardef\SAdb=`D
+\chardef\SAtb=`J
+\chardef\SAga=`G
+\chardef\SAzd=`Z
+\chardef\SAsa=`X
+\chardef\SAdd=`B
+
+% \end{macrocode}
+%
+% \begin{macro}{translitsarab}
+% \begin{macro}{translitsarabfont}
+% |\translitsarab{|\meta{char-commands}|}| typesets a transliteration
+% of the \thisfont{} character commands in the |\translisarabfont| font.
+% \begin{macrocode}
+\newcommand{\translitsarab}[1]{{%
+ \@translitSA\translitsarabfont #1}}
+\newcommand{\translitsarabfont}{\itshape}
+
+% \end{macrocode}
+% \end{macro}
+% \end{macro}
+%
+% \begin{macro}{\SAunder}
+% We need a copmmand to put a small U shaped cup under a letter.
+% \begin{macrocode}
+\DeclareTextCommand{\SAunder}{OT1}[1]%
+ {{\o@lign{\relax#1\crcr\hidewidth\sh@ft{29}%
+ \vbox to.2ex{\hbox{\char21}\vss}\hidewidth}}}
+
+% \end{macrocode}
+% \end{macro}
+%
+% \begin{macro}{\@translitSA}
+% This command redefines all the character producing commands for
+% use within |\translitsarab|. There must be no spaces in the
+% definition.
+% \begin{macrocode}
+\newcommand{\@translitSA}{%
+\def\SArq{'}%
+\def\SAa{'}%
+\def\SAb{b}%
+\def\SAg{g}%
+\def\SAd{d}%
+\def\SAh{h}%
+\def\SAw{w}%
+\def\SAz{z}%
+\def\SAhd{\d{h}}%
+\def\SAtd{\d{t}}%
+\def\SAy{y}%
+\def\SAk{k}%
+\def\SAl{l}%
+\def\SAm{m}%
+\def\SAn{n}%
+\def\SAs{s}%
+\def\SAf{f}%
+\def\SAlq{`}%
+\def\SAo{`}%
+\def\SAsd{\d{s}}%
+\def\SAq{q}%
+\def\SAr{r}%
+\def\SAsv{\v{s}}%
+\def\SAt{t}
+\def\SAhu{\SAunder{h}}%
+\def\SAdb{\b{d}}%
+\def\SAtb{\b{t}}%
+\def\SAga{\'{g}}%
+\def\SAzd{\d{z}}%
+\def\SAsa{\'{s}}%
+\def\SAdd{\d{d}}%
+}
+
+% \end{macrocode}
+% \end{macro}
+%
+%
+%
+% The end of this package.
+% \begin{macrocode}
+%</usc>
+% \end{macrocode}
+%
+% \section{Map file}
+%
+% A very short map file.
+% \changes{v1.1}{2005/11/12}{Added map file}
+%
+% \begin{macrocode}
+%<*map>
+sarab10 Archaic-South-Arabian <sarab10.pfb
+%</map>
+% \end{macrocode}
+%
+%
+% \Finale
+%
+\endinput
+
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+
+
diff --git a/Master/texmf-dist/source/fonts/archaic/sarabian.ins b/Master/texmf-dist/source/fonts/archaic/sarabian.ins
new file mode 100644
index 00000000000..e2fa91b0444
--- /dev/null
+++ b/Master/texmf-dist/source/fonts/archaic/sarabian.ins
@@ -0,0 +1,90 @@
+%% sarab.ins
+%% Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
+%% Copyright 1999--2005 Peter R. Wilson
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the Latex Project Public License, either
+%% version 1.3 of this license or (at your option) any
+%% later version.
+%% The latest version of the license is in
+%% http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of
+%% LaTeX version 2003/06/01 or later.
+%%
+%% This work has the LPPL maintenance status "author-maintained".
+%%
+%% This work consists of the files listed in the README file.
+%%
+%% This file will generate fast loadable files from the doc files
+%% in this work when run through LaTeX
+%%
+%% --------------------- start of docstrip commands --------------
+%%
+\def\batchfile{sarabian.ins}
+\input docstrip.tex
+\preamble
+------------------------------------------------------------------
+ Author: Peter Wilson (Herries Press) herries dot press at earthlink dot net
+ Copyright 2005 Peter R. Wilson
+
+ This work may be distributed and/or modified under the
+ conditions of the Latex Project Public License, either
+ version 1.3 of this license or (at your option) any
+ later version.
+ The latest version of the license is in
+ http://www.latex-project.org/lppl.txt
+ and version 1.3 or later is part of all distributions of
+ LaTeX version 2003/06/01 or later.
+
+ This work has the LPPL maintenance status "author-maintained".
+
+ This work consists of the files listed in the README file.
+------------------------------------------------------------------
+\endpreamble
+
+\keepsilent
+
+%%% \Msg{*** Generating the driver file ***}
+%%% \generateFile{sarabian.drv}{t}{\from{sarabian.dtx}{driver}}
+
+\Msg{*** Generating the Metafont files ***}
+\usepostamble\empty
+\generateFile{sarab10.mf}{t}{\from{sarabian.dtx}{up}}
+
+\Msg{*** Generating the Font Definition files ***}
+\usepostamble\defaultpostamble
+
+\generateFile{ot1sarab.fd}{t}{\from{sarabian.dtx}{fdot1}}
+\generateFile{t1sarab.fd}{t}{\from{sarabian.dtx}{fdt1}}
+
+\Msg{*** Generating the LaTeX2e package files ***}
+
+\generateFile{sarabian.sty}{t}{\from{sarabian.dtx}{usc}}
+
+\Msg{*** Generating the map files ***}
+\usepreamble\empty
+\usepostamble\empty
+
+\generateFile{sarabian.map}{t}{\from{sarabian.dtx}{map}}
+
+\Msg{***********************************************************}
+\Msg{*}
+\Msg{* To continue the installation move these files}
+\Msg{* into the LaTeX macro area:}
+\Msg{*}
+\Msg{* \space\space t1sarab.fd}
+\Msg{* \space\space sarabian.sty}
+\Msg{*}
+\Msg{* Further installation instructions are in the README}
+\Msg{*}
+\Msg{* To produce the documentation run the files ending with}
+\Msg{* `.dtx' through LaTeX.}
+\Msg{* Process any name.idx file by:}
+\Msg{* \space\space\space\space makeindex -s gind.ist name}
+\Msg{* Process any name.glo file by:}
+\Msg{* \space\space\space\space makeindex -s gglo.ist -o name.gls name.glo}
+\Msg{*}
+\Msg{* Happy TeXing}
+\Msg{***********************************************************}
+
+\endinput