own package frame 1.0 (15may10)

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

2 files changed, 67 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/generic/frame/frame.sty b/Master/texmf-dist/tex/generic/frame/frame.sty
new file mode 100644
index 00000000000..edf678098ab
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/frame/frame.sty
@@ -0,0 +1,9 @@
+%% $Id: frame.sty 320 2010-05-15 09:42:13Z herbert $
+\ProvidesPackage{frame}[2010/05/15 package wrapper for 
+  frame.tex (hv)]
+\input{frame.tex}
+\ProvidesFile{frame.tex}
+  [\filedate\space v\fileversion\space `frame' (tvz,hv)]
+%
+\endinput
+
diff --git a/Master/texmf-dist/tex/generic/frame/frame.tex b/Master/texmf-dist/tex/generic/frame/frame.tex
new file mode 100644
index 00000000000..de9f915913f
--- /dev/null
+++ b/Master/texmf-dist/tex/generic/frame/frame.tex
@@ -0,0 +1,58 @@
+%%
+%% $Id: frame.tex 320 2010-05-15 09:42:13Z herbert $
+%%
+%% COPYRIGHT 1992/2010, by Timothy Van Zandt, tvz@Princeton.EDU
+%% COPYRIGHT 2010, by Herbert Voss, hvoss@tug.org
+%%
+%% Copyright:
+%% This program can be redistributed and/or modified under the terms
+%% of the LaTeX Project Public License Distributed from CTAN archives
+%% in directory macros/latex/base/lppl.txt.
+%%
+%% DESCRIPTION:
+%%   frame.tex/frame.sty provides fancy frames for generic TeX 
+%
+% Usage:
+% \fancyframebox {rule thickness} {separation from inner guy} {inner guy}
+%
+% \makeemptybox {width} {height} {depth}
+%%
+%
+\def\fileversion{1.0}
+\def\filedate{2010/05/15}
+%
+\csname FrameLoaded\endcsname
+\let\FrameLoaded\endinput
+%
+\edef\TheAtCode{\the\catcode`\@}
+\catcode`\@=11\relax
+\message{\space\space v\fileversion\space\space \filedate\space\space <tvz>}
+ 
+\newbox\fancyboxA
+\newbox\fancyboxB
+\newdimen\fancyboxD
+ 
+\def\makeemptybox#1#2#3{\setbox\fancyboxA=\hbox{}\wd\fancyboxA=#1\relax
+    \ht\fancyboxA=#2\relax \dp\fancyboxA=#3\relax \box\fancyboxA }
+ 
+\def\fancyframebox#1#2#3{%
+    \leavevmode
+    \setbox\fancyboxB=\hbox{#3}%
+    \dimen\fancyboxD=#1\relax
+    \advance\dimen\fancyboxD by #2\relax
+    \advance\dimen\fancyboxD by \dp\fancyboxB
+    \hbox{%
+ \lower\dimen\fancyboxD\hbox{%
+     \vbox{%
+  \hrule height #1\relax
+  \hbox{%
+      \vrule width #1\relax
+      \kern #2\relax
+      \vbox{\vskip #2\relax\box\fancyboxB\vskip #2\relax}%
+      \kern #2\relax
+      \vrule width #1\relax}%
+  \hrule height #1\relax}}}}
+%
+\expandafter\catcode`\@=\TheAtCode\relax
+\endinput
+%% END frame.tex/frame.sty