diff options
author | Karl Berry <karl@freefriends.org> | 2011-10-26 00:56:29 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-10-26 00:56:29 +0000 |
commit | bec61a5e114b4b6842935b29323aeeb6020f6bf2 (patch) | |
tree | 0c1bbf034903fb7896f1f395b74e023a1fa0b248 /Master/texmf-dist/tex/latex | |
parent | 74d5eba1f2b1707bfc98e257fa5fb2010db8ab25 (diff) |
new latex package ghab (25oct11)
git-svn-id: svn://tug.org/texlive/trunk@24396 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex')
-rw-r--r-- | Master/texmf-dist/tex/latex/ghab/ghab.sty | 58 |
1 files changed, 58 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/ghab/ghab.sty b/Master/texmf-dist/tex/latex/ghab/ghab.sty new file mode 100644 index 00000000000..6338014a9d2 --- /dev/null +++ b/Master/texmf-dist/tex/latex/ghab/ghab.sty @@ -0,0 +1,58 @@ +%% +%% This is file `ghab.sty', + +%% +%% __________________________________ +%% Copyright © 2011 Vafa Khalighi +%% +%% License information appended. +%% +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{ghab}[2011/10/25 v0.1 ghab boxes in LaTeX] +\font\ghalameghab=ghab + +\def\darghab{\@ifnextchar[{\@darghab}{\@darghab[\linewidth]}} + +\def\@darghab[#1]{\@ifnextchar>{\@@darghab[#1]}{\@@darghab[#1]><}} + +\def\@@darghab[#1]>#2<#3{{\def\@vasateghab{#1}\ifx\@vasateghab\@void +\else +\def\@vasateghab{\ifhmode \par\fi\centerline}% +\fi +{\ghalameghab#2\relax\global\expandafter\let\expandafter\@ghalameghab\the\font} +\def\@kagh##1##2{\hbox to \@tempdima{\ghalameghab#2\relax\char##2 +\leaders\hrule height \fontdimen5\@ghalameghab width \fontdimen5\@ghalameghab\hfill +\char##1}}% +\setbox\@tempboxa\vbox{\ifx\@vasateghab\@void \hbox{#3}\else +\@tempdima=-\fontdimen6\@ghalameghab +\advance\@tempdima-\fontdimen5\@ghalameghab +\advance\@tempdima-2\fboxsep +\advance\@tempdima#1\relax +\hsize=\@tempdima \linewidth\hsize #3\fi}% +\setbox\@tempboxa\hbox{\kern\fboxsep\box\@tempboxa +\kern\fboxsep}% +\setbox\@tempboxa\vbox{\@tempdima=\fontdimen6\@ghalameghab \@tempdimb\@tempdima +\advance\@tempdima\wd\@tempboxa \let\@hss\hss +\advance\@tempdimb-\fontdimen5\@ghalameghab \divide\@tempdimb by \tw@ +\def\@koo{\vrule width \fontdimen5\@ghalameghab\relax}\offinterlineskip +\@kagh{1}{2}\hbox to \@tempdima{\kern\@tempdimb\@koo\@hss +\box\@tempboxa \@hss\@koo\kern\@tempdimb}\@kagh{3}{4}}% +\ifx\@vasateghab\@void $\vcenter{\box\@tempboxa}$\else +\@vasateghab{\box\@tempboxa}\fi}} +\endinput +%% +%% Copyright © 2011 by Vafa Khalighi <vafaklg@gmail.com> +%% +%% Distributable under the LaTeX Project Public License, +%% version 1.3c or higher (your choice). The latest version of +%% this license is at: http://www.latex-project.org/lppl.txt +%% +%% This work is "maintained" (as per LPPL maintenance status) +%% by Vafa Khalighi. +%% +%% +%% +%% +%% +%% End of file `ghab.sty'. |