blob: 0f77efe8e78cde038cc62e1fff7ed9f3314c2809 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
% 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{color}
\newlength\bk@fboxsep
\definecolor{gris}{gray}{0.9}
\def\boitecoloriee{%
\bk@fboxsep\fboxsep
\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
\vrule\@width\fboxrule
{\fboxsep\z@
\colorbox{gris}{%
\hskip\bk@fboxsep
\box\bk@bxa
\hskip\bk@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
|
