diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/oberdiek/rotchiffre.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/oberdiek/rotchiffre.sty | 314 |
1 files changed, 314 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/generic/oberdiek/rotchiffre.sty b/Master/texmf-dist/tex/generic/oberdiek/rotchiffre.sty new file mode 100644 index 00000000000..f8e2a409bcf --- /dev/null +++ b/Master/texmf-dist/tex/generic/oberdiek/rotchiffre.sty @@ -0,0 +1,314 @@ +%% +%% This is file `rotchiffre.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% rotchiffre.dtx (with options: `package') +%% +%% This is a generated file. +%% +%% Copyright (C) 2010 by +%% Heiko Oberdiek <heiko.oberdiek at googlemail.com> +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either +%% version 1.3c of this license or (at your option) any later +%% version. This version of this license is in +%% http://www.latex-project.org/lppl/lppl-1-3c.txt +%% and 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. +%% +%% This work has the LPPL maintenance status "maintained". +%% +%% This Current Maintainer of this work is Heiko Oberdiek. +%% +%% The Base Interpreter refers to any `TeX-Format', +%% because some files are installed in TDS:tex/generic//. +%% +%% This work consists of the main source file rotchiffre.dtx +%% and the derived files +%% rotchiffre.sty, rotchiffre.pdf, rotchiffre.ins, rotchiffre.drv, +%% rotchiffre-test1.tex, rotchiffre-test2.tex. +%% +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode35=6 % # + \catcode39=12 % ' + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode58=12 % : + \catcode64=11 % @ + \catcode123=1 % { + \catcode125=2 % } + \expandafter\let\expandafter\x\csname ver@rotchiffre.sty\endcsname + \ifx\x\relax % plain-TeX, first loading + \else + \def\empty{}% + \ifx\x\empty % LaTeX, first loading, + % variable is initialized, but \ProvidesPackage not yet seen + \else + \expandafter\ifx\csname PackageInfo\endcsname\relax + \def\x#1#2{% + \immediate\write-1{Package #1 Info: #2.}% + }% + \else + \def\x#1#2{\PackageInfo{#1}{#2, stopped}}% + \fi + \x{rotchiffre}{The package is already loaded}% + \aftergroup\endinput + \fi + \fi +\endgroup% +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode35=6 % # + \catcode39=12 % ' + \catcode40=12 % ( + \catcode41=12 % ) + \catcode44=12 % , + \catcode45=12 % - + \catcode46=12 % . + \catcode47=12 % / + \catcode58=12 % : + \catcode64=11 % @ + \catcode91=12 % [ + \catcode93=12 % ] + \catcode123=1 % { + \catcode125=2 % } + \expandafter\ifx\csname ProvidesPackage\endcsname\relax + \def\x#1#2#3[#4]{\endgroup + \immediate\write-1{Package: #3 #4}% + \xdef#1{#4}% + }% + \else + \def\x#1#2[#3]{\endgroup + #2[{#3}]% + \ifx#1\@undefined + \xdef#1{#3}% + \fi + \ifx#1\relax + \xdef#1{#3}% + \fi + }% + \fi +\expandafter\x\csname ver@rotchiffre.sty\endcsname +\ProvidesPackage{rotchiffre}% + [2010/11/12 v1.0 Provides ROT13, ROT5, ROT18, ROT47 (HO)]% +\begingroup\catcode61\catcode48\catcode32=10\relax% + \catcode13=5 % ^^M + \endlinechar=13 % + \catcode123=1 % { + \catcode125=2 % } + \catcode64=11 % @ + \def\x{\endgroup + \expandafter\edef\csname RotCh@AtEnd\endcsname{% + \endlinechar=\the\endlinechar\relax + \catcode13=\the\catcode13\relax + \catcode32=\the\catcode32\relax + \catcode35=\the\catcode35\relax + \catcode61=\the\catcode61\relax + \catcode64=\the\catcode64\relax + \catcode123=\the\catcode123\relax + \catcode125=\the\catcode125\relax + }% + }% +\x\catcode61\catcode48\catcode32=10\relax% +\catcode13=5 % ^^M +\endlinechar=13 % +\catcode35=6 % # +\catcode64=11 % @ +\catcode123=1 % { +\catcode125=2 % } +\def\TMP@EnsureCode#1#2{% + \edef\RotCh@AtEnd{% + \RotCh@AtEnd + \catcode#1=\the\catcode#1\relax + }% + \catcode#1=#2\relax +} +\TMP@EnsureCode{42}{12}% * +\TMP@EnsureCode{43}{12}% + +\TMP@EnsureCode{45}{12}% - +\TMP@EnsureCode{46}{12}% . +\TMP@EnsureCode{47}{12}% / +\TMP@EnsureCode{60}{12}% < +\TMP@EnsureCode{62}{12}% > +\TMP@EnsureCode{91}{12}% [ +\TMP@EnsureCode{93}{12}% ] +\TMP@EnsureCode{96}{12}% ` +\edef\RotCh@AtEnd{\RotCh@AtEnd\noexpand\endinput} +\begingroup\expandafter\expandafter\expandafter\endgroup +\expandafter\ifx\csname RequirePackage\endcsname\relax + \input infwarerr.sty\relax + \input ltxcmds.sty\relax + \input pdfescape.sty\relax +\else + \RequirePackage{infwarerr}[2010/04/08]% + \RequirePackage{ltxcmds}[2010/03/01]% + \RequirePackage{pdfescape}[2010/03/01]% +\fi +\ltx@IfUndefined{protected}{% + \ltx@IfUndefined{DeclareRobustCommand}{% + \def\RotCh@temp{\def\EdefRot##1}% + }{% + \def\RotCh@temp{\DeclareRobustCommand*\EdefRot[1]}% + }% +}{% + \def\RotCh@temp{\protected\def\EdefRot##1}% +} +\RotCh@temp{% + \RotCh@GetNumber{#1}% + \ltx@IfUndefined{RotCh@rot@\romannumeral\RotCh@number}{% + \@PackageError{rotchiffre}{% + Unknown chiffre ROT\RotCh@number + }\@ehc + \EdefSanitize + }{% + \RotCh@rot + }% +} +\ltx@IfUndefined{numexpr}{% + \def\RotCh@GetNumber#1{% + \edef\RotCh@number{\number#1}% + }% +}{% + \def\RotCh@GetNumber#1{% + \edef\RotCh@number{\the\numexpr#1\relax}% + }% +} +\countdef\RotCh@count=255 % +\countdef\RotCh@count@end=2 % +\def\RotCh@RangeIgnore{% + \RotCh@loop{% + \lccode\RotCh@count=\ltx@zero + }% +} +\ltx@IfUndefined{numexpr}{% + \countdef\RotCh@count@temp=4 % + \def\RotCh@RangeSet#1{% + \RotCh@loop{% + \RotCh@count@temp=\RotCh@count + \advance\RotCh@count@temp #1 % + \lccode\RotCh@count=\RotCh@count@temp + }% + }% +}{% + \def\RotCh@RangeSet#1{% + \RotCh@loop{% + \lccode\RotCh@count=\numexpr\RotCh@count#1\relax + }% + }% +} +\def\RotCh@loop#1#2#3{% + \RotCh@count=#2 % + \RotCh@count@end=#3 % + \def\RotCh@action{#1}% + \RotCh@@loop +}% +\def\RotCh@@loop{% + \RotCh@action + \ifnum\RotCh@count<\RotCh@count@end + \advance\RotCh@count\ltx@one + \expandafter\RotCh@@loop + \fi +} +\def\RotCh@rot@xiii{% + \RotCh@RangeIgnore{0}{64}% + \RotCh@RangeSet{+13}{65}{77}% + \RotCh@RangeSet{-13}{78}{90}% + \RotCh@RangeIgnore{91}{96}% + \RotCh@RangeSet{+13}{97}{109}% + \RotCh@RangeSet{-13}{110}{122}% + \RotCh@RangeIgnore{123}{255}% +} +\def\RotCh@rot@v{% + \RotCh@RangeIgnore{0}{47}% + \RotCh@RangeSet{+5}{48}{52}% + \RotCh@RangeSet{-5}{53}{57}% + \RotCh@RangeIgnore{58}{255}% +} +\def\RotCh@rot@xviii{% + \RotCh@RangeIgnore{0}{47}% + \RotCh@RangeSet{+25}{48}{57}% + \RotCh@RangeIgnore{58}{64}% + \RotCh@RangeSet{+18}{65}{72}% + \RotCh@RangeSet{-25}{73}{82}% + \RotCh@RangeSet{-18}{83}{90}% + \RotCh@RangeIgnore{91}{96}% + \RotCh@RangeSet{+13}{97}{109}% + \RotCh@RangeSet{-13}{110}{122}% + \RotCh@RangeIgnore{123}{255}% +} +\def\RotCh@rot@xlvii{% + \RotCh@RangeIgnore{0}{32}% + \RotCh@RangeSet{+47}{33}{79}% + \RotCh@RangeSet{-47}{80}{126}% + \RotCh@RangeIgnore{127}{255}% +} +\begingroup + \catcode0=9 % + \catcode`\^=7 % + \catcode`\^^^=12 % + \def\x{^^^^0000}% +\expandafter\endgroup +\ifx\x\ltx@empty + \toksdef\RotCh@toks=0 % + \long\def\RotCh@rot#1#2{% + \EdefSanitize#1{#2}% + \begingroup + \csname RotCh@rot@\romannumeral\RotCh@number\endcsname + \RotCh@toks={}% + \expandafter\RotCh@SplitSpace#1 \@nil + \expandafter\endgroup + \expandafter\def\expandafter#1\expandafter{% + \the\RotCh@toks + }% + }% + \def\RotCh@temp#1{% + \def\RotCh@SplitSpace##1 ##2\@nil{% + \RotCh@Add##1\relax + \ifx\relax##2\relax + \expandafter\ltx@gobble + \else + \RotCh@toks\expandafter{\the\RotCh@toks#1}% + \expandafter\ltx@firstofone + \fi + {% + \RotCh@SplitSpace##2\@nil + }% + }% + }% + \RotCh@temp{ }% + \def\RotCh@Add#1{% + \ifx#1\relax + \else + \ifnum`#1>126 % + \RotCh@toks\expandafter{\the\RotCh@toks#1}% + \else + \lowercase{% + \RotCh@toks\expandafter{\the\RotCh@toks#1}% + }% + \fi + \expandafter\RotCh@Add + \fi + }% +\else + \long\def\RotCh@rot#1#2{% + \EdefSanitize#1{#2}% + \begingroup + \csname RotCh@rot@\romannumeral\RotCh@number\endcsname + \lowercase\expandafter{\expandafter\endgroup + \expandafter\def\expandafter#1\expandafter{#1}% + }% + }% +\fi +\RotCh@AtEnd% +\endinput +%% +%% End of file `rotchiffre.sty'. |