summaryrefslogtreecommitdiff
path: root/macros/latex/contrib/fbox/latex
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /macros/latex/contrib/fbox/latex
Initial commit
Diffstat (limited to 'macros/latex/contrib/fbox/latex')
-rw-r--r--macros/latex/contrib/fbox/latex/fbox.sty82
1 files changed, 82 insertions, 0 deletions
diff --git a/macros/latex/contrib/fbox/latex/fbox.sty b/macros/latex/contrib/fbox/latex/fbox.sty
new file mode 100644
index 0000000000..b3227b36ca
--- /dev/null
+++ b/macros/latex/contrib/fbox/latex/fbox.sty
@@ -0,0 +1,82 @@
+%% This is file `fbox.sty',
+%%
+%% Copyright (C) 2019
+%% Herbert Voss <hvoss@tug.org>
+%%
+%% It may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either version 1.3c
+%% 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.3c or later is part of all distributions of LaTeX
+%% version 2005/12/01 or later.
+%
+% $Id: fbox.sty 946 2019-03-08 12:08:22Z herbert $
+%
+% -------------------------------------
+\ProvidesPackage{fbox}[2019/03/00 v. 0.01 allow parts of the frame (hv)]
+%
+\let\orig@fbox\fbox
+\def\fb@lowerc@se#1{\lowercase{\edef\@tempa{#1}}}
+%
+\long\def\fbox{\@ifnextchar[\FBox@i\orig@fbox}
+%
+\def\FBox@i[#1]{%
+ \ifx\relax#1\relax
+ \@tempcntb=15
+ \else
+ \@tempcntb=\z@
+ \fb@lowerc@se{#1}%
+ \expandafter\FBox@ii\@tempa\@nil\relax
+ \fi
+ \FBox@iii
+}
+\def\FBox@ii#1#2\@nil{%
+ \ifx#1t\advance\@tempcntb by 8% top
+ \else
+ \ifx#1l\advance\@tempcntb by 4% left
+ \else
+ \ifx#1r\advance\@tempcntb by 2% right
+ \else
+ \ifx#1b\advance\@tempcntb by 1% bottom
+ \fi\fi\fi\fi
+ \if\relax#2\relax\def\next{}\else\def\next{\FBox@ii#2\@nil}\fi
+ \next
+}
+\def\FBox@iii#1{%
+ \leavevmode
+ \setbox\@tempboxa\hbox{%
+ \color@begingroup
+ \kern\fboxsep{#1}\kern\fboxsep
+ \color@endgroup}%
+ \@FrameB@x\relax}
+%
+\def\@FrameB@x#1{%
+ \@tempdima\fboxrule
+ \advance\@tempdima\fboxsep
+ \advance\@tempdima\dp\@tempboxa
+ \hbox{%
+ \lower\@tempdima\hbox{%
+ \vbox{%
+ \ifnum\the\@tempcntb>8\relax
+ \advance\@tempcntb by -8
+ \hrule\@height\fboxrule % top
+ \fi
+ \hbox{%
+ \ifnum\@tempcntb>3
+ \advance\@tempcntb by -4
+ \vrule\@width\fboxrule
+ \fi % left
+ #1%
+ \vbox{%
+ \vskip\fboxsep
+ \box\@tempboxa
+ \vskip\fboxsep}%
+ #1%
+ \ifnum\@tempcntb>1\vrule\@width\fboxrule\fi}% right
+ \ifodd\@tempcntb\hrule\@height\fboxrule\fi}% bottom
+ }%
+ }%
+}
+
+\endinput \ No newline at end of file