home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 573b.lha / DVI2LJ / graybox.sty < prev    next >
Text File  |  1991-03-25  |  2KB  |  49 lines
  1. % graybox.sty  9.3.1989
  2. % print fboxes with various backgrounds
  3. %
  4. %    graybox#1#2
  5. %        #1 -> grayscale; valid values are 2, 10, 15, 30, 45, 70, 90, 100
  6. %        #2 -> textargument (exactly like fbox)
  7. %
  8. %    patbox#1#2
  9. %        #1 -> pattern; valid values are:
  10. %              1: horizontal lines
  11. %              2: vertical lines
  12. %              3: diagonal lines
  13. %              4: diagonal lines
  14. %              5: square grid
  15. %              6: diagonal grid
  16. %        #2 -> textargument (exactly like fbox)
  17. %
  18. \makeatletter
  19. %
  20. %
  21. %
  22.  
  23. \long\def\graybox#1#2{\leavevmode\setbox\@tempboxa\hbox{#2}\@tempdima\fboxrule
  24. \advance\@tempdima \fboxsep \advance\@tempdima \dp\@tempboxa
  25.    \hbox{\lower \@tempdima\hbox
  26.   {\vbox{\special{defpoint=1(,)}%
  27.           \hrule \@height \fboxrule
  28.           \hbox{\vrule \@width \fboxrule \hskip\fboxsep
  29.             \vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}\hskip
  30.                          \fboxsep\vrule \@width \fboxrule%
  31.                          \special{defpoint=2(,)}\special{gray=#1}%
  32.                          \special{fill=1/2}%
  33.                      }\hrule \@height \fboxrule%
  34.                    }}}}
  35.  
  36.  
  37. \long\def\patbox#1#2{\leavevmode\setbox\@tempboxa\hbox{#2}\@tempdima\fboxrule
  38. \advance\@tempdima \fboxsep \advance\@tempdima \dp\@tempboxa
  39.    \hbox{\lower \@tempdima\hbox
  40.   {\vbox{\special{defpoint=11(,)}%
  41.           \hrule \@height \fboxrule
  42.           \hbox{\vrule \@width \fboxrule \hskip\fboxsep
  43.             \vbox{\vskip\fboxsep \box\@tempboxa\vskip\fboxsep}\hskip
  44.                          \fboxsep\vrule \@width \fboxrule%
  45.                          \special{defpoint=12(,)}\special{pattern=#1}%
  46.                          \special{fill=11/12}%
  47.                      }\hrule \@height \fboxrule%
  48.                    }}}}
  49.