From e0c6872cf40896c7be36b11dcc744620f10adf1d Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Mon, 2 Sep 2019 13:46:59 +0900 Subject: Initial commit --- info/fontsampler/tengwar.sty | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100644 info/fontsampler/tengwar.sty (limited to 'info/fontsampler/tengwar.sty') diff --git a/info/fontsampler/tengwar.sty b/info/fontsampler/tengwar.sty new file mode 100644 index 0000000000..a5ca7d5e05 --- /dev/null +++ b/info/fontsampler/tengwar.sty @@ -0,0 +1,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 -- cgit v1.2.3