blob: a5ca7d5e050ba2deaf18f5d744e33e496e75105d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
% This implements the Tengwar font
\def\fileversion{1.0}
\def\filedate{1999/04/19}
\def\docdate{1999/04/19}
\NeedsTeXFormat{LaTeX2e}[1998/06/01]
\ProvidesPackage{tengwar}[1999/04/19 Tengwar font]
\RequirePackage[OT1]{fontenc}
%\renewcommand{\rmdefault}{ztg}
\def\rmfontfamilyname{Tengwar}
%
%\input{ot1ztg.fd}
\newcommand{\tengwar}{%
% \renewcommand{\baselinestretch}{1.2}%
\fontencoding{OT1}\fontfamily{ztg}%
\fontseries{m}\fontshape{n}\selectfont%
\def\a##1{\accent"5E ##1}%
\def\sh{C}%
\def\z{\ae}%
\let\@i\u%
\def\i##1{\setbox0=\hbox{##1}\dimen0=\ht0%
\advance\dimen0 by\dp0%
\advance\dimen0 by1ex%
\raise.47ex\hbox{\begin{tabular}{@{}c@{}}%
\@i{}\\[-\dimen0 ]##1\end{tabular}}}%
\let\u\v%
\let\uu\=%
\def\m##1{\accent"1E ##1}%
}%
\newcommand{\teng}[1]{{\tengwar#1}}
% eof
|