boites

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

1 files changed, 103 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/boites/boites_exemples.sty b/Master/texmf-dist/tex/latex/boites/boites_exemples.sty
new file mode 100644
index 00000000000..428df5039d6
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/boites/boites_exemples.sty
@@ -0,0 +1,103 @@
+% boites_examples.sty
+% (c) 2001 Vincent Zoonekynd <zoonek@math.jussieu.fr>
+% distributed under the GNU Public Licence
+
+\ProvidesFile{boites_exemples.sty}
+\ProvidesPackage{boites_exemples}
+\RequirePackage{boites}
+
+%% Première modification
+
+\def\boiteepaisseavecuntitre#1{%
+  \def\thickhrulefill{\leavevmode \leaders \hrule height 1pt \hfill \kern \z@}%
+  \def\bkvz@before@breakbox{\ifhmode\par\fi\vskip\breakboxskip\relax}%
+  \fboxrule=2pt
+  \def\bkvz@set@linewidth{\advance\linewidth -2\fboxrule
+                          \advance\linewidth -2\fboxsep}%
+  \def\bkvz@left{\vrule \@width\fboxrule\hskip\fboxsep}%
+  \def\bkvz@right{\hskip\fboxsep\vrule \@width\fboxrule}%
+  \def\bkvz@top{\hbox to \hsize{%
+      \vrule\@width\fboxrule\@height 1.2pt %%% D'où vient ce 0.2pt ????
+      \thickhrulefill{#1}\thickhrulefill
+      \vrule\@width\fboxrule\@height 1.2pt}}%
+  \def\bkvz@bottom{\hrule\@height\fboxrule}%
+  \breakbox}
+\def\endboiteepaisseavecuntitre{\endbreakbox}
+
+%% Seconde modification
+\def\boitenumeroteeavecunedoublebarre#1{%
+  %\fboxrule=0.4pt
+  \def\bkvz@before@breakbox{\ifhmode\par\fi\vskip\breakboxskip\relax}%
+  \def\bkvz@set@linewidth{\advance\linewidth -2\fboxrule 
+    \advance\linewidth -2\fboxsep
+    \advance\linewidth -2cm}%
+  \def\bkvz@left{\hspace{2cm}%
+    \ifnum\bk@lcnt=1\llap{\textbf{#1}\quad}\fi
+    \vrule \@width\fboxrule\hskip\fboxsep
+    \vrule \@width\fboxrule\hskip\fboxsep}%
+  \def\bkvz@right{}%
+  \def\bkvz@top{}%
+  \def\bkvz@bottom{}%
+  \breakbox
+}
+\def\endboitenumeroteeavecunedoublebarre{\endbreakbox}
+
+%% Troisième modification
+  \newdimen\bk@hauteurcourrante
+  \newdimen\bk@hauteursuivante
+  \newdimen\bk@tempdim
+\def\boiteavecunelignequiondulesurlecote{%
+  \def\bk@espace{ }%
+  \def\pt@to@bp##1{##1=.99627393548##1}% 1bp=1.00374pt
+  \def\bkvz@before@breakbox{\ifhmode\par\fi\vskip\breakboxskip\bk@hauteurcourrante=1200bp}%
+  \def\bkvz@set@linewidth{\advance\linewidth -15bp}%
+  \def\bkvz@left{\global\bk@hauteursuivante=\bk@hauteurcourrante
+    \global\advance\bk@hauteursuivante by -\dp\bk@bxa
+    \global\advance\bk@hauteursuivante by -\ht\bk@bxa
+    \edef\bk@arguments@graphicx{[bb = 0 }%
+    \bk@tempdim=\bk@hauteurcourrante
+    \pt@to@bp\bk@tempdim
+    \edef\bk@arguments@graphicx{%
+      \bk@arguments@graphicx\strip@pt\bk@tempdim\bk@espace}%
+    \bk@tempdim=\bk@hauteursuivante
+    \pt@to@bp\bk@tempdim
+    \edef\bk@arguments@graphicx{%
+      \bk@arguments@graphicx 15
+      \strip@pt\bk@tempdim\bk@espace,
+      clip=true
+      ]}%
+    %\show\bk@arguments@graphicx
+    \smash{\raisebox{\the\ht\bk@bxa}{%
+        \expandafter\includegraphics\bk@arguments@graphicx
+        {ligne_qui_ondule_sur_la_gauche.eps}}}%
+    \global\bk@hauteurcourrante=\bk@hauteursuivante
+    }%
+  \let\bkvz@right\relax
+  \let\bkvz@top\relax
+  \let\bkvz@bottom\relax
+  \breakbox}
+\def\endboiteavecunelignequiondulesurlecote{\endbreakbox}
+
+%% Quatrième modification
+\RequirePackage{pstricks}
+\newgray{gris}{0.9}
+\def\boitecoloriee{%
+  \def\bkvz@before@breakbox{\ifhmode\par\fi\vskip\breakboxskip\relax}%
+  \def\bkvz@set@linewidth{\advance\linewidth -2\fboxrule 
+    \advance\linewidth -2\fboxsep} %
+  \def\bk@line{\hbox to \linewidth{%
+      \ifbkcount\smash{\llap{\the\bk@lcnt\ }}\fi
+      \psframebox*[framesep=0pt,fillcolor=gris,linewidth=0pt]{%
+        \vrule\@width\fboxrule \hskip\fboxsep
+        \box\bk@bxa
+        \hskip\fboxsep \vrule\@width\fboxrule
+        }%
+      }}%
+  %\def\bkvz@top{\hrule\@height\fboxrule} 
+  \def\bkvz@top{\hrule height .6pt}%%% Pourquoi faut-il ajouter 0.2pt ???
+  \def\bkvz@bottom{\hrule\@height\fboxrule}%
+  \breakbox}
+\def\endboitecoloriee{\endbreakbox}
+
+
+\endinput