summaryrefslogtreecommitdiff
path: root/Master/tlpkg/dviout/GRAPHIC/PDL/picbox.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/dviout/GRAPHIC/PDL/picbox.tex')
-rw-r--r--Master/tlpkg/dviout/GRAPHIC/PDL/picbox.tex58
1 files changed, 58 insertions, 0 deletions
diff --git a/Master/tlpkg/dviout/GRAPHIC/PDL/picbox.tex b/Master/tlpkg/dviout/GRAPHIC/PDL/picbox.tex
new file mode 100644
index 00000000000..0ffe517cd1a
--- /dev/null
+++ b/Master/tlpkg/dviout/GRAPHIC/PDL/picbox.tex
@@ -0,0 +1,58 @@
+%----------------------------------------------------------------------%
+% Macros for GP -> TeX interface %
+% version 2.10 Nov. 12 1993 by K.Edamatsu. %
+%----------------------------------------------------------------------%
+%
+% Macros for plain TeX and LaTeX
+%
+\def\PictureOrigin{u}% Origin of a picture = upper (or lower)
+\def\SpecialCommand{lipsfile=}%
+%
+%--- picture in \hbox
+\def\PictureHbox#1{\def\PictureFile{#1}%
+ \input#1\hbox to\PictureWidth true mm
+ {\vbox to\PictureHeight true mm
+ \if\PictureOrigin u
+ {\special{\SpecialCommand\PictureFile}\vfil}%
+ \else
+ {\vfil\special{\SpecialCommand\PictureFile}}%
+ \fi\hfil}}
+%
+%--- picture in \mbox
+\def\PictureBox#1{\leavevmode\PictureHbox{#1}}
+%
+%--- picture in \fbox
+\def\PictureFrameBox#1{\leavevmode\hbox
+ {\vrule\vbox{\hrule\PictureHbox{#1}\hrule}\vrule}}
+%
+% Macros for LaTeX
+%
+\expandafter\ifx\csname LaTeX\endcsname\relax% { if \LaTeX is undefined }
+\else% { else .... }
+%
+%--- picture in LaTex's `picture' environment
+\newenvironment{PictureIn}[1]{%
+\input#1\unitlength=1mm%
+\begin{picture}(\PictureWidth,\PictureHeight)
+\if\PictureOrigin u
+ \put(0,\PictureHeight){\special{\SpecialCommand\PictureFile}}
+\else
+ \put(0,0){\special{\SpecialCommand\PictureFile}}
+\fi}{%
+\end{picture}}
+%
+%--- picture in \oval
+\def\PictureOvalBox#1{%
+\begin{PictureIn}{#1}
+ \put(\PictureCenterX,\PictureCenterY){\oval(\PictureWidth,\PictureHeight)}
+\end{PictureIn}}
+%
+%--- picture in \dashbox
+\def\PictureDashBox#1#2{%
+\begin{PictureIn}{#2}
+ \put(0,0){\dashbox{#1}(\PictureWidth,\PictureHeight){}}
+\end{PictureIn}}
+%
+\fi
+%
+\endinput