shadow own package (1nov10)

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

1 files changed, 90 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/shadow/shadow.sty b/Master/texmf-dist/tex/latex/shadow/shadow.sty
new file mode 100644
index 00000000000..c07d11b9155
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/shadow/shadow.sty
@@ -0,0 +1,90 @@
+%%
+%% This is file `shadow.sty',
+%%
+%% Copyright 1994, 2003 Mauro Orlandini
+%% 
+%% It may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.2
+%% 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.2 or later is part of all distributions of LaTeX
+%% version 1999/12/01 or later.
+%% 
+%%% ======================================================================
+%%%  @LaTeX-style{
+%%%     filename        = "shadow.sty",
+%%%     version         = "1.3",
+%%%     date            = "19 February 2003",
+%%%     author          = "Mauro Orlandini",
+%%%     address         = "TeSRE Institute/CNR
+%%%                        Area della Ricerca di Bologna
+%%%                        Via Gobetti 101
+%%%                        40129 Bologna, Italy",
+%%%     e-mail          = "orlandini@bo.iasf.cnr.it",
+%%%     telephone       = "+39 51 639-8667",
+%%%     FAX             = "+39 51 639-8723",
+%%%     supported       = "yes",
+%%%     abstract        = "The command \shabox has the same meaning of the
+%%%                        LaTeX command \fbox except for the fact that a
+%%%                        "shadow" is added to the bottom and the right side
+%%%                        of the box. It computes the right dimension of the
+%%%                        box, even if the text spans over more than one
+%%%                        line; in this case a warning messagge is given.",
+%%%     codetable       = "ISO/ASCII",
+%%%     docstring       = "There are three parameters governing:
+%%%                        1. the width of the lines delimiting the box:
+%%%                           \sboxrule
+%%%                        2. the separation between the edge of the box and
+%%%                           its contents: \sboxsep
+%%%                        3. the dimension of the shadow: \sdim
+%%%                        Sintax: \shabox{<text>}
+%%%                                where <text> is the text to be put in the
+%%%                                framed box. It can be an entire paragraph.
+%%%                        Adapted from the file dropshadow.tex by
+%%%                        drstrip@cd.sandia.gov.
+%%%                        V1.1  Works in a double column environment.
+%%%                        V1.2  When there is an online shadow box, it
+%%%                              will be centered on the line (in V1.1 the
+%%%                              box was aligned with the baseline).
+%%%                              (Courtesy by Mike Piff)"
+%%%                        V1.3  Added a number of missing % signs
+%%%                              no other cleanup done (FMi)
+%%%                        
+%%% }
+%%% ======================================================================
+%
+%
+\ProvidesPackage{shadow}[2003/02/19 v1.3 shadow boxes (M.O.)]
+
+\newdimen\txtwdth  \newdimen\sht  \newdimen\shw  \newbox\shbox
+\newdimen\sboxsep  \newdimen\sboxrule  \newdimen\sdim
+\sboxsep  = 10pt
+\sdim     = 4pt
+\sboxrule = .4pt
+\def\shabox#1{\setbox\@tempboxa\hbox{#1}%
+\shw\wd\@tempboxa
+\if@twocolumn\txtwdth\columnwidth\else\txtwdth\textwidth\fi
+\ifdim\shw<\txtwdth 
+  \leavevmode\setbox\@tempboxa\hbox{#1}%
+\else
+  \typeout{Shadow Warning: Box dimension greater than textwidth.}%
+  \setbox\@tempboxa\vbox{\hsize\txtwdth\advance\hsize-2\sboxsep
+    \advance\hsize-2\sboxrule \advance\hsize-2\sdim \advance\hsize-15pt#1}%
+\fi
+ \setbox\shbox\hbox{\@tempdima\sboxrule
+     \advance\@tempdima \sboxsep \advance\@tempdima \dp\@tempboxa
+    \hbox{\lower \@tempdima\hbox
+   {\vbox{\hrule \@height \sboxrule
+           \hbox{\vrule \@width \sboxrule \hskip\sboxsep
+            \vbox{\vskip\sboxsep \box\@tempboxa\vskip\sboxsep}\hskip
+                         \sboxsep\vrule \@width \sboxrule}%
+                   \hrule \@height \sboxrule}}}}%
+\sht\ht\shbox \advance\sht-\sdim
+\leavevmode\vbox{\baselineskip0pt\lineskip0pt\vtop{%%     V1.2
+                                                   %%     Added \vtop
+                                                   %%     From M.Piff
+             \hbox{\copy\shbox\vrule width\sdim height\sht}%
+             \hbox{\kern\sdim\vrule height\sdim width \wd\shbox}}}}
+
+\endinput