Gecko [ 122.154.134.11 ]

Name	Size	Permission
alphalph.sty	6.02 KB	-rw-r--r--
engord.sty	4.45 KB	-rw-r--r--
ifpdf.sty	2.96 KB	-rw-r--r--
ifvtex.sty	3.71 KB	-rw-r--r--
kvsetkeys.sty	7.82 KB	-rw-r--r--
pdfcrypt.sty	12.24 KB	-rw-r--r--
setouterhbox.sty	5.87 KB	-rw-r--r--
telprint.sty	4.64 KB	-rw-r--r--

Code Editor : telprint.sty

%%
%% This is file `telprint.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% telprint.dtx  (with options: `package')
%% 
%% This is a generated file.
%% 
%% Copyright (C) 1996, 1997, 2004, 2005, 2006 by
%%    Heiko Oberdiek <oberdiek@uni-freiburg.de>
%% 
%% 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 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.
%% 
%% This work consists of the main source file telprint.dtx
%% and the derived files
%%    telprint.sty, telprint.pdf, telprint.ins, telprint.drv.
%% 
\begingroup
  \expandafter\let\expandafter\x\csname ver@telprint.sty\endcsname
  \ifcase 0%
    \ifx\x\relax % plain
    \else
      \ifx\x\empty % LaTeX
      \else
        1%
      \fi
    \fi
  \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{telprint}{The package is already loaded}%
    \endgroup
    \expandafter\endinput
  \fi
\endgroup
\begingroup
  \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\relax
        \xdef#1{#3}%
      \fi
    }%
  \fi
\expandafter\x\csname ver@telprint.sty\endcsname
\ProvidesPackage{telprint}%
  [2006/08/16 v1.7 Formatting of German phone numbers (HO)]
\ifx\telprint\UnDeFiNeD
\else\endinput\fi
\ifx\DeclareRobustCommand\UnDeFiNeD
  \def\DeclareRobustCommand*#1[1]{\def#1##1}
  \def\TELreset{\let\DeclareRobustCommand=\UnDeFiNeD}
  \immediate\write-1{Package `telprint' warning: %
  Macros are not robust!}
\else
  \let\TELreset=\relax
\fi
\DeclareRobustCommand*{\telspace}[1]{\def\TELspace{#1}}
\telspace{{}$\,${}}
\DeclareRobustCommand*{\telhyphen}[1]{\def\TELhyphen{#1}}
\telhyphen{\leavevmode\hbox{-}}% \hbox zur Verhinderung der Trennung
\DeclareRobustCommand*{\telslash}[1]{\def\TELslash{#1}}
\telslash{/}%
\DeclareRobustCommand*{\telleftparen}[1]{\def\TELleftparen{#1}}
\telleftparen{(}%
\DeclareRobustCommand*{\telrightparen}[1]{\def\TELrightparen{#1}}
\telrightparen{)}%
\DeclareRobustCommand*{\telplus}[1]{\def\TELplus{#1}}
\telplus{+}%
\DeclareRobustCommand*{\teltilde}[1]{\def\TELtilde{#1}}
\teltilde{~}%
\newtoks\TELtoks
\def\TELnumber#1#2\TELnumberEND{%
  \begingroup
  \def\0{#2}%
  \expandafter\endgroup
  \ifx\0\empty
    \TELtoks=\expandafter{\the\TELtoks#1}%
    \ifnum\TELswitch=0
      \def\TELx{\TELspace}\def\TELy{}%
    \else
      \def\TELx{}\def\TELy{\TELspace}%
    \fi
    \the\TELtoks
  \else
    \ifnum\TELswitch=0
      \TELtoks=\expandafter{\the\TELtoks#1\TELx}%
      \def\TELswitch{1}%
    \else
      \TELtoks=\expandafter{\the\TELtoks#1\TELy}%
      \def\TELswitch{0}%
    \fi
    \TELnumber#2\TELnumberEND
  \fi
}
\DeclareRobustCommand*{\telnumber}[1]{%
  \TELtoks={}%
  \def\TELswitch{0}%
  \TELnumber#1{}\TELnumberEND
}
\def\TELsplit{\futurelet\TELfuture\TELdosplit}
\def\TELdosplit#1#2\TELsplitEND
{%
  \def\TELsp{ }%
  \expandafter\ifx\TELsp\TELfuture
    \let\TELfuture=\relax
    \expandafter\telnumber\expandafter{\the\TELtoks}~%
    \telprint{#1#2}% Das Leerzeichen kann nicht #1 sein!
  \else
    \def\TELfirst{#1}%
    \ifx\TELfirst\empty
      \expandafter\telnumber\expandafter{\the\TELtoks}%
      \TELtoks={}%
    \else\if-\TELfirst
      \expandafter\telnumber\expandafter{\the\TELtoks}\TELhyphen
      \telprint{#2}%
    \else\if/\TELfirst
      \expandafter\telnumber\expandafter{\the\TELtoks}\TELslash
      \telprint{#2}%
    \else\if(\TELfirst
      \expandafter\telnumber\expandafter{\the\TELtoks}\TELleftparen
      \telprint{#2}%
    \else\if)\TELfirst
      \expandafter\telnumber\expandafter{\the\TELtoks}\TELrightparen
      \telprint{#2}%
    \else\if+\TELfirst
      \expandafter\telnumber\expandafter{\the\TELtoks}\TELplus
      \telprint{#2}%
    \else\def\TELtemp{~}\ifx\TELtemp\TELfirst
      \expandafter\telnumber\expandafter{\the\TELtoks}\TELtilde
      \telprint{#2}%
    \else
      \TELtoks=\expandafter{\the\TELtoks#1}%
      \TELsplit#2{}\TELsplitEND
    \fi\fi\fi\fi\fi\fi\fi
  \fi
}
\DeclareRobustCommand*{\telprint}[1]{%
  \TELtoks={}%
  \TELsplit#1{}\TELsplitEND
}
\TELreset\let\TELreset=\UnDeFiNeD
\endinput
%%
%% End of file `telprint.sty'.

${this.title}

Code Editor : telprint.sty