summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/niceframe
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-13 00:00:43 +0000
committerKarl Berry <karl@freefriends.org>2006-01-13 00:00:43 +0000
commit6df4a0e89d38e7a22ad58eff517a2787d3fcb1bd (patch)
tree99c7a52dbdac6b76f2b96422a2ff2715fc473ff2 /Master/texmf-dist/tex/latex/niceframe
parentdb5824bcf54d0985fdb44137aaf6d230da990483 (diff)
niceframe
git-svn-id: svn://tug.org/texlive/trunk@1139 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/niceframe')
-rw-r--r--Master/texmf-dist/tex/latex/niceframe/niceframe.sty132
1 files changed, 132 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/niceframe/niceframe.sty b/Master/texmf-dist/tex/latex/niceframe/niceframe.sty
new file mode 100644
index 00000000000..bdef91c0fb8
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/niceframe/niceframe.sty
@@ -0,0 +1,132 @@
+%%
+%% This is file `niceframe.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% niceframe.dtx (with options: `package')
+%%
+%% This file 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.
+%%
+%% IMPORTANT NOTICE:
+%%
+%% Copyright (C) 1996 Marcus Ohlhaut (marcus_ohlhaut@m4.maus.de).
+%% All rights reserved.
+%%
+%% Permission is granted to distribute verbatim copies of this file.
+%%
+%% No other permissions to copy or distribute this file in any form
+%% are granted and in particular no permission to modify its contents.
+%%
+%% \CharacterTable
+%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%% Digits \0\1\2\3\4\5\6\7\8\9
+%% Exclamation \! Double quote \" Hash (number) \#
+%% Dollar \$ Percent \% Ampersand \&
+%% Acute accent \' Left paren \( Right paren \)
+%% Asterisk \* Plus \+ Comma \,
+%% Minus \- Point \. Solidus \/
+%% Colon \: Semicolon \; Less than \<
+%% Equals \= Greater than \> Question mark \?
+%% Commercial at \@ Left bracket \[ Backslash \\
+%% Right bracket \] Circumflex \^ Underscore \_
+%% Grave accent \` Left brace \{ Vertical bar \|
+%% Right brace \} Tilde \~}
+%%
+\def\fileversion{1.1b}
+\def\filedate{1996/10/20}
+\NeedsTeXFormat{LaTeX2e}[1994/06/01]
+\ProvidesPackage{niceframe}[\filedate\space v\fileversion\space niceframe package (MO)]
+\typeout{Package: niceframe v\fileversion\space <\filedate> (Marcus Ohlhaut)}
+\RequirePackage{calc}
+\font\ding dingbat scaled 1200
+\newlength{\nicefr@mechar}
+\settowidth{\nicefr@mechar}{\ding\char'141}
+\newlength{\nicefr@mewidth}
+\setlength{\nicefr@mewidth}{\hsize}
+\newlength{\nicefr@meheight}
+\setlength{\nicefr@meheight}{\vsize}
+\newlength{\@ldhsize}
+\setlength{\@ldhsize}{\hsize}
+\newcommand{\upd@ublerulefill}{\xleaders\hbox to 10pt
+ {\hss\ding\char'142 \hss}\hfill}
+\newcommand{\dnd@ublerulefill}{\xleaders\hbox to 10pt
+ {\hss\ding\char'147 \hss}\hfill}
+\newcommand{\ltd@ublerulefill}{\xleaders\vbox to 10pt
+ {\vss\hbox{\ding\char'144}\vss}\vfill}
+\newcommand{\rtd@ublerulefill}{\xleaders\vbox to 10pt
+ {\vss\hbox{\ding\char'145}\vss}\vfill}
+\newcommand{\niceframe}[2][\textwidth]{{
+ \setlength{\hsize}{#1 - 2\nicefr@mechar}
+ \setbox0=\vbox{#2}
+ \setlength{\nicefr@meheight}{\ht0 + \dp0}
+ \setlength{\nicefr@mewidth}{\wd0 + 2\nicefr@mechar}
+ \vbox{%
+ \hbox to\nicefr@mewidth{\ding\char'141\upd@ublerulefill\char'143}
+ \hbox to\nicefr@mewidth{\vbox to\nicefr@meheight{\ltd@ublerulefill}
+ \hss\raise\dp0\box0\hss
+ \vbox to\nicefr@meheight{\rtd@ublerulefill}}
+ \hbox to\nicefr@mewidth{\ding\char'146\dnd@ublerulefill\char'150}
+ }
+}}
+\newcommand{\curlyframe}[2][\textwidth]{{
+ \setlength{\hsize}{#1 - 2\nicefr@mechar}
+ \setbox0=\vbox{#2}
+ \setlength{\nicefr@meheight}{\ht0 + \dp0}
+ \setlength{\nicefr@mewidth}{\wd0 + 2\nicefr@mechar}
+ \vbox{%
+ \hbox to\nicefr@mewidth{\ding\char'105\hfill\char'106}
+ \vskip-\baselineskip
+ \hbox to\nicefr@mewidth{\hss\raise\dp0\box0\hss}
+ \vskip-\baselineskip
+ \hbox to\nicefr@mewidth{\ding\char'110\hfill\char'107}
+ }
+}}
+\newcommand{\artdecoframe}[2][\textwidth]{{
+ \setlength{\hsize}{#1 - 2\nicefr@mechar}
+ \setbox0=\vbox{#2}
+ \setlength{\nicefr@meheight}{\ht0 + \dp0}
+ \setlength{\nicefr@mewidth}{\wd0 + 2\nicefr@mechar}
+ \vbox{%
+ \hbox to\nicefr@mewidth{\ding\char'115\hfill\char'114}
+ \hbox to\nicefr@mewidth{\hss\raise\dp0\box0\hss}
+ \hbox to\nicefr@mewidth{\ding\char'112\hfill\char'113}
+ }
+}}
+\newcounter{times}
+\newlength{\fr@mecharTT}
+\newlength{\fr@mecharLL}
+\newlength{\fr@mewidth}
+\newlength{\fr@meheight}
+\newcommand{\generalframe}[9]{{
+ \settowidth{\fr@mecharTT}{#2}
+ \settoheight{\fr@mecharLL}{#4}
+ \setcounter{times}{1 * \ratio{\hsize}{\fr@mecharTT}}
+ \setlength{\fr@mewidth}{\fr@mecharTT * \value{times}}
+ \setlength{\hsize}{\fr@mewidth - 2\fr@mecharTT - 2\fboxsep}
+ \setbox0=\vbox{#9}
+ \setlength{\fr@meheight}{\ht0 + \dp0 + 2\fboxsep}
+ \setcounter{times}{1 * \ratio{\fr@meheight}{\fr@mecharLL}}
+ \setcounter{times}{\value{times} + 1}
+ \setlength{\fr@meheight}{\fr@mecharLL * \value{times}}
+ \newcommand{\up@fill}{\leaders\hbox{#2}\hfill}
+ \newcommand{\lt@fill}{\leaders\vbox{\hbox{#4}}\vfill}
+ \newcommand{\rt@fill}{\leaders\vbox{\hbox{#5}}\vfill}
+ \newcommand{\dn@fill}{\leaders\hbox{#7}\hfill}
+ \vbox{%
+ \hbox to\fr@mewidth{#1\up@fill#3}\nointerlineskip
+ \hbox to\fr@mewidth{\vbox to\fr@meheight{\lt@fill}%
+ \hfill%
+ \vbox to\fr@meheight{\vfill\box0\vfill}%
+ \hfill%
+ \vbox to\fr@meheight{\rt@fill}%
+ }\nointerlineskip
+ \hbox to\fr@mewidth{#6\dn@fill#8}\nointerlineskip
+ }
+}}
+\endinput
+%%
+%% End of file `niceframe.sty'.