home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Geek Gadgets 1
/
ADE-1.bin
/
ade-dist
/
unixtex-6.1b-bin0.lha
/
lib
/
texmf
/
tex
/
latex
/
dvilj
/
graybox.sty
< prev
next >
Wrap
Text File
|
1996-10-12
|
2KB
|
49 lines
% graybox.sty 9.3.1989
% print fboxes with various backgrounds
%
% graybox#1#2
% #1 -> grayscale; valid values are 2, 10, 15, 30, 45, 70, 90, 100
% #2 -> textargument (exactly like fbox)
%
% patbox#1#2
% #1 -> pattern; valid values are:
% 1: horizontal lines
% 2: vertical lines
% 3: diagonal lines
% 4: diagonal lines
% 5: square grid
% 6: diagonal grid
% #2 -> textargument (exactly like fbox)
%
\makeatletter
%
%
%
\long\def\graybox#1#2{\leavevmode\setbox\@tempboxa\hbox{#2}\@tempdima\fboxrule
\advance\@tempdima \fboxsep \advance\@tempdima \dp\@tempboxa
\hbox{\lower \@tempdima\hbox
{\vbox{\special{defpoint=1(,)}%
\hrule \@height \fboxrule
\hbox{\vrule \@width \fboxrule \hskip\fboxsep
\vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}\hskip
\fboxsep\vrule \@width \fboxrule%
\special{defpoint=2(,)}\special{gray=#1}%
\special{fill=1/2}%
}\hrule \@height \fboxrule%
}}}}
\long\def\patbox#1#2{\leavevmode\setbox\@tempboxa\hbox{#2}\@tempdima\fboxrule
\advance\@tempdima \fboxsep \advance\@tempdima \dp\@tempboxa
\hbox{\lower \@tempdima\hbox
{\vbox{\special{defpoint=11(,)}%
\hrule \@height \fboxrule
\hbox{\vrule \@width \fboxrule \hskip\fboxsep
\vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}\hskip
\fboxsep\vrule \@width \fboxrule%
\special{defpoint=12(,)}\special{pattern=#1}%
\special{fill=11/12}%
}\hrule \@height \fboxrule%
}}}}