%% xyps-txt.tex from $Id: xyps-txt.doc,v 2.10 1994/06/15 12:46:03 ross Exp $
%%
%% XY-pic ``Textures driver''.
%% Copyright (c) 1993-1994 Ross Moore <ross@mpce.mq.edu.au>
%%
%% This file is part of the XY-pic package for graphs and diagrams in TeX.
%% See the companion README and INSTALL files for further information.
%% Copyright (c) 1991-1994 Kristoffer H. Rose <kris@diku.dk>
%%
%% The XY-pic package is free software; you can redistribute it and/or modify
%% it under the terms of the GNU General Public License as published by the
%% Free Software Foundation; either version 2 of the License, or (at your
%% option) any later version.
%%
%% The XY-pic package is distributed in the hope that it will be useful, but
%% WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
%% or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
%% for more details.
%%
%% You should have received a copy of the GNU General Public License along
%% with this package; if not, write to the Free Software Foundation, Inc.,
%% 675 Mass Ave, Cambridge, MA 02139, USA.
%%
\ifx\xypsdviloaded\relax \message{not reloaded}\endinput \fi
\let\xypsdviloaded=\relax \xycatcodes
\xydef@\TexturesSpecial@#1{\firstPS@@\special{postscript #1}}
\xydef@\TexturesMacro@#1{\firstPS@@\special{postscript mark{#1}xy}}
\xydef@\TexturesInclude@#1{\firstPS@@\special{rawpostscriptfile #1}}
\xydef@\TexturesRaw@#1{\firstPS@@\special{rawpostscript #1}}%
\xydef@\Textures@@{\gdef\dvitype@{Textures }\dvimessage@
 \global\let\PSspecial@=\TexturesSpecial@
 \global\let\PSmacro@=\TexturesMacro@
 \global\let\PSdict@=\TexturesMacro@
 \global\let\PSraw@=\TexturesRaw@
 \global\let\PSinclude@=\TexturesInclude@
 \global\let\xyPSobeylines@=\obeyTextureslines@
 \ifUsePSdict@@
 \global\let\XYdict@=\includeXYPSdict@ \fi
 \gdef\firstPS@@{\firstPS@ \@PSshipout}%
 \gdef\endXYdict@{\firstPS@}%
 \xyPSshapes@true
 }%
\xywarnifdefined\obeyTextureslines@
{\catcode`\^^M=\active
 \gdef\obeyTextureslines@{\catcode`\^^M=\active \let^^M=\par \obeyspaces}}
 \Textures@@
\gdef\xyPScurrpt@@{\PSspecial@{userdict begin 
 0 0 transform grestore gsave itransform 
 /xyYpos exch def /xyXpos exch def end}}
 \xywithoption{line}{%
 \xyinputorelse@{xyps-l.tex}{\xyerror@{Could not load xyps-l.tex}{}}}
 \xycatcodes
 \xywithoption{rotate}{%
 \xyinputorelse@{xyps-r.tex}{\xyerror@{Could not load xyps-r.tex}{}}}
 \xycatcodes
 \xywithoption{color}{%
 \xyinputorelse@{xyps-col.tex}{\xyerror@{Could not load xyps-col.tex}{}}}
 \xycatcodes
 \xyinputorelse@{xyps-c.tex}{\xyerror@{Could not load xyps-c.tex}{}}
 \xycatcodes
 \xyinputorelse@{xyps-col.tex}{\xyerror@{Could not load xyps-col.tex}{}}
 \xycatcodes
\xyendinput