blob: 872cab600455be9aed5482fd80a96fe9e107949f (
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
|
% shadbox1.sty
%
% 17 Mar 1996
% Glazkov D.A.
% e-mail: glazkov@sci.lpi.msk.su
%
% 117924 Moscow, Leninsky Prosp. 53
% P.N.Lebedev Physical Institute of
% Russian Academy of Sciences
% RUSSIA
%
%
%
% The goal of this command is to darken the background of any box -
% text, figure, table etc. In the contrast to PostScript drivers,
% DVIWIN etc. there is not used any driver-specific properties, but
% standard Plain(La) TeX. Small black squares is places in the area
% of the box. The dimension of black square (length \deltablack) may be
% set by any means (\setlength). But it's reasonable to choose
% this dimension little greater than dimension of point of the
% output printer. By default it is equal to 0.3pt, that is suitable
% for the printer of 300 dpi.
%
% The degree of darkness is regulated by means of change the distance
% between small black squares. In this style squares are placed in the
% "chess" order - the result is better than those in the style
% "shadbox.sty".
%
% The retribution for driver-independence is: the less squares and
% nearer to each other, the greater the size of output DVI-file (and
% grows quickly). One must experiment to find balance between quality
% of shadow and size of output file.
%
%
%
% You may change this code freely. But please inform me if you use
% or improve these commands.
%
%
%
% Usage:
%
% \shadbox{x}{abc}
%
% x - ratio showing how many times the distance between squares
% greater than their size (may be only >1). 1 corresponds
% to black darkness, 2 corresponds to 50% darkness.
%
% abc - the box, which must be darken
%
%
\newdimen\deltablack
\deltablack=0.3pt
\def\shadbox#1#2{%
\newdimen\delt \delt=#1\deltablack
\setbox2=\hbox{#2}
%
\setbox3=\hbox{\vrule width\deltablack height\deltablack depth0pt}
\wd3=\delt \ht3=2\delt
\setbox4=\vbox to\ht2{\leaders\copy3\vfil\hrule width 0pt
height-\dp2 depth\dp2}
\setbox3=\hbox{\hbox{}\raise\delt\hbox{\vrule width\deltablack
height\deltablack depth0pt}}
\wd3=\delt \ht3=2\delt \dp3=0pt
\setbox6=\vbox to\ht2{\leaders\copy3\vfil\hrule width 0pt
height-\dp2 depth\dp2}
\setbox7=\hbox{\box4\box6}
\setbox5=\hbox to\wd2{\leaders\copy7\hfil}
\wd5=0pt \ht5=0pt \dp5=0pt
\leavevmode\box5\box2%
}
|
