home *** CD-ROM | disk | FTP | other *** search
- % 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%
- }}}}
-