diff options
Diffstat (limited to 'Master/texmf-dist/tex/lambda/antomega/antomega.sty')
-rw-r--r-- | Master/texmf-dist/tex/lambda/antomega/antomega.sty | 340 |
1 files changed, 340 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/lambda/antomega/antomega.sty b/Master/texmf-dist/tex/lambda/antomega/antomega.sty new file mode 100644 index 00000000000..7811061b4c0 --- /dev/null +++ b/Master/texmf-dist/tex/lambda/antomega/antomega.sty @@ -0,0 +1,340 @@ +%% +%% This is file `antomega.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% antomega.dtx (with options: `antomega') +%% +%% This file is a part of the ANTOMEGA project version 0.8 +%% ----------------------------------------------------- +%% +%% It may be distributed under the terms of the LaTeX Project Public +%% License, as described in lppl.txt in the base LaTeX distribution. +%% Either version 1.0 or, at your option, any later version. +%% Copyright (C) 2001 -- 2002 by Alexej Kryukov +%% Please report errors to: A.M. Kryukov <basileia@yandex.ru> +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{antomega} +\RequirePackage{keyval,ifthen,calc} +\def\LoadOCPByName#1#2{\IfFileExists{#2.ocp}{\ocp#1=#2}{ + \PackageWarning{antomega}{#2.ocp not found. + Identity will be used instead.}{} + \ocp#1=id}} +\ocp\IdOCP=id +\LoadOCPByName{\BasicIsoUni}{uniutf2uni} +\LoadOCPByName{\BasicWinUni}{uniutf2uni} +\LoadOCPByName{\BasicUtfUni}{uniutf2uni} +\LoadOCPByName{\BasicTexUni}{tex2punct} +\LoadOCPByName{\BasicBabelUni}{babel2punct} +\LoadOCPByName{\BasicAccentsUni}{uni2accents} +\LoadOCPByName{\UniToOmega}{uni2omega} +\LoadOCPByName{\Oldstyle}{oldstyle} +\LoadOCPByName{\LatinUniToTex}{uni2t1} +\def\opt@ocp{ocp} +\def\opt@ligatures{ligatures} +\define@key{antomega}{ffi}[ocp]{% + \def\@tmpa{#1} + \ifx\@tmpa\opt@ocp% + \LoadOCPByName{\LatinUniToLig}{uni2lig} + \else\ifx\@tmpa\opt@ligatures% + \typeout{Antomega package option: ffi=ligatures} + \LoadOCPByName{\LatinUniToLig}{id} + \fi\fi +} +\DeclareOption{noffi}{\setkeys{antomega}{ffi=ligatures}} +\setkeys{antomega}{ffi=ocp} +\ocplist\BasicTexOCP= + \addbeforeocplist 1750 \BasicTexUni +\nullocplist +\ocplist\BasicBabelOCP= + \addbeforeocplist 2000 \BasicBabelUni +\nullocplist +\ocplist\BasicAccentsOCP= + \addbeforeocplist 2250 \BasicAccentsUni +\nullocplist +\ocplist\BasicInputUcsOCP= + \addbeforeocplist 500 \IdOCP +\nullocplist +\ocplist\BasicInputUtfOCP= + \addbeforeocplist 500 \BasicUtfUni +\nullocplist +\ocplist\BasicInputIsoOCP= + \addbeforeocplist 500 \BasicIsoUni +\nullocplist +\ocplist\BasicInputWinOCP= + \addbeforeocplist 500 \BasicWinUni +\nullocplist +\ocplist\LatinUniOutOCP= + \addbeforeocplist 3500 \LatinUniToLig +\nullocplist +\ocplist\LatinOmegaOutOCP= + \addbeforeocplist 3500 \UniToOmega +\nullocplist +\ocplist\LatinTexOutOCP= + \addbeforeocplist 3500 \LatinUniToTex +\nullocplist +\ocplist\OldstyleOCP= + \addbeforeocplist 4000 \Oldstyle +\nullocplist +\let\BasicInputOCP\BasicInputUcsOCP + \define@key{antomega}{input}[ucs-2]{ + \def\@tmpa{#1}% + \ifx\@tmpa\opt@utf% + \let\BasicInputOCP\BasicInputUtfOCP% + \typeout{Antomega package option: input=utf-8} + \else\ifx\@tmpa\opt@sw% + \def\U##1{/QQ[##1]}% + \def\rmdefault{swtimes}% + \let\westernrm\rmdefault% + \LoadOCPByName{\BasicSWordUni}{sw2uni}% + \ocplist\BasicInputSWordOCP= + \addbeforeocplist 500 \BasicSWordUni + \nullocplist + \let\BasicInputOCP\BasicInputSWordOCP% + \typeout{Antomega package option: input=sw} + \else% + \let\BasicInputOCP\BasicInputUcsOCP% + \typeout{Antomega package option: input=ucs-2} + \fi} +\LoadOCPByName{\Uppercase}{uppercase-dflt} +\ocplist\UppercaseOCP= + \addbeforeocplist 3000 \Uppercase +\nullocplist +\def\MakeUppercase#1{{\pushocplist\UppercaseOCP#1}} +\def\opt@standard{standard} +\define@key{antomega}{uppercase}[ocp]{ + \def\@tmpa{#1} + \ifx\@tmpa\opt@standard + \let\MakeUppercase\uppercase + \typeout{Antomega package option: use character codes} + \typeout{for conversion to Uppercase} + \fi} +\def\oldstylenums#1{{\pushocplist\OldstyleOCP#1}} +\def\noocpchar#1{{\clearocplists\char#1}} +\def\#{\noocpchar{"23}} +\def\%{\noocpchar{"25}} +\def\&{\noocpchar{"26}} +\def\uniencoding{UT1} +\def\ant@load@encoding#1{% + \edef\ant@encodingfile{% + \lowercase{\def\noexpand\ant@encodingfile{#1enc-antomega.def}}}% + \ant@encodingfile + \InputIfFileExists{\ant@encodingfile}{}{% + \DeclareFontEncoding{#1}{}{} + \PackageWarning{antomega}{The \ant@encodingfile\ file was not found. + The #1 encoding was defined by antomega.}{} + } + \let\ant@encodingfile\@undefined +} +\ant@load@encoding{\uniencoding} +\def\encodingdefault{\uniencoding} +\ant@load@encoding{T1} +\def\rmdefault{omlgc} +\ifx\westernrm\@undefined\let\westernrm=\rmdefault\fi +\ifx\westernsf\@undefined\let\westernsf=\sfdefault\fi +\ifx\westerntt\@undefined\let\westerntt=\ttdefault\fi +\catcode`\~=12 +\ifx\makeletter\@undefined + \def\makeletter#1#2{% + \ifnum\catcode#2=11\else\catcode#2=12 \fi + \ifnum\catcode#1=11\else\catcode#1=12 \fi + \uccode#1=#1 \uccode#2=#1% + \lccode#1=#2 \lccode#2=#2} +\fi +\ifx\makelcletter\@undefined + \def\makelcletter#1#2{% + \ifnum\catcode#2=11\else\catcode#2=12 \fi + \uccode#2=#1% + \lccode#2=#2} +\fi +\ifx\makeucletter\@undefined + \def\makeucletter#1#2{% + \ifnum\catcode#1=11\else\catcode#1=12 \fi + \uccode#1=#1% + \lccode#1=#2} +\fi +\ifx\makesameletter\@undefined + \def\makesameletter#1#2{% + \ifnum\catcode#1=11\else\catcode#1=12 \fi + \uccode#1=\uccode#2% + \lccode#1=\lccode#2} +\fi +\providecommand*{\ant@nocodes}[3]{% + \PackageWarningNoLine{antomega}% + {No file was found with symbol codes\MessageBreak + for the #2 range #3.\MessageBreak + You may proceed, but your #1 texts\MessageBreak + probably will not be correctly hyphenated.}} +\providecommand*{\ant@nopatterns}[1]{% + \PackageWarningNoLine{antomega}% + {No hyphenation patterns were loaded for\MessageBreak + the language `#1'\MessageBreak + I will use the patterns loaded for \string\language=0 + instead}} +\providecommand*{\ant@nolang}[1]{% + \PackageWarningNoLine{antomega}% + {Couldn't find file omega-#1.ldf!!}} +\def\opt@enabled{on} +\def\opt@disabled{off} +\def\opt@tex{tex} +\def\opt@omega{omega} +\def\opt@unicode{unicode} +\def\opt@utf{utf-8} +\def\opt@ucs{ucs-2} +\def\opt@sw{sw} +\define@key{antomega}{localmarks}[on]{% + \def\@tmpa{#1} + \ifx\@tmpa\opt@enabled + \def\local@marks##1{% + \def\markboth####1####2{% + \begingroup% + \let\label\relax \let\index\relax \let\glossary\relax% + \unrestored@protected@xdef\@themark% + {{\foreignlanguage{##1}{####1}}{\foreignlanguage{##1}{####2}}}% + \@temptokena \expandafter{\@themark}% + \mark{\the\@temptokena}% + \endgroup% + \if@nobreak\ifvmode\nobreak\fi\fi}% + \def\markright####1{% + \begingroup% + \let\label\relax \let\index\relax \let\glossary\relax% + \expandafter\@markright\@themark{\foreignlanguage{##1}{####1}}% + \@temptokena \expandafter{\@themark}% + \mark{\the\@temptokena}% + \endgroup% + \if@nobreak\ifvmode\nobreak\fi\fi}% + \def\@markright####1####2####3{\@temptokena{####1}% + \unrestored@protected@xdef\@themark{{\the\@temptokena}% + {{####3}}}}} + \else\ifx\@tmpa\opt@disabled + \def\local@marks#1{} + \typeout{Antomega package option: localmarks=off} + \fi\fi +} +\DeclareOption{nolocalmarks}{\setkeys{antomega}{localmarks=off}} +\setkeys{antomega}{localmarks=on} +\def\oaddto#1#2{% + \ifx#1\@undefined + \def#1{#2}% + \else + \ifx#1\relax + \def#1{#2}% + \else + {\toks@\expandafter{#1#2}% + \xdef#1{\the\toks@}}% + \fi + \fi +} +\newcommand{\background}[2][]{% + \IfFileExists{omega-#2.ldf}% + {\input{omega-#2.ldf}% + \AtBeginDocument{\selectlanguage[#1]{#2}}% + \newenvironment{#2}[1][]{\begin{otherlanguage}[####1]{#2}}% + {\end{otherlanguage}}% + \expandafter\newcommand\csname local#2\endcsname[2][]{% + \foreignlanguage[####1]{#2}{####2}}}% + {\ant@nolang{#2}}% +} +\newcommand{\load}[2][]{\IfFileExists{omega-#2.ldf} + {\input{omega-#2.ldf}\setkeys{#2}{#1}% + \newenvironment{#2}[1][]{\begin{otherlanguage}[####1]{#2}}% + {\end{otherlanguage}} + \expandafter\newcommand\csname local#2\endcsname[2][]{% + \foreignlanguage[####1]{#2}{####2}}} + {\ant@nolang{#2}}} +\def\common@punctuation{% + \def\InitialThinSpace{\nobreak\hskip.2em\ignorespaces}% + \def\ExplicitHyphen{\nobreak\-\nobreak\hskip\z@skip}% + \def\AllowHyphenation{\hskip\z@skip}% + \def\DisableLigature{\textormath{\nobreak\discretionary{-}{}% + {\kern.03em}\allowhyphens}{}}% + \def\CompoundWordMarkWithBreakpoint{\nobreak-\hskip\z@skip}% + \def\CompoundWordMarkNoBreakpoint{\textormath{\leavevmode\hbox{-}}{-}}% + \def\LeftDoubleQuotationMark{^^^^201c}% + \def\RightDoubleQuotationMark{^^^^201d}% + \def\LeftPointingDoubleAngleQuotationMark{^^^^00ab}% + \def\RightPointingDoubleAngleQuotationMark{^^^^00bb}% + \def\GermanLeftDoubleQuotationMark{^^^^201e}% + \def\GermanRightDoubleQuotationMark{^^^^201c}% + \def\QuestionMark{?}% + \def\ExclamationMark{!}% + \def\InvertedQuestionMark{^^^^00bf}% + \def\InvertedExclamationMark{^^^^00a1}% + \def\Semicolon{;}% + \def\Colon{:}% + \def\NonBreakingSpace{\leavevmode\nobreak\ }} +\def\common@font{\normalfont\fontfamily{\westernrm}% + \fontencoding{\uniencoding}\selectfont% + \let\rmdefault=\westernrm\let\sfdefault=\westernsf% + \let\ttdefault=\westerntt\let\encodingdefault=\uniencoding} +\def\common@language{% + \protect\language=0% + \lefthyphenmin=2\righthyphenmin=3} +\def\noextrascurrent#1{\@ifundefined{noextras@#1}{}% + {\csname noextras@#1\endcsname}} +\def\originalOmega{\@ifundefined{languagename}{}% + {\noextrascurrent{\languagename}}% + \common@language% + \common@punctuation% + \common@font% + \clearocplists% + } +\AtBeginDocument{\originalOmega} +\@ifundefined{foreignlanguage}{}% + {\let\foreignlanguage\@undefined} +\newcommand{\foreignlanguage}[3][]{% + \@ifundefined{inlineextras@#2}{\ant@nolang{#2}}{% + {\def\languagename{#2}% + \setkeys{#2}{#1}% + \csname inlineextras@#2\endcsname#3}% +}} +\@ifundefined{selectlanguage}{}% + {\let\selectlanguage\@undefined} +\newcommand{\selectlanguage}[2][]{% + \@ifundefined{blockextras@#2}{\ant@nolang{#2}}{% + \def\ant@pop@language{% + \ant@set@language{\languagename}% + \let\emp@langname\undefined}% + \aftergroup\ant@pop@language% + \setkeys{#2}{#1}% + \ant@set@language{#2}% +}} +\newcommand{\ant@set@language}[1]{% + \select@language{#1}% + \if@filesw% + \protected@write\@auxout{}{\protect\select@language{#1}}% + \addtocontents{toc}{\protect\select@language{#1}}% + \addtocontents{lof}{\protect\select@language{#1}}% + \addtocontents{lot}{\protect\select@language{#1}}% + \fi% +} +\@ifundefined{select@language}{}% + {\let\select@language\@undefined} +\newcommand{\select@language}[1]{% + \originalOmega% + \edef\languagename{#1}% + \csname blockextras@#1\endcsname% +} +\let\ant@pop@language\relax +\@ifundefined{otherlanguage}{}% + {\let\otherlanguage\@undefined} +\@ifundefined{endotherlanguage}{}% + {\let\endotherlanguage\@undefined} +\newenvironment{otherlanguage}[2][]{% + \selectlanguage[#1]{#2}% + }{} +\newcommand{\local@hyphenmins}[3]{% + \@ifundefined{#1hyphenmins}% + {\lefthyphenmin=#2\righthyphenmin=#3}% + {\csname #1hyphenmins\endcsname}% +} +\DeclareOption*{% + \edef\@temp{\noexpand\setkeys{antomega}{\CurrentOption}}% + \@temp% +} +\ProcessOptions +\endinput +%% +%% End of file `antomega.sty'. |