textpos

git-svn-id: svn://tug.org/texlive/trunk@1385 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 330 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/textpos/textpos.sty b/Master/texmf-dist/tex/latex/textpos/textpos.sty
new file mode 100644
index 00000000000..c616a809a09
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/textpos/textpos.sty
@@ -0,0 +1,330 @@
+%%
+%% This is file `textpos.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% textpos.dtx  (with options: `package')
+%% Textpos: absolute positioning of text on the page
+%% This software is copyright, 1999, 2001--2003, 2005 Norman Gray.
+%%
+%% This program is free software; you can redistribute it and/or
+%% modify it under the terms of the GNU General Public License
+%% as published by the Free Software Foundation; either version 2
+%% of the License, or (at your option) any later version.
+%%
+%% This program is distributed in the hope that it will be useful,
+%% but WITHOUT ANY WARRANTY; without even the implied warranty of
+%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+%% GNU General Public License for more details.
+%%
+%% You should have received a copy of the GNU General Public License
+%% along with this program; if not, write to the Free Software
+%% Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
+%%
+%% Author: Norman Gray, norman@astro.gla.ac.uk.
+%% Department of Physics and Astronomy, University of Glasgow, UK
+%%
+%% See the file LICENCE for a copy of the GPL.
+%% You can also find an online copy at http://www.gnu.org/copyleft/gpl.html .
+%%
+%%% Source: $Id: textpos.dtx.in,v 1.7 2005/10/13 19:09:13 norman Exp $
+%%
+%%\def\ParseRCSDate$#1: #2 #3 ${\def\TP@Date{#2}}
+%%\ParseRCSDate$Date: 2005/10/13 19:09:13 $
+\def\filename{textpos}
+\def\fileversion{1.6a}
+\def\filedate{2005/10/13}
+\def\docdate{2005 October 13}
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{textpos}[\filedate\space v\fileversion]
+\typeout{Package: `textpos' \fileversion\space<\docdate>}
+\newif\ifTP@showboxes
+\TP@showboxesfalse
+\DeclareOption{showboxes}{\TP@showboxestrue}
+\newif\ifTP@showtext
+\TP@showtexttrue
+\DeclareOption{noshowtext}{\TP@showtextfalse}
+\newif\ifTP@abspos
+\TP@absposfalse
+\DeclareOption{absolute}{\TP@abspostrue}
+\newif\ifTP@overlay
+\TP@overlayfalse
+\DeclareOption{overlay}{\TP@overlaytrue}
+\newif\ifTP@chatter
+\TP@chattertrue
+\DeclareOption{quiet}{\TP@chatterfalse}
+\DeclareOption{verbose}{\TP@chattertrue}
+\ProcessOptions
+\ifTP@abspos
+  \RequirePackage{everyshi}
+\fi
+\@ifundefined{figure}{}{
+  \newcommand\TP@caption[2]{\refstepcounter{#1}\@caption{#1}[]{#2}}
+  \newcommand\TP@figure{\par \def\caption##1{\TP@caption{figure}{##1}}}
+  \newcommand\TP@table {\par \def\caption##1{\TP@caption{table}{##1}}}
+}
+\newbox\TP@textbox
+\ifTP@abspos
+  \newbox\TP@holdbox            % starts off void
+  \AtEndDocument{\ifvoid\TP@holdbox \else \hbox{}\fi}
+\fi
+\newdimen\TPHorizModule
+\newdimen\TPVertModule
+\newdimen\TP@margin
+\TP@margin=0pt
+\newdimen\TP@absmargin
+\TP@absmargin=0pt
+\newcommand{\TPMargin}{%
+  \@ifstar\TPMargin@outer\TPMargin@inner
+}
+\newcommand{\TPMargin@inner}[1]{%
+  \TP@margin=#1\relax
+  \ifdim\TP@margin < 0pt
+    \PackageError{textpos}
+      {\protect\TPMargin\space must have a positive argument}
+      {\protect\TPMargin\space must have a positive argument}
+  \fi
+  \TP@absmargin=\TP@margin
+}
+\newcommand\TPMargin@outer[1]{%
+  \TP@margin=-#1\relax
+  \ifdim\TP@margin > 0pt
+    \PackageError{textpos}
+      {\protect\TPMargin*\space must have a positive argument}
+      {\protect\TPMargin*\space must have a positive argument}
+  \fi
+  \TP@absmargin=-\TP@margin
+}
+\def\TPGrid{%
+  \@ifnextchar[{\@tempswatrue\TP@Grid}{\@tempswafalse\TP@Grid[0pt,0pt]}}
+\def\TP@Grid[#1,#2]#3#4{
+  \setlength{\@tempdima}{#1}
+  \multiply\@tempdima by 2
+  \TPHorizModule=\paperwidth
+  \advance\TPHorizModule by -\@tempdima
+  \divide\TPHorizModule by #3
+  \setlength{\@tempdima}{#2}
+  \multiply\@tempdima by 2
+  \TPVertModule=\paperheight
+  \advance\TPVertModule by -\@tempdima
+  \divide\TPVertModule by #4
+  \ifTP@chatter
+    \typeout{Grid set #3 x #4 = \the\TPHorizModule\space x \the\TPVertModule}%
+  \fi
+  \ifTP@abspos\if@tempswa \textblockorigin{#1}{#2}\fi\fi
+}
+\TPGrid{16}{16}
+\newdimen\TPboxrulesize
+\setlength{\TPboxrulesize}{0.4pt}
+\def\showtextsize{\normalsize}
+\ifTP@abspos
+  \newdimen\TP@ox
+  \newdimen\TP@oy
+\fi
+\def\textblockorigin#1#2{%
+  \ifTP@abspos
+    \TP@ox=-1in    \addtolength\TP@ox{#1}
+    \TP@oy=-1in    \addtolength\TP@oy{#2}
+    \ifTP@chatter\typeout{TextBlockOrigin set to #1 x #2}\fi
+  \else
+    \PackageError{textpos}
+      {The \protect\textblockorigin\space command\MessageBreak
+       may only be used if the package was given\MessageBreak
+       the`absolute' option when it was invoked}
+      {If you want to use the \protect\textblockorigin\space command, then
+         \MessageBreak
+       invoke the package with the syntax\MessageBreak
+       \protect\usepackage[absolute]{textpos}}
+  \fi
+  }
+\def\textblocklabel#1{\gdef\TP@textblocklabel{#1}}
+\def\textblockcolour#1{%
+  \@ifundefined{color}%
+    {\gdef\TP@blockcolour{}}% ignore argument, switch off colour blocking below
+    {%
+      \def\@tempa{#1}
+      \gdef\TP@blockcolour{#1}
+      \ifx\TP@defaultblockcolour\@undefined
+        \gdef\TP@defaultblockcolour{#1}
+      \fi
+    }}
+\def\TP@blockcolour{}           % safe initial default
+\let\textblockcolor\textblockcolour
+\let\tekstblokkulur\textblockcolour
+\def\textblock#1{%
+  \@tempdima=#1\TPHorizModule
+  \ifvmode\else
+    \ifmmode
+      \PackageError{textpos}
+        {You cannot use textblock in maths mode}
+        {You may use the textblock environment only in \MessageBreak
+         vertical mode or horizontal mode (when it triggers a\MessageBreak
+         new paragraph).  You cannot use it in maths mode.}
+    \else % in horizontal mode
+      \par % force us back into vertical mode
+    \fi
+  \fi
+  \@ifnextchar[{\TP@textblock}{\TP@textblock[0,0]}%] bracematch
+}
+\def\TP@textblockstar#1{%
+  \setlength{\@tempdima}{#1}
+  \ifvmode\else
+    \PackageWarning{textpos}{environment textblock* not in vertical mode.
+      \MessageBreak
+      Environment textblock* should not have any text\MessageBreak
+      or printable material appearing before it.\MessageBreak
+      Alignment may work out wrongly.}%
+    \par % force us back into vertical mode
+  \fi
+  \@ifnextchar[{\TP@textblock}{\TP@textblock[0,0]}%] bracematch
+}
+\expandafter\let\csname textblock*\endcsname\TP@textblockstar
+\newtoks\TP@tbargs
+\def\TP@textblock[#1,#2](#3,#4){%
+  \TP@tbargs={{#1}{#2}{#3}{#4}}%
+  \@ifundefined{figure}{}{
+    \let\figure\TP@figure
+    \let\table\TP@table
+    \let\endfigure\relax
+    \let\endtable\relax
+  }
+  \setbox\TP@textbox=\vbox\bgroup
+    \ifTP@showboxes
+      \hrule height0pt depth \TPboxrulesize
+      \vskip-\TPboxrulesize
+    \fi
+    \hsize=\@tempdima
+    \ifdim\TP@margin < 0pt
+        \advance\hsize by 2\TP@absmargin % bigger box
+    \fi
+    \leftskip=\TP@absmargin
+    \rightskip=\TP@absmargin
+    \vskip \TP@absmargin
+    \textwidth\hsize \columnwidth\hsize \linewidth\hsize
+  }
+\def\endtextblock{\global\@tempswatrue\TP@commonendtextblock}
+\@namedef{endtextblock*}{\global\@tempswafalse\TP@commonendtextblock}
+\newdimen\TP@prevdepth
+\def\TP@commonendtextblock{%
+    \vskip \TP@absmargin
+    \ifTP@showboxes
+        \vskip-\TPboxrulesize
+        \hrule depth 0pt height \TPboxrulesize
+    \fi
+    \egroup % end of \TP@textbox
+  \TP@prevdepth=\prevdepth
+  \prevdepth=-1000pt  % = \nointerlineskip
+  \expandafter\TP@endtextblock\the\TP@tbargs
+  }
+\def\TP@endtextblock#1#2#3#4{%
+  \if@tempswa % modular/unstarred endtextblock
+    \@tempdima=#3\TPHorizModule
+    \@tempdimb=#4\TPVertModule
+  \else % absolute/starred endtextblock
+    \setlength{\@tempdima}{#3}
+    \setlength{\@tempdimb}{#4}
+  \fi
+  \ifdim\TP@margin < 0pt
+    \advance\@tempdima \TP@margin
+    \advance\@tempdimb \TP@margin
+    % #1,#2 are proportions of \TP@textbox size
+    \@tempdimc=-#1\wd\TP@textbox
+    \advance\@tempdima\@tempdimc
+    \@tempdimc=-#2\ht\TP@textbox
+    \advance\@tempdimb\@tempdimc
+  \else
+    % \TP@margin is positive
+    % #1,#2 are proportions of \TP@framebox size = \TP@textbox+2\TP@margin
+    \@tempdimc=\wd\TP@textbox
+    \advance\@tempdimc 2\TP@margin
+    \@tempdimc=#1\@tempdimc
+    \advance\@tempdima -\@tempdimc
+    \@tempdimc=\ht\TP@textbox
+    \advance\@tempdimc 2\TP@margin
+    \@tempdimc=#2\@tempdimc
+    \advance\@tempdimb -\@tempdimc
+  \fi
+  \ifTP@abspos
+    \advance\@tempdima by \TP@ox
+    \advance\@tempdimb by \TP@oy
+  \fi
+  \setbox0=\vbox to 0pt{\vskip\@tempdimb
+    \hbox to 0pt{\hskip\@tempdima
+    \ifx\TP@blockcolour\@empty \else
+      {% defaults for TP@blockcolour mean we should never get here if
+       % the {color} package is not loaded
+        \color{\TP@blockcolour}%
+        \color@block{\wd\TP@textbox}{\ht\TP@textbox}{\dp\TP@textbox}%
+      }%
+    \fi
+    \ifx\TP@defaultblockcolour\@undefined \else
+      \global\let\TP@blockcolour\TP@defaultblockcolour
+    \fi
+    \ifTP@showboxes
+      \vrule width \TPboxrulesize
+      \hskip -\TPboxrulesize
+    \fi
+    \ifTP@showtext
+      \box\TP@textbox
+    \else
+      \vbox to\ht\TP@textbox{%
+        \ifTP@showboxes
+          \hrule depth 0pt height \TPboxrulesize \vskip-\TPboxrulesize
+        \fi
+        \vskip\smallskipamount
+        \hbox to\wd\TP@textbox{%
+          \ifx\TP@textblocklabel\undefined
+            \hbox{}%
+          \else
+            \hskip\smallskipamount
+            \fbox{\showtextsize \TP@textblocklabel}%
+            \global\let\TP@textblocklabel\undefined
+          \fi
+          \hss
+        }%
+        \vss
+        \ifTP@showboxes
+          \vskip -\TPboxrulesize
+          \hrule depth 0pt height \TPboxrulesize
+        \fi
+      }%
+    \fi
+    \ifTP@showboxes
+      \hskip -\TPboxrulesize
+      \vrule width \TPboxrulesize
+    \fi
+    \hss}%
+  \vss
+  }%  end of box0
+  \ifTP@abspos
+    \global\setbox\TP@holdbox\vbox{%
+      \box0
+      \unvbox\TP@holdbox
+    }%
+  \else
+    \box0
+    \prevdepth=\TP@prevdepth
+  \fi
+  }%
+\ifTP@abspos
+  \ifTP@overlay
+    \EveryShipout{%
+      \global\setbox\@cclv\vbox{%
+        \vbox to 0pt{\ifvbox\@cclv \unvbox\@cclv \else \box\@cclv \fi \vss}%
+        \unvbox\TP@holdbox      % TP@holdbox is now void
+      }
+    }%
+  \else
+    \EveryShipout{%
+      \global\setbox\@cclv\vbox{%
+        \unvbox\TP@holdbox
+        \ifvbox\@cclv \unvbox\@cclv \else \box\@cclv \fi
+      }%
+    }%
+  \fi
+  \textblockorigin{0pt}{0pt}%
+\fi
+\endinput
+%%
+%% End of file `textpos.sty'.