armenian, a.k.a. armtex (9apr14)

git-svn-id: svn://tug.org/texlive/trunk@33640 c570f23f-e606-0410-a88d-b1316a301751

3 files changed, 1333 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/plain/armenian/arm.tex b/Master/texmf-dist/tex/plain/armenian/arm.tex
new file mode 100644
index 00000000000..281ba1fe341
--- /dev/null
+++ b/Master/texmf-dist/tex/plain/armenian/arm.tex
@@ -0,0 +1,722 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%
+%% This is the `arm.tex' file (plain TeX input file for writing in Armenian).
+%%
+%% This file is a part of the ArmTeX project [2014/04/09 v3.0-beta3]
+%%
+%% ArmTeX is a system for writing in Armenian with plain TeX and/or LaTeX(2e).
+%%
+%% Copyright 1997 - 2013:
+%%   Serguei Dachian (Serguei.Dachian_AT_math.univ-bpclermont.fr),
+%%   Arnak Dalalyan  (arnak.dalalyan_AT_ensae.fr),
+%%   Vardan Akopian  (vakopian_AT_yahoo.com).
+%%
+%% ArmTeX 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 this license is in
+%%   http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of LaTeX version
+%% 2005/12/01 or later.
+%%
+%% ArmTeX has the LPPL maintenance status `author-maintained'.
+%%
+%% For more details, installation instructions and the complete list of files
+%% see the provided `readme.txt' file.
+%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%
+%%
+%% Making '@' letter.
+%%
+\catcode`\@=11
+%%
+%%
+%% Double input protection.
+%%
+\expandafter\ifx\csname ArmTeX@PlainLoaded\endcsname\relax
+  \let\ArmTeX@PlainLoaded\null\else\endinput\fi
+%%
+%%
+%% Some auxilliary macros.
+%%
+\def\ArmTeX@Armdischyph{\discretionary{\char123}{}{}}%
+\let\ArmTeX@Savedexclam=\!%
+\let\ArmTeX@Savedbar=\|%
+\let\ArmTeX@Savedstar=\*%
+\let\ArmTeX@Saveddischyph=\-%
+\let\ArmTeX@Savedtoday=\today
+%%
+%%
+%% User macros.
+%%
+\def\armtoday{\number\day\armendash\armat\ \ifcase\month\or
+  \armho\armvo\armvyun\armnu\-\armvev\armayb\-\armre\armini\or
+  \armpyur\armyech\armtyun\armre\armvev\armayb\-\armre\armini\or
+  \armmen\armayb\armre\-\armtyun\armini\or
+  \armayb\armpe\-\armre\armini\-\armlyun\armini\or
+  \armmen\armayb\-\armhi\armini\-\armse\armini\or
+  \armho\armvo\armvyun\-\armnu\armini\-\armse\armini\or
+  \armho\armvo\armvyun\-\armlyun\armini\-\armse\armini\or
+  \armo\-\armgim\armvo\armse\-\armtyun\armvo\-\armse\armini\or
+  \armse\armyech\armpe\-\armtyun\armyech\armmen\-\armben\armyech\-\armre
+    \armini\or
+  \armho\armvo\armken\-\armtyun\armyech\armmen\-\armben\armyech\-\armre
+    \armini\or
+  \armnu\armvo\-\armhi\armyech\armmen\-\armben\armyech\-\armre\armini\or
+  \armda\armyech\armken\-\armtyun\armyech\armmen\-\armben\armyech\-\armre
+    \armini
+  \fi\ \number\year~\armto\armdot}%
+\def\armdate{\let\today\armtoday}%
+\def\armdateoff{\let\today\ArmTeX@Savedtoday}%
+\def\armhyph{\let\-\ArmTeX@Armdischyph
+             \let\@dischyph\ArmTeX@Armdischyph}%
+\def\armhyphoff{\let\-\ArmTeX@Saveddischyph
+                \let\@dischyph\ArmTeX@Saveddischyph}%
+\def\ArmTeX{{A\kern -0.08ex\raise 0.63ex\hbox{\smash{r}}\kern -0.22em%
+  \lower 0.43ex\hbox{m}\kern -0.16em\aroff\TeX}}%
+\def\latArmTeX{{Arm\kern -0.15em\TeX}}%
+%
+% Special symbols.
+%
+\chardef\textbraceleft=94
+\chardef\textbraceright=95
+\chardef\textdollar=36
+\chardef\texthash=35
+\chardef\textpercent=37
+\chardef\textand=38
+\chardef\textexclam=126
+\chardef\textquestion=127
+\chardef\textquotedblleft=92
+\chardef\textquotedblright=34
+\chardef\textemdash=125
+%
+% Armenian uppercase letters.
+%
+\chardef\Armayb=65
+\chardef\Armben=66
+\chardef\Armgim=71
+\chardef\Armda=68
+\chardef\Armyech=69
+\chardef\Armza=90
+\chardef\Arme=6
+\chardef\Armat=7
+\chardef\Armto=8
+\chardef\Armzhe=9
+\chardef\Armini=73
+\chardef\Armlyun=76
+\chardef\Armkhe=88
+\chardef\Armtsa=13
+\chardef\Armken=75
+\chardef\Armho=72
+\chardef\Armdza=3
+\chardef\Armghat=4
+\chardef\Armtche=5
+\chardef\Armmen=77
+\chardef\Armhi=89
+\chardef\Armnu=78
+\chardef\Armsha=10
+\chardef\Armvo=79
+\chardef\Armcha=11
+\chardef\Armpe=80
+\chardef\Armje=74
+\chardef\Armra=12
+\chardef\Armse=83
+\chardef\Armvev=86
+\chardef\Armtyun=84
+\chardef\Armre=82
+\chardef\Armtso=67
+\chardef\Armvyun=87
+\chardef\Armvovyun=85
+\chardef\Armpyur=14
+\chardef\Armke=81
+\chardef\Armo=15
+\chardef\Armfe=70
+%
+% Armenian lowercase letters.
+%
+\chardef\armayb=97
+\chardef\armben=98
+\chardef\armgim=103
+\chardef\armda=100
+\chardef\armyech=101
+\chardef\armza=122
+\chardef\arme=22
+\chardef\armat=23
+\chardef\armto=24
+\chardef\armzhe=25
+\chardef\armini=105
+\chardef\armlyun=108
+\chardef\armkhe=120
+\chardef\armtsa=29
+\chardef\armken=107
+\chardef\armho=104
+\chardef\armdza=19
+\chardef\armghat=20
+\chardef\armtche=21
+\chardef\armmen=109
+\chardef\armhi=121
+\chardef\armnu=110
+\chardef\armsha=26
+\chardef\armvo=111
+\chardef\armcha=27
+\chardef\armpe=112
+\chardef\armje=106
+\chardef\armra=28
+\chardef\armse=115
+\chardef\armvev=118
+\chardef\armtyun=116
+\chardef\armre=114
+\chardef\armtso=99
+\chardef\armvyun=119
+\chardef\armvovyun=117
+\chardef\armpyur=30
+\chardef\armke=113
+\chardef\armo=31
+\chardef\armfe=102
+%
+% Armenian special symbols.
+%
+\chardef\armparenright=40
+\chardef\armparenleft=41
+\chardef\armcomma=44
+\chardef\armfullstop=58
+\chardef\armquotright=62
+\chardef\armquotleft=60
+\chardef\armdot=46
+\chardef\armsep=96
+\chardef\armew=32
+\chardef\armendash=45
+\chardef\armyentamna=123
+\chardef\armapostrophe=39
+\chardef\armexclam=33
+\chardef\armaccent=124
+\chardef\armquestion=63
+\chardef\armeternity=18
+\chardef\armdram=17
+\chardef\armnum=2
+\def\armellipsis{...}%
+\def\armsection{\S}%
+%
+% Defining "\armemdash", which is diferent from "\textemdash" defined above.
+\def\armemdash{\leavevmode
+  \kern0.02em\vrule height0.4ex depth-0.25ex width0.8em\kern0.02em\relax}%
+%
+% Repeating "\armemdash" as "\textanjgic" for ArmTeX 2.0 compatibility.
+\def\textanjgic{\leavevmode
+  \kern0.02em\vrule height0.4ex depth-0.25ex width0.8em\kern0.02em\relax}%
+%
+% Defining the ligature breaking command "\armbl".
+\def\armbl{{\kern0pt}}%
+%
+% Repeating "\armbl" as "\textbreaklig" for ArmTeX 2.0 compatibility.
+\def\textbreaklig{{\kern0pt}}%
+%
+% Defining the uncondtional hyphenation command "\armuh"
+\def\armuh{\armyentamna\break}%
+%
+% Defining an internal symbol "\arm@abbrev".
+\chardef\arm@abbrev=1
+%
+% The command "\armabr" will put the "\arm@abbrev" symbol over its argument.
+% We don't use the "\accent" primitive, so "\armabr" works with transliterations.
+\newbox\armabr@boxa\newbox\armabr@boxb
+\def\armabr#1{\leavevmode
+  #1\setbox\armabr@boxa=\hbox{#1}%
+  \setbox\armabr@boxb=\hbox to\wd\armabr@boxa{\hss\arm@abbrev\hss}%
+  \kern -\wd\armabr@boxa\lower 1ex\hbox{\raise\ht\armabr@boxa\box\armabr@boxb}}%
+%
+% Finally, "\armabbrev" will produce the "\arm@abbrev" symbol alone.
+\def\armabbrev{\armabr{\phantom{\armhi}}\kern0.12em\relax}%
+%
+% Some shortcuts.
+%
+\let\?\textquestion
+\def\*{\ifmmode\ArmTeX@Savedstar\else\armbl\fi}%
+\def\!{\ifmmode\ArmTeX@Savedexclam\else\textexclam\fi}%
+\def\|{\ifmmode\ArmTeX@Savedbar\else\armemdash\fi}%
+\def\{{\ifmmode\lbrace\else\textbraceleft\relax\fi}%
+\def\}{\ifmmode\rbrace\else\textbraceright\relax\fi}%
+%
+% Redefining \vdots and \ddots.
+%
+\def\vdots{\vbox{\baselineskip4\p@ \lineskiplimit\z@
+  \kern6\p@\hbox{$\ldotp$}\hbox{$\ldotp$}\hbox{$\ldotp$}}}%
+\def\ddots{\mathinner{\mkern1mu\raise7\p@
+  \vbox{\kern7\p@\hbox{$\ldotp$}}\mkern2mu
+  \raise4\p@\hbox{$\ldotp$}\mkern2mu\raise\p@\hbox{$\ldotp$}\mkern1mu}}%
+%%
+%%
+%% Font changing macros.
+%%
+\let\arofffont=\rm
+\def\aroff{\armhyphoff\arofffont}%
+%
+\def\ArmTeX@DeclarePlainFont#1#2#3{%
+  \font #1=#2\hyphenchar #1=-1\dimen0=\fontdimen3 #1\expandafter
+  \ifx\csname armloosespace\endcsname\relax\else
+    \ifnum\armloosespace>1\fontdimen3 #1=\armloosespace\dimen0\fi
+  \fi
+  \def#3{\armhyph #1}}%
+%
+\ArmTeX@DeclarePlainFont{\tenartmrm}{artmr10}{\artm}%
+\ArmTeX@DeclarePlainFont{\tenartmbf}{artmb10}{\artmbf}%
+\ArmTeX@DeclarePlainFont{\tenartmsl}{artmsl10}{\artmsl}%
+\ArmTeX@DeclarePlainFont{\tenartmbfsl}{artmbs10}{\artmbfsl}%
+\ArmTeX@DeclarePlainFont{\tenartmit}{artmi10}{\artmit}%
+\ArmTeX@DeclarePlainFont{\tenartmbfit}{artmbi10}{\artmbfit}%
+\ArmTeX@DeclarePlainFont{\tenarssrm}{arssr10}{\arss}%
+\ArmTeX@DeclarePlainFont{\tenarsssl}{arsssl10}{\arsssl}%
+\ArmTeX@DeclarePlainFont{\tenarssbf}{arssb10}{\arssbf}%
+\ArmTeX@DeclarePlainFont{\tenarssbfsl}{arssbs10}{\arssbfsl}%
+%%
+%%
+%% Armenian numerals related macros.
+%%
+\newcount\armnumeralcount
+\newcount\armnu@cta
+\newcount\armnu@ctb
+\newcount\armnu@ctc
+\def\armnu@gobcha{\let\armnu@cha= }%
+\def\armnu@gobchb{\let\armnu@chb= }%
+\def\armnu@skip#1\armnu@nil{\relax}%
+%
+% Arabic to Armenian macro (\armnumeral).
+%
+\def\armnu@units{\ifcase\armnu@cta\or
+  \Armayb\or
+  \Armben\or
+  \Armgim\or
+  \Armda\or
+  \Armyech\or
+  \Armza\or
+  \Arme\or
+  \Armat\or
+  \Armto\fi
+}%
+%
+\def\armnu@tens{\ifcase\armnu@cta\or
+  \Armzhe\or
+  \Armini\or
+  \Armlyun\or
+  \Armkhe\or
+  \Armtsa\or
+  \Armken\or
+  \Armho\or
+  \Armdza\or
+  \Armghat\fi
+}%
+%
+\def\armnu@hundreds{\ifcase\armnu@cta\or
+  \Armtche\or
+  \Armmen\or
+  \Armhi\or
+  \Armnu\or
+  \Armsha\or
+  \Armvo\or
+  \Armcha\or
+  \Armpe\or
+  \Armje\fi
+}%
+%
+\def\armnu@thousands{\ifcase\armnu@cta\or
+  \Armra\or
+  \Armse\or
+  \Armvev\or
+  \Armtyun\or
+  \Armre\or
+  \Armtso\or
+  \Armvyun\or
+  \Armpyur\or
+  \Armke\fi
+}%
+%
+\def\armnumeral@base#1{%
+  \armnu@cta = #1
+  \armnu@ctb = #1
+  \divide\armnu@cta by 1000
+  \armnu@thousands
+  \multiply\armnu@cta by -1000
+  \advance\armnu@ctb by \armnu@cta
+  \armnu@cta=\armnu@ctb
+  \divide\armnu@cta by 100
+  \armnu@hundreds
+  \multiply\armnu@cta by -100
+  \advance\armnu@ctb by \armnu@cta
+  \armnu@cta=\armnu@ctb
+  \divide\armnu@cta by 10
+  \armnu@tens
+  \multiply\armnu@cta by -10
+  \advance\armnu@ctb by \armnu@cta
+  \armnu@cta=\armnu@ctb
+  \armnu@units
+}%
+%
+\def\armnumeral@aux{\afterassignment\armnumeral@loop\armnu@gobcha}%
+%
+\def\armnumeral@loop{%
+  \let\armnu@next=\armnumeral@aux
+  \ifx\armnu@cha\armnu@nil
+    \let\armnu@next=\relax
+  \else
+    \advance\armnumeralcount by 1
+    \if 0\armnu@cha
+    \else
+    \let\armnu@tmpb = 1\relax
+    \if 1\armnu@cha
+    \else
+    \if 2\armnu@cha
+    \else
+    \if 3\armnu@cha
+    \else
+    \if 4\armnu@cha
+    \else
+    \if 5\armnu@cha
+    \else
+    \if 6\armnu@cha
+    \else
+    \if 7\armnu@cha
+    \else
+    \if 8\armnu@cha
+    \else
+    \if 9\armnu@cha
+    \else
+    \let\armnu@tmpb = 0\relax
+    \let\armnu@next=\armnu@skip
+    \fi\fi\fi\fi\fi\fi\fi\fi\fi\fi
+  \fi
+  \armnu@next
+}%
+%
+\def\armnumeral@auxbis#1{%
+  \ifnum\armnumeralcount = 0
+    \hbox{\vphantom{\Armho}\armnumeral@base{#1}\vphantom{\Armnu}}%
+  \else
+    \advance\armnumeralcount by -1
+    \hbox{$\overline{\hbox{\armnumeral@auxbis{#1}}}\mathsurround 0pt$}%
+  \fi
+}%
+%
+\def\armnumeral@loopbis#1#2#3#4#5\armnu@nil{%
+  \armnumeralcount=\armnu@ctc
+  \ifnum\armnu@ctc > 0
+    \armnumeral@auxbis{#1#2#3#4}%
+    \advance\armnu@ctc by -1
+    \armnumeral@loopbis #5\armnu@nil
+  \else
+    \armnumeral@auxbis{#1#2#3#4}%
+  \fi
+}%
+%
+\def\armnumeral#1{\edef\armnu@tmpa{#1}\armnumeralcount = 0
+  \let\armnu@tmpb = 0\relax
+  \expandafter\armnumeral@aux\armnu@tmpa\armnu@nil
+  \if 0\armnu@tmpb
+    \errmessage{Invalid argument in \string\armnumeral}%
+  \else
+    \leavevmode
+    \armnu@ctc=\armnumeralcount
+    \divide\armnu@ctc by 4
+    \multiply\armnu@ctc by -4
+    \advance\armnumeralcount by \armnu@ctc
+    \divide\armnu@ctc by -4
+    \ifnum\armnumeralcount = 0
+      \advance\armnu@ctc by -1
+    \fi
+    \edef\armnu@tmpa{\ifcase\armnumeralcount\or000\or00\or0\fi #1}%
+    \expandafter\armnumeral@loopbis\armnu@tmpa\armnu@nil
+  \fi
+}%
+%
+% Armenian to Arabic macro (\unarmnumeral).
+%
+\def\armnu@setchb#1{\edef\armnu@tmpb{#1}\expandafter\armnu@gobchb\armnu@tmpb}%
+%
+\def\armnu@chaval{%
+  \armnu@setchb{\Armayb}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 1
+  \else
+  \armnu@setchb{\Armben}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 2
+  \else
+  \armnu@setchb{\Armgim}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 3
+  \else
+  \armnu@setchb{\Armda}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 4
+  \else
+  \armnu@setchb{\Armyech}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 5
+  \else
+  \armnu@setchb{\Armza}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 6
+  \else
+  \armnu@setchb{\Arme}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 7
+  \else
+  \armnu@setchb{\Armat}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 8
+  \else
+  \armnu@setchb{\Armto}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 0\armnu@ctb = 9
+  \else
+  \armnu@setchb{\Armzhe}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 10
+  \else
+  \armnu@setchb{\Armini}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 20
+  \else
+  \armnu@setchb{\Armlyun}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 30
+  \else
+  \armnu@setchb{\Armkhe}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 40
+  \else
+  \armnu@setchb{\Armtsa}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 50
+  \else
+  \armnu@setchb{\Armken}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 60
+  \else
+  \armnu@setchb{\Armho}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 70
+  \else
+  \armnu@setchb{\Armdza}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 80
+  \else
+  \armnu@setchb{\Armghat}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 1\armnu@ctb = 90
+  \else
+  \armnu@setchb{\Armtche}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 100
+  \else
+  \armnu@setchb{\Armmen}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 200
+  \else
+  \armnu@setchb{\Armhi}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 300
+  \else
+  \armnu@setchb{\Armnu}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 400
+  \else
+  \armnu@setchb{\Armsha}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 500
+  \else
+  \armnu@setchb{\Armvo}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 600
+  \else
+  \armnu@setchb{\Armcha}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 700
+  \else
+  \armnu@setchb{\Armpe}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 800
+  \else
+  \armnu@setchb{\Armje}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 2\armnu@ctb = 900
+  \else
+  \armnu@setchb{\Armra}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 1000
+  \else
+  \armnu@setchb{\Armse}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 2000
+  \else
+  \armnu@setchb{\Armvev}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 3000
+  \else
+  \armnu@setchb{\Armtyun}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 4000
+  \else
+  \armnu@setchb{\Armre}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 5000
+  \else
+  \armnu@setchb{\Armtso}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 6000
+  \else
+  \armnu@setchb{\Armvyun}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 7000
+  \else
+  \armnu@setchb{\Armpyur}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 8000
+  \else
+  \armnu@setchb{\Armke}\ifx\armnu@cha\armnu@chb
+  \armnu@cta = 3\armnu@ctb = 9000
+  \else
+  \armnu@cta = 4
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi
+  \fi\fi\fi\fi\fi\fi\fi\fi\fi
+}%
+%
+\def\unarmnumeral@aux{\afterassignment\unarmnumeral@loop\armnu@gobcha}%
+%
+\def\unarmnumeral@loop{%
+  \ifx\armnu@cha\armnu@nil
+    \let\armnu@next=\relax
+  \else
+    \armnu@chaval
+    \ifnum\armnu@cta<\armnu@ctc
+      \advance\armnumeralcount by \armnu@ctb
+      \armnu@ctc=\armnu@cta
+      \let\armnu@next=\unarmnumeral@aux
+    \else
+      \errmessage{Invalid argument in \string\unarmnumeral}%
+      \armnumeralcount=0\relax
+      \let\armnu@next=\armnu@skip
+    \fi
+  \fi
+  \armnu@next
+}%
+%
+\def\unarmnumeral@star*#1{\edef\armnu@tmpa{#1}\armnumeralcount = 0
+  \armnu@ctc = 4\armnu@cta = 0\armnu@ctb = 0
+  \expandafter\unarmnumeral@aux\armnu@tmpa\armnu@nil
+}%
+%
+\def\unarmnumeral@nonstar#1{\unarmnumeral@star*{#1}\the\armnumeralcount}%
+%
+\let\Arm@optionalstar=*\relax
+\def\unarmnumeral@auxbis{%
+   \ifx\Arm@nextchar\Arm@optionalstar
+     \expandafter\unarmnumeral@star
+   \else
+     \expandafter\unarmnumeral@nonstar
+   \fi
+}%
+%
+\def\unarmnumeral{\futurelet\Arm@nextchar\unarmnumeral@auxbis}%
+%%
+%%
+%% If possible, setting up ToUnicode tables in order to make pdf files
+%% generated by pdf(la)tex "searchable and copyable" in pdf viewers.
+%%
+\expandafter\ifx\csname pdfglyphtounicode\endcsname\relax\else
+\expandafter\ifx\csname pdfgentounicode\endcsname\relax\else
+\pdfgentounicode=1
+%
+% Upper-case letters.
+%
+\pdfglyphtounicode{Armayb}{0531}%
+\pdfglyphtounicode{Armben}{0532}%
+\pdfglyphtounicode{Armgim}{0533}%
+\pdfglyphtounicode{Armda}{0534}%
+\pdfglyphtounicode{Armyech}{0535}%
+\pdfglyphtounicode{Armza}{0536}%
+\pdfglyphtounicode{Arme}{0537}%
+\pdfglyphtounicode{Armat}{0538}%
+\pdfglyphtounicode{Armto}{0539}%
+\pdfglyphtounicode{Armzhe}{053A}%
+\pdfglyphtounicode{Armini}{053B}%
+\pdfglyphtounicode{Armlyun}{053C}%
+\pdfglyphtounicode{Armkhe}{053D}%
+\pdfglyphtounicode{Armtsa}{053E}%
+\pdfglyphtounicode{Armken}{053F}%
+\pdfglyphtounicode{Armho}{0540}%
+\pdfglyphtounicode{Armdza}{0541}%
+\pdfglyphtounicode{Armghat}{0542}%
+\pdfglyphtounicode{Armtche}{0543}%
+\pdfglyphtounicode{Armmen}{0544}%
+\pdfglyphtounicode{Armhi}{0545}%
+\pdfglyphtounicode{Armnu}{0546}%
+\pdfglyphtounicode{Armsha}{0547}%
+\pdfglyphtounicode{Armvo}{0548}%
+\pdfglyphtounicode{Armcha}{0549}%
+\pdfglyphtounicode{Armpe}{054A}%
+\pdfglyphtounicode{Armje}{054B}%
+\pdfglyphtounicode{Armra}{054C}%
+\pdfglyphtounicode{Armse}{054D}%
+\pdfglyphtounicode{Armvev}{054E}%
+\pdfglyphtounicode{Armtyun}{054F}%
+\pdfglyphtounicode{Armre}{0550}%
+\pdfglyphtounicode{Armtso}{0551}%
+\pdfglyphtounicode{Armvyun}{0552}%
+\pdfglyphtounicode{Armvovyun}{0548 0552}%
+\pdfglyphtounicode{Armpyur}{0553}%
+\pdfglyphtounicode{Armke}{0554}%
+\pdfglyphtounicode{Armo}{0555}%
+\pdfglyphtounicode{Armfe}{0556}%
+%
+% Lower-case letters.
+%
+\pdfglyphtounicode{armayb}{0561}%
+\pdfglyphtounicode{armben}{0562}%
+\pdfglyphtounicode{armgim}{0563}%
+\pdfglyphtounicode{armda}{0564}%
+\pdfglyphtounicode{armyech}{0565}%
+\pdfglyphtounicode{armza}{0566}%
+\pdfglyphtounicode{arme}{0567}%
+\pdfglyphtounicode{armat}{0568}%
+\pdfglyphtounicode{armto}{0569}%
+\pdfglyphtounicode{armzhe}{056A}%
+\pdfglyphtounicode{armini}{056B}%
+\pdfglyphtounicode{armlyun}{056C}%
+\pdfglyphtounicode{armkhe}{056D}%
+\pdfglyphtounicode{armtsa}{056E}%
+\pdfglyphtounicode{armken}{056F}%
+\pdfglyphtounicode{armho}{0570}%
+\pdfglyphtounicode{armdza}{0571}%
+\pdfglyphtounicode{armghat}{0572}%
+\pdfglyphtounicode{armtche}{0573}%
+\pdfglyphtounicode{armmen}{0574}%
+\pdfglyphtounicode{armhi}{0575}%
+\pdfglyphtounicode{armnu}{0576}%
+\pdfglyphtounicode{armsha}{0577}%
+\pdfglyphtounicode{armvo}{0578}%
+\pdfglyphtounicode{armcha}{0579}%
+\pdfglyphtounicode{armpe}{057A}%
+\pdfglyphtounicode{armje}{057B}%
+\pdfglyphtounicode{armra}{057C}%
+\pdfglyphtounicode{armse}{057D}%
+\pdfglyphtounicode{armvev}{057E}%
+\pdfglyphtounicode{armtyun}{057F}%
+\pdfglyphtounicode{armre}{0580}%
+\pdfglyphtounicode{armtso}{0581}%
+\pdfglyphtounicode{armvyun}{0582}%
+\pdfglyphtounicode{armvovyun}{0578 0582}%
+\pdfglyphtounicode{armpyur}{0583}%
+\pdfglyphtounicode{armke}{0584}%
+\pdfglyphtounicode{armo}{0585}%
+\pdfglyphtounicode{armfe}{0586}%
+%
+% Glyphs from Armenian unicode block.
+%
+\pdfglyphtounicode{armfullstop}{0589}%
+\pdfglyphtounicode{armsep}{055D}%
+\pdfglyphtounicode{armyentamna}{058A}%
+\pdfglyphtounicode{armexclam}{055C}%
+\pdfglyphtounicode{armaccent}{055B}%
+\pdfglyphtounicode{armquestion}{055E}%
+\pdfglyphtounicode{armapostrophe}{055A}%
+\pdfglyphtounicode{armew}{0587}%
+\pdfglyphtounicode{armabbrev}{055F}%
+\pdfglyphtounicode{armnum}{0559}%
+\pdfglyphtounicode{armdram}{058F}%
+%
+% Other glyphs not placed in accordance with ASCII.
+%
+\pdfglyphtounicode{quotedblleft}{201C}%
+\pdfglyphtounicode{quotedblright}{201D}%
+\pdfglyphtounicode{armquotleft}{00AB}%
+\pdfglyphtounicode{armquotright}{00BB}%
+\pdfglyphtounicode{braceleft}{007B}%
+\pdfglyphtounicode{braceright}{007D}%
+\pdfglyphtounicode{emdash}{2014}%
+\pdfglyphtounicode{exclam}{0021}%
+\pdfglyphtounicode{question}{003F}%
+%
+% Treating the glyph armeternity (not present in unicode) as space.
+%
+\pdfglyphtounicode{armeternity}{0020}%
+\fi
+\fi
+%%
+%%
+%% Making '@' other.
+%%
+\catcode`\@=12
+%%
+%%
+%% That's all, Folks!
+%%
+\endinput
diff --git a/Master/texmf-dist/tex/plain/armenian/armkb-a8.tex b/Master/texmf-dist/tex/plain/armenian/armkb-a8.tex
new file mode 100644
index 00000000000..55f54259b4e
--- /dev/null
+++ b/Master/texmf-dist/tex/plain/armenian/armkb-a8.tex
@@ -0,0 +1,230 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%
+%% This is the `armkb-a8.tex' file (ArmSCII8 input encoding for plain).
+%%
+%% This file is a part of the ArmTeX project [2014/04/09 v3.0-beta3]
+%%
+%% ArmTeX is a system for writing in Armenian with plain TeX and/or LaTeX(2e).
+%%
+%% Copyright 1997 - 2013:
+%%   Serguei Dachian (Serguei.Dachian_AT_math.univ-bpclermont.fr),
+%%   Arnak Dalalyan  (arnak.dalalyan_AT_ensae.fr),
+%%   Vardan Akopian  (vakopian_AT_yahoo.com).
+%%
+%% ArmTeX 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 this license is in
+%%   http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of LaTeX version
+%% 2005/12/01 or later.
+%%
+%% ArmTeX has the LPPL maintenance status `author-maintained'.
+%%
+%% For more details, installation instructions and the complete list of files
+%% see the provided `readme.txt' file.
+%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+%
+%% Making '@' letter.
+%%
+\catcode`\@=11
+%
+%
+%% Begining of the code.
+%%
+\def\Arm@DeclareInputText#1#2{%
+  \bgroup
+    \uccode`\~#1%
+    \uppercase{%
+  \egroup
+    \catcode`~=13%
+    \def~%
+  }{#2}%
+}%
+%
+%
+%% Upper-case letters.
+%%
+\def\Arm@DeclareInputUcLetter#1#2{%
+  \Arm@DeclareInputText{#1}{#2}%
+  \count255=#1%
+  \advance\count255 by 1%
+  \uccode#1=#1%
+  \lccode#1=\count255%
+}%
+%
+\Arm@DeclareInputUcLetter{178}{\Armayb}%           Upper-case A  (Ayb)  letter.
+\Arm@DeclareInputUcLetter{180}{\Armben}%           Upper-case B  (Ben)  letter.
+\Arm@DeclareInputUcLetter{182}{\Armgim}%           Upper-case G  (Gim)  letter.
+\Arm@DeclareInputUcLetter{184}{\Armda}%            Upper-case D  (Da)   letter.
+\Arm@DeclareInputUcLetter{186}{\Armyech}%          Upper-case E  (Yech) letter.
+\Arm@DeclareInputUcLetter{188}{\Armza}%            Upper-case Z  (Za)   letter.
+\Arm@DeclareInputUcLetter{190}{\Arme}%             Upper-case E' (E)    letter.
+\Arm@DeclareInputUcLetter{192}{\Armat}%            Upper-case U' (At)   letter.
+\Arm@DeclareInputUcLetter{194}{\Armto}%            Upper-case TH (To)   letter.
+\Arm@DeclareInputUcLetter{196}{\Armzhe}%           Upper-case G' (Zhe)  letter.
+\Arm@DeclareInputUcLetter{198}{\Armini}%           Upper-case I  (Ini)  letter.
+\Arm@DeclareInputUcLetter{200}{\Armlyun}%          Upper-case L  (Lyun) letter.
+\Arm@DeclareInputUcLetter{202}{\Armkhe}%           Upper-case X  (Khe)  letter.
+\Arm@DeclareInputUcLetter{204}{\Armtsa}%           Upper-case C' (Tsa)  letter.
+\Arm@DeclareInputUcLetter{206}{\Armken}%           Upper-case K  (Ken)  letter.
+\Arm@DeclareInputUcLetter{208}{\Armho}%            Upper-case H  (Ho)   letter.
+\Arm@DeclareInputUcLetter{210}{\Armdza}%           Upper-case DZ (Dza)  letter.
+\Arm@DeclareInputUcLetter{212}{\Armghat}%          Upper-case GH (Ghat) letter.
+\Arm@DeclareInputUcLetter{214}{\Armtche}%          Upper-case J' (Tche) letter.
+\Arm@DeclareInputUcLetter{216}{\Armmen}%           Upper-case M  (Men)  letter.
+\Arm@DeclareInputUcLetter{218}{\Armhi}%            Upper-case Y  (Hi)   letter.
+\Arm@DeclareInputUcLetter{220}{\Armnu}%            Upper-case N  (Nu)   letter.
+\Arm@DeclareInputUcLetter{222}{\Armsha}%           Upper-case SH (Sha)  letter.
+\Arm@DeclareInputUcLetter{224}{\Armvo}%            Upper-case O  (Vo)   letter.
+\Arm@DeclareInputUcLetter{226}{\Armcha}%           Upper-case CH (Cha)  letter.
+\Arm@DeclareInputUcLetter{228}{\Armpe}%            Upper-case P  (Pe)   letter.
+\Arm@DeclareInputUcLetter{230}{\Armje}%            Upper-case J  (Je)   letter.
+\Arm@DeclareInputUcLetter{232}{\Armra}%            Upper-case R' (Ra)   letter.
+\Arm@DeclareInputUcLetter{234}{\Armse}%            Upper-case S  (Se)   letter.
+\Arm@DeclareInputUcLetter{236}{\Armvev}%           Upper-case V  (Vev)  letter.
+\Arm@DeclareInputUcLetter{238}{\Armtyun}%          Upper-case T  (Tyun) letter.
+\Arm@DeclareInputUcLetter{240}{\Armre}%            Upper-case R  (Re)   letter.
+\Arm@DeclareInputUcLetter{242}{\Armtso}%           Upper-case C  (Tso)  letter.
+\Arm@DeclareInputUcLetter{244}{\Armvyun}%          Upper-case W  (Vyun) letter.
+\Arm@DeclareInputUcLetter{246}{\Armpyur}%          Upper-case PH (Pyur) letter.
+\Arm@DeclareInputUcLetter{248}{\Armke}%            Upper-case Q  (Ke)   letter.
+\Arm@DeclareInputUcLetter{250}{\Armo}%             Upper-case O' (O)    letter.
+\Arm@DeclareInputUcLetter{252}{\Armfe}%            Upper-case F  (Fe)   letter.
+%
+%
+%% Lower-case letters.
+%%
+\def\Arm@DeclareInputLcLetter#1#2{%
+  \Arm@DeclareInputText{#1}{#2}%
+  \count255=#1%
+  \advance\count255 by -1%
+  \lccode#1=#1%
+  \uccode#1=\count255%
+}%
+%
+\Arm@DeclareInputLcLetter{179}{\armayb}%           Lower-case a  (ayb)  letter.
+\Arm@DeclareInputLcLetter{181}{\armben}%           Lower-case b  (ben)  letter.
+\Arm@DeclareInputLcLetter{183}{\armgim}%           Lower-case g  (gim)  letter.
+\Arm@DeclareInputLcLetter{185}{\armda}%            Lower-case d  (da)   letter.
+\Arm@DeclareInputLcLetter{187}{\armyech}%          Lower-case e  (eych) letter.
+\Arm@DeclareInputLcLetter{189}{\armza}%            Lower-case z  (za)   letter.
+\Arm@DeclareInputLcLetter{191}{\arme}%             Lower-case e' (e)    letter.
+\Arm@DeclareInputLcLetter{193}{\armat}%            Lower-case u' (at)   letter.
+\Arm@DeclareInputLcLetter{195}{\armto}%            Lower-case th (to)   letter.
+\Arm@DeclareInputLcLetter{197}{\armzhe}%           Lower-case g' (zhe)  letter.
+\Arm@DeclareInputLcLetter{199}{\armini}%           Lower-case i  (ini)  letter.
+\Arm@DeclareInputLcLetter{201}{\armlyun}%          Lower-case l  (lyun) letter.
+\Arm@DeclareInputLcLetter{203}{\armkhe}%           Lower-case x  (khe)  letter.
+\Arm@DeclareInputLcLetter{205}{\armtsa}%           Lower-case c' (tsa)  letter.
+\Arm@DeclareInputLcLetter{207}{\armken}%           Lower-case k  (ken)  letter.
+\Arm@DeclareInputLcLetter{209}{\armho}%            Lower-case h  (ho)   letter.
+\Arm@DeclareInputLcLetter{211}{\armdza}%           Lower-case dz (dza)  letter.
+\Arm@DeclareInputLcLetter{213}{\armghat}%          Lower-case gh (ghat) letter.
+\Arm@DeclareInputLcLetter{215}{\armtche}%          Lower-case j' (tche) letter.
+\Arm@DeclareInputLcLetter{217}{\armmen}%           Lower-case m  (men)  letter.
+\Arm@DeclareInputLcLetter{219}{\armhi}%            Lower-case y  (hi)   letter.
+\Arm@DeclareInputLcLetter{221}{\armnu}%            Lower-case n  (nu)   letter.
+\Arm@DeclareInputLcLetter{223}{\armsha}%           Lower-case sh (sha)  letter.
+\Arm@DeclareInputLcLetter{225}{\armvo}%            Lower-case o  (vo)   letter.
+\Arm@DeclareInputLcLetter{227}{\armcha}%           Lower-case ch (cha)  letter.
+\Arm@DeclareInputLcLetter{229}{\armpe}%            Lower-case p  (pe)   letter.
+\Arm@DeclareInputLcLetter{231}{\armje}%            Lower-case j  (je)   letter.
+\Arm@DeclareInputLcLetter{233}{\armra}%            Lower-case r' (ra)   letter.
+\Arm@DeclareInputLcLetter{235}{\armse}%            Lower-case s  (se)   letter.
+\Arm@DeclareInputLcLetter{237}{\armvev}%           Lower-case v  (vev)  letter.
+\Arm@DeclareInputLcLetter{239}{\armtyun}%          Lower-case t  (tyun) letter.
+\Arm@DeclareInputLcLetter{241}{\armre}%            Lower-case r  (re)   letter.
+\Arm@DeclareInputLcLetter{243}{\armtso}%           Lower-case c  (tso)  letter.
+\Arm@DeclareInputLcLetter{245}{\armvyun}%          Lower-case w  (vyun) letter.
+\Arm@DeclareInputLcLetter{247}{\armpyur}%          Lower-case ph (pyur) letter.
+\Arm@DeclareInputLcLetter{249}{\armke}%            Lower-case q  (ke)   letter.
+\Arm@DeclareInputLcLetter{251}{\armo}%             Lower-case o' (o)    letter.
+\Arm@DeclareInputLcLetter{253}{\armfe}%            Lower-case f  (fe)   letter.
+%
+%
+%% Miscelanious symbols.
+%%
+\Arm@DeclareInputText{160}{~}%                 Non-breakable space             symbol.
+\Arm@DeclareInputText{161}{\armeternity}%      Eternity (armeternity)          symbol.
+\Arm@DeclareInputText{162}{\armsection}%       Section sign (armsection)       symbol.
+\Arm@DeclareInputText{163}{\armfullstop}%      Verjaket (armfullstop)          symbol.
+\Arm@DeclareInputText{164}{\armparenright}%    Aj phakagic' (armparenright)    symbol.
+\Arm@DeclareInputText{165}{\armparenleft}%     Dzax phakagic' (armparenleft)   symbol.
+\Arm@DeclareInputText{166}{\armquotright}%     Aj chakert (armquotright)       symbol.
+\Arm@DeclareInputText{167}{\armquotleft}%      Dzax chakert(armquotleft)       symbol.
+\Arm@DeclareInputText{168}{\armemdash}%        Anjatman gic' (armemdash)       symbol.
+\Arm@DeclareInputText{169}{\armdot}%           Mijaket (armdot)                symbol.
+\Arm@DeclareInputText{170}{\armsep}%           Buth (armsep)                   symbol.
+\Arm@DeclareInputText{171}{\armcomma}%         Storaket (armcoma)              symbol.
+\Arm@DeclareInputText{172}{\armendash}%        Miuthyan gc'ik (armendash)      symbol.
+\Arm@DeclareInputText{173}{\armyentamna}%      Toghadardzi nshan (armyentamna) symbol.
+\Arm@DeclareInputText{174}{\armellipsis}%      Kaxman keter (armellipsis)      symbol.
+\Arm@DeclareInputText{175}{\armexclam}%        Bacakanchakan nshan (armexclam) symbol.
+\Arm@DeclareInputText{176}{\armaccent}%        Shesht (armaccent)              symbol.
+\Arm@DeclareInputText{177}{\armquestion}%      Harcakan nshan (armquestion)    symbol.
+\Arm@DeclareInputText{254}{\armapostrophe}%    Apatharc (armapostrophe)        symbol.
+% Coding "armapostrophe" as 255 (except as 254), since it can
+% be found in that position in many ArmSCII8 fonts.
+\Arm@DeclareInputText{255}{\armapostrophe}%    Apatharc (armapostrophe)        symbol.
+%
+%
+%% Providing a command to define armew.
+%%
+\def\definearmew@error@a{%
+  \errmessage{Character used to define armew must have a charcode between 128
+  and 255}%
+}%
+%
+\def\definearmew@error@b{%
+  \errmessage{Optional argument of \noexpand\definearmew must differ from the
+  character's charcode}%
+}%
+%
+\def\definearmew@error@c{%
+  \errmessage{Optional argument of \noexpand\definearmew must be between 128
+  and 255}%
+}%
+%
+\def\Arm@definearmew@two[#1]#2{%
+  \count255=`#2\relax
+  \ifnum \count255 < 128\definearmew@error@a\else
+  \ifnum \count255 > 255\definearmew@error@a\else
+  \ifnum \count255 = #1\definearmew@error@b\else
+  \ifnum #1 < 128\definearmew@error@c\else
+  \ifnum #1 > 255\definearmew@error@c\else
+  \Arm@DeclareInputText{\count255}{\armew}%
+  \Arm@DeclareInputText{#1}{\Armyech\Armvev}%
+  \uccode\count255=#1%
+  \lccode\count255=\count255%
+  \uccode#1=#1%
+  \lccode#1=\count255%
+  \fi\fi\fi\fi\fi
+}%
+%
+\def\Arm@definearmew@one#1{%
+  \Arm@definearmew@two[159]{#1}%
+}%
+%
+\let\Arm@leftbracket=[\relax
+\def\definearmew{\futurelet\Arm@nextchar\Arm@definearmew}%
+\def\Arm@definearmew{%
+  \ifx\Arm@nextchar\Arm@leftbracket
+    \expandafter\Arm@definearmew@two
+  \else
+    \expandafter\Arm@definearmew@one
+  \fi
+}%
+%
+%
+%% Making '@' other.
+%%
+\catcode`\@=12
+%
+%
+%% That's all, Folks!
+%%
+\endinput
diff --git a/Master/texmf-dist/tex/plain/armenian/armkb-u8.tex b/Master/texmf-dist/tex/plain/armenian/armkb-u8.tex
new file mode 100644
index 00000000000..a28bdd5107a
--- /dev/null
+++ b/Master/texmf-dist/tex/plain/armenian/armkb-u8.tex
@@ -0,0 +1,381 @@
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%%
+%% This is the `armkb-u8.tex' file (Armenian UTF-8 input encoding for plain).
+%%
+%% This file is a part of the ArmTeX project [2014/04/09 v3.0-beta3]
+%%
+%% ArmTeX is a system for writing in Armenian with plain TeX and/or LaTeX(2e).
+%%
+%% Copyright 1997 - 2013:
+%%   Serguei Dachian (Serguei.Dachian_AT_math.univ-bpclermont.fr),
+%%   Arnak Dalalyan  (arnak.dalalyan_AT_ensae.fr),
+%%   Vardan Akopian  (vakopian_AT_yahoo.com).
+%%
+%% ArmTeX 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 this license is in
+%%   http://www.latex-project.org/lppl.txt
+%% and version 1.3 or later is part of all distributions of LaTeX version
+%% 2005/12/01 or later.
+%%
+%% ArmTeX has the LPPL maintenance status `author-maintained'.
+%%
+%% For more details, installation instructions and the complete list of files
+%% see the provided `readme.txt' file.
+%%
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+%
+%
+%% Begining of the code.
+%%
+\catcode`^^c2=13%
+\catcode`^^d4=13%
+\catcode`^^d5=13%
+\catcode`^^d6=13%
+\catcode`^^e2=13%
+\catcode`^^ef=13%
+\def^^c2#1#2{\expandafter\def\csname c2:#1\endcsname{#2}}%
+\def^^d4#1#2{\expandafter\def\csname d4:#1\endcsname{#2}}%
+\def^^d5#1#2{\expandafter\def\csname d5:#1\endcsname{#2}}%
+\def^^d6#1#2{\expandafter\def\csname d6:#1\endcsname{#2}}%
+\def^^e2#1#2#3{\expandafter\def\csname e2:#1#2\endcsname{#3}}%
+\def^^ef#1#2#3{\expandafter\def\csname ef:#1#2\endcsname{#3}}%
+%
+%
+%% Upper-case letters.
+%%
+^^d4^^b1{\Armayb}%           Upper-case A  (Ayb)  letter.
+^^d4^^b2{\Armben}%           Upper-case B  (Ben)  letter.
+^^d4^^b3{\Armgim}%           Upper-case G  (Gim)  letter.
+^^d4^^b4{\Armda}%            Upper-case D  (Da)   letter.
+^^d4^^b5{\Armyech}%          Upper-case E  (Yech) letter.
+^^d4^^b6{\Armza}%            Upper-case Z  (Za)   letter.
+^^d4^^b7{\Arme}%             Upper-case E' (E)    letter.
+^^d4^^b8{\Armat}%            Upper-case U' (At)   letter.
+^^d4^^b9{\Armto}%            Upper-case TH (To)   letter.
+^^d4^^ba{\Armzhe}%           Upper-case G' (Zhe)  letter.
+^^d4^^bb{\Armini}%           Upper-case I  (Ini)  letter.
+^^d4^^bc{\Armlyun}%          Upper-case L  (Lyun) letter.
+^^d4^^bd{\Armkhe}%           Upper-case X  (Khe)  letter.
+^^d4^^be{\Armtsa}%           Upper-case C' (Tsa)  letter.
+^^d4^^bf{\Armken}%           Upper-case K  (Ken)  letter.
+^^d5^^80{\Armho}%            Upper-case H  (Ho)   letter.
+^^d5^^81{\Armdza}%           Upper-case DZ (Dza)  letter.
+^^d5^^82{\Armghat}%          Upper-case GH (Ghat) letter.
+^^d5^^83{\Armtche}%          Upper-case J' (Tche) letter.
+^^d5^^84{\Armmen}%           Upper-case M  (Men)  letter.
+^^d5^^85{\Armhi}%            Upper-case Y  (Hi)   letter.
+^^d5^^86{\Armnu}%            Upper-case N  (Nu)   letter.
+^^d5^^87{\Armsha}%           Upper-case SH (Sha)  letter.
+^^d5^^88{\Armvo}%            Upper-case O  (Vo)   letter.
+^^d5^^89{\Armcha}%           Upper-case CH (Cha)  letter.
+^^d5^^8a{\Armpe}%            Upper-case P  (Pe)   letter.
+^^d5^^8b{\Armje}%            Upper-case J  (Je)   letter.
+^^d5^^8c{\Armra}%            Upper-case R' (Ra)   letter.
+^^d5^^8d{\Armse}%            Upper-case S  (Se)   letter.
+^^d5^^8e{\Armvev}%           Upper-case V  (Vev)  letter.
+^^d5^^8f{\Armtyun}%          Upper-case T  (Tyun) letter.
+^^d5^^90{\Armre}%            Upper-case R  (Re)   letter.
+^^d5^^91{\Armtso}%           Upper-case C  (Tso)  letter.
+^^d5^^92{\Armvyun}%          Upper-case W  (Vyun) letter.
+^^d5^^93{\Armpyur}%          Upper-case PH (Pyur) letter.
+^^d5^^94{\Armke}%            Upper-case Q  (Ke)   letter.
+^^d5^^95{\Armo}%             Upper-case O' (O)    letter.
+^^d5^^96{\Armfe}%            Upper-case F  (Fe)   letter.
+%
+%
+%% Lower-case letters.
+%%
+^^d5^^a1{\armayb}%           Lower-case a  (ayb)  letter.
+^^d5^^a2{\armben}%           Lower-case b  (ben)  letter.
+^^d5^^a3{\armgim}%           Lower-case g  (gim)  letter.
+^^d5^^a4{\armda}%            Lower-case d  (da)   letter.
+^^d5^^a5{\armyech}%          Lower-case e  (eych) letter.
+^^d5^^a6{\armza}%            Lower-case z  (za)   letter.
+^^d5^^a7{\arme}%             Lower-case e' (e)    letter.
+^^d5^^a8{\armat}%            Lower-case u' (at)   letter.
+^^d5^^a9{\armto}%            Lower-case th (to)   letter.
+^^d5^^aa{\armzhe}%           Lower-case g' (zhe)  letter.
+^^d5^^ab{\armini}%           Lower-case i  (ini)  letter.
+^^d5^^ac{\armlyun}%          Lower-case l  (lyun) letter.
+^^d5^^ad{\armkhe}%           Lower-case x  (khe)  letter.
+^^d5^^ae{\armtsa}%           Lower-case c' (tsa)  letter.
+^^d5^^af{\armken}%           Lower-case k  (ken)  letter.
+^^d5^^b0{\armho}%            Lower-case h  (ho)   letter.
+^^d5^^b1{\armdza}%           Lower-case dz (dza)  letter.
+^^d5^^b2{\armghat}%          Lower-case gh (ghat) letter.
+^^d5^^b3{\armtche}%          Lower-case j' (tche) letter.
+^^d5^^b4{\armmen}%           Lower-case m  (men)  letter.
+^^d5^^b5{\armhi}%            Lower-case y  (hi)   letter.
+^^d5^^b6{\armnu}%            Lower-case n  (nu)   letter.
+^^d5^^b7{\armsha}%           Lower-case sh (sha)  letter.
+^^d5^^b8{\armvo}%            Lower-case o  (vo)   letter.
+^^d5^^b9{\armcha}%           Lower-case ch (cha)  letter.
+^^d5^^ba{\armpe}%            Lower-case p  (pe)   letter.
+^^d5^^bb{\armje}%            Lower-case j  (je)   letter.
+^^d5^^bc{\armra}%            Lower-case r' (ra)   letter.
+^^d5^^bd{\armse}%            Lower-case s  (se)   letter.
+^^d5^^be{\armvev}%           Lower-case v  (vev)  letter.
+^^d5^^bf{\armtyun}%          Lower-case t  (tyun) letter.
+^^d6^^80{\armre}%            Lower-case r  (re)   letter.
+^^d6^^81{\armtso}%           Lower-case c  (tso)  letter.
+^^d6^^82{\armvyun}%          Lower-case w  (vyun) letter.
+^^d6^^83{\armpyur}%          Lower-case ph (pyur) letter.
+^^d6^^84{\armke}%            Lower-case q  (ke)   letter.
+^^d6^^85{\armo}%             Lower-case o' (o)    letter.
+^^d6^^86{\armfe}%            Lower-case f  (fe)   letter.
+%
+%
+%% Miscelanious symbols.
+%%
+% Commenting the following line, since there is no "armeternity" in unicode.
+% ?{\armeternity}%             Eternity (armeternity)          symbol.
+%
+% Commenting the following three lines, since these are ASCII characters.
+% ^^29{\armparenright}%        Aj phakagic' (armparenright)    symbol.
+% ^^28{\armparenleft}%         Dzax phakagic' (armparenleft)   symbol.
+% ^^2c{\armcomma}%             Storaket (armcoma)              symbol.
+%
+^^d6^^89{\armfullstop}%      Verjaket (armfullstop)          symbol.
+^^d5^^9d{\armsep}%           Buth (armsep)                   symbol.
+^^d6^^8a{\armyentamna}%      Toghadardzi nshan (armyentamna) symbol.
+^^d5^^9c{\armexclam}%        Bacakanchakan nshan (armexclam) symbol.
+^^d5^^9b{\armaccent}%        Shesht (armaccent)              symbol.
+^^d5^^9e{\armquestion}%      Harcakan nshan (armquestion)    symbol.
+^^d5^^9a{\armapostrophe}%    Apatharc (armapostrophe)        symbol.
+^^d6^^87{\armew}%            Ligature ev (armew)             symbol.
+^^d5^^9f{\armabbrev}%        Patiw (armabbrev)               symbol.
+^^d5^^99{\armnum}%           Numeric mark (armnum)           symbol.
+^^d6^^8f{\armdram}%          Dram sign (armdram)             symbol.
+^^c2^^a7{\armsection}%       Section sign (armsection)       symbol.
+^^c2^^bb{\armquotright}%     Aj chakert (armquotright)       symbol.
+^^c2^^ab{\armquotleft}%      Dzax chakert(armquotleft)       symbol.
+^^e2^^80^^95{\armemdash}%    Anjatman gic' (armemdash)       symbol.
+% Coding "armemdash" also as U+2014 (except as U+2015) as an alternative.
+^^e2^^80^^94{\armemdash}%    Anjatman gic' (armemdash)       symbol.
+^^e2^^80^^a4{\armdot}%       Mijaket (armdot)                symbol.
+^^e2^^80^^90{\armendash}%    Miuthyan gc'ik (armendash)      symbol.
+^^e2^^80^^a6{\armellipsis}%  Kaxman keter (armellipsis)      symbol.
+%
+%
+%% Ligatures.
+%%
+^^ef^^ac^^93{\armmen\armnu}%     Lower-case men + nu   ligature.
+^^ef^^ac^^94{\armmen\armyech}%   Lower-case men + yech ligature.
+^^ef^^ac^^95{\armmen\armini}%    Lower-case men + ini  ligature.
+^^ef^^ac^^96{\armvev\armnu}%     Lower-case vev + nu   ligature.
+^^ef^^ac^^97{\armmen\armkhe}%    Lower-case men + khe  ligature.
+%
+%
+%% Activating all the above symbols
+%%
+\def^^c2#1{\csname c2:#1\endcsname}%
+\def^^d4#1{\csname d4:#1\endcsname}%
+\def^^d5#1{\csname d5:#1\endcsname}%
+\def^^d6#1{\csname d6:#1\endcsname}%
+\def^^e2#1#2{\csname e2:#1#2\endcsname}%
+\def^^ef#1#2{\csname ef:#1#2\endcsname}%
+%
+%
+%% Starting to set up uccodes and lccodes
+%%
+\uccode"D4="D4\lccode"D4="FC%
+\uccode"D5="FD\lccode"D5="FF%
+\uccode"D6="FE\lccode"D6="D6%
+\uccode"EF="FB\lccode"EF="EF%
+%
+\catcode`^^fb=13%
+\catcode`^^fc=13%
+\catcode`^^fd=13%
+\catcode`^^fe=13%
+\catcode`^^ff=13%
+\def^^fb#1#2#3{\expandafter\def\csname fb:#1#2\endcsname{#3}}%
+\def^^fc#1#2{\expandafter\def\csname fc:#1\endcsname{#2}}%
+\def^^fd#1#2{\expandafter\def\csname fd:#1\endcsname{#2}}%
+\def^^fe#1#2{\expandafter\def\csname fe:#1\endcsname{#2}}%
+\def^^ff#1#2{\expandafter\def\csname ff:#1\endcsname{#2}}%
+%
+%
+%% Lower-casing
+%%
+^^fc^^b1{\armayb}%           Lower-case a  (ayb)  letter.
+^^fc^^b2{\armben}%           Lower-case b  (ben)  letter.
+^^fc^^b3{\armgim}%           Lower-case g  (gim)  letter.
+^^fc^^b4{\armda}%            Lower-case d  (da)   letter.
+^^fc^^b5{\armyech}%          Lower-case e  (eych) letter.
+^^fc^^b6{\armza}%            Lower-case z  (za)   letter.
+^^fc^^b7{\arme}%             Lower-case e' (e)    letter.
+^^fc^^b8{\armat}%            Lower-case u' (at)   letter.
+^^fc^^b9{\armto}%            Lower-case th (to)   letter.
+^^fc^^ba{\armzhe}%           Lower-case g' (zhe)  letter.
+^^fc^^bb{\armini}%           Lower-case i  (ini)  letter.
+^^fc^^bc{\armlyun}%          Lower-case l  (lyun) letter.
+^^fc^^bd{\armkhe}%           Lower-case x  (khe)  letter.
+^^fc^^be{\armtsa}%           Lower-case c' (tsa)  letter.
+^^fc^^bf{\armken}%           Lower-case k  (ken)  letter.
+%
+^^fd^^80{\Armho}%            Upper-case H  (Ho)   letter.
+^^fd^^81{\Armdza}%           Upper-case DZ (Dza)  letter.
+^^fd^^82{\Armghat}%          Upper-case GH (Ghat) letter.
+^^fd^^83{\Armtche}%          Upper-case J' (Tche) letter.
+^^fd^^84{\Armmen}%           Upper-case M  (Men)  letter.
+^^fd^^85{\Armhi}%            Upper-case Y  (Hi)   letter.
+^^fd^^86{\Armnu}%            Upper-case N  (Nu)   letter.
+^^fd^^87{\Armsha}%           Upper-case SH (Sha)  letter.
+^^fd^^88{\Armvo}%            Upper-case O  (Vo)   letter.
+^^fd^^89{\Armcha}%           Upper-case CH (Cha)  letter.
+^^fd^^8a{\Armpe}%            Upper-case P  (Pe)   letter.
+^^fd^^8b{\Armje}%            Upper-case J  (Je)   letter.
+^^fd^^8c{\Armra}%            Upper-case R' (Ra)   letter.
+^^fd^^8d{\Armse}%            Upper-case S  (Se)   letter.
+^^fd^^8e{\Armvev}%           Upper-case V  (Vev)  letter.
+^^fd^^8f{\Armtyun}%          Upper-case T  (Tyun) letter.
+^^fd^^90{\Armre}%            Upper-case R  (Re)   letter.
+^^fd^^91{\Armtso}%           Upper-case C  (Tso)  letter.
+^^fd^^92{\Armvyun}%          Upper-case W  (Vyun) letter.
+^^fd^^93{\Armpyur}%          Upper-case PH (Pyur) letter.
+^^fd^^94{\Armke}%            Upper-case Q  (Ke)   letter.
+^^fd^^95{\Armo}%             Upper-case O' (O)    letter.
+^^fd^^96{\Armfe}%            Upper-case F  (Fe)   letter.
+%
+^^ff^^80{\armho}%            Lower-case h  (ho)   letter.
+^^ff^^81{\armdza}%           Lower-case dz (dza)  letter.
+^^ff^^82{\armghat}%          Lower-case gh (ghat) letter.
+^^ff^^83{\armtche}%          Lower-case j' (tche) letter.
+^^ff^^84{\armmen}%           Lower-case m  (men)  letter.
+^^ff^^85{\armhi}%            Lower-case y  (hi)   letter.
+^^ff^^86{\armnu}%            Lower-case n  (nu)   letter.
+^^ff^^87{\armsha}%           Lower-case sh (sha)  letter.
+^^ff^^88{\armvo}%            Lower-case o  (vo)   letter.
+^^ff^^89{\armcha}%           Lower-case ch (cha)  letter.
+^^ff^^8a{\armpe}%            Lower-case p  (pe)   letter.
+^^ff^^8b{\armje}%            Lower-case j  (je)   letter.
+^^ff^^8c{\armra}%            Lower-case r' (ra)   letter.
+^^ff^^8d{\armse}%            Lower-case s  (se)   letter.
+^^ff^^8e{\armvev}%           Lower-case v  (vev)  letter.
+^^ff^^8f{\armtyun}%          Lower-case t  (tyun) letter.
+^^ff^^90{\armre}%            Lower-case r  (re)   letter.
+^^ff^^91{\armtso}%           Lower-case c  (tso)  letter.
+^^ff^^92{\armvyun}%          Lower-case w  (vyun) letter.
+^^ff^^93{\armpyur}%          Lower-case ph (pyur) letter.
+^^ff^^94{\armke}%            Lower-case q  (ke)   letter.
+^^ff^^95{\armo}%             Lower-case o' (o)    letter.
+^^ff^^96{\armfe}%            Lower-case f  (fe)   letter.
+%
+^^ff^^9d{\armsep}%           Buth (armsep)                   symbol.
+^^ff^^9c{\armexclam}%        Bacakanchakan nshan (armexclam) symbol.
+^^ff^^9b{\armaccent}%        Shesht (armaccent)              symbol.
+^^ff^^9e{\armquestion}%      Harcakan nshan (armquestion)    symbol.
+^^ff^^9a{\armapostrophe}%    Apatharc (armapostrophe)        symbol.
+^^ff^^9f{\armabbrev}%        Patiw (armabbrev)               symbol.
+^^ff^^99{\armnum}%           Numeric mark (armnum)           symbol.
+%
+%
+%% Upper-casing
+%%
+^^fd^^a1{\Armayb}%           Upper-case A  (Ayb)  letter.
+^^fd^^a2{\Armben}%           Upper-case B  (Ben)  letter.
+^^fd^^a3{\Armgim}%           Upper-case G  (Gim)  letter.
+^^fd^^a4{\Armda}%            Upper-case D  (Da)   letter.
+^^fd^^a5{\Armyech}%          Upper-case E  (Yech) letter.
+^^fd^^a6{\Armza}%            Upper-case Z  (Za)   letter.
+^^fd^^a7{\Arme}%             Upper-case E' (E)    letter.
+^^fd^^a8{\Armat}%            Upper-case U' (At)   letter.
+^^fd^^a9{\Armto}%            Upper-case TH (To)   letter.
+^^fd^^aa{\Armzhe}%           Upper-case G' (Zhe)  letter.
+^^fd^^ab{\Armini}%           Upper-case I  (Ini)  letter.
+^^fd^^ac{\Armlyun}%          Upper-case L  (Lyun) letter.
+^^fd^^ad{\Armkhe}%           Upper-case X  (Khe)  letter.
+^^fd^^ae{\Armtsa}%           Upper-case C' (Tsa)  letter.
+^^fd^^af{\Armken}%           Upper-case K  (Ken)  letter.
+^^fd^^b0{\Armho}%            Upper-case H  (Ho)   letter.
+^^fd^^b1{\Armdza}%           Upper-case DZ (Dza)  letter.
+^^fd^^b2{\Armghat}%          Upper-case GH (Ghat) letter.
+^^fd^^b3{\Armtche}%          Upper-case J' (Tche) letter.
+^^fd^^b4{\Armmen}%           Upper-case M  (Men)  letter.
+^^fd^^b5{\Armhi}%            Upper-case Y  (Hi)   letter.
+^^fd^^b6{\Armnu}%            Upper-case N  (Nu)   letter.
+^^fd^^b7{\Armsha}%           Upper-case SH (Sha)  letter.
+^^fd^^b8{\Armvo}%            Upper-case O  (Vo)   letter.
+^^fd^^b9{\Armcha}%           Upper-case CH (Cha)  letter.
+^^fd^^ba{\Armpe}%            Upper-case P  (Pe)   letter.
+^^fd^^bb{\Armje}%            Upper-case J  (Je)   letter.
+^^fd^^bc{\Armra}%            Upper-case R' (Ra)   letter.
+^^fd^^bd{\Armse}%            Upper-case S  (Se)   letter.
+^^fd^^be{\Armvev}%           Upper-case V  (Vev)  letter.
+^^fd^^bf{\Armtyun}%          Upper-case T  (Tyun) letter.
+%
+^^ff^^a1{\armayb}%           Lower-case a  (ayb)  letter.
+^^ff^^a2{\armben}%           Lower-case b  (ben)  letter.
+^^ff^^a3{\armgim}%           Lower-case g  (gim)  letter.
+^^ff^^a4{\armda}%            Lower-case d  (da)   letter.
+^^ff^^a5{\armyech}%          Lower-case e  (eych) letter.
+^^ff^^a6{\armza}%            Lower-case z  (za)   letter.
+^^ff^^a7{\arme}%             Lower-case e' (e)    letter.
+^^ff^^a8{\armat}%            Lower-case u' (at)   letter.
+^^ff^^a9{\armto}%            Lower-case th (to)   letter.
+^^ff^^aa{\armzhe}%           Lower-case g' (zhe)  letter.
+^^ff^^ab{\armini}%           Lower-case i  (ini)  letter.
+^^ff^^ac{\armlyun}%          Lower-case l  (lyun) letter.
+^^ff^^ad{\armkhe}%           Lower-case x  (khe)  letter.
+^^ff^^ae{\armtsa}%           Lower-case c' (tsa)  letter.
+^^ff^^af{\armken}%           Lower-case k  (ken)  letter.
+^^ff^^b0{\armho}%            Lower-case h  (ho)   letter.
+^^ff^^b1{\armdza}%           Lower-case dz (dza)  letter.
+^^ff^^b2{\armghat}%          Lower-case gh (ghat) letter.
+^^ff^^b3{\armtche}%          Lower-case j' (tche) letter.
+^^ff^^b4{\armmen}%           Lower-case m  (men)  letter.
+^^ff^^b5{\armhi}%            Lower-case y  (hi)   letter.
+^^ff^^b6{\armnu}%            Lower-case n  (nu)   letter.
+^^ff^^b7{\armsha}%           Lower-case sh (sha)  letter.
+^^ff^^b8{\armvo}%            Lower-case o  (vo)   letter.
+^^ff^^b9{\armcha}%           Lower-case ch (cha)  letter.
+^^ff^^ba{\armpe}%            Lower-case p  (pe)   letter.
+^^ff^^bb{\armje}%            Lower-case j  (je)   letter.
+^^ff^^bc{\armra}%            Lower-case r' (ra)   letter.
+^^ff^^bd{\armse}%            Lower-case s  (se)   letter.
+^^ff^^be{\armvev}%           Lower-case v  (vev)  letter.
+^^ff^^bf{\armtyun}%          Lower-case t  (tyun) letter.
+%
+^^fe^^80{\Armre}%            Upper-case R  (Re)   letter.
+^^fe^^81{\Armtso}%           Upper-case C  (Tso)  letter.
+^^fe^^82{\Armvyun}%          Upper-case W  (Vyun) letter.
+^^fe^^83{\Armpyur}%          Upper-case PH (Pyur) letter.
+^^fe^^84{\Armke}%            Upper-case Q  (Ke)   letter.
+^^fe^^85{\Armo}%             Upper-case O' (O)    letter.
+^^fe^^86{\Armfe}%            Upper-case F  (Fe)   letter.
+%
+^^fe^^89{\armfullstop}%      Verjaket (armfullstop)          symbol.
+^^fd^^9d{\armsep}%           Buth (armsep)                   symbol.
+^^fe^^8a{\armyentamna}%      Toghadardzi nshan (armyentamna) symbol.
+^^fd^^9c{\armexclam}%        Bacakanchakan nshan (armexclam) symbol.
+^^fd^^9b{\armaccent}%        Shesht (armaccent)              symbol.
+^^fd^^9e{\armquestion}%      Harcakan nshan (armquestion)    symbol.
+^^fd^^9a{\armapostrophe}%    Apatharc (armapostrophe)        symbol.
+^^fd^^9f{\armabbrev}%        Patiw (armabbrev)               symbol.
+^^fd^^99{\armnum}%           Numeric mark (armnum)           symbol.
+^^fe^^8f{\armdram}%          Dram sign (armdram)             symbol.
+%
+^^fe^^87{\Armyech\Armvev}%       Upper-case of armew      ligature.
+%
+^^fb^^ac^^93{\Armmen\Armnu}%     Upper-case of men + nu   ligature.
+^^fb^^ac^^94{\Armmen\Armyech}%   Upper-case of men + yech ligature.
+^^fb^^ac^^95{\Armmen\Armini}%    Upper-case of men + ini  ligature.
+^^fb^^ac^^96{\Armvev\Armnu}%     Upper-case of vev + nu   ligature.
+^^fb^^ac^^97{\Armmen\Armkhe}%    Upper-case of men + khe  ligature.
+%
+%
+%% Activating lowercasing and uppercasing
+%%
+\def^^fb#1#2{\csname fb:#1#2\endcsname}%
+\def^^fc#1{\csname fc:#1\endcsname}%
+\def^^fd#1{\csname fd:#1\endcsname}%
+\def^^fe#1{\csname fe:#1\endcsname}%
+\def^^ff#1{\csname ff:#1\endcsname}%
+%
+%
+%% That's all, Folks!
+%%
+\endinput