summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/archaic/etruscan.sty
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-12 23:51:35 +0000
committerKarl Berry <karl@freefriends.org>2006-01-12 23:51:35 +0000
commit7b48ed57d813f99232b3de1c34ee82664b127c52 (patch)
treef9a71429970d85e9d7230a28faab7e8cbfec8b9c /Master/texmf-dist/tex/latex/archaic/etruscan.sty
parentaec1c1b77ee51b9359530d61cc7b8df2a37c7685 (diff)
archaic
git-svn-id: svn://tug.org/texlive/trunk@674 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/archaic/etruscan.sty')
-rw-r--r--Master/texmf-dist/tex/latex/archaic/etruscan.sty123
1 files changed, 123 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/archaic/etruscan.sty b/Master/texmf-dist/tex/latex/archaic/etruscan.sty
new file mode 100644
index 00000000000..16940cd4fd9
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/archaic/etruscan.sty
@@ -0,0 +1,123 @@
+%%
+%% This is file `etruscan.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% etruscan.dtx (with options: `usc')
+%% ------------------------------------------------------------------
+%% 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.
+%% ------------------------------------------------------------------
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{etruscan}[2000/10/01 v2.0 package for Etruscan fonts]
+\newcommand{\etrfamily}{\usefont{T1}{etr}{m}{n}}
+\DeclareTextFontCommand{\textetr}{\etrfamily}
+
+\chardef\Aalpha=`a
+\chardef\Abeta=`b
+\chardef\Agamma=`g
+\chardef\Adelta=`d
+\chardef\Aepsilon=`e
+\chardef\Adigamma=`F
+\chardef\Azeta=`z
+\chardef\Aeta=`h
+\chardef\Atheta=`T
+\chardef\Aiota=`i
+\chardef\Akappa=`k
+\chardef\Alambda=`l
+\chardef\Amu=`m
+\chardef\Anu=`n
+\chardef\Axi=`x
+\chardef\Aomicron=`o
+\chardef\Api=`p
+\chardef\Aesade=`S
+\chardef\Aqoph=`q
+\chardef\Arho=`r
+\chardef\Asigma=`s
+\chardef\Atau=`t
+\chardef\Aupsilon=`y
+\chardef\Achi=`X
+\chardef\Aphi=`f
+\chardef\Apsi=`P
+\chardef\Avau=`v
+
+\chardef\ARalpha=`a
+\chardef\ARbeta=`B
+\chardef\ARgamma=`G
+\chardef\ARdelta=`D
+\chardef\ARepsilon=`E
+\chardef\ARdigamma=`U
+\chardef\ARzeta=`z
+\chardef\AReta=`H
+\chardef\ARtheta=`T
+\chardef\ARiota=`i
+\chardef\ARkappa=`K
+\chardef\ARlambda=`L
+\chardef\ARmu=`M
+\chardef\ARnu=`N
+%%%%\chardef\ARxi=`x
+\chardef\ARxi=`C
+\chardef\ARomicron=`o
+\chardef\ARpi=`Q
+\chardef\AResade=`S
+\chardef\ARqoph=`q
+\chardef\ARrho=`R
+\chardef\ARsigma=`Z
+\chardef\ARtau=`J
+\chardef\ARupsilon=`y
+\chardef\ARchi=`X
+\chardef\ARphi=`f
+\chardef\ARpsi=`P
+\chardef\ARvau=`v
+
+\newcommand{\translitetr}[1]{{%
+ \@translitETR #1}}
+\newcommand{\translitetrfont}{\mathrm}
+
+\newcommand{\@translitETR}{%
+\def\Aalpha{\ensuremath{\translitetrfont{A}}}\def\ARalpha{\Aalpha}%
+\def\Abeta{\ensuremath{\translitetrfont{B}}}\def\ARbeta{\Abeta}%
+\def\Agamma{\ensuremath{\translitetrfont{G}}}\def\ARgamma{\Agamma}%
+\def\Adelta{\ensuremath{\translitetrfont{D}}}\def\ARdelta{\Adelta}%
+\def\Aepsilon{\ensuremath{\translitetrfont{E}}}\def\ARepsilon{\Aepsilon}%
+\def\Aupsilon{\ensuremath{\translitetrfont{Y}}}\def\ARupsilon{\Aupsilon}%
+\def\Adigamma{\ensuremath{\translitetrfont{F}}}\def\ARdigamma{\Adigamma}%
+\def\Azeta{\ensuremath{\translitetrfont{Z}}}\def\ARzeta{\Azeta}%
+\def\Aeta{\ensuremath{\translitetrfont{H}}}\def\AReta{\Aeta}%
+\def\Atheta{\ensuremath{\translitetrfont{\Theta}}}\def\ARtheta{\Atheta}%
+\def\Aiota{\ensuremath{\translitetrfont{I}}}\def\ARiota{\Aiota}%
+\def\Akappa{\ensuremath{\translitetrfont{K}}}\def\ARkappa{\Akappa}%
+\def\Alambda{\ensuremath{\translitetrfont{L}}}\def\ARlambda{\Alambda}%
+\def\Amu{\ensuremath{\translitetrfont{M}}}\def\ARmu{\Amu}%
+\def\Anu{\ensuremath{\translitetrfont{N}}}\def\ARnu{\Anu}%
+\def\Axi{\ensuremath{\translitetrfont{\Xi}}}\def\ARxi{\Axi}%
+\def\Aomicron{\ensuremath{\translitetrfont{O}}}\def\ARomicron{\Aomicron}%
+\def\Api{\ensuremath{\translitetrfont{P}}}\def\ARpi{\Api}%
+\def\Aesade{\ensuremath{\translitetrfont{S}}}\def\AResade{\Aesade}%
+\def\Aqoph{\ensuremath{\translitetrfont{Q}}}\def\ARqoph{\Aqoph}%
+\def\Arho{\ensuremath{\translitetrfont{R}}}\def\ARrho{\Arho}%
+\def\Asigma{\ensuremath{\translitetrfont{S}}}\def\ARsigma{\Asigma}%
+\def\Atau{\ensuremath{\translitetrfont{T}}}\def\ARtau{\Atau}%
+\def\Achi{\ensuremath{\translitetrfont{X}}}\def\ARchi{\Achi}%
+\def\Aphi{\ensuremath{\translitetrfont{\Phi}}}\def\ARphi{\Aphi}%
+\def\Apsi{\ensuremath{\translitetrfont{\Psi}}}\def\ARpsi{\Apsi}%
+\def\Avau{\ensuremath{\translitetrfont{F}}}\def\ARvau{\Avau}%
+}
+
+\endinput
+%%
+%% End of file `etruscan.sty'.