From c3397e2195329b400975b069f1f6e3b2092f84a8 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 13 Nov 2014 23:51:30 +0000 Subject: epsf-dvipdfmx (13nov14) git-svn-id: svn://tug.org/texlive/trunk@35575 c570f23f-e606-0410-a88d-b1316a301751 --- .../tex/plain/epsf-dvipdfmx/epsf-dvipdfmx.tex | 56 ++++++++++++++++++++++ 1 file changed, 56 insertions(+) create mode 100644 Master/texmf-dist/tex/plain/epsf-dvipdfmx/epsf-dvipdfmx.tex (limited to 'Master/texmf-dist/tex/plain') diff --git a/Master/texmf-dist/tex/plain/epsf-dvipdfmx/epsf-dvipdfmx.tex b/Master/texmf-dist/tex/plain/epsf-dvipdfmx/epsf-dvipdfmx.tex new file mode 100644 index 00000000000..b6267dde1b4 --- /dev/null +++ b/Master/texmf-dist/tex/plain/epsf-dvipdfmx/epsf-dvipdfmx.tex @@ -0,0 +1,56 @@ +% epsf-dvipdfmx.tex - \input after epsf.tex when using dvipdfmx +% Originally written by Akira Kakuto, 2014. Public domain. +% +% (x)dvipdfmx patch for epsf.tex - translate bounding box to have (0,0) LL. +% +\newdimen\epsfdpxtexdimen +% +% from latex.ltx +% +\begingroup + \catcode`P=12 + \catcode`T=12 + \lowercase{\def\x{\def\rempt##1.##2PT{##1\ifnum##2>0pt.##2\fi}}} + \expandafter\endgroup\x +\def\strippt{\expandafter\rempt\the} +% +\def \epsfspecial #1{% + \epsftmp=10\epsfxsize + \divide \epsftmp by \pspoints + \ifnum \epsfrsize = 0% + \relax + \epsfdpxtexdimen=\epsfurx pt + \advance\epsfdpxtexdimen -\epsfllx pt + \edef\epsfurxx{\strippt\epsfdpxtexdimen}% + \epsfdpxtexdimen=\epsfury pt + \advance\epsfdpxtexdimen -\epsflly pt + \edef\epsfuryy{\strippt\epsfdpxtexdimen}% + \special{PSfile=\ifepsfdraft psdraft.ps\else#1\fi\space + llx=0\space + lly=0\space + urx=\epsfurxx\space + ury=\epsfuryy\space + rwi=\number\epsftmp + \epsfclipstring + }% + \else + \epsfrsize=10\epsfysize + \divide \epsfrsize by \pspoints + \epsfdpxtexdimen=\epsfurx pt + \advance\epsfdpxtexdimen -\epsfllx pt + \edef\epsfurxx{\strippt\epsfdpxtexdimen}% + \epsfdpxtexdimen=\epsfury pt + \advance\epsfdpxtexdimen -\epsflly pt + \edef\epsfuryy{\strippt\epsfdpxtexdimen}% + \special{PSfile=\ifepsfdraft psdraft.ps\else#1\fi\space + llx=0\space + lly=0\space + urx=\epsfurxx\space + ury=\epsfuryy\space + rwi=\number\epsftmp + rhi=\number\epsfrsize + \epsfclipstring + }% + \fi +}% +\endinput -- cgit v1.2.3