new latex package crbox (26oct11)

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

4 files changed, 178 insertions, 0 deletions

diff --git a/Master/texmf-dist/doc/latex/crbox/README b/Master/texmf-dist/doc/latex/crbox/README
new file mode 100644
index 00000000000..c10bf589b83
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/crbox/README
@@ -0,0 +1,12 @@
+__________________
+The crbox package
+
+This package implements \crbox command that can be used
+for producing  boxes with crossing lines at the corners in LaTeX.
+
+______________
+Vafa Khalighi
+vafaklg@gmail.com
+
+Copyright 2011
+Distributed under the LaTeX Project Public License
diff --git a/Master/texmf-dist/doc/latex/crbox/crbox-doc.pdf b/Master/texmf-dist/doc/latex/crbox/crbox-doc.pdf
new file mode 100644
index 00000000000..f3edb46945c
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/crbox/crbox-doc.pdf
diff --git a/Master/texmf-dist/doc/latex/crbox/crbox-doc.tex b/Master/texmf-dist/doc/latex/crbox/crbox-doc.tex
new file mode 100644
index 00000000000..9703be262cf
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/crbox/crbox-doc.tex
@@ -0,0 +1,50 @@
+\documentclass[a4paper]{article}
+\usepackage{bidicode}
+\usepackage{crbox}
+\setlength{\fboxsep}{10pt}
+\title{The \textsf{crbox} Package}
+\author{Vafa Khalighi}
+\begin{document}
+\maketitle
+Provides \Lcs{crbox} which typesets boxes with crossing lines at corners. The syntax is:
+\begin{BDef}
+\Lcs{crbox}\OptArgs\Largb{\Larga{text}}
+\end{BDef}
+Options are \textsf{curved} and \textsf{hollowcurved}.
+
+\bigskip
+\begin{lstlisting}[morekeywords={crbox}]
+%\crbox{\parbox{0.8\linewidth}{
+%Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book. It has survived not only five centuries, but also the leap into electronic typesetting, remaining essentially unchanged. It was popularised in the 1960s with the release of Letraset sheets containing Lorem Ipsum passages, and more recently with desktop publishing software like Aldus PageMaker including versions of Lorem Ipsum. 
+%}}
+\end{lstlisting}
+
+\bigskip
+\crbox{\parbox{0.8\linewidth}{
+Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book. It has survived not only five centuries, but also the leap into electronic typesetting, remaining essentially unchanged. It was popularised in the 1960s with the release of Letraset sheets containing Lorem Ipsum passages, and more recently with desktop publishing software like Aldus PageMaker including versions of Lorem Ipsum. 
+}}
+
+\bigskip
+\begin{lstlisting}[morekeywords={crbox}]
+%\crbox[curved]{\parbox{0.8\linewidth}{
+%Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book. It has survived not only five centuries, but also the leap into electronic typesetting, remaining essentially unchanged. It was popularised in the 1960s with the release of Letraset sheets containing Lorem Ipsum passages, and more recently with desktop publishing software like Aldus PageMaker including versions of Lorem Ipsum. 
+%}}
+\end{lstlisting}
+
+\bigskip
+\crbox[curved]{\parbox{0.8\linewidth}{
+Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book. It has survived not only five centuries, but also the leap into electronic typesetting, remaining essentially unchanged. It was popularised in the 1960s with the release of Letraset sheets containing Lorem Ipsum passages, and more recently with desktop publishing software like Aldus PageMaker including versions of Lorem Ipsum. 
+}}
+
+\bigskip
+\begin{lstlisting}[morekeywords={crbox}]
+%\crbox[hollowcurved]{\parbox{0.8\linewidth}{
+%Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book. It has survived not only five centuries, but also the leap into electronic typesetting, remaining essentially unchanged. It was popularised in the 1960s with the release of Letraset sheets containing Lorem Ipsum passages, and more recently with desktop publishing software like Aldus PageMaker including versions of Lorem Ipsum. 
+%}}
+\end{lstlisting}
+
+\bigskip
+\crbox[hollowcurved]{\parbox{0.8\linewidth}{
+Lorem Ipsum is simply dummy text of the printing and typesetting industry. Lorem Ipsum has been the industry's standard dummy text ever since the 1500s, when an unknown printer took a galley of type and scrambled it to make a type specimen book. It has survived not only five centuries, but also the leap into electronic typesetting, remaining essentially unchanged. It was popularised in the 1960s with the release of Letraset sheets containing Lorem Ipsum passages, and more recently with desktop publishing software like Aldus PageMaker including versions of Lorem Ipsum. 
+}}
+\end{document}
diff --git a/Master/texmf-dist/tex/latex/crbox/crbox.sty b/Master/texmf-dist/tex/latex/crbox/crbox.sty
new file mode 100644
index 00000000000..18e596f38f7
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/crbox/crbox.sty
@@ -0,0 +1,116 @@
+%%
+%% This is file `crbox.sty',
+
+%% 
+%%   __________________________________
+%%   Copyright © 2011 Vafa Khalighi
+%% 
+%%   License information appended.
+%% 
+%%
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{crbox}[2011/10/27 typesetting boxes with crossing lines in the four corners]
+\RequirePackage{biditools}
+\newif\ifcurved
+\newif\ifhollowcurved
+
+\newdimen\length@corner@paper \length@corner@paper1cm
+\newdimen\thickness@corner@paper \thickness@corner@paper0.4pt
+
+\newcommand\crbox[1][]{\def\@tempa{#1}%
+\ifx\@tempa\@void \toks@{}\else
+\toks@\expandafter{\csname#1true\endcsname}\fi
+\edef\option@cr{\noexpand\curvedfalse\noexpand\hollowcurvedfalse\the\toks@}%
+\leavevmode\@crbox}
+
+\let\option@cr\@void
+\bidi@AtEndPreamble{%
+\@ifpackageloaded{bidi}{%
+\def\@crbox#1{\vbox{\setbox\tw@\vbox{\vskip\fboxsep
+\hbox{\hskip\fboxsep\hbox{#1}\hskip\fboxsep}%
+\vskip\fboxsep}\offinterlineskip%
+\dimen@\thickness@corner@paper \@tempdima\length@corner@paper
+\option@cr \font@corner \@tempdimb\z@
+\ifhollowcurved \advance\@tempdima-1em \curvedtrue
+\let\llap\hbox \let\rlap\hbox
+\else \@tempdimb-\dimen@ \fi
+\advance\@tempdimb\@tempdima
+\ifcurved
+\def\@makecorner##1##2{\setbox\z@\hbox to \wd\tw@
+{\rlap{\if@RTL\char##2\else\char##1\fi}\copy\thr@@\hfil\copy\thr@@\llap{\if@RTL\char##1\else\char##2\fi}}%
+\ifhollowcurved\else\dp\z@\z@ \ht\z@\dimen@\fi}%
+\else
+\def\@makecorner##1##2{\setbox\z@\hbox to \wd\tw@
+{\copy\thr@@\hfil\copy\thr@@}}%
+\fi
+\ifdim\dimen@<0.4\p@
+\chardef\ch@pa16 \chardef\r@pa17%
+\chardef\r@ba18 \chardef\ch@ba19%
+\else%
+\chardef\ch@pa8 \chardef\r@pa9%
+\chardef\r@ba10 \chardef\ch@ba11%
+\fi %
+\setbox\thr@@\hbox to \@tempdima{\leaders\hrule\@height\dimen@\hfil}%
+\setbox\@ne\vbox to \@tempdimb{\leaders\vrule\@width\dimen@\vfil}%
+\@makecorner\ch@ba\r@ba
+\setbox\@ne\hbox to \wd\tw@{\copy\@ne\hfil\copy\@ne}%
+\copy\z@ \copy\@ne
+\vskip-\ht\@ne  \vskip-\dp\z@ \vskip-\ht\z@
+\copy\tw@
+\@makecorner\ch@pa\r@pa
+\vskip-\ht\z@ \vskip-\dp\z@ \vskip-\ht\@ne
+\copy\@ne\copy\z@}}%
+}{%
+\def\@crbox#1{\vbox{\setbox\tw@\vbox{\vskip\fboxsep
+\hbox{\hskip\fboxsep\hbox{#1}\hskip\fboxsep}%
+\vskip\fboxsep}\offinterlineskip%
+\dimen@\thickness@corner@paper \@tempdima\length@corner@paper
+\option@cr \font@corner \@tempdimb\z@
+\ifhollowcurved \advance\@tempdima-1em \curvedtrue
+\let\llap\hbox \let\rlap\hbox
+\else \@tempdimb-\dimen@ \fi
+\advance\@tempdimb\@tempdima
+\ifcurved
+\def\@makecorner##1##2{\setbox\z@\hbox to \wd\tw@
+{\rlap{\char##1}\copy\thr@@\hfil\copy\thr@@\llap{\char##2}}%
+\ifhollowcurved\else\dp\z@\z@ \ht\z@\dimen@\fi}%
+\else
+\def\@makecorner##1##2{\setbox\z@\hbox to \wd\tw@
+{\copy\thr@@\hfil\copy\thr@@}}%
+\fi
+\ifdim\dimen@<0.4\p@
+\chardef\ch@pa16 \chardef\r@pa17%
+\chardef\r@ba18 \chardef\ch@ba19%
+\else%
+\chardef\ch@pa8 \chardef\r@pa9%
+\chardef\r@ba10 \chardef\ch@ba11%
+\fi %
+\setbox\thr@@\hbox to \@tempdima{\leaders\hrule\@height\dimen@\hfil}%
+\setbox\@ne\vbox to \@tempdimb{\leaders\vrule\@width\dimen@\vfil}%
+\@makecorner\ch@ba\r@ba
+\setbox\@ne\hbox to \wd\tw@{\copy\@ne\hfil\copy\@ne}%
+\copy\z@ \copy\@ne
+\vskip-\ht\@ne  \vskip-\dp\z@ \vskip-\ht\z@
+\copy\tw@
+\@makecorner\ch@pa\r@pa
+\vskip-\ht\z@ \vskip-\dp\z@ \vskip-\ht\@ne
+\copy\@ne\copy\z@}}%
+}}
+\font\font@corner=ghab
+
+\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 `crbox.sty'.